United States
Environmental Protection
Agency
Office of Air Quality
Planning and Standards
Research Triangle Park NC 27711
EPA-450/4-80-010
May 1980
Air
The Emissions Inventory
System/Point Source
User's Guide
-------
EPA-450/4-80-010
The Emissions Inventory System/
Point Source User's Guide
by
Larry R. Me Master, Project Leader
Research Triangle Institute
Research Triangle Park, North Carolina 27709
Contract No. 68-02-3011
EPA Project Officer: Lloyd M. Hedgepeth
Prepared for
U.S. ENVIRONMENTAL PROTECTION AGENCY
Office of Air, Noise, and Radiation
Office of Air Quality Planning and Standards
Research Triangle Park, North Carolina 27711
May 1980
-------
This report is issued by the Environmental Protection Agency to report
technical data of interest to a limited number of readers. Copies are
available free of charge to Federal employees, current contractors and
grantees, and nonprofit organizations - in limited quantities - from the
Library Services Office (MD-35) , U.S. Environmental Protection Agency,
Research Triangle Park, North Carolina 27711; or for a nominal fee,
from the National Technical Information Service, 5285 Port Royal Road,
Springfield, Virginia 22161.
This report was furnished to the Environmental Protection Agency by
Research Triangle Institute, Research Triangle Park, North Carolina
27709, in fulfillment of Contract No. 68-02-3011. The contents of this
report are reproduced herein as received from Research Triangle
Institute. The opinions, findings, and conclusions expressed are
those of the author and not necessarily those of the Environmental
Protection Agency. Mention of company or product names is not to be
considered as an endorsement by the Environmental Protection Agency.
Publication No. EPA-450/4-80-010
-------
EIS/PS
TABLE OF CONTENTS
Page 1
Release Date: 2/01/80
Update #: P-l
TABLE OF CONTENTS
LIST OF FIGURES xvii
LIST OF TABLES xxvi
ACKNOWLEDGEMENT xxvi i
1.0 INTRODUCTION 1
1.1 Organization 1
1.2 Definition of Terms and Conventions 10
2.0 OVERVIEW OF EIS/PS 34
2.1 Introduction 34
2.2 Program Structure 36
2.3 System Charts 38
3.0 ECONOMICS 44
3.1 Economy Measures 44
4.0 FILE CREATION AND MAINTENANCE 46
4.1 Introduction 46
4.2 Emission Factor File 47
4.2.1 Introduction 47
4.2.2 NEDS Emission Factor File Transaction
Sort Program - PSRNEEF (EP0010) 52
4.2.2.1 Description 52
4.2.2.2 File Formats 52
4.2.2.3 Options and Control Cards 52
4.2.2.4 Error Messages 53
4.2.2.5 Cataloged JCL 53
4.2.2.6 Warnings and Special Instructions 53
4.2.2.7 Cost Considerations 53
4.2.2.8 Related Programs and Procedures 54
4.2.3 NEDS to EIS/PS Emision Factor File Transaction
Conversion Program - PCVNEEF (EP0020) 57
4.2.3.1 Description 57
4.2.3.2 File Formats 59
4.2.3.3 Options and Control Cards 59
111
-------
EIS/PS
TABLE OF CONTENTS
Page 2
Release Date: 2/01/80
Update #: P-l
4.2.3.4 Error Messages 60
4.2.3.5 Cataloged JCL - EPCVE10 63
4.2.3.5.1 JCL Listing 63
4.2.3.5.2 Cross-reference of DD Names
and Files 63
4.2.3.5.3 User-supplied JCL 64
4.2.3.5.4 Sample Run Stream 64
4.2.3.6 Warnings and Special Instructions 65
4.2.3.7 Cost Considerations 65
4.2.3.8 Related Programs and Procedures 65
4.2.4 Emission Factor File Transaction
Sort Program - PSREFTR (EP0030) 78
4.2.4.1 Description 78
4.2.4.2 File Formats 78
4.2.4.3 Options and Control Cards 78
4.2.4.4 Error Messages 79
4.2.4.5 Cataloged JCL 79
4.2.4.6 Warnings and Special Instructions 79
4.2.4.7 Cost Considerations 80
4.2.4.8 Related Program and Procedures 80
4.2.5 Emission Factor File Edit-Maintenance
Program - PEMEFAC (EP0040) 83
4.2.5.1 Description 83
4.2.5.2 File Formats 85
4.2.5.3 Options and Control Cards 85
4.2.5.4 Error Messages 86
4.2.5.5 Cataloged JCL - EPEME10 96
4.2.5.5.1 JCL Listing 96
4.2.5.5.2 Cross-reference of DD Names
and Files 97
4.2.5.5.3 User-supplied JCL 98
4.2.5.5.4 Sample Run Stream 98
4.2.5.6 Warnings and Special Instructions 98
4.2.5.7 Cost Considerations 99
4.2.5.8 Related Programs and Procedures 100
IV
-------
EIS/PS
TABLE OF CONTENTS
Page 3
Release Date; 2/01/80
Update #; P-l
4.3 Master File 128
4.3.1 Introduction 128
4.3.2 NEDS Transaction Sort Program -
PSRNETR (EP0050) 136
4.3.2.1 Description 136
4.3.2.2 File Formats 136
4.3.2.3 Options and Control Cards 136
4.3.2.4 Error Messages 137
4.3.2.5 Cataloged JCL - ECCET10 137
4.3.2.6 Warnings and Special Instructions 137
4.3.2.7 Cost Considerations 137
4.3.2.8 Related Programs and Procedures 138
4.3.3 NEDS to EIS/PS Master File Transaction
Conversion-Edit Program - PCENETR (EP0060) 141
4.3.3.1 Description 141
4.3.3.2 File Formats 143
4.3.3.3 Options and Control Cards 144
4.3.3.4 Error Messages 145
4.3.3.5 Cataloged JCL - EPCET10 167
4.3.3.5.1 JCL Listing 167
4.3.3.5.2 Cross-reference of DD Names
and Files 167
4.3.3.5.3 User-supplied JCL 168
4.3.3.5.4 Sample Run Stream 168
4.3.3.6 Warnings and Special Instructions 168
4.3.3.7 Cost Considerations 168
4.3.3.8 Related Programs and Procedures 169
4.3.4 Master File Transaction Sort
Program - PSRMFTR (EP0070) 187
4.3.4.1 Description 187
4.3.4.2 File Formats 187
4.3.4.3 Options and Control Cards 187
4.3.4.4 Error Messages 188
4.3.4.5 Cataloged JCL 188
4.3.4.6 Warnings and Special Instructions 188
4.3.4.7 Cost Considerations 188
4.3.4.8 Related Programs and Procedures 189
-------
EIS/PS
TABLE OF CONTENTS
Page 4
Release Date: 2/01/80
Update #: P-l
4.3.5 Master File Transaction Edit Program -
PEDMSTR (EP0080) 192
4.3.5.1 Description 192
4.3.5.2 File Formats 193
4.3.5.3 Options and Control Cards 194
4.3.5.4 Error Messages 195
4.3.5.5 Cataloged JCL - EPEDT10 216
4.3.5.5.1 JCL Listing 216
4.3.5.5.2 Cross-reference of DD Names
and Files 216
4.3.5.5.3 User-supplied JCL 216
4.3.5.5.4 Sample Run Stream 217
4.3.5.6 Warnings and Special Instructions 217
4.3.5.7 Cost Considerations 217
4.3.5.8 Related Programs and Procedures 218
4.3.6 Master File Internal Transaction Pre-Insertion
Sort Program - PSREFIN (EP0090) 263
4.3.6.1 Description 263
4.3.6.2 File Formats 263
4.3.6.3 Options and Control Cards 264
4.3.6.4 Error Messages 264
4.3.6.5 Cataloged JCL 264
4.3.6.6 Warnings and Special Instructions 264
4.3.6.7 Cost Considerations 264
4.3.6.8 Related Programs and Procedures 265
4.3.7 Master File Internal Transaction Emission
Factor Insertion Program - PMSEFIN (EP0100) 268
4.3.7.1 Description 268
4.3.7.2 File Formats 269
4.3.7.3 Options and Control Cards 269
4.3.7.4 Error Messages 271
4.3.7.5 Cataloged JCL - EPMST10 274
4.3.7.5.1 JCL Listing 274
4.3.7.5.2 Cross-reference of DD Names
and Files 274
4.3.7.5.3 User-supplied JCL 275
4.3.7.5.4 Sample Run Stream 275
VI
-------
EIS/PS
TABLE OF CONTENTS
Page 5
Release Date: 2/01/80
Update #: P-l
4.3.7.6 Warnings and Special Instructions 276
4.3.7.7 Cost Considerations 276
4.3.7.8 Related Programs and Procedures 277
4.3.8 Master File Internal Transaction Sort
Program - PSRINTR (EP0110) 286
4.3.8.1 Description 286
4.3.8.2 File Formats 286
4.3.8.3 Options and Control Cards 286
4.3.8.4 Error Messages 287
4.3.8.5 Cataloged JCL 287
4.3.8.6 Warnings and Special Instructions 287
4.3.8.7 Cost Considerations 287
4.3.8.8 Related Programs and Procedures 288
4.3.9 Master File Maintenance Program -
PFMMSTR (EP0120) 291
4.3.9.1 Description 291
4.3.9.2 File Formats 294
4.3.9.3 Options and Control Cards 295
4.3.9.4 Error Messages 296
4.3.9.5 Cataloged JCL - EPFMM10 304
4.3.9.5.1 JCL Listing 304
4.3.9.5.2 Cross-reference of DD Names
and Files 304
4.3.9.5.3 User-supplied JCL 305
4.3.9.5.4 Sample Run Stream 305
4.3.9.6 Warnings and Special Instructions ...... 305
4.3.9.7 Cost Considerations 305
4.3.9.8 Related Programs and Procedures 306
4.3.10 Master File Emission Factor Transaction
Generator Program - PMSEFGN (EP0130) 326
4.3.10.1 Description 326
4.3.10.2 File Formats 326
4.3.10.3 Options and Control Cards 328
4.3.10.4 Error Messages 329
4.3.10.5 Cataloged JCL - EPMSM10 331
4.3.10.5.1 JCL Listing 331
4.3.10.5.2 Cross-reference of DD Names
and Files 331
-------
EIS/PS
TABLE OF CONTENTS
Page 6
Release Date: 2/01/80
Update #: P-l
4.3.10.5.3 User-supplied JCL 332
4.3.10.5.4 Sample Run Stream 332
4.3.10.6 Warnings and Special Instructions 333
4.3.10.7 Cost Considerations 334
4.3.10.8 Related Programs and Procedures 334
4.4 Multi-program Procedures 343
4.4.1 Introduction 343
4.4.2 Emission Factor File Edit-Maintenance
from NEDS Emisson Factor File
Transactions - EPEME20 345
4.4.2.1 Description 345
4.4.2.2 JCL Listing 345
4.4.2.3 Cross-reference of DD Names and Files 345
4.4.2.4 User-supplied JCL 347
4.4.2.5 Sample Run Stream 347
4.4.3 Master File Edit-Maintenance - EPEMM10 355
4.4.3.1 Description 355
4.4.3.2 JCL Listing 355
4.4.3.3 Cross-reference of DD Names and Files 355
4.4.3.4 User-supplied JCL 357
4.4.3.5 Sample Run Stream 358
4.4.4 Master File Maintenance from NEDS
Transactions - EPFMM20 368
4.4.4.1 Description 368
4.4.4.2 JCL Listing 368
4.4.4.3 Cross-reference of DD Names and Files 368
4.4.4.4 User-supplied JCL 370
4.4.4.5 Sample Run Stream 371
4.4.5 Master File Maintenance from Emission
Factor Transactions - EPFMM30 381
4.4.5.1 Description 381
4.4.5.2 JCL Listing 381
4.4.5.3 Cross-reference of DD Names and Files 381
4.4.5.4 User-supplied JCL 383
4.4.5.5 Sample Run Stream 383
vm
-------
EIS/PS
TABLE OF CONTENTS
Page 7
Release Date: 2/01/80
Update #: P-l
5.0 DATA ACCESSING AND MANIPULATION 393
5.1 Introduction 393
5.2 Retrieval 394
5.2.1 Introduction 394
5.2.2 Retrieval Language Processor Program -
PRTLNGP (EP0140) 397
5.2.2.1 Description 397
5.2.2.2 File Formats 398
5.2.2.2.1 EIS/PS Retrieval Language .... 399
5.2.2.2.2 COBOL Retrievals 408
5.2.2.3 Options and Control Cards 411
5.2.2.4 Error Messages 411
5.2.2.5 Cataloged JCL - EPRTM10 414
5.2.2.5.1 JCL Listing 414
5.2.2.5.2 Cross-reference of DD Names
and Files 415
5.2.2.5.3 User-supplied JCL 415
5.2.2.5.4 Sample Run Stream 415
5.2.2.6 Warnings and Special Instructions 416
5.2.2.7 Cost Considerations 418
5.2.2.8 Related Programs and Procedures 419
5.2.3 Generated Retrieval Program - PRTGENR
(EP0150) 437
5.2.3.1 Description 437
5.2.3.2 File Formats 437
5.2.3.3 Options and Control Cards 438
5.2.3.4 Error Messages 438
5.2.3.5 Cataloged JCL - EPRTM20 439
5.2.3.5.1 JCL Listing 439
5.2.3.5.2 Cross-reference of DD Names
and Files 439
5.2.3.5.3 User-supplied JCL 439
5.2.3.5.4 Sample Run Stream 439
-------
EIS/PS
TABLE OF CONTENTS
Page 8
Release Date: 2/01/80
Update #: P-l
5.2.3.6 Warnings and Special Instructions 440
5.2.3.7 Cost Considerations 440
5.2.3.8 Related Programs and Procedures 441
5.3 Sort Generation. . 446
5.3.1 Introduction 446
5.3.2 Sort Language Processor Program -
PSRLNGP (EP0160) 449
5.3.2.1 Description 449
5.3.2.2 File Formats 451
5.3.2.3 Options and Control Cards 452
5.3.2.4 Error Messages 452
5.3.2.5 Cataloged JCL - EPSRM10 454
5.3.2.5.1 JCL Listing 454
5.3.2.5.2 Cross-reference of DD Names
and files 455
5.3.2.5.3 User-supplied JCL 455
5.3.2.5.4 Sample Run Stream 455
5.3.2.6 Warnings and Special Instructions 456
5.3.2.7 Cost Considerations 457
5.3.2.8 Related Programs and Procedures 457
5.3.3 Generated Sort Program - PSRGENR (EP0170) 468
5.3.3.1 Description 468
5.3.3.2 File Formats 469
5.3.3.3 Options and Control Cards 469
5.3.3.4 Error Messages 469
5.3.3.5 Cataloged JCL - EPSRM20 470
5.3.3.5.1 JCL Listing 470
5.3.3.5.2 Cross-reference of DD Names
and Files 470
5.3.3.5.3 User-supplied JCL 471
5.3.3.5.4 Sample Run Stream 471
5.3.3.6 Warnings and Special Instructions 471
5.3.3.7 Cost Considerations 472
5.3.3.8 Related Programs and Procedures 472
-------
EIS/PS
TABLE OF CONTENTS
Page 9
Release Date: 2/01/80
Update #: P-l
5.4 Miscellaneous 477
5.4.1 Introduction 477
5.4.2 Internal Transaction File Concatenation Program -
PMSTCON (EP0190) 479
5.4.2.1 Description 479
5.4.2.2 File Formats 479
5.4.2.3 Options and Control Cards 479
5.4.2.4 Error Messages 479
5.4.2.5 Cataloged JCL EPMST20 479
5.4.2.5.1 JCL Listing 479
5.4.2.5.2 Cross-reference of DD Names
and Files 480
5.4.2.5.3 User-supplied JCL 480
5.4.2.5.4 Sample Run Stream 480
5.4.2.6 Warnings and Special Instructions 480
5.4.2.7 Cost Considerations 481
5.4.2.8 Related Programs and Procedures 481
5.5 Multi-program Procedures 487
5.5.1 Introduction 487
5.5.2 Retrieval - EPRTM30 488
5.5.2.1 Description 488
5.5.2.2 JCL Listing 488
5.5.2.3 Cross-reference of DD Names
and Files 488
5.5.2.4 User-supplied JCL 489
5.5.2.5 Sample Run Stream 489
5.5.3 Sort Generation - EPSRM30 496
5.5.3.1 Description 496
5.5.3.2 JCL Listing 496
5.5.3.3 Cross-reference of DD Names
and Files 496
5.5.3.4 User-suppplied JCL 497
5.5.3.5 Sample Run Stream 497
6.0 REPORTS 504
6.1 Introduction 504
6.2 EPA-Required Reports 505
XI
-------
EIS/PS
TABLE OF CONTENTS
Page 10
Release Date: 2/01/80
Update #: P-l
6.2.1 Introduction 505
6.2.2 Annual Report Program - PRPENTR (EP0200) 507
6.2.2.1 Description 507
6.2.2.2 File Formats 508
6.2.2.3 Options and Control Cards 509
6.2.2.4 Error Messages 511
6.2.2.5 Cataloged JCL - EPRPM10 513
6.2.2.5.1 JCL Listing 513
6.2.2.5.2 Cross-reference of DD Names
and Files 513
6.2.2.5.3 User-supplied JCL 514
6.2.2.5.4 Sample Run Stream 514
6.2.2.6 Warnings and Special Instructions 515
6.2.2.7 Cost Considerations 516
6.2.2.8 Related Programs and Procedures 516
6.3 File Listings 530
6.3.1 Introduction 530
6.3.2 Master File Detailed Report Program -
PRPMSTR (EP0210) 535
6.3.2.1 Description 535
6.3.2.2 File Formats 535
6.3.2.3 Options and Control Cards 535
6.3.2.4 Error Messages 536
6.3.2.5 Cataloged JCL - EPRPM20 536
6.3.2.5.1 JCL Listing 536
5.3.2.5.2 Cross-reference of DD Names
and Files 536
6.3.2.5.3 User-supplied JCL 536
6.3.2.5.4 Sample Run Stream 536
6.3.2.6 Warnings and Special Instructions 537
6.3.2.7 Cost Considerations 537
6.3.2.8 Related Programs and Procedures 538
6.3.3 Master File Formatted Dump Program -
PRPDUMP (EP0220) 544
6.3.3.1 Description 544
6.3.3.2 File Formats 544
6.3.3.3 Options and Control Cards 544
-------
EIS/PS
TABLE OF CONTENTS
Page 11
Release Date: 2/01/80
Update #: P-l
6.3.3.4 Error Messages 544
6.3.3.5 Cataloged JCL - EPRPM30 545
6.3.3.5.1 JCL Listing 545
6.3.3.5.2 Cross-reference of DD Names
and Files 545
6.3.3.5.3 User-supplied JCL 545
6.3.3.5.4 Sample Run Stream 545
6.3.3.6 Warnings and Special Instructions 546
6.3.3.7 Cost Considerations 546
6.3.3.8 Related Programs and Procedures 547
6.3.4 Emission Factor File Detailed Report
Program - PRPEFAC (EP0150) 552
6.3.4.1 Description 552
6.3.4.2 File Formats 553
6.3.4.3 Options and Control Cards 553
6.3.4.4 Error Messages 553
6.3.4.5 Cataloged JCL - ECRPE10 554
6.3.4.5.1 JCL Listing 554
6.3.4.5.2 Cross-reference of DD Names
and Files 555
6.3.4.5.3 User-supplied JCL 555
6.3.4.5.4 Sample Run Stream 555
6.3.4.6 Warnings and Special Instructions 555
6.3.4.7 Cost Considerations 556
6.3.4.8 Related Programs and Procedures 556
6.4 Summary Report 560
6.4.1 Introduction 560
6.4.2 Master File Emissions Projection Program -
PRPEPRJ (EP0250) 562
6.4.2.1 Description 562
6.4.2.2 File Formats 566
6.4.2.3 Options and Control Cards 567
6.4.2.4 Error Messages 573
6.4.2.5 Cataloged JCL - EPRPM50 573
6.4.2.5.1 JCL Listing 573
6.4.2.5.2 Cross-reference of DD Names
and Files 573
6.4.2.5.3 User-supplied JCL 573
6.4.2.5.4 Sample Run Stream 574
xni
-------
EIS/PS
TABLE OF CONTENTS
Page 12
Release Date: 2/01/80
Update #: P-l
6.4.2.6 Warnings and Special Instructions 576
6.4.2.7 Cost Considerations 576
6.4.2.8 Related Programs and Procedures 577
6.5 Quick Look Report 586
6.5.1 Introduction 586
6.5.2 Quick Look Edit Program -
PRTQLED (EP0260) 592
6.5.2.1 Description 592
6.5.2.2 File Formats 592
6.5.2.3 Options and Control Cards 593
6.5.2.4 Error Messages 609
6.5.2.5 Cataloged JCL 618
6.5.2.6 Warnings and Special Instructions 619
6.5.2.7 Cost Considerations 619
6.5.2.8 Related Programs and Procedures 619
6.5.3 Quick Look Extract Program -
PRTQLEX (EP0270) 659
6.5.3.1 Description 659
6.5.3.2 File Formats 660
6.5.3.3 Options and Control Cards 660
6.5.3.4 Error Messages 661
6.5.3.5 Cataloged JCL - EPRTM40 661
6.5.3.5.1 JCL Listing 661
6.5.3.5.2 Cross-reference of DD Names
and Files 661
6.5.3.5.3 User-supplied JCL 661
6.5.3.5.4 Sample Run Stream 662
6.5.3.6 Warnings and Special Instructions 663
6.5.3.7 Cost Considerations 663
6.5.3.8 Related Programs and Procedures 663
6.5.4 Quick Look Report Program -
PRPQUIK (EP0280) 671
6.5.4.1 Description 671
6.5.4.2 File Formats 672
6.5.4.3 Options and Control Cards 672
6.5.4.4 Error Messages 672
6.5.4.5 Cataloged JCL - EPRPM60 673
xiv
-------
EIS/PS
TABLE OF CONTENTS
Page 13
Release Date: 2/01/80
Update #: P-l
6.5.4.5.1 JCL Listing 673
6.5.4.5.2 Cross-reference of DD Names
and Files 673
6.5.4.5.3 User-supplied JCL 674
6.5.4.5.4 Sample Run Stream 674
6.5.4.6 Warnings and Special Instructions 675
6.5.4.7 Cost Considerations 675
6.5.4.8 Related Programs and Procedures 676
6.5.5 Quick Look Turnaround Document Program -
PRPTURN (EP0290) 684
6.5.5.1 Description 684
6.5.5.2 File Formats 685
6.5.5.3 Options and Control Cards 686
6.5.5.4 Error Messages 686
6.5.5.5 Cataloged JCL - EPRPM70 687
6.5.5.5.1 JCL Listing 687
6.5.5.5.2 Cross-reference of DD Names
and Files 687
6.5.5.5.3 User-supplied JCL 688
6.5.5.5.4 Sample Run Stream 688
6.5.5.6 Warnings and Special Instructions 689
6.5.5.7 Cost Considerations 689
6.5.5.8 Related Programs and Procedures 690
7.0 INTER-FUNCTIONAL PROCEDURES 701
7.1 Introduction 701
7.2 Examples 702
8.0 JCL AND GENERAL TOPICS 704
8.1 IBM JCL 704
8.1.1 Introduction 704
8.1.2 JOB Card 705
8.1.3 EXEC Card 705
8.1.4 DD Card 706
8.1.5 Special JCL Cards 707
8.1.6 Cataloged Procedures 707
8.2 Updates 716
8.2.1 Introduction 716
8.2.2 General Update Information 716
xv
-------
EIS/PS
TABLE OF CONTENTS
Page 14
Release Date: 2/01/80
Update #: P-l
8.2.2.1 Update Numbers 716
8.2.2.2 Update Package 717
8.2.3 Update Installation 718
8.2.3.1 IBM Utility IEBUPDTE 719
8.2.3.2 Run Stream for IEBUPDTE 720
8.2.3.3 Non-IEBUPDTE Updates 721
8.2.4 Compiling Updated Programs 721
8.2.4.1 Cataloged JCL - EPCLC10 722
8.2.4.1.1 JCL Listing 722
8.2.4.1.2 User-supplied JCL 722
8.2.4.1.3 Sample Run Stream 722
8.2.5 Testing Modifications 723
8.2.6 Cost Considerations 723
8.2.7 Warnings and Special Instructions 724
8.3 Installation of EIS/PS 750
8.3.1 Introduction 750
8.3.2 Initial Preparation 750
8.3.3 Installation Job Execution 751
8.3.4 Program Modification 752
8.3.5 Procedure Modification 752
8.3.6 Compiling Programs 754
8.3.7 Testing the System 754
8.3.8 Cost Consideration 755
8.3.9 Warnings and Special Instructions 756
APPENDIX A: CODE TABLES 770
APPENDIX B: EIS/PS FILE SPECIFICATIONS 775
APPENDIX C: SAMPLE LOAD SHEETS 786
xvi
-------
EIS/PS
LIST OF FIGURES
Page 1
Release Date: 2/01/80
Update #: P-l
LIST OF FIGURES
Figure Page
Number Title Number
1.1-a Function Indicators 3
1.1-b EIS/PS Programs 4
1.1-c File Codes 6
1.1-d EIS/PS Cataloged Procedures 7
2.3-a EIS/PS System Flowchart 39
4.2.1-a NEDS to EIS/PS Emission Factor File Transaction
Conversion Flowchart 49
4.2.1-b Emission Factor File Edit-Maintenance Flowchart . . 50
4.2.2-a Sort Sequence for NEDS Emission Factor File
Transactions 55
4.2.2-b Diagnostic Report 56
4.2.3-a NEDS Emission Factor File Transaction Formats ... 66
4.2.3-b Diagnostic Report 70
4.2.3-c Transaction Listing 71
4.2.3-d Option Card Format 72
4.2.3-e Cataloged Procedure EPCvElO 73
4.2.3-f Substitutable Parameters for EPCVE10 76
4.2.4-a Sort Sequence for EIS/PS Emission Factor File
Transaction 81
4.2.4-b Diagnostic Report 82
4.2.5-a Emission Factor File Record Formats 101
4.2.5-b Emission Factor Description File Record Formats . . 103
4.2.5-c Emission Factor File Transaction Formats 105
4.2.5-d Data Field Definitions 110
xvi i
-------
EIS/PS
LIST OF FIGURES
Page 2
Release Date: 2/01/80
Update #: P-l
LIST OF FIGURES
Figure Page
Number Title Number
4.2.5-e Diagnostic Report 115
4.2.5-f Input Emission Factor File Listing 116
4.2.5-g Input Emission Factor Description File Listing. . . 117
4.2.5-h Output Emission Factor File Listing 118
4.2.5-i Output Emission Factor Description File Listing . . 119
4.2.5-j Transaction Listing 120
4.2.5-k Option Card Format 121
4.2.5-1 Cataloged Procedure EPEME10 122
4.2.5-m Substitutable Parameters for EPEME10 126
4.3-a EIS/PS Master File Transaction Edit Flowchart ... 131
4.3-b NEDS to EIS/PS Master File Transaction
Conversion-Edit Flowchart 132
4.3-c Master File Internal Transaction
Emission Factor Insertion Flowchart 133
4.3-d EIS/PS Master File Maintenance Flowchart 134
4.3-e Master File Emission Factor Transaction
Generator Flowchart 135
4.3.2-a Sort Sequence for NEDS Point Source Transactions. . 139
4.3.2-b Diagnostic Report 140
4.3.3-a NEDS Transaction Formats 170
4.3.3-b Diagnostic Report 178
4.3.3-c NEDS Transaction Listing 179
4.3.3-d Internal Transaction Listing 180
4.3.3-e Option Card Format 181
XVI11
-------
EIS/PS
LIST OF FIGURES
Page 3
Release Date: 2/01/80
Update #: P-l
LIST OF FIGURES
Figure Page
Number Title Number
4.3.3-f Cataloged Procedure EPCET10 182
4.3.3-g Substitutable Parameters for EPCET10 185
4.3.4-a Sort Sequence for EIS/PS Master File
Transactions 190
4.3.4-b Diagnostic Report 191
4.3.5-a EIS/PS Master File Transaction Formats 219
4.3.5-b Definition of EIS/PS Master File Transaction
Fields 233
4.3.5-c EIS/PS Internal Transaction Format 254
4.3.5-d Diagnostic Report 255
4.3.5-e Input Transaction Listing 256
4.3.5-f Internal Transaction Listing 257
4.3.5-g Option Card Format 258
4.3.5-h Cataloged Procedure EPEDT10 259
4.3.5-i Substitutable Parameters for EPEDT10 262
4.3.6-a Insertion Sort Sequence for Master File Internal
Transactions 266
4.3.6-b Diagnostic Report 267
4.3.7-a Valid Insertion Fields 278
4.3.7-b Diagnostic Report 279
4.3.7-c Option Card Format 280
4.3.7-d Cataloged Procedure EPMST1 281
4.3.7-e Substitutable Parameters for EPMST10 284
xix
-------
EIS/PS
LIST OF FIGURES
Page 4
Release Date: 2/01/80
Update #: P-l
LIST OF FIGURES
Figure Page
Number Title Number
4.3.8-a Sort Sequence for Master File Internal
Transactions 289
4.3.8-b Diagnostic Report 290
4.3.9-a EIS/PS Master File Format 307
4.3.9-b Structure of EIS/PS Master File 315
4.3.9-c Diagnostic Report 316
4.3.9-d Input Master File Listing 317
4.3.9-e Output Master File Listing 318
4.3.9-f Internal Transactions Listing 319
4.3.9-g Option Card Format 320
4.3.9-h Cataloged Procedure EPFMM10 321
4.3.9-i Substitutable Parameters for EPFMM10 324
4.3.10-a Diagnostic Report 335
4.3.10-b Option Card Format 336
4.3.10-c Cataloged Procedure EPMSM10 337
4.3.10-d Substitutable Parameters for EPMSM10 341
4.4.2-a Cataloged Procedure EPEME20 348
4.4.2-b Substitutable Parameters for EPEME20 353
4.4.3-a Cataloged Procedure EPEMM10 359
4.4.3-b Substitutable Parameters for EPEMM10 366
4.4.4-a Cataloged Procedure EPFMM20 372
4.4.4-b Substitutable Parameters for EPFMM20 379
4.4.5-a Cataloged Procedure EPFMM30 385
4.4.5-b Substituable Parameters for EPFMM30 391
xx
-------
EIS/PS
LIST OF FIGURES
Page 5
Release Date: 2/01/80
Update #: P-l
Figure
Number
LIST OF FIGURES
Title
Page
Number
5.2.1-a
5.2.2-a
5.2.2-b
5.2.2-c
5.2.2-d
5.2.2-e
5.2.2-f
5.2.2-g
5.2.2-h
5.2.2-i
5.2.2-j
5.2.3-a
5.2.3-b
5.2.3-c
5.3.1-a
5.3.2-a
5.3.2-b
5.3.2-c
5.3.2-d
5.3.2-e
5.3.3-a
Retrieval Flowchart 396
EIS/PS Retrieval Control Card 420
Definition of EIS/PS Retrieval Control
Card Fields 421
Valid Retrieval Data Names 422
Diagnostic Report 427
Format for EIS/PS Retrieval Language
Specifications 428
Definitions of EIS/PS Retrieval Language
Specification Fields 429
Truth Values for Boolean Expressions 431
Examples of Parenthetical Expressions 432
Cataloged Procedure EPRTM10 433
Substitutable Parameters for EPRTM10 436
Diagnostic Report 442
Cataloged Procedure EPRTM20 443
Substitutable Parameters for EPRTM20 445
Sort Generation Flowchart 448
Valid Sort Data Names 458
Sort Specification Cards 462
Diagnostic Report • . 463
Cataloged Procedure EPSRM10 464
Substitutable Parameters for EPSRM10 467
Diagnostic Report 473
xxi
-------
EIS/PS
LIST OF FIGURES
Page 6
Release Date: 2/01/80
Update #: P-l
LIST OF FIGURES
Figure Page
Number Title Number
5.3.3-b Cataloged Procedure EPSRM20 474
5.3.3-c Substitutable Parameters for EPSRM20 476
5.4.1-a Internal Transaction File Concatenation
Flowchart 478
5.4.2-a Diagnostic Report 482
5.4.2-b Cataloged Procedure EPMST20 483
5.4.2-c Substitutable Parameters for EPMST20 485
5.5.2-a Cataloged Procedure EPRTM30 490
5.5.2-b Substitutable Parameters for EPRTM30 494
5.5.3-a Cataloged Procedure EPSRM30 498
5.5.3-b Substitutable Parameters for EPSRM30 502
6.2.1-a Annual Report Flowchart 506
6.2.2-a Cross-reference of EIS/PS Data Flags 517
6.2.2-b Cross-reference of NEDS Data Flags 518
6.2.2-c Diagnostic Report 519
6.2.2-d Input Master File Listing 520
6.2.2-e Output Master File Listing 521
6.2.2-f NEDS Point Source Transaction Listing 522
6.2.2-g EIS/PS Internal Transaction Listing 523
6.2.2-h Option Card Format 524
6.2.2-i Cataloged Procedure EPRPM10 525
6.2.2-j Substitutable Parameters for EPRPM10 528
6.3.1-a Master File Detailed Report Flowchart 532
6.3.1-b Master File Formatted Dump Flowchart 533
xxn
-------
EIS/PS
LIST OF FIGURES
Page 7
Release Date: 2/01/80
Update #: P-l
Figure
Number
LIST OF FIGURES
Title
Page
Number
6.3.1-c
6.3.2-a
6.3.2-b
6.3.2-c
6.3.2-d
6.3.3-a
6.3.3-b
6.3.3-c
6.3.3-d
6.3.4-a
6.3.4-b
6.3.4-c
6.4.1-a
6.4.2-a
6.4.2-b
6.4.2-c
6.4.2-d
6.4.2-e
6.5.1-a
6.5.2-a
6.5.2-b
6.5.2-c
6.5.2-d
Emission Factor File Detailed Report 534
Diagnostic Report 539
EIS/PS Master File Detailed Report 540
Cataloged Procedure EPRPM20 542
Substitutable Parameters for EPRPM20 543
EIS/PS Master File Formatted Dump 548
Diagnostic Report 549
Cataloged Procedure EPRPM30 550
Substitutable Parameters for EPRPM30 551
Emission Factor File Detailed Report 557
Cataloged Procedure EPRPE10 558
Substitutable Parameters for EPRPE10 559
Master File Emissions Projection Flowchart 561
Diagnostic Report 578
Summary Report 579
Control Card Formats 580
Cataloged Procedure EPRPM50 583
Substitutable Parameters for EPRPM50 585
Flow Diagram of Quick Look Programs 590
Format of Quick Look Retrieval Specification Cards 620
Description of Quick Look Retrieval Specification
Fields 625
Quick Look Coding Form 630
Quick Look Data Element Abbreviations 631
xxm
-------
T
EIS/PS
LIST OF FIGURES
Page 8
Release Date: 2/01/80
Update #: P-l
LIST OF FIGURES
Figure Page
Number Title Number
6.5.2-e Output from Example 1 640
6.5.2-f Output from Example 2 643
6.5.2-g Output from Example 3 645
6.5.2-h Output from Example 4 647
6.5.2-i Output from Example 5 649
6.5.2-j Output from Example 6 652
6.5.2-k Output from Example 7 655
6.5.3-a Diagnostic Report 665
6.5.3-b Cataloged Procedure EPRTM40 666
6.5.3-c Substitutable Parameters for EPRTM40 669
6.5.4-a Quick Look Report 677
6.5.4-b Cataloged Procedure EPRPM60 678
6.5.4-c Substitutable Parameters for EPRPM60 682
6.5.5-a Turnaround Document Report 691
6.5.5-b Cataloged Procedure EPRPM70 695
6.5.5-c Substitutable Parameters for EPRPM70 699
7.2-a Sample Run Stream for Example 7.2.1 703
8.1-a General Format of JCL Statement 709
8.1-b JOB Card Format 710
8.1-c JOB Card Information Fields 711
8.1-d DD Card Field Specifications 712
8.2-a Sample Update Message 726
8.2-b IEBUPDTE Output-Program Listing 727
8.2-c Update Letter 729
xxiv
-------
EIS/PS
LIST OF FIGURES
Page 9
Release Date: 2/01/80
Update #: P-l
LIST OF FIGURES
Figure Page
Number Title Number
8.2-d Update Packing List 733
8.2-e Update Verification Form 734
8.2-f Tape Contents 735
8.2-g Checklist for Installing Update 736
8.2-h Listing of Update Deck 737
8.2-1 Condition Codes for IEBUPDTE 738
8.2-j Message Indicating Completion of IEBUPDTE
Modification 739
8.2-k Condition Codes for Compiler and Linkage
Editor 740
8.2-1 Error Messages from Compiler 742
8.2-m Linkage Editor Message 743
8.2-n Compiler Version Message 744
8.2-o Cataloged Procedure EPCLC10 745
8.2-p Substitutable Parameters for EPCLC10 748
8.3-a Checklist for Installing EIS/PS 757
8.3-b Installation Letter 758
8.3-c EIS/PS Installation Deck 762
8.3-d System Status/Hardware/Software
Questionaire 765
8.3-e Condition Code for IEHMOVE 769
B-l Sample Job Stream to Reblock a Permanent File
Stored on Disk 784
B-2 Sample Job Stream to Reblock an EIS/PS Program
Source Module Library 785
xxv
-------
EIS/PS
LIST OF TABLES
Page 1
Release Date: 2/01/80
Update #: P-l
Figure
Number
A-l
A-2
B-l
B-2
LIST OF TABLES
Title
Page
Number
Valid UTM Zones and Components 770
Valid Control Equipment Codes 773
Cross-reference of Files and Programs 779
Blocking Factors of EIS/PS Files 782
xxvi
-------
EIS/PS
ACKNOWLEDGEMENT
Page 1
Release Date: 2/01/80
Update #: P-l
This manual was prepared by the Research Triangle Institute, Research
Triangle Park, North Carolina, for the Environmental Protection Agency (EPA)
under Contract 68-02-3011. The work has been conducted under the direction of
Mr. Lloyd M. Hedgepeth of the National Air Data Branch (NADB), who was the EPA
Project Officer for the contract.
RTI staff members principally participating in the development of this
document are:
R. C. Haws, Laboratory Supervisor
L. R. McMaster, Project Leader
D. L. Franke, Analyst/Programmer
W. M. Bailey, Programmer
F- A. Farmer, Programmer
C. 0. Scheper, Programmer
A. F. Tall ant, Programmer
D. S. Chase, Secretary
xxvn
-------
EIS/PS
ACKNOWLEDGEMENT
Page 2
Release Date: 2/01/80
Update #: P-l
xxvm
-------
EIS/PS
INTRODUCTION
SECTION 1.1
ORGANIZATION
Page 1
Release Date: 2/01/80
Update #: P-l
1.0 INTRODUCTION
1.1 ORGANIZATION
The major functions of the Emissions Inventory System/Point Source
Subsystem (EIS/PS) are creating and maintaining a valid data base, accessing
and manipulating that data base, and producing reports. This User's Guide is
structured to reflect these functions; i.e., the programs and procedures in
EIS/PS are documented within these three groupings. The discussions of the
EIS/PS functions and programs comprise Section 4.0 FILE CREATION AND
MAINTENANCE, Section 5.0 DATA ACCESSING AND MANIPULATION, and Section 6.0
REPORTS.
Each of these sections contains an introduction which explains the
particular function and operating instructions for each of the programs which
comprise that function. Flow charts illustrating the operation of the
programs are included in each introduction. The program operating
instructions consist of a description of the program, the formats of the files
accessed by the program, a discussion of program options, and a list of error
messages produced by the program. A discussion of the Job Control Language
(JCL) for executing the program, warnings and special instructions, cost
estimates, and related programs and procedures are also included.
The programs discussed in Sections 5.0 and 6.0 are grouped into
categories according to the specific aspect of the major function which they
perform. The categories addressed in Section 5.0 DATA ACCESSING AND
MANIPULATION are retrieval, sort generation, and internal transaction file
concatenation. The categories comprising Section 6.0 REPORTS are EPA-required
reports, file listings, summary reports, and the quick look report.
In addition to these program sections, this User's Guide includes
sections which provide information necessary for full utilization of EIS/PS.
Section 2.0 OVERVIEW OF EIS/PS provides a brief discussion of the subsystem,
-------
EIS/PS
INTRODUCTION
SECTION 1.1
ORGANIZATION
Page 2
Release Date: 2/01/80
Update #: P-l
explains the program design, and provides a system flowchart. Section 3.0
ECONOMICS discusses the cost of installing and operating EIS/PS as well as
ways to reduce these costs. Section 7.0 INTER-FUNCTIONAL PROCEDURES describes
sample run streams which execute programs from more than one functional area,
such as producing a report from a retrieved answer file. Section 8.0 JCL AND
GENERAL TOPICS discusses the IBM JCL used in the EIS/PS cataloged procedures
and explains the installation and updating processes. Additional information
concerning the operation of EIS/PS is included in the four appendices.
Seven-letter names are used for all programs in EIS/PS. The first
position contains a 'P1 for EIS/PS, positions 2 and 3 contain a function
indicator (see Figure 1.1-a), and positions 4 thru 7 contain information
relating to the file used or type of report. Each program is also assigned a
program number prefixed by 'EP'. See Figure 1.1-b for a list of program
names, numbers, and descriptions.
The cataloged procedures all have seven-character names. The first two
characters are 'EP1, positions 3 and 4 contain the function indicators (See
Figure 1.1-a), position 5 provides information on the file used (See Figure
1.1-c), and the last two characters are numeric. See Figure 1.1-d for a list
of procedures.
-------
EIS/PS
INTRODUCTION
SECTION 1.1
ORGANIZATION
Page 3
Release Date: 2/01/80
Update #: P-l
Code
CV
CE
ED
EM
FM
MS
RP
RT
SR
ST
Description
Conversion
Conversion and Edit
Edit
Edit-Maintenance
File Maintenance
Miscellaneous
Report
Retrieval
Sort
Statistical
:~*iiW
Figure 1.1-a. Function Indicators
-------
EIS/PS
INTRODUCTION
SECTION 1.1
ORGANIZATION
Page 4
Release Date: 2/01/80
Update #: P-l
Program
Name
PCENETR
PCVNEEF
PRPMSTR
Program
Number
EP0060
EP0020
Description
PEDMSTR
PEMEFAC
PFMMSTR
PMSEFIN
PMSEFGN
PMSTCON
PRPDUMP
PRPEFAC
PRPENTR
PRPEPRJ
EP0080
EP0040
EP0120
EP0100
EP0130
EP0190
EP0220
EP0230
EP0200
EP0250
EP0210
Reference
4.3.3
NEDS to EIS/PS Master File
Transaction Conversion-
Edit Program
NEDS to EIS/PS Emission Factor 4.2.3
File Transaction Conversion
Program
Master File Transaction Edit
Program
Emission Factor File Edit-
Maintenance Program
Master File Maintenance Program
Master File Internal Transaction 4.3.7
Emission Factor Insertion Program
Master File Emission Factor
Transaction Generator Program
Internal Transaction File
Concatenation Program
Master File Formatted Dump
Program
Emission Factor File Detailed
Report Program
Annual Report Program
Master File Emissions
Projection Program
Master File Detailed Report 6.3.2
Program
Page
Number
141
57
4.3.5
4.2.5
4.3.9
4.3.7
m
4.3.10
5.4.2
6.3.3
6.3.4
6.2.2
6.4.2
192
83
291
268
326
479
544
552
507
562
535
(Page 1 of 2)
Figure 1.1-b. EIS/PS Programs
4
-------
EIS/PS
INTRODUCTION
Program
Name
PRPQUIK
PRPQTRN
PRTGENR
PRTLNGP
PRTQLED
PRTQLEX
PSREFTR
PSREFIN
PSRGENR
PSRINTR
PSRLNGP
PSRMFTR
PSRNEEF
PSRNETR
.
Program
Number
EP0280
EP0290
EP0150
EP0140
EP0260
EP0270
EP0030
EP0090
EP0170
EP0110
EP0160
EP0070
EP0010
EP0050
SECTION 1.1
ORGANIZATION
Description
Quick Look Report Program
Quick Look Turnaround
Document Program
Generated Retrieval Program
Retrieval Language Processor
Program
Quick Look Edit Program
Quick Look Extract Program
Page 5
Release Date:
Update #: P-l
Reference
6.5.4
6.5.5
5.2.3
5.2.2
6.5.2
6.5.3
Emission Factor File Transaction 4.2.4
Sort Program
Master File Internal Transaction 4.3.6
Pre-Insertion Sort Program
Generated Sort Program
5.3.3
Master File Internal Transaction 4.3.8
Sort Program
Sort Language Processor
Program
Master File Transaction
Sort Program
NEDS Emission Factor File
Transaction Sort Program
NEDS Transaction Sort
Program
5.3.2
4.3.4
4.2.2
4.3.2
2/01/80
Page
Number
671
684
437
397
592
659
78
263
468
286
449
187
52
136
(Page 2 of 2)
Figure 1.1-b - continued. EIS/PS Programs
-------
EIS/PS
INTRODUCTION
SECTION 1.1
ORGANIZATION
Page 6
Release Date: 2/01/80
Update #: P-l
Code
E
M
T
File
Emission Factor File
Master File
Transaction File
Figure 1.1-c. File Codes
-------
EIS/PS
INTRODUCTION
Procedure
Names
EPCET10
EPCVE10
EPEDT10
EPEME10
EPEME20
EPEMM10
EPFMM10
EPFMM20
SECTION 1.1
ORGANIZATION
Description
NEDS to EIS/PS Master File
Transaction Conversion-Edit
NEDS to EIS/PS Emission Factor
File Transaction Conversion
Master File Transaction Edit
Emission Factor File Edit-
Maintenance
Emission Factor File Edit-
Maintenance from NEDS
Emission Factor File
Transactions
Master File Edit-Maintenance
Master File Maintenance
Master File Maintenance
from NEDS transactions
Page 7
Release Date: 2/01/80
Update #: P-l
Program(s) Procedure
Executed Reference
PSRNETR (EP0050) 4.3.3.5
PCENETR (EP0060)
PSRNEEF (EP0010) 4.2.3.5
PCVNEEF (EP0020)
PSRMFTR (EP0070) 4.3.5.5
PEDMSTR (EP0080)
PSREFTR (EP0030) 4.2.5.5
PEMEFAC (EP0040)
PSRNEEF (EP0010) 4.4.2
PCVNEEF (EP0020)
PSREFTR (EP0030)
PEMEFAC (EP0040)
PSRMFTR (EP0070) 4.4.3
PEDMSTR (EP0080)
PSREFIN (EP0090)
PMSEFIN (EP0100)
PSRINTR (EP0110)
PFMMSTR (EP0120)
PSRINTR (EP0110) 4.3.9.5
PFMMSTR (EP0120)
PSRNETR (EP0050) 4.4.4
PCENETR (EP0060)
PSREFIN (EP0090)
PMSEFIN (EP0100)
PSRINTR (EP0110)
PFMMSTR (EP0120)
Page
Number
167
63
216
96
345
355
304
368
Figure 1.1-d. EIS/PS Cataloged Procedures
(Page 1 of 3)
-------
EIS/PS
INTRODUCTION
Procedure
EPFMM30
EPMSM10
EPMST10
EPMST20
EPRPE10
EPRPM10
EPRPM20
EPRPM30
EPRPM50
EPRPM60
EPRPM70
SECTION 1.1
ORGANIZATION
Description
Master File Maintenance
from Emission Factor
Transactions
Master File Emission Factor
Transaction Generation
Master File Internal
Transaction Emission
Factor Insertion
Internal Transaction File
Concatenation
Emission Factor File Detailed
Report
Annual Report
Master File Detailed Report
Master File Formatted Dump
Master File Emissions
Projection
Quick Look Report
Quick Look Turnaround
Document
Page 8
Release
Update
Program(s)
Executed
PMSEFGN (EP0130)
PSREFIN (EP0090)
PMSEFIN (EP0100)
PSRINTR (EP0110)
PFMMSTR (EP0120)
PMSEFGN (EP0130)
PSREFIN (EP0090)
PMSEFIN (EP0100)
PSREFIN (EP0090)
PMSEFIN (EP0100)
PMSTCON (EP0190)
PRPEFAC (EP0230)
PRPENTR (EP0200)
PRPMSTR (EP0210)
PRPDUMP (EP0220)
PRPEPRJ (EP0250)
PRTQLED (EP0260)
PRTQLEX (EP0270)
PRPQUIK (EP0280)
PRTQLED (EP0260)
PRTQLEX (EP0270)
PRPQTRN (EP0290)
Date: 2/01/80
#: P-l
Procedure
Reference
4.4.5
4.3.10.5
4.3.7.5
5.4.2.5
6.3.4.5
6.2.2.5
6.3.2.5
6.3.3.5
6.4.2.5
6.5.4.5
6.5.5.5
Page
Number
381
331
274
479
554
513
536
545
573
673
687
(Page 2 of 3)
Figure 1.1-d - continued. EIS/PS Cataloged Procedures.
8
-------
EIS/PS
INTRODUCTION
SECTION 1.1
ORGANIZATION
Page 9
Release
Update #
Program(s)
Procedure
EPRTM10
Description
Retrieval Language Processor
Executed
PRTLNGP
(EP0140)
Date: 2/01/80
: P-l
Procedure
Reference
5.2.2.5
Page
Number
414
(Generate and Store Program)
EPRTM20
Generated Retrieval (Execute
PRTGENR
(EP0150)
5.2.3.5
439
Stored Program)
EPRTM30
EPRTM40
EPSRM10
Retrieval
Quick Look Extract
Sort Language Processor
PRTLNGP
PRTGENR
PRTQLED
PRTQLEX
PSRLNGP
(EP0140)
(EP0150)
(EP0260)
(EP0270)
(EP0160)
5.5.2
6.5.3.5
5.3.2.5
488
661
454
(Generate and Store Program)
EPSRM20
Generated Sort (Execute
PSRGENR
(EP0170)
0*O* 0 * 0
470
Stored Program)
EPSRM30
Sort Generation
PSRLNGP
(EP0160)
5.5.3
496
PSRGENR (EP0170)
(Page 3 of 3)
Figure 1.1-d - continued. EIS/PS Cataloged Procedure
-------
EIS/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 1
Release Date: 2/01/80
Update #: P-l
1.2 DEFINITIONS OF TERMS AND CONVENTIONS
ABORT:
The termination of a job due to a malfunction. Any condition that causes
an abort error message in any of the EIS/PS programs will cause the
execution of that program to be terminated immediately but will allow
any successive programs in the same run stream to be executed; however,
the results of any such programs are probably invalid. Programs may also
abort with a system error message. In this case, no successive programs
will be executed.
Action Code:
An EIS/PS master file transaction field. See Figure 4.3.5-b for a
complete description. Also, an emission factor file transaction field
(see Figure 4.2.5-c).
AEROS:
An acronym for the Aerometric and Emissions Reporting System.
Allowable Emissions:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
ANS (ANSI):
An acronym for the American Rational _S_tandards institute, which
establishes the standards for the COBOL and FORTRAN languages.
Answer File:
A file that is produced by a retrieval and is a subset of the records in
the master file. An answer file can also be produced by the generated
sort and is a group of subsets of the records in the master file.
10
-------
EIS/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 2
Release Date: 2/01/80
Update #: P-l
An answer file can be input to any program that uses the master file for
the purpose of generating reports; however, an answer file may contain
duplicate records and.may not be in the normal master file order. See
Sections 5.2 and 5.3. Note: An answer file should not replace the
master file for file maintenance purposes.
Apportioned Emissions:
An EIS/PS master file field. See Figure 4.3.9-a for a complete
description.
AQCR:
The Air Duality Control Region is an EIS/PS master file field. See
Figure 4.3.5-b for a complete description.
Ash Content:
An emission factor file field. See Figure 4.2.5-d for a complete
description.
Ash Flag:
An emission factor file field. See Figure 4.2.5-d for a complete
description.
Ash-Sulfur Code:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Apportioned Emissions:
An EIS/PS master file field. See Figure 4.3.9-a for a complete
description.
Baseline:
A version of the EIS/PS system maintained by NADB. All installation and
update copies are made from the baseline. If local modifications are
11
-------
EIS/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 3
Release Date: 2/01/80
Update #: P-l
made to EIS/PS, a copy of the baseline should be maintained. Only the
baseline EIS/PS is supported by NADB.
BEC Code:
Basic Equipment Code, an EIS/PS master file field. See Figure 4.3.5-b
for a complete description.
Block:
A group of records handled by the computer as a single unit. The size
of a block should be set to take best advantage of the size of a track
if the file is to be stored on disk.
Blocking Factor:
The number of records in a block. Information on the blocking factors
for the files in the EIS/PS system can be found in Appendix D.
Boiler Design Capacity:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Card:
A punched card used to enter data into the computer. The 80-column card
is used for EIS/PS. Each column of a card is used to enter a single
numeric or alphabetic character, and one card is used for a single
transaction. Transactions may be entered by other methods that do not
use cards, but the term card is still used to denote a transaction.
Card Type:
An EIS/PS master file transaction field. See Figure 4.3.5-b for a
complete description. Also, an emission factor file transaction field
(see Figure 4.2.5-d).
12
-------
EIS/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 4
Release Date: 2/01/80
Update #: P-l
Catalog:
A table of descriptive information for files, such as unit, volume, and
DCB information, which is maintained by the computer. A cataloged data
set can be used by specifying its name and disposition.
Cataloged Data Set:
A data set that has been listed in the system catalog of files. Items
such as unit, volume, and DCB information for the data set are contained
in the system catalog.
Category 1 thru 4:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
CDHS:
The Comprehensive Data Handling System (CDHS) consists of the Air Duality
.Data .Handling System II (AQDHS-II) and the Emissions Inventory System
(EIS). EIS in turn consists of two parts: EIS/AS (Area .Source) and
EIS/PS (Point .Source).
City:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
COBOL:
An acronym for O)mmon Easiness £riented Unguage. It is an
internationally accepted programming language used for systems that
handle large data bases. The statements are English-like but must comply
with rules established for the language. All of the programs in EIS/PS
are written in COBOL.
13
-------
EIS/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 5
Release Date: 2/01/80
Update #: P-l
Comment:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Comment Record:
A type of record in the EIS/PS master file. See Section 4.3.9 for a
complete description.
Compile:
To create an object module from source language statements by means of a
compiler. While some compilers generate object modules which contain
machine code that can be executed directly, most generate code must
be further processed by a linkage editor to produce an executable load
module. In most EIS/PS installations, the linkage editor is used.
Compliance Schedule:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Compliance Status:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Compliance Update:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
CONDITIONAL:
A type of error message generated by programs in EIS/PS. Conditional
14
-------
EIS/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 6
Release Date: 2/01/80
Update #: P-l
errors are not serious enough to cause rejection of the input data;
however, the message cannot be suppressed.
Confidentiality:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Contact:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Control Card:
A card entered to provide specific instructions to a program. 'Control
Card1 is used interchangeably with 'option card1.
Control Equipment Cost:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Control Regulations:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
County:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description. *••.
Cylinder:
Used in allocating space on a direct access device (disk). As a unit of
15
-------
EIS/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 7
Release Date: 2/01/80
Update #: P-l
measure, it contains several tracks, the exact number being dependent
upon the type of disk.
Data:
A general term used to describe the elements of information that can be
processed by a computer. 'Data1 is used to describe all the information
collected and stored for EIS/PS.
Date:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Deck :
A collection or pack of punched cards. The cards necessary to run a job
(including JCL, option cards, and transactions) form a deck.
Diagnostic Report:
A report printed during the execution of most programs in EIS/PS. The
report contains the update messages, information on the options used for
the program, messages explaining errors encountered during the execution
of the program, and run statistics indicating the number of records
processed and the number of errors found. Those EIS/PS programs that do
not produce a separate diagnostic report contain the diagnostic
information at the beginning and end of other printed output.
DISASTER:
A type of error message printed by EIS/PS programs. Execution of the
program will be terminated immediately when a disaster condition is
encountered, but other programs in the same run stream will be executed
and produce unpredictable results. The user should contact NADB for
information on recovering from a disaster condition.
16
-------
EIS/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 8
Release Date: 2/01/80
Update #: P-l
Disk:
A flat circular plate upon which data is stored by a magnetic process.
Also called a magnetic disk. In large computer systems, one or more
magnetic disks are mounted on a spindle and form a disk pack. Each disk
is divided conceptually into tracks, and tracks are combined into
cylinders. Space may be allocated by tracks or cylinders. A disk is a
direct access device.
ECAP:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
EIS:
The Emissions inventory System processes emissions data. It consists of
two subsystems: Point Source (EIS/PS) and Area Source (EIS/AS).
EMF Origin:
An EIS/PS master file transaction field. See Figure 4.3.5-b for a
complete description.
EMF Source:
An EIS/PS master file transaction field. See Figure 4.3.5-b for a
complete description.
EMF Units:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
17
-------
US/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 9
Release Date: 2/01/80
Update #; P-l
Emission Factor:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Emission Factor File:
An EIS/PS file. See Section 4.2 for a complete description.
Emissions Units:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Error Message:
In EIS/PS, the term 1s used two ways. First, 1t 1s used as a general
term to include all types of messages (WARNING, CONDITIONAL, ERROR,
ABORT, and DISASTER) printed when an error 1s encountered by a program.
Secondly, 1t refers specifically to messages prefaced by the word ERROR
which indicate that Input data has been rejected due to the error found
therein, but that processing will continue.
Estimated Control Efficiency:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Estimated Emissions:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Estimation Method:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
18
-------
EIS/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 10
Release Date: 2/01/80
Update »; P-l
Execute:
To perform the operations specified by a particular program or
procedure.
Lxhaust Flow Rate:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Field:
A subdivision of a record containing a particular Item of data.
Examples of fields in EIS/PS Include state code, pollutant ID, and
name-address.
File:
An organized collection of related records. The records 1n a file are
usually sequenced by some key contained 1n the records. Files may be
stored for future use (permanent) or used by only one job (temporary).
One of more files may be on a tape or a disk. Permanent files used by
EIS/PS Include the master file and the emission factor file.
Format:
A specified or predetermined arrangement of data 1n a record or on a
document; synonymous with layout. Formats given for the files 1n EIS/PS
Include the position, length, and description of each field.
Fuel Process Rate:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
19
-------
EIS/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 11
Release Date: 2/01/80
Update 1; P-l
Fuel Units:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Hardware:
The physical equipment making up a computer system. Hardware includes
printers, card readers, disk and tape drives, terminals, and the central
processing unit of a computer.
Heat Content:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description. '
Installation:
Two definitions are used by EIS/PS. The first pertains to setting up the
EIS/PS system for the first time. The second refers to a particular
computer system, the people who operate and use it, the work it does,
and the place where it is located.
Internal Transaction: (
(
A record created by the master file transaction edit program or the NEDS
to EIS/PS conversion-edit program and used by the master file maintenance
program to update the master file. These records are not 80 characters
in length and are not interchangeable with punched cards used to enter
transactions.
IPP Code:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
20
-------
EIS/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 12
Release Date: 2/01/80
Update #: P-l
JCL:
Job Control Language. A programming language used to identify a job and
describe its requirements to the operating system. Information on JCL
can be found in Section 8.1.
Job:
A unit of work entered into the computer by means of a single run stream
containing a single job card. A job consists of one or more procedures
or programs.
Key:
One or more fields within a record used to identify or control that
record. Keys are used by EIS/PS both to sequence files and to match
transactions with file records when updating a file.
Latitude:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Library:
An organized set of programs or files. In EIS/PS, partitioned data sets
are used as libraries to store source programs, load modules, and
procedures. l
Link Edit:
To combine object modules into an executable load module. In EIS/PS,
all programs are link edited after being compiled, and the resulting load
modules are stored in a load library.
21
-------
EIS/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 13
Release Date: 2/01/80
Update #: P-l
Load Module:
The output of a linkage editor; a program in a suitable form to be loaded
into memory and executed. Load modules are stored in the load library.
Local Control:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Longitude:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Mailing Address:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Master File:
An EIS/PS file containing the actual point source data, as collected.
The master file is used to generate reports, including sending the annual
report to NEDS. File formats and field descriptions can be found in
Section 4.3.9.2.
Maximum Design Rate:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Measured Emissions:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
22
-------
EIS/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 14
Release Date: 2/01/80
Update #: P-l
Module:
A group of records treated as a unit; it often refers to an individual
member of a partitioned data set or library. Each program in EIS/PS is
stored as a module in both the source and load libraries.
NADB:
The National Mr Data Branch, which is in the EPA's Office of Air Quality
Planning and Standards.
Name and Address:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
NEDS:
An acronym for Rational Emissions J)ata System. It refers to both a
technique for coding emissions data and a data base maintained by EPA
containing emissions data from the entire United States.
NEDS Point ID:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
I
NEDS P7 Comment:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Normal Operating Rate:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
23
-------
EIS/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 15
Release Date: 2/01/80
Update #: P-l
Number of Employees:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Number of Point Pollutants:
An EIS/PS master file field. See Figure 4.3.9-a.
Number of SCC Pollutants:
An EIS/PS master file field. See Figure 4.3.9-a.
Object Module:
A module that is produced by a compiler and input to a linkage editor.
Object modules are not saved in EIS/PS since the compiler and linkage
editor are executed within one procedure.
Option Card:
A card used to provide instructions to a program. Used interchangeably
with 'control card1. Options are used in EIS/PS to indicate such things
as whether files should be listed, whether warnings should be printed, or
the number of lines to be printed on a page.
Ownership Code:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Partitioned Data Set:
A file containing several individual groups of records. This file can be
used as a whole, or each group of records (module) can be used alone. In
24
-------
EIS/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 16
Release Date: 2/01/80
Update #: P-l
EIS/PS, partitioned data sets are used as libraries to store the source
programs, the load modules, and the procedures.
Percentage Annual Thruput:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Permanent File:
A file kept after execution of a job has been completed. Such a file can
be used by later jobs and can be cataloged. Examples of permanent files
in EIS/PS include the master and emission factor files.
Plant ID:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Plant Record:
A type of EIS/PS master file record. See Section 4.3.9 for a complete
description.
Plume Height:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
PNR Line Number:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
25
-------
EIS/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 17
Release Date: 2/01/80
Update #: P-l
PNR Sequence Number:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Point Pollutant ID:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Points With Common Stack:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Point Record:
A type of EIS/PS master file record. See Section 4.3.9 for a complete
description.
Pollutant Name:
An EIS/PS emission factor file field. See Figure 4.2.5-d for a complete
description.
Potential Emissions:
An EIS/PS master file field. See Figure 4.3.9-a.
Primary Control Equipment:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Principal Product:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
26
-------
EIS/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 18
Release Date: 2/01/80
Update #: P-l
Procedure:
A series of JCL statements used to execute one or more programs. In
EIS/PS, the procedures are stored and cataloged in a procedure library.
A program can be executed by naming the procedure without supplying all
the required JCL needed for that program.
Program:
A series of statements in a language acceptable to a computer and used to
achieve a specified result.
Property Area:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Record Size:
An EIS/PS master file field. See Figure 4.3.9-a.
Record Type:
An EIS/PS master file field. See Figure 4.3.9-a.
Run Stream:
A deck consisting of JCL cards and, possibly, option cards and
transactions that is used to execute one or more successive procedures.
Generally, a run stream will contain one job.
SCC:
_Source Classification Code, an EIS/PS master file field. See Figure
4.3.5-b for a complete description.
27
-------
EIS/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 19
Release Date: 2/01/80
Update #: P-l
SCC Pollutant ID:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
SCC Record:
A type of EIS/PS master file record. See Section 4.3.9 for a complete
description.
SCC Sequence Number:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Secondary Control Equipment:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
SIC Code:
Standard industrial Classification, an EIS/PS master file field. See
Figure 4.3.5-b for a complete description.
Software:
All programs which can be used on a particular computer system. Includes
compilers, library routines, and user-written programs.
Source Code:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Source Description:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
28
-------
EIS/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 20
Release Date: 2/01/80
Update #: P-l
Source Program or Source Module:
A program written in a programming language that cannot be directly
processed by the computer, but which must be compiled and link edited
prior to being executed. The source programs in EIS/PS are written in
COBOL.
Space:
A variable used in JCL to indicate the amount of room occupied by a file
on a direct access device (disk). Space is allocated in either tracks or
cylinders.
Space Heat Percentage:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Stack Diameter:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Stack Height:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Stack Temperature:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
State:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
29
-------
EIS/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 21
Release Date: 2/01/80
Update #: P-l
Structured Programming:
A coding technique used in EIS/PS. See Section 2.2.
Substitutable Parameters:
Variables in the EIS/PS procedures which may change from one run of a
procedure to the next, and which can be changed by specifying keywords
defined in the procedure along with the values to be used. A list of the
substitutable parameters is given with the information on individual
procedures in the user's guide.
Sulfur Content:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Sulfur Flag:
An emission factor file field. See Figure 4.2.5-d for a complete
description.
*
Systems Personnel :
People involved with the user support and/or operations for a computer
installation. Systems personnel can supply information, such as disk and
tape drives used, required account codes, and installation-dependent
conventions, and can give assistance in correcting system problems.
Tape:
A magnetic film coated with a substance which allows data to be stored by
selective magnetism. Tapes can be used to store files for EIS/PS. The
user should consult his systems personnel for information on the
characteristics of the tape drives used at his installation.
30
-------
EIS/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 22
Release Date: 02/01/80
Update #: P-l
Telephone:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Temporary File:
A file used during the duration of one job and then discarded. Temporary
files are used to pass data from one program to another within the same
job.
Test Method:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Top-down:
A term used in structured programming. See Section 2.2.
Track:
A unit of measure for space allocation on a disk. The size of a track is
dependent upon the type of disk used.
Transaction:
A card (or other record) used to enter data into the system. All
transactions are edited by the EIS/PS programs prior to being used.
Unit of Measure Code:
An EIS/PS emission factor file field. See Figure 4.2.5-d for a complete
description.
31
-------
EIS/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 23
Release Date: 2/01/80
Update #: P-l
Units Description:
An EIS/PS emission factor file field. See Figure 4.2.5-d for a complete
description.
Update Message:
A portion of the diagnostic report printed at the beginning of the
execution of each program in EIS/PS. Information given includes the
name, revision level, update status, and update date of the program. The
information is useful for troubleshooting.
User Control Region:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
User Plant ID:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
User Point ID:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
UTM Horizontal Coordinate:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
UTM Vertical Coordinate:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
32
-------
EIS/PS
INTRODUCTION
SECTION 1.2
DEFINITIONS OF TERMS
AND CONVENTIONS
Page 24
Release Date: 2/01/80
Update #: P-l
UTM Zone:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Velocity:
An EIS/PS master file field. See Figure 4.3.5-b for a complete
description.
Volume:
A recording medium, such as a tape or disk, which is mounted and
dismounted as a unit. A volume is identified by a volume serial number.
WARNING:
A type of error message used in EIS/PS to inform the user of an aspect of
the input data which may warrant his attention. A warning condition does
not cause data to be rejected or the execution of the program to be
terminated. Warning messages can be suppressed.
33
-------
EIS/PS
OVERVIEW OF EIS/PS
SECTION 2.1
INTRODUCTION
Page 1
Release Date: 2/01/80
Update #: P-l
2.0 OVERVIEW OF EIS/PS
2.1 INTRODUCTION
The National Air Data Branch (NADB) of the Environmental Protection
Agency (EPA) has the responsibility of collecting, storing, retrieving, and
analyzing air quality and emissions data for 50 states and 5 territories. In
order to aid the data flow and to assist the states in the monitoring and
control of atmospheric pollution, EPA has developed and provided the
Comprehensive Data Handling System (CDHS).
The purpose of CDHS is to provide the user with a systematic approach to
solving the problem of creating and maintaining files, submitting data to EPA,
doing statistical analysis, and generating internal reports from a large data
base of observed pollutant concentrations or emissions.
CDHS currently consists of two major systems: the Emissions Inventory
Subsystem (EIS) which processes emissions data, and the Air Quality Data
Handling Subsystem (AQDHS-II) which processes ambient air quality and
meteorological data. EIS is further broken down into two subsystems: area
source (EIS/AS) and point source (EIS/PS). This User's Guide deals only with
EIS/PS and is intended to provide the user of EIS/PS with a usable day-to-day
reference document.
EIS/PS currently consists of 27 computer programs (written in ANS-68
COBOL), which provide the user with a variety of tools to assist him in the
enormous task of organizing, storing, and analyzing the point source emissions
data collected by him.
34
-------
EIS/PS
OVERVIEW OF EIS/PS
SECTION 2.1
INTRODUCTION
Page 2
Release Date: 2/01/80
Update #: P-l
A discussion of program structure is provided in Section 2.2, and a chart
illustrating the interrelationships of the functional areas in EIS/PS is
provided in Section 2.3. More detailed flow diagrams of each functional area
and its component programs are provided in the section discussing that
particular function.
35
-------
EIS/PS
OVERVIEW OF EIS/PS
SECTION 2.2
PROGRAM STRUCTURE
Page 1
Release Date:02/01/80
Update #: P-l
2.2 PROGRAM STRUCTURE
The EIS/PS programs are modularized by function; i.e., each program
performs one complete function. When several functions are needed for a given
process (such as file maintenance), the separate programs that perform the
component functions are performed in a single procedure. This modularization
gives the system greater flexibility. An illustration of this modularity can
be seen in the following example: PSREFTR (EP0030) sorts emission factor file
transactions, PEMEFAC (EP0040) edits and maintains the emission factor file,
and PRPEFAC (EP0230) prints the emission factor file. The sort and file
maintenance programs are performed by the procedure EPEME10, and the report by
EPRPE10. Both procedures should be run when the emission factor file is
updated, but the report procedure may be run alone whenever a listing of the
emission factor file is desired.
All of the programs in EIS/PS are written using American National
Standard (ANS) COBOL. An attempt is made to standardize the programs so that
they can be run on a variety of vendor main frames with minimal changes.
Currently, the CDHS system has been installed on IBM-370, UNIVAC 1100, CDC
CYBER, Honeywell 6000, AMDAHL, and ITEL series computers.
Structured programming techniques have been used in writing the programs;
i.e., the programs are designed using a 'top-down' technique with control
remaining in a short mainline module. The program tasks are accomplished by
self-contained modules performed from the mainline. As a result of this
top-down design, the programs are self-documenting. These structured
techniques are not in themselves of interest to the user, but they do allow
for easier maintenance of the programs when modifications or troubleshooting
support are needed.
Several programs contain COBOL sorts which have been developed so that
the user does not have to code system sort procedures or provide control
cards. The COBOL sort is an ANS structure and should work on most computers;
36
-------
EIS/PS
OVERVIEW OF EIS/PS
SECTION 2.2
PROGRAM STRUCTURE
Page 2
Release Date: 2/01/80
Update #: P-l
however, the actual collating sequence used is determined by the default value
of the hardware. As an example, EBCDIC sequence (used on IBM) sorts
alphabetic characters before numeric ones, while ASCII sequence (variations
used by Honeywell, UNIVAC, and CDC) sorts numeric before alphabetic
characters.
37
-------
EIS/PS
OVERVIEW OF EIS/PS
SECTION 2.3
SYSTEM CHARTS
Page 1
Release Date: 2/01/80
Update #: P-l
2.3 SYSTEM CHARTS
A system-level flowchart of EIS/PS is shown in Figure 2.3-a. This
flowchart depicts the relationships of the major processing functions of
EIS/PS. Included in the flowchart are references to sections of this
document that contain detailed information on each processing function. More
detailed flowcharts of each function are presented in the referenced sections.
38
-------
EMISSION FACTOR
TRANSACTIONS
NEDS TO EIS/PS
EMISSION FACTOR
TRANSACTION
CONVERSION
Section 4.2.3
CO
vo
XEIS/PS /
f EMISSION /
I FACTOR I
^TRANSACTIONS^
EMISSION
FACTOR
TRANSAC
IONS
OLD
EMISSION
FACTOR FILE
EMISSION
FACTOR
FILE
MAINTENANCE
EMISSION
FACTOR
FILE
Section 4.2.5
(Page 1 of 5)
m co
33 -•.
»-i 00
rn
s:
o
Tl
m
i—i
co
Figure 2.3-a. EIS/PS System Flowchart
cr
•o
CL
O)
c+
n>
=«te
00
CO
m
o
30
CO
SECTION 2.
CO
73
CD
re
Co
(/>
It)
o
0)
cf-
(I)
ro
o
co
o
0)
(Q
re
INJ
-------
POINT SOURCE
TRANSACTIONS
NEDS TO EIS/PS
CONVERSION-
EDIT
Section 4.3.3
EMISSION
FACTOR
INSERTION
TRANSACTIONS
TRANSACTION
EDIT
Section 4.3.5
INTERNAL
TRANSACTIONS!:
INTERNAL
TRANSACTION
CONCATENATION
Section 5.4.2
Section
4.3.7
/INTERNAL f
I TRANSACTIONS
\WITH INSERTIONS\
(Page 2 of 5)
Figure 2.3-a - continued. EIS/PS System Flowchart
T3
o.
CU
c+
ro
i
o
IJ
/ERVIEW
0
-n
m
CO
-o
CO
to
CO
„— i
m
0
•ya
CO
50
a>
10
n>
o
P>
ct-
ro
o
i— «
oo
o
m
CO
-o
CO
CO
m
o
**^
i— i
o
ro
CO
-u
tQ
fD
co
-------
OLD EIS/PS
MASTER
FILE
0
MASTER FILE
EMISSION FACTOR
TRANSACTION
GENERATION
Section 4.3.10
X!NTERNAL 7
f TRANSACTIONS/
I WITH I
\4JJSERTIONS \
(Page 3 of 5)
Figure 2.3-a - continued. EIS/PS System Flowchart
o m
< *->
m co
«c -o
^ CO
m
T3
O.
at
CO
CO
CO
m
0
1C
73
CO
CO
m
o
t—t
o
ro
CO
T3
P)
(Q
n>
n>
n>
n> » -t=«
=a=
en
(D
o>
. • •
ro
o
00
o
-------
©
OLD EIS/PS
MASTER
FILE
EIS/PS
MASTER FILE
MAINTENANCE
ro
EIS/PS
MASTER
FILE
Section 4.3.9
RETRIEVAL
ANSWER
FILE
Section 5.2
©
Figure 2.3-a - continued. EIS/PS System Flowchart
(Page 4 of 5)
c=
-o
Q.
0)
O m
m co
po --.
< -o
t—< CO
m
m
i—i
CO
CO
CO CO
-< m
S3 Q
m •-«
3 O
o
a: r\i
33 CO
co
50
n>
0J
-D
Q>
ua
(D
en
=»=
.. o
Q>
-a rt-
i a>
ro
o
oo
o
-------
MASTER FILE
SORT
GENERATION
Section 5.3
FILE
LISTINGS
Section 6.3
CO
ERA-REQUIRED
REPORTS
QUICK LOOK
REPORTS
Section 6.5
SUMMARY
REPORTS
Section 6.2
Section 6.4
(Page 5 of 5)
Figure 2.3-a - continued. EIS/PS System Flowchart
o rn
< »—i
m co
5 ^
l-i CO
m
CO
CO
CO CO
-< m
co o
n
3: CO
ya ro
co
Q. —•
o> n>
r*- O>
(D
.. o
Q)
I 0)
00
o
to
n>
-------
EIS/PS
ECONOMICS
SECTION 3.1
ECONOMY MEASURES
Page 1
Release Date: 2/01/80
Update #: P-l
3.0 ECONOMICS
3.1 ECONOMY MEASURES
Several steps can be taken to reduce the cost of using the EIS/PS system,
such as keeping the size of the files as small as possible, printing files
only when necessary, storing frequently used retrievals, and updating files
only when a substantial number of transactions are available.
Since the cost of running any program is directly related to the size of
the files processed by that program, the user's files should be as small as
possible. Note that the file maintenance program only flags master file
records for deletion; that is, deleted records physically remain in the file
and must be processed by every program reading that file. The annual report
program, PRPENTR (EP0200), physically removes records which are flagged for
deletion from the master file when it creates the NEDS or EIS/PS transactions
from that file. The size of the input master file which is processed by a
report program can be reduced without actually reducing the size of the master
file by running the retrieval package prior to generating the report; thus,
only the desired data is printed. See Section 5.2 for information on
retrievals.
The size of the emission factor file can be controlled by assuring that
it contains only information actually in use; i.e., that it precisely reflects
the master file data.
Several programs have a LIST option. This option allows for complete
files to be printed, usually confirmation listings of the input and output
files. Since printing the files does add to the cost of running these
programs, the LIST option should only be used when a listing or audit trail is
44
-------
EIS/PS
ECONOMICS
SECTION 3.1
ECONOMY MEASURES
Page 2
Release Date: 2/01/80
Update #: P-l
required; otherwise, the NOLIST option should be used. Some programs,
especially those that edit transactions, also contain a FLAGW option which
causes all warning messages to be printed. Using the NOFLAGW option (and thus
suppressing the warning messages) will reduce the cost of running these
programs.
Another cause of unnecessary cost is running the entire retrieval process
using identical retrieval specifications to retrieve the same data from
different files. If it is known that a set of retrieval specifications will
be executed multiple times, the load module created in the first execution
should be stored. This allows the retrieval language processor to be bypassed
and only the retrieval itself to be executed. The cataloged procedures
EPRTM10 (see Section 5.2.2.5) arid EPRTM20 (see Section 5.2.3.5) are provided
to facilitate the creation and re-execution of retrievals.
Another form of unnecessarily repeated program execution is updating the
master file each time transactions are edited. Since a large part of the cost
of updating a file is the actual processing of the file (i.e., reading,
searching, and writing), as many transactions as possible should be entered
in one update run. This can be accomplished by editing the various batches of
transactions as they are coded, saving the resulting internal transactions,
and concatenating them for one execution of file maintenance. The cataloged
procedures EPEDT10 (see Section 4.3.5.5) and EPFMM10 (see Section 4.3.9.5)
provide the means of doing this.
Additional cost considerations are included in the discussions of the
individual EIS/PS programs. These considerations include the cost of a
sample run of the program and, where applicable, information on how to reduce
the cost.
45
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.1
INTRODUCTION
Page 1
Release Date: 2/01/80
Update #: P-l
4.0 FILE CREATION AND MAINTENANCE
4.1 INTRODUCTION
The primary file in the EIS/PS system is the master file which contains
the user's point source emissions data. The EIS/PS system allows the user to
place data in the master file and extract data from the. master file for
reports, including the EPA-required annual report.
There are two auxiliary files which contain emission factor data: the
emission factor file and the emission factor description file. The emission
factor file is used to insert emission factor information into master file
transactions and to generate master file transactions when udpates to emission
factor information in the master file is needed. The emission factor
description file is only used to produce a detailed report of the emission
factor file.
All of the files in EIS/PS are sequential files (i.e., the file records
are read sequentially from beginning to end). The emission factor and the
emission factor description files contain fixed-length records; the master
file contains variable-length records..
46
-------
IIIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2
EMISSION FACTOR FILE
INTRODUCTION
Page 1
Release Uate: 2/01/80
Update #: P-l
4.2. EMISSION FACTOR FILE
4.2.1. INTRODUCTION
Emission factor information is contained in two files: the emission
factor file and the emission factor description file. These files are created
and maintained by EIS/PS emission factor file transactions. The EIS/PS
transactions can be coded directly or created by converting NEDS emission
factor file transactions, see PCVNEEF (EP0020).
Two programs must be executed to convert NEDS emission factor file
transactions to EIS/PS emission factor file transactions. These programs are
the NEDS emission factor file transaction sort program, PSRNEEF (EP0010), and
the NEDS to EIS/PS emission factor file trans-action conversion program,
PCVNEEF (EP0020). PSRNEEF (EP0010) sorts the input NEDS emission factor file
transactions and passes the sorted transactions to PCVNEEF (EP0020), which
converts the sorted NEDS emission factor file transactions to EIS/PS emission
factor file transactions. See Figure 4.2.1-a for a flowchart illustrating the
conversion from NEDS to EIS/PS emission factor file transactions.
Once EIS/PS emission factor file transactions are obtained (either by
coding or by conversion from NEDS emission factor file transactions), two
programs are executed to create or update the emission factor file: the
emission factor file transaction sort program, PSREFTR (EP0030), and the
emission factor file edit-maintenance program, PEMEFAC (EP0040).
47
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2
EMISSION FACTOR FILE
INTRODUCTION
Page 2
Release Date: 2/01/80
Update #: P-l
PSREFTR (EP0030) sorts the EIS/PS emission factor file trans-actions and
passes them to PEMEFAC (EP0040). PEMEFAC (EP0040) edits the sorted
transactions and uses those transactions that pass the edit criteria to create
or update the emission factor and the emission factor description files. No
old emission factor or emission factor description files are input to PEMEFAC
(EP0040) when the initial files are being created; however, when existing
files are being updated, those files are input to PEMEFAC (EP0040). See
Figure 4.2.2-b for a flowchart illustrating the emission factor file
edit-maintenance procedure.
Refer to Sections 4.2.2, 4.2.3, 4.2.4, and 4.2.5 for detailed discussions
of PSRNEEF (EP0010), PCVNEEF (EP0020), PSREFTR (EP0030), and PEMEFAC (EP0040),
respectively.
PSRNEEF (EP0010) and PCVNEEF (EP0020) can be executed using the cataloged
procedure EPCVE10, which is discussed in Section 4.2.3.5. The programs
PSREFTR (EP0030) and PEMEFAC (EP0040) can be executed using the cataloged
procedure EPEME10, discussed in Section 4.2.5.5. All four programs can be
executed (combining both the conversion from NEDS emission factor file
transactions and the emission factor file edit-maintenance) using the
cataloged procedure EPEME20, discussed in Section 4.4.2.
48
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SORTED NEDS EMISSION
FACTOR FILE TRANSACTIONS
(Temporary)
DIAGNOSTIC
REPORT
SECTION 4.2
EMISSION FACTOR FILE
INTRODUCTION
NEDS EMISSION FACTOR
FILE TRANSACTIONS
PSRNEEF (EP0010)
NEDS EMISSION FACTOR
FILE TRANSACTION
SORT PROGRAM
PCVNEEF (EP0020)
NEDS TO EIS/PS EMISSION
FACTOR FILE TRANSACTION
CONVERSION PROGRAM
/EIS/PS EMISSION FACTO
i FILE TRANSACTIONS
Page 3
Release Date: 2/01/30
Update #: P-l
[SORT WORK FILEj
"V (Temporary)
DIAGNOSTIC
REPORT
OPTION CARD
TRANSACTION
LISTING
(See Figure 4.2.1-b.)
Figure 4.2.1-a. NEDS to EIS/PS Emission Factor File Transaction Conversion
Flowchart
49
-------
EIS/PS
FILL CREATION AND
MAINTENANCE
SECTION 4.2
EMISSION FACTOR FILE
INTRODUCTION
Page 4
Release Date: 2/01/80
Update #: P-l
EIS/PS EMISSION FACTOR/
FILE TRANSACTIONS I
'EIS/PS EMISSION FACTOR/
FILE TRANSACTIONS
±
PSREFTR (EP0030)
EMISSION FACTOR FILE
TRANSACTION SORT PROGRAM
/SORT WORK FILE/
"I (Temporary)
/SORTED EMISSION FACTOR
I FILE TRANSACTIONS
DIAGNOSTIC
REPORT
(page 1 of 2)
Figure 4.2*l-b. Emission Factor File Edit-Maintenance Flowchart
50
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2
EMISSION FACTOR FILE
INTRODUCTION
Page 5
Release Date: 2/01/80
Update f: P-l
/OLD EMISSION
/ FACTOR FILE
I (Optional)
NEW EMISSION
FACTOR FILE
LD EMISSION /
FACTOR DESCRIP/
TION FILE \
Optional) \
ORTED EMISSION
FACTOR FILE
TRANSACTIONS
PEMEFAC (EP0040)
EMISSION FACTOR FILE
EDIT-MAINTENANCE PROGRAM
/NEW EMISSION/
(FACTOR DESCRIP-J
V TION FILE V
OLD EMISSION
FACTOR FILE
LISTING
(Optional)
1
DIAGNOSTIC
REPORT
NEW EMISSION
FACTOR FILE
LISTING
(Optional)
OPTION
CARD
TRANSACTION
LISTING
(Optional
OLD EMISSION
FACTOR DESCRIP-
TION FILE LIST-
ING (Optional)
NEW EMISSION^
FACTOR DESCRIP-
TION FILE LIST-
ING (Optional)
(Page 2 of 2)
Figure 4.2.1-b - continued. Emission Factor File Edit-Maintenance Flowchart
51
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.2
NEDS EMF TRANS SORT
PROGRAM PSRNEEF (EP0010)
Page 1
Release Date: 2/01/80
Update #: P-l
4.2.2 NEDS EMISSION FACTOR FILE TRANSACTION SORT PROGRAM - PSRNEEF (EP0010)
i
4.2.2.1 Description
PSRNEEF (EP0010) sorts NEDS emission factor file transactions into the
sequence required by the NEDS to EIS/PS emission factor file transaction con-
version program, PCVNEEF (EP0020); Figure 4.2.2-a details this sort order.
All NEDS emission factor file transactions must be sorted by PSRNEEF (EP0010)
before they can be converted to EIS/PS emission factor file transactions. See
Section 4.2.3 for additional information on the NEDS emission factor file
transactions.
4.2.2.2 File Formats
Input to this program consists solely of NEDS emission factor file
transactions. Refer to Figure 4.2.3-a for a description of the NEDS emission
factor file transaction format.
PSRNEEF (EP0010) produces two output files: a diagnostic report and a
temporary file containing the sorted NEDS emission factor file transactions.
The sorted transactions are in the correct sequence for use as input to the
NEDS to EIS/PS emission factor file transaction conversion program, PCVNEEF
(EP0020). An example of the diagnostic report is shown in Figure 4.2.2-b.
4.2.2.3 Options and Control Cards
There are no options.
52
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.2
NEDS EMF TRANS SORT
PROGRAM PSRNEEF (EP0010)
Page 2
Release Date: 2/01/80
Update #: P-l
4.2.2.4 Error Messages
***PSRNEEF 001 ERROR - INVALID ACTION CODE, TRANSACTION REJECTED
Meaning: Valid action codes are A (add), C (change) and D (delete).
Action: Correct the error and resubmit the transaction.
4.2.2.5 Cataloged JCL
PSRNEEF (EP0010) should always be executed in conjunction with the NEDS
to EIS/PS emission factor file transaction conversion program, PCVNEEF
(EP0020). See Section 4.2.3.5 for a discussion of the cataloged procedure
EPCVE10, which executes both programs.
4.2.2.6 Warnings and Special Instructions
Note that the COBOL sort verb is used in.this program; therefore, the
collating sequence for alphanumeric fields is determined by the computer at
the user's particular installation.
In addition to the diagnostic report produced by PSRNEEF (EP0010),
messages generated by the sort-merge package will be printed. The format and
content, as well as the physical location, of these messages depend upon the
user's particular installation.
4.2.2.7 Cost Considerations
The following estimates are for the execution of PSRNEEF (EP0010) on an
IBM 370/168:
53
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.2
NEDS EMF TRANS SORT
PROGRAM PSRNEEF (EP0010)
Page 3
Release Date: 2/01/80
Update #: P-l
Number of NEDS emission factor file transactions:
CPU time:
I/O time:
Total time:
327 records
2.08 seconds
9.16 seconds
11.24 seconds
Estimated cost:
$5.47
4.2.2.8 Related Programs and Procedures
PSRNEEF (EP0010) should always be executed in conjunction with the NEDS
to EIS/PS emission factor file transaction conversion program, PCVNEEF
(EP0020). The cataloged procedure EPCVE10 executes both programs.
Also, PSRNEEF (EP0010) and PCVNEEF (EP0020) can be executed in
conjunction with the emission factor file transaction sort program, PSREFTR
(EP0030), and the emission factor file edit-maintenance program, PEMEFAC
(EP0040), by the cataloged procedure EPEME20. See Section 4.4.2 for a
discussion of this procedure.
54
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.2
NEDS EMF TRANS SORT
PROGRAM PSRNEEF (EP0010)
Page 4
Release Date: 2/01/80
Update #: P-l
Record Position
Description
Sort Sequence
1 - 8
80
10
SCC
Card Type
Action Code
Ascending
Ascending
Ascending
Figure 4.2.2-a. Sort Sequence for NEDS Emission Factor File Transactions
55
-------
tis/PS Htns IMISSIIJN FACKW FILF TKANS/ICIMN SDBI PHUHHAM - DIAGUDSMC
NAMt: PSRNbtF (tPOOlO)
LF.VF.L: i-oo
IASI UPUAFF *: P-l
'>ATt fJCOHi'DKATEns FEBRUARY I, 19HI1
(IF TK/INSACI IONS HEADS
UF TMANSACIIUMS
Figure 4.2.2-b. Diagnostic Report
z m
—1
m o
3» m
O —t
m i—i
o
-o z
so m
o o
CD oo
m o
2 Z
oo —i
3O 5O
z >
m z
m oo
~n
oo
—^ o
m yg
-o —I
o
O
ro
~O (D Gt
Q. —• IQ
Q» fD fl>
(P (/) on
ft>
.. o
Ol
"O c+
i n>
INJ
o
oo
o
-------
EIS/PS
FILE CREATION
AND MAINTENANCE
SECTION 4.2.3
NEDS TO EIS EMF
CONVERSION PCVNEEF (EPOQ20
Page 1
Release Date: 2/01/80
Update #: P-l
4.2.3 NEDS TO LIS/PS EMISSION FACTOR FILE TRANSACTION CONVERSION PROGRAM -
PCVNEEF (EP0020)
4.2.3.1 Description
PCVNEEF (EP0020) converts NEDS emission factor file transactions to
EIS/PS emission factor file transactions which can be used to create or update
the EIS/PS emission factor and description files. General editing is
performed on each NEDS transaction prior to its conversion.
The NEDS emission factor file transactions must be sorted into
SCC/card-type/action-code sequence prior to being input to PCVNEEF (EP0020).
See Section 4.2.2 for a discussion of the NEDS emission factor file
transaction sort program, PSRNEEF (EP0010), which sorts the transactions into
the.required sequence. The SCC number must be a valid SCC number from
'00000000' to '99999998'; the card type must be T, '2', or '3'; and the
action code must be 'A1 (add), 'C' (change), or 'D1 (delete). There can be a
maximum of three NEDS transactions, one of each type, associated with a given
SCC number. Also, all NEDS transactions associated with a given SCC number
must contain the same action code. Therefore, it is not possible to have
delete transactions, add transactions, and change transactions for the same
SCC number in the same run.
The NEDS transactions are converted into EIS/PS transactions, of which
there are four types. Types 1, 2, and 3 are used to create or update records
in the EIS/PS description file and type-4 transactions are used to create or
update records in the EIS/PS emission factor file.
Data from a NEDS type-1 transaction is transferred to data fields of
EIS/PS type-1 and type-2 transactions. Data from a NEDS type-2 transaction is
transferred to data fields of EIS/PS type-2 and type-3 transactions. A NEDS
57
-------
EIS/PS
FILE CREATION
AND MAINTENANCE
SECTION 4.2.3
NEDS TO EIS LMF
CONVERSION PCVNEEF (EP0020
Pa ye 2
Release Date: 2/01/80
Update #: P-l
type-3 transaction is used to create EIS/PS type-4 transactions for the five
criteria pollutants (TSP, S0£, NOX, HC, and CO). Also, if the NEDS type-3
transaction is an add transaction, an EIS/PS type-4 transaction containing a
pollutant ID of zero is created for the purpose of entering ash and sulfur
contents for the SCC. See Section 4.2.5 for a further discussion of this
special EIS/PS type-4 transaction.
One to three NEDS transactions can be present for a given SCC number
depending on the action code. Any duplicate NEDS transactions (i.e.,
transactions containing identical SCC/card-type combinations) will be rejected
by the program. A NEDS type-1 transaction is the only NEDS transaction that
can contain a delete action code (a code of 'D'). NEDS type-2 and type-3
transactions containing an action code of 'D1 will be rejected by the
program.
When NEDS add transactions are being processed, the program requires that
a NEDS type-3 transaction be present. If NEDS type-1 and/or type-2 add
transactions are not present for an SCC number, the program will generate
corresponding EIS/PS transaction types 1, 2, and 3; however, the data fields
for the generated transactions will contain messages indicating that they were
created by PCVNEEF (EP0020). If a NEDS type-3 add transaction is not present,
the program will reject all other associated NEDS transactions and issue an
error message.
Any combination of the three types of NEDS transactions is valid for
change transactions. Corresponding EIS/PS transactions are generated from the
NEDS change transactions, provided that all the data fields of the NEDS
transactions are not blank.
58
-------
EIS/PS
FILE CREATION
AND MAINTENANCE
SECTION 4.2.3
NEDS TO EIS EMF
CONVERSION PCVNEEF (EP0020;
Page 3
Release Date: 2/01/80
Update #: .P-l
4.2.3.2 File Formats
Input to the program consists of NEDS emission factor file transactions
and an option card. See Figure 4.2.3-a for a description of the NEDS
transaction formats. See Section 4.2.3.3 for a discussion of the option card.
Output from the program consists of EIS/PS emission factor file
transactions; a diagnostic report containing input and output transaction
counts, error counts, and a listing of errors encountered; and optionally, a
listing of the input NEDS transactions and the associated output EIS/PS
transactions. See Figure 4.2.5-c for a description of the EIS/PS emission
factor file transaction formats. See Figure 4.2.3-b for a sample diagnostic
report and Figure 4.2.3-c for a sample transaction listing.
4.2.3.3 Options and Control Cards
An option card must be submitted with each run of PCVNEEF (EP0020). The
option card contains a list option and an option date. When 'LIST' is coded
in columns 1 through 4 of the option card, a listing of the input NEDS
transactions and the associated EIS/PS transactions will be printed. Leaving
this field blank will cause the transaction listing to be suppressed.
An option date must appear in columns 21 through 25 of the option card in
the Julian form YYDDD, where YY is the year and ODD is the day of the year.
If the date is not present on the option card, program execution will be
terminated. The option date is inserted in the output EIS/PS transactions and
therefore, should be the current date. See Figure 4.2.3-d for a description
of the option card.
59
-------
EIS/PS
FILE CKEATION
AND MAINTENANCE
SECTION 4.2.3
NEUS TO EIS EMF
CONVERSION PCVNEEF (EP0020
Page 4
Release Date: 2/01/80
Update #: P-l
4.2.3.4 Error Messages
PCVNEEF 001 ERROR - COLUMN 01 - INVALID SCC NUMBER - RECORD REJECTED
Meaning: The SCC number of the NEDS transaction is not numeric, or it is
all nines. The transaction was rejected.
Action: Correct the SCC number and resubmit the job.
PCVNEEF 002 ERROR - COLUMN 80 - INVALID RECORD TYPE - RECORD REJECTED
Meaning: The card type of the NEDS transaction is not 'I1, '2', or '3'.
The transaction was rejected.
Action: Correct the error and resubmit the job.
PCVNEEF 003 ERROR - COLUMN 10 - INVALID ACTION CODE - RECORD REJECTED
Meaning: The action code of the NEDS transaction is not 'A', 'C1, or
'D'. The transaction was rejected.
Action: Correct the error and resubmit the job.
PCVNEEF 004 ERROR - ADDITIONAL RECORD FOR RECORD TYPE X OF SCC NUMBER
NNNNNNNN - RECORD REJECTED
Meaning: The NEDS transaction contains a duplicate SCC/card-type
combination, where 'NNNNNNNN' is the SCC number and 'X1 is the
card type. The transaction was rejected.
Action: Correct the error and resubmit the job if necessary.
PCVNEEF 005 ERROR - NO VALID RECORD TYPE 3 FOR SCC NNNNNNNN TO BE ADDED - NO
OUTPUT FOR THIS SCC
Meaning: No valid NEDS type-3 transaction is present for the specified
SCC; therefore, no output EIS/PS transactions were generated
for this SCC.
Action: Supply a valid NEDS type-3 transaction and resubmit the job.
60
-------
EIS/PS
FILE CREATION
AND MAINTENANCE
SECTION 4.2.3
NEDS TO EIS EMF
CONVERSION PCVNEEF (EP0020
Page 5
Release Date: 2/01/80
Update #: P-l
PCVNEEF 006 ERROR - COLUMN XX - INVALID FORMAT FOR EMISSION FACTOR FIELD N -
POLLUTANT DATA REJECTED
Meaning: The Ntn emission factor field beginning in column 'XX1 of the
NEDS type-3 transaction is not numeric, or the decimal point is
not in the proper position. The data was rejected.
Action: Correct the error and resubmit the job.
PCVNEEF 007 ERROR - COLUMN XX - INVALID VALUE FOR FLAG FIELD N - POLLUTANT
DATA REJECTED
Meaning: The Ntn flag field beginning in column 'XX' of the NEDS type-3
transaction is not valid. Valid values for the second
character position of this field are '0' through '9'. If N is
1, the third character position must be 'A' or blank. If N is
2, the third character position must be 'S' or blank. The data
was rejected.
Action: Correct the error and resubmit the job.
PCVNEEF 008 ERROR - NO USABLE POLLUTANT FIELD IN RECORD - NO OUTPUT CREATED
FOR THIS SCC
Meaning: No pollutant data is present on the NEDS type-3 add
transaction, or the data was rejected. No EIS/PS add
transactions were generated for this SCC.
Action: Supply valid data and resubmit the job.
PCVNEEF 009 WARNING - SCC NNNNNNNN TO BE ADDED, BUT NO RECORD 1 FOUND - OUTPUT
FIELDS GENERATED
Meaning: A NEDS type-3 add transaction is present but there is no type-1
add transaction for the specified SCC.
Corresponding output EIS/PS add transactions were generated.
61
-------
EIS/PS
FILE CREATION
AND MAINTENANCE
SECTION 4.2.3
NEDS TO EIS EMF
CONVERSION PCVNEEF (EP0020;
Page 6
Release Date: 2/01/80
Update #: P-l
Action: Supply a NEDS type-1 add transaction for the specified SCC
number and resubmit the job if necessary.
PCVNEEF 010 WARNING - SCC NNNNNNNN TO BE ADDED, BUT NO RECORD 2 FOUND - OUTPUT
FIELDS GENERATED
Meaning: A NEDS type-3 add transaction is present but there is no type-2
add transaction for the specified SCC.
Corresponding output EIS/PS add transactions were generated.
Action: Supply a NEDS type-2 add transaction for the specified SCC
number and resubmit the job if necessary.
PCVNEEF Oil ERROR - RECORDS OF SCC NNNNNNNN HAVE INCONSISTENT ACTION CODES -
NO OUTPUT FOR THIS SCC
Meaning: NEDS transactions for SCC 'NNNNNNNN1 do not contain the same
action code. No EIS/PS transactions were generated.
Action: Correct the error and resubmit the job.
PCVNEEF 012 ABORT - NO CONTROL CARD PRESENT OR DATE FIELD NON-NUMERIC
Meaning: An option card was not submitted with the run, or the control
date on the option card is not numeric.
Action: Supply an option card with a valid control date and resubmit
the job.
PCVNEEF 013 ABORT - NO NEDS DATA PRESENT OR DATA SORT HEADER RECORD MISSING
Meaning: There are no NEDS transactions present, or the header record
created by PSRNEEF (EP0010) is not present.
Action: Supply sorted NEDS transactions with the appropriate header
record and resubmit the job.
62
-------
EIS/PS
FILE CREATION
AND MAINTLNANCi:
SECTION 4.2.3
NEUS TO HIS EMF
CONVERSION PCVNL'EF (EP0020
Page 7
Release Date: 2/01/80
Update #: P-l
PCVNEEF 014 ERROR - DELETE TRANSACTION SHOULD ONLY BE RECORD TYPE 1 - RECORD
REJECTED
Meaning: The NEDS delete transaction is not a type-1 transaction. The
transaction v/as rejected.
Action: Correct the error and resubmit the job.
PCVNEEF 015 ERROR - NO USABLE POLLUTANT FIELDS IN RECORD - RECORD REJECTED
Meaning: The NEDS type-3 change transaction contains no pollutant data,
or the data is invalid. The transaction was rejected. Do not
confuse this error message with error message 8, which is for
add transactions.
Action: Correct any errors and resubmit the job.
4.2.3.5 Cataloged JCL
4.2.3.5.1 JCL listing - PCVNEEF (EP0020) can be executed by the cataloged
procedure EPCVE10. This procedure also executes the NEDS emission factor file
transaction sort program, PSRNEEF (EP0010), prior to executing PCVNEEF
(EP0020). See Figure 4.2.3-e for a listing of EPCVE10.
4.2.3.5.2 Cross-reference of DP names and files -
Program Name: PSRNEEF (EP0010)
DP Name File Description Input/Output
EPSINPT Unsorted NEDS emission factor file Input
transactions
EPSOUTP Sorted NEDS emission factor file Output
transactions
EPSDIAG Diagnostic report Output
SORTWK01 Sort work file Internal
63
-------
EIS/PS
FILL CREATION
AND MAINTENANCE
SECTION 4.2.3
NEDS TO EIS EMF
CONVERSION PCVNEEF (EP0020;
Page 8
Release Date: 2/01/80
Update #: .P-l
Program Name: PCVNEEF (EP0020)
DP Name File Description
EPSINPT
EPSOPTN
EPSOUTP
EPSDIAG
EPSTRNL
NEDS emission factor file transactions
Option card
EIS/PS emission factor file transactions
Diagnostic report
Transaction listing
Input/Output
Input
Input
Output
Output
Output
4.2.3.5.3 User-supplied JCL - To execute the cataloged procedure EPCVE10, the
user must supply the NEDS emission factor file transactions, the data set name
of the EIS/PS emission factor file transactions, and an option card. See
Figure 4.2.3-f for a description of the procedure's substitutable parameters.
4.2.3.5.4 Sample run stream -The following run stream would sort the NEDS
emission factor file transactions and convert them to EIS/PS emission factor
file transactions. The input NEDS transactions are punched cards and the data
set name of the output EIS/PS transaction file is its default value.
// EXEC EPCVE10
//SORT.INPUT DD *
NEDS emission factor file transactions
//CONVERT.OPTIONS DD *
LIST 80045
/*
64
-------
EIS/PS
FILE CREATION
AND MAINTENANCE
SECTION 4.2.3
NED TO EIS EMF
CONVERSION PCVNEEF (EP0020
Page 9
Release Date: 2/01/80
Update #: P-l
4.2.3.6 Warnings arid Special Instructions
The NEDS emission factor file transactions must be sorted into the proper
sequence before being input to PCVNEEF (EP0020). See Section 4.2.2 for a
discussion of the NEDS emission factor file transaction sort program, PSRNEEF
(EP0010).
4.2.3.7 Cost Considerations
To reduce the cost of executing PCVNEEF (EP0020), the user can
suppress the listing of input and output transactions. This is accomplished
by leaving blank the list option field of the option card.
The estimates listed below are based on the execution of the run stream
in Section 4.2.3.5.4 on an IBM 370/168.
NEDS emission factor file transactions: 328 records
EIS/PS emission factor file transactions: 867 records
Number of errors detected: 13 errors
CPU time: 1.66 seconds
I/O time: 22.44 seconds
Total time: 24.10 seconds
$3.37
Estimated cost:
4.2.3.8 Related Programs and Procedures
PCVNEEF (EP0020) can be executed by the cataloged procedure EPEME20.
This procedure executes PSRNEEF (EP0010); PCVNEEF (EP0020); PSREFTR (EP0030),
the EIS/PS emission factor file transaction sort program; and PEMEFAC
(EP0040), the emission factor file edit-maintenance program.
65
-------
EIS/PS
FILE CREATION
AND MAINTENANCE
SECTION 4.2.3
NEDS TO EIS EMF
CONVERSION PCVNEEF (EP0020
Page 10
Release Date: 2/01/80
Update #: .P-l
Column #
1 - 8
9-80
Field Length
8
72
Header Record
Data Type
Numeric
Description
Zeroes
Not Used
(Page 1 of 4)
Figure 4.2.3-a. NEDS Emission Factor File Transaction Formats
66
-------
EIS/PS
FILE CREATION
AND.MAINTENANCE
SECTION 4.2.3
NEDS TO EIS EMF
CONVERSION PCVNEEF (EP0020;
Page 11
Release Date: 2/01/80
Update #: .P-l
Card 1
Column #
1
11
28
45
62
- 8
9
10
- 27
- 44
- 61
- 78
79
80
Field Length
8
1
1
17
17
17
17
1
1
Data Type
Numeric
Alphabetic
Alphanumeric
Alphanumeric
Alphanumeric
Alphanumeric
Numeric
Description
SCC Number
Not Used
Action Code
SCC Description 1
SCC Description 2
SCC Description 3
SCC Description 4
Not Used
Card Type
(Page 2 of 4)
Figure 4.2.3-a - continued. NEDS Emission Factor File Transaction Formats
67
-------
EIS/PS
FILE CREATION
AND MAINTENANCE
SECTION 4.2.3
NEDS TO EIS EMF
CONVERSION PCVNEEF (EP0020
Page 12
Release Date: 2/01/80
Update #: .P-l
Card 2
Column #
I - 8
9
10
11 - 45
46 - 79
80
Field Length
8
1
1
35
34
1
Data Type
Numeric
Alphabetic
Alphanumeric
Alphanumeric
Numeric
Description
SCC Number
Not Used
Action Code
Units Description 1
Units Description 2
Card Type
(Page 3 of 4)
Figure 4.2.3-a - continued. NEDS Emission Factor File Transaction Formats
68
-------
EIS/PS
FILE CREATION
AND MAINTENANCE
SECTION 4.2.3
NEDS TO EIS EMF
CONVERSION PCVNEEF (EP0020;
Page 13
Release Date: 2/01/80
Update #: .P-l
Card 3
Columns
Field Length
1
11
20
24
33
37
46
50
59
63
72
76
- 8
9
10
- 19
- 23
- 32
- 36
- 45
- 49
- 58
- 62
- 71
- 75
- 79
80
8
1
1
9
4
9
4
9
4
9
4
9
4
4
1
Data Type
Numeric
Alphabetic
Numeric
Alphanumeric
Numeric
Alphanumeric
Numeric
Alphanumeric
Numeric
Alphanumeric
Numeric
Alphanumeric
Numeric
Description
SCC Number
Not Used
Action Code
TSP Emission Factor*
TSP Flags
S02 Emission Factor*
S02 Flags
NOX Emission Factor*
NOX Flags
HC Emission Factor*
HC Flags
CO Emission Factor*
CO Flags
Not Used
Card Type
*Format includes a decimal point with 6 digits to the left and 2 digits to the
right.
(Page 4 of 4)
Figure 4.2.3-a - continued. NEDS Emission Factor File Transaction Formats
69
-------
NM>S III E1S/PS F.MISSION F«r|IIK
IM
- PI AUNIIR I 1C KFI'OWT
: PCVNFEF l FEBRUARY \,
FIS/PS EMISSION F»t. (OH CONVEYS I UN CON IHUl rA»lj8 L I S I I NT.
I 1ST llPl IIIN
HSI
JULIAN UA|F.
H0057
10^007"! AFXTCONH BUTtFK COMMt-HCL- INSI"1NIPHUCF SS C,AS
10^00701 AMRLtON CUR1C Ftfl HUHNfl
*** PCVNFLF nos FHKMU - MI) VALID KFCHHD Type 3
• ** PCVNf-tF 00« FHRiJP - NO U
?n?ooioi AFumi/Ar.ivi cnLTiwt ALFALFA
*** nr.VMFtF noa
bf-'flAUF CAS I
i>
sec injnoTni ru HF. Anntn - NH IIUIMUT urn mis sec
HIM THIS SCC
PULLUIA.'jt FIFL^S |W ffcCIWU - NO flUff'llT C
FHM
UFNFHAI *» i
IYCF i OF sec ;
)n?ooiot - MF
Jo?onmi A rims MFAC PHnoiicEO o ;=
*** PCVN^tF 000 FHRIIR - ADDITIONAL KFtdun Fd" MEC.UKO TYPE 2 OF SCC NUMBER $0?0010l - HECHKO ttt.KCTflt
^1)200101 A f-O.On 5
*** PCVNFfcF 00« FRPMH - AODITinNAL HFCUHf* Fill PECuHti TYPF i l» SCC NHWHf «» 3020011)1 - HF.C»Hf> HEJtCTF.t)
A 3
*** PCVNFtF OOn EKRriP - NO USAHLF PIILLUIANf FJFLOS IN HtCllRU - MO HUTPIJI CRt»ItO F'lH IHI3 SCC
«*• PCVNEtF OOB EHRDH - NO USAHLF PDLLIMANT F1FLOS IN KEf.lWD - MM lllllPOI CHEA1ED FDH IH13 SCC
FNPUT fNFD.S) kFCOHD COUNT:
.nuTpiu O
i— TO
z m
—I >
> c
Z 2
O
O 2 CO
o m m
z o o
fD fD
r*- B)
=«=
re
ro
o
t—>
00
o
-------
CMFOS) fMISSION FACinH
(•MISSIlIN FAT fUW IRANSACflONS IISIINi;
lUITf'IIT (FlS/PS) FMISS1HN FAC'IIP TKAN3AC T1UNS
PAC.t
loionim AFxTcnuH HUILEK tLECiRir RtNERAiNANTHRACHh COAL PULvtm/in cu*u i
10100(01 ATIiriS HHKMtl>
A0oooi7.0n A 000036. nu s OOOOIH.UO
nnonun.nn
nooooi.ou
U i.
J
F. XTCHMH HUILFH
?A1«1(tnint 80057PUI Vfwt/FO CDAL
3AIQ1U01Q1 H0057
lAioiooioiF nonuoenos7
OA10I0010IF I IIUltfOU57PAW| ICIILMF FACHIH
1A1010P101F '12001 a«OS7SfP FACI'IH
FACIOH
F*CT(IH
ai?io)HOos7ru
CHAL
HIIWNFI)
A 000017000
S
AFXTCOHH BUILFH tLtClHIC BENtRATNANlllRAC1 It COAl <10MMHfll
10J0010S ATIINS H"HNtn
AOOOUI7.00 A 00003".00 S OUOOIH.OO
I0l00|0b AFXTCHMH HUlLFH I
AtUNS HUMMED
Anonofli.oo A uouosR.no s oonoob.oo
oooooo.ni oiioooi.oo i
1AI0100105 »00'57F.XTcnMR RUILFK EttCTRlC RhNEKATNANTHPACI Tt, C'lAL
1A1 .MII0105F OOOQOH0057
QAIOI0010SF IMOI800S7PARIICHLAIE FACTHR A 000017000
UAlOloniOSF 'l2aolfl0057S(l? FACIHR S OOOOIHOQO
(lAIUtOfllOSF «2«<0?800S7MOy FACTOR 00001HOOO
"SJOI800S7HC F»CT|)H OOOOOuOJO
l€!IOIrtOOS7nj FAC'I'K
(IIAI <10MMHril 5IHKT-K** 1
0 f
(1000(10. ft}
lAHHOOlOi,
?A I M ion I o»,
opnoin.no
R'MLEK
4AI iltOOIOhF OOOOOHOOS7
'l*IOIOOl"hf II l
m
o z oo
o m m
zoo
50 -H O
oo o z
•—i
o m •$*
oo ro
o m co
o
o
ro
o
•a
a.
CU
r+
n>
a>
«~j
n>
CU
a>
in
n>
ft) en
n>
• •
ro
o
00
o
-------
EIS/PS
FILE CREATION
AND MAINTENANCE
SECTION 4.2.3
NEDS TO EIS EMF
CONVERSION PCVNEEF (EP0020i
Page 16
Release Date: 2/01/80
Update #: P-l
Card
Column #
L
21
1.
LIST
YYDDD
Figure 4.2.3-d. Option Card Format
72
-------
EIS/PS
FILE CREATION
AND MAINTENANCE
SECTION 4.2.3
NEDS TO EIS EMF
CONVERSION PCVNEEF (EP0020)
Page 17
Release Date: 2/01/80
Update i: P-l
//* f PAIMII/AIIM7 ••kl'M-PMH, LI HYIi n. < v I-.1) S'4l-S'IV|
//*
//* PRitCFOUHF. MAVI-: FPfVllO
//« HFWISMlii lFvH-1 |-Oil
//* l/l.'il uPnAIF «: P-l
//+ OATF- J •l(;lll<^>llU^ lh'>: FFH^UAKV t, |'»nn
//*
//* IHIS pi'iirti'ui'k AiLHnS Tuf MS^K in CHHVF-KI NHI:» i" I
//* f'll.t MAflljACHIlN." tntll LTS/PS t'-1lj.S|ilH FAIMilH F II,I
It*
//*
//FprvF-i» PK'II pi'iuir.rl = Tu.Lf1/
//
//
I IMF. lr'l,0« ,
//
IF ' .
//
//*
IF--iPs.Sy.SUA,
MlWK»PC=l?0
IHI|=A
// K
// II^« =(*,! l"k I )
//*
//* SnWI NFOS f- Ml SSI IN l-Ar.F(J«v Fllh I MANSAC I IHUS IMlU hll.F- St
//siFptin no MSNAwF=KpiviiJir i. .1
// V'II.IH"F = (P«I VAH.,' = ( IHK , f /t AI
//*
//
//
, ,f il'l IIIO
, ,ri.'-'i ir.)
//*
//* Ihl'uF IK. I,. .«JF I - iJMiS f KISS I II i fr.(.\\i\l F-IIK 1 1- »fi j('.|. I I 1 1 ..S
INMf nil iiMHA'-F rllil'UT,
//*
//* Hut pi 1 1 1 1 A | A MI - ,n.' it- n ,(•
ii ii '• on | INI
Oil (Ml Or' II I)
Oil OlM) 4IM)
o ii rut n a On
Oilll'IOri'U)
nil (HI (In (Ml
i) ti oo i u nn
HI) nut too
o i) n i) t tf n o
nu on 1 >(MI
IMI'M) 1 JM'J
OlM'OI SHil
0 I) On I nni)
0|)0 (I 1 /III)
II II I) I) I MO II
'MIO.lt VIHI
on
IIUOO-'VIU)
on no *IHMI
IMJ n o ^ t n o
OHOll ^cfCll
OH I) I) * {(Ml
Oil (Ml Ay fill
(MMMI
'11)011 < / mi
i) II I'll 'I Ii 'Ml
no i) 0 /i 1 1 MI
n (i on a
ft ft Oil /!>! (Ml
On Oil ii MHI
(Mi O u 'J nil (I
(HI on /i /no
(i ii d u a M nil
OllOllSl Illl
iMHHiSr nil
OiH'uS SIMI
n u n o *> >4 o it
-| ';:, i ii • I n |.n. i il I !•• \< •••'(. I I i
(Page 1 of 3)
Figure 4.2.3-e. Cataloged Procedure EPCVE10
73
-------
EIS/PS
FILE CREATION
AND MAINTENANCE
SECTION 4.2.3
NEDS TO EIS EMF
CONVERSION PCVNEEF (EP0020)
Page 18
Release Date: 2/01/80
Update #: P-l
//*
in)
//
//
//
//«
//«
//*
t. U ) ,
//*
//*
//*
//*
IJMl I =X. IF lit',
ui.-,p=MHA|A S| 7 - Ml Ai;Ml|SI !(. KfPflKI
111) SYMUU=R.lHM
IIAIA SMS - sv.sitw HIT In .sv.smiTrv.iMM
//*
//SrSmtiHM du oV,smil=x,i/ni
//*
//SYS'lUUMH Hi) SY.SfMMsMHM
//*
//*
//
1 |i"lf =f IV I
//* (MMVFI'I MfD.S
//* FACIMK f-lLF fi- A j
//*
//SJF.f'llH PU HShflMf=Rpi»(i IK I . .1 iifti),
// Vdl II IF = (pW(V/AIL ,hf I A If,) ,
FAtlflH h f I. F Tl< AnlSAC I I (INS III Fl-'i
//*
//* f.if'liT DATA iF I - nf'ltli"
//*
Hi) (IPiNA •(• =IIP] III.
FAflHi. Fill I K AuSAC I
//*
//* IwPUT DATA SF I -
//*
X/FPPJf't'f '•!) I'Snft f zk.i.: S.IK | F )..,
// n I :.c= ( SUK , t'/iss j
//*
//* HIiTHM DAM .",»! - M'i/l'.S f '• I f?.S I !!'• fflflUK FIlF 1 kAdS/if I
//*
//H'Slilllf H|i 1/S'jA'rf =Xf'kll.)t f. I . .Crt I A. «.ll- J V//i If , "f I A |M,Sf W = nSH K I »>| ) ,
// nl •.-!'= < '.I' I :.f),
// II'. I l = ».lll" I I ,
// .>'';.( I =(*.si'tiiul I , ( *.»'(. |!'«i- » ,f.si r.jin. Y ) , hi sr j
//*
//• uriii'iM I.AI/I ;".| i - i.j AI.MM;. i if .,IHH.l<: l';| ,Y,,'I(. I =Mlll |
o i) n us 7 fill
on On dun i)
lIlMMK, I ()()
n on 0 6 ,' n ii
(Ml II 118 id II
0 Ii () (i *>« 0(1
Oil (Ml '•>/»(!
I) II 0 Ii ^
'in n
0 il 0 U ; •> n 0
0 1) 0 II / '• d II
'1(101)7 /no
OH
(Hi (Ml »V (MI
(1 ii d(/M /((>(!
(i o n u H s ft ii
0 o o ii M «, n d
on oof- /on
no nun HUD
0 II 0 ll «* II (i 0
f u o 0 ° 1 n ii
(III AIJ <4£ (It)
i nn rui
n ii n i o i fi i/
n 3 |)(i
Ull'l ) 0'>ilH
Olid | f'r,ni)
(mo i n /on
'Mill | Of. (I ||
mm 1 1< ^oii
On" I 1 HIM)
iiiili i 1 1 <1.|
o on i \ si'**
(Page 2 of 3)
Figure 4.2.3-e - continued. Cataloged Procedure EPCVE10
74
-------
EIS/PS
FILE CREATION
AND MAINTENANCE
SECTION 4.2.3
NEDS TO EIS EMF
CONVERSION PCVNEEF (EP0020;
Page 19
Release Date: 2/01/80
Update #: P-l
//* IMIIHIF I.IAIA si- 1 - r i
//*
F-AI.IIIU IKA.J.SAM mi".s II..MM,
//*
//*
//*
//SYSrl'l*'! !>!' JiVS
//*
//srSiilil nil .SY:>i|lH=fciiUI
//*
//SYS|iM(i|i| DO SYSlHiTsKlMM
//*
//SrSnTH'fi l>l) UYtJiillf =KilH|
//*
//SYSUHli^H 111) SY'iMl)l=K,i|H|
//*
//*
(Page 3 of 3)
Figure 4.2.3-e - continued. Cataloged Procedure EPCVE10
75
-------
LIS/PS
FILE CREATION
AMD MAINTENANCE
SECTION 4.2,3
NEDS TO tIS EMF
CONVERSION PCVNEEF (EP0020)
Page 20
Release Date: 2/01/80
Update #: P-l
Parameter
Name
PROJECT
SERIAL
Default
Value
'CN.CPALMH.A087,
CDHS.HQ.PNT1
PROG1
PROG2
REGION1
RCGION2
TIME1
TIME2
TRANFIL
UNIT
PSRNEEF
PCVNEEF
150K
100K
'1,0'
'1,0'
EPTRNFIL
3330
CDHSPK
Description
Highest-level index of data set names
(e.g., CN.EPALMH.A087.CDHS.HQ.PNT.DATA.
EPTRNFIL would be the full data set
name of the output EIS/PS emission
factor file transaction file)
NEDS emission factor file transaction
sort program
NEDS to EIS/PS emission factor file
transaction conversion program
Region size allocated for execution of
PSRNEEF
Region size allocated for execution of
PCVNEEF
Time (minutes, seconds) allocated for
execution of PSRNEEF
Time (minutes, seconds) allocated for
execution of PCVNEEF
Lowest-level index of the output I IS/PS
emission factor file transaction file
Unit type to which the output EIS/PS
emission factor transaction file is to
be written
Volume serial number of the volume to
which the output EIS/PS emission factor
file transaction file is to be written
(Page 1 of 2)
Figure 4.2.3-f. Substitutable Parameters for EPCVE10
76
-------
EIS/PS
FILE CREATION
AND MAINTENANCE
• '—
Parameter
Name
DISP
SPCUNIT
SECTION 4.2.3
NEDS TO EIS EMF
CONVERSION PCVNEEF (EP0020
Page 21
Release Date: 2/01/80
Update |: P-l
PRIMARY
SECNDRY
TEMP
WORKSPC
OUT
Default
Value
'NEW,CATLG,DELETE'
TRK
20
10
SYSDA
'20,10'
Description
Disposition of the output EIS/PS
emission factor file transaction file
Units 1n which space for the output
EIS/PS emission factor file transaction
file 1s to be allocated
Primary space allocation for the output
EIS/PS emission factor file transaction
file
Secondary space allocation for the
output EIS/PS emission factor file
transaction file
Unit type for temporary sort space
Number of units of space to be
allocated for the temporary sort space
SYSOUT class for all print files
(Page 2 of 2)
Figure 4.2.3-f - continued. Substltutable Parameters for EPCVE10
77
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.4
EMF FILE TRANSACTION SORT
PROGRAM PSREFTR (EP0030)
Page 1
Release Date: 2/01/80
Update #: P-l
1.2.4 EMISSION FACTOR FILE TRANSACTION SORT PROGRAM - PSREFTR (EP0030)
4.2.4.1 Description
PSREFTR (EP0030) sorts emission factor file transactions into the
sequence required by the emission factor file edit-maintenance program,
PEMEFAC (EP0040); Figure 4.2.4-a details this sort order. All emission factor
file transactions must be sorted by PSREFTR (EP0030) before they can be used
to update (or create) the emission factor file . See Section 4.2.5 for
additional information on the emission factor file transactions.
4.2.4.2 File Formats
Input to this program consists solely of emission factor file
transactions, either coded by the user or generated by the NEDS to EIS/PS
emission factor file transaction conversion program PCVNEEF (EP0020). Refer
to Figure 4.2.5.2-c for a description of the emission factor file transaction
format.
PSREFTR (EP0030) produces two output files: a diagnostic report and a
temporary file containing the sorted emission factor file transactions. The
sorted transactions are in the same sequence as the emission factor file and
can be used as input to the emission factor file edit-maintenance program,
PEMEFAC (EP0040). An example of the diagnostic report is shown in
Figure 4.2.4-b.
4.2.4.3. Options and Control Cards
There are no options.
78
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.4
EMF FILE TRANSACTION SORT
PROGRAM PSREFTR (EP0030)
Page 2
Release Date: 2/01/80
Update #: P-l
4.2.4.4 Error Messages
PSREFTR 001 ERROR - INVALID ACTION CODE, TRANSACTION REJECTED
Meaning: Valid action codes are A (add), D (delete) and C (change).
Action: Correct the error and resubmit the transaction.
PSREFTR 002 ERROR - INVALID EF ORIGIN, TRANSACTION REJECTED
Meaning: Valid codes are F (federal), S (state), and L (local).
Action: Correct the error and resubmit the transaction.
PSREFTR 030 WARNING - EF ORIGIN OR EF SOURCE NOT BLANK, REPLACING SPACE
Meaning: The two fields should be blank in the 1, 2 and 3 cards.
Action: No action is needed.
4.2.4.5 Cataloged JCL
PSREFTR (EP0030) should always be executed in conjunction with the
emission factor file edit-maintenance program PEMEFAC (EP0040). See Section
4.2.5.5 for a discussion of the cataloged procedure EPEME10, which executes
both programs.
4.2.4.6 Warnings and Special Instructions
Note that the COBOL sort verb is used in this program; therefore, the
collating sequence for alphanumeric fields is determined by the computer at
the user's particular installation.
In addition to the diagnostic report produced by PSREFTR (EP0030),
messages generated by the sort-merge package will be printed. The format and
content, as well as the physical location, of these messages depend upon the
user's particular installation.
79
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.4
EMF FILE TRANSACTION SORT
PROGRAM PSREFTR (EP0030)
Page 3
Release Date: 2/01/80
Update #: P-l
4.2.4.7 Cost Considerations
The following estimates are for the execution of PSREFTR (EP0030) on an
IBM 370/168:
Number of emission factor file transactions: 867 records
CPU time: 2.16 seconds
I/O time: 24.01 seconds
Total time: 26.17 seconds
Estimated cost: $3.66
4.2.4.8 Related Programs and Procedures
PSREFTR (EP0030) should always be executed in conjunction with the
emission factor file edit-maintenance program, PEMEFAC (EP0040). The
cataloged procedure EPEME10 executes both programs.
The cataloged procedure|EPEME20 can be executed to sort NEDS emission
factor file transactions, convert these transactions to EIS/PS emission, factor
file transactions, re-sort, and update (or create) the emission factor file
with these transactions. Thus, PSREFTR (EP0030) and PEMEFAC (EP0040) would be
executed with PSRNEEF (EP0010), the NEDS emission factor file transaction sort
program, and PCVNEEF (EP0020), the NEDS to EIS/PS emission factor file
transaction conversion program. See Section 4.4.2 for a complete description
of this procedure.
80
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.4
EMF FILE TRANSACTION SORT
PROGRAM PSREFTR (EP0030)
Page 4
Release Date: 2/01/80
Update #: P-l
Record Position
3 -
13 -
18 -
10
11
12
17
1
2
22
Description
SCC
Emission Factor Origin
Emission Factor Source Type
Pollutant ID
Card Type
Action Code
SCC Date
Sort Sequence
Ascendi ng
Ascending
Ascending
Ascendi ng
Ascending
Ascending
Ascending
Figure 4.2.4-a. Sort Sequence for EIS/PS Emission Factor File Transactions
81
-------
F1S/PS tMJSSTllM fACHIH FTLF TKANSAT 1 IllN SlWI PNMKHAM - OIAGNOSMC RfcPUHT
PHOBP.AM NA»fc: PSRfHTR (tPOOjO)
»bWISlHN LFVFL: 1-00
I ftSf U«>OAIF. «: P-l
f>ATfc INCnHPURATEO! FFHHUAKY t. 1<»HO
NII«HFH UF TRANSACI I'm HEAD:
I)F THANSArniJNS
UF ERRlJPS OFIF/CTEO:
MU"HFP IIP TRANSACT Itl'JS
H67
00
Figure 4.2.4-b. Diagnostic Report
-n m
i—< »—i
[— CO
n o
5 m
S —i
n •—<
o
3:
>
m co
2 rn
-n o
-o
00
PO
oo
3»
O
O
O Z
O
CO CO
o o
• 3D
D
O.
D>
ft-
ro
tt£
(D O>
ro o
fu
v> en
o>
D)
ro
^>.
o
00
o
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 1
Release Date: 2/01/80
Update #: P-l
4.2.5 EMISSION FACTOR FILE EDIT-MAINTENANCE PROGRAM - PEMEFAC (EP0040)
4.2.5.1 Description
The emission factor file edit-maintenance program creates and updates the
EIS/PS emission factor file and the EIS/PS emission factor description file
using four types of transactions. Both files are processed simultaneously,
since the emission factor description file must contain one record for each
SCC that occurs in the emission factor file. The program edits the
transactions prior to updating these files, and any errors detected in a
transaction will cause it to be rejected by the program.
Transaction types 1, 2, and 3 are used for updating the emission factor
description file, and type-4 transactions are used for updating the emission
factor file. Therefore, the following transactions are required to add a new
SCC to the files: one type-1 transaction, one type-2 transaction, one type-3
transaction, and one or more type-4 transactions. A maximum of 17 type-4
(pollutant) transactions is allowed by the program, the first of which must
contain a zero pollutant ID. The type-4 transaction containing the zero
pollutant ID allows the user to enter the ash and sulfur contents for the
specified SCC. This transaction is automatically generated by PCVNEEF
(EP0020) when converting NEDS transactions to EIS/PS emission factor file
transactions; however, the user is required to enter the values for ash and
sulfur contents since the NEDS transactions do not contain this information.
Whether generated by PCVNEEF (EP0020) or supplied by the user, this type-4
transaction must be present to add a new SCC to the files.
Changing data in existing emission factor description file records
requires a type-1, type-2, or type-3 transaction, depending on the data being
changed. Also, any combination of the three can be used to change data in a
record. Any data field can be changed, except the key field (the SCC number).
However, the control date field is changed by PEMEFAC (EP0040) only if the
83
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 2
Release Date: 2/01/80
Update #: P-l
iate of the transaction is greater than the control date of the emission
factor description file record.
Changing data in an existing emission factor file record requires a
type-4 transaction. Any data can be changed, except the key fields (the SCC
number, the origin, the source type, the pollutant ID, and the record date).
However, the control date field of the record (not to be confused with the
record date field, which contains the record's creation date) is changed by
PEMEFAC (EP0040) only if the transaction date is greater than the control
date.
Data fields in the emission factor description file records or the
emission factor file records will not be changed if the corresponding data
fields on the change transactions are blank.
Deleting an SCC from the emission factor description file and the
emission factor file requires a type-1 delete transaction. This will cause
the description record and all pollutant records associated with the specified
SCC to be deleted from their respective files. Type-2 and type-3 delete
transactions are invalid and will be rejected by the program.
Deleting a single pollutant record from the emission factor file requires
a type-4 delete transaction. However, a type-4 delete transaction containing
a zero pollutant ID is invalid and will be rejected by the program. The only
way to delete an emission factor file record that contains a pollutant ID of
zero is to delete the entire SCC by submitting a type-1 delete transaction for
that SCC.
When these files are updated, the header record control date for each
file is updated using the date specified by the user on the option card.
These header records also contain the date of the previous update run as well
as a generation number which begins at 1 and is incremented by 1 during each
84
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Pa ye 3
Release Date: 2/01/80
Update #: P-l
update run. Therefore, the user can determine that the most recent files are
being used.
4.2.5.2 File Formats
Input to PEMEFAC (EP0040) consists of an EIS/PS emission factor file, an
EIS/PS emission factor description file, EIS/PS emission factor file
transactions, and an option card. If PEMEFAC (EP0040) is being executed to
create new files rather than update current ones, no input emission factor
file or emission factor description file is used. See Figure 4.2.5-a for a
description of the emission factor file record formats and Figure 4.2.5-b for
a description of the EIS/PS emission factor description file record formats.
See Figure 4.2.5-c for a description of the EIS/PS emission factor file
transaction formats and Figure 4.2.5-d for the definitions of the transaction
data fields. See Section 4.2.5.3 for a discussion of the option card.
Output from the program consists of the new or updated EIS/PS emission
factor and emission factor description files; a diagnostic report containing
error messages for any errors that were detected and record counts for all
input and output files; and, optionally, listings of the input and output
files as well as the transactions. See Figure 4.2.5-e for a sample diagnostic
report, Figure 4.2.5-f for a sample listing of the input emission factor file,
Figure 4.2.5-g for a sample listing of the input emission factor description
file, Figure 4.2.5-h for a sample listing of the output emission factor file,
Figure 4.2.5-i for a sample listing of the output emission factor description
file, and Figure 4.2.5-j for a sample listing of the transaction file.
4.2.5.3 Options and Control Cards
An option card must be submitted with each run of PEMEFAC (EP0040) and
must contain a control date supplied by the user. This date is coded in
85
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 4
Release Date: 2/01/80
Update #: P-l
•.olurnns 1 through 5 and must be in the Julian form YYDDD. If the option card
control date is not greater than the control dates in both file header
records, program execution will be terminated.
Two other options available to the user are the warning-suppression
option and the list option. The warning-suppression option controls the
printing of warning messages. Coding 'FLAGW in columns 7 through 11 will
cause any warning messages that are generated to be printed in the diagnostic
report. To suppress the listing of these warning messages, the field must be
left blank. If the field is coded incorrectly, an error message will be
printed and warning messages will be suppressed.
The list option allows the user to obtain listings of the transactions,
the input emission factor and emission factor description files, and the
output emission factor and emission factor description files. Coding 'LIST'
in columns 13 through 16 will cause all five listings to be printed; leaving
this field blank will cause all five listings to be suppressed. If the field
is coded incorrectly, an error message will be generated and the listings will
be suppressed.
A list of the options that are in effect is printed at the beginning of
the diagnostic report. See Figure 4.2.5-k for a description of the option
card format.
4.2.5.4 Error Messages
PEMEFAC 001 ABORT - NO DATE OPTION CARD
Meaning: No option card was submitted with the run. Program execution
was terminated.
Action: Supply an option card with a valid date and resubnrit the job.
86
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 5
Release Date: 2/01/80
Update #: P-l
PEMEFAC 002 ABORT - OPTION CARD DATE INVALID
Meaning: The date on the option card is nonnumeric, or the day is not
between 1 and 366. Program execution was terminated.
Action: Correct the error and resubmit the job.
PEMEFAC 003 CONDITIONAL - FLAGW OPTION INVALID, USED DEFAULT OF NO FLAGW
Meaning: The warning option is not specified correctly on the option
card.
Action: If the warning count in the diagnostic report is not zero and
the user wishes to see the warnings, correct the error and
resubmit the job.
PEMEFAC 004 CONDITIONAL - LIST OPTION INVALID, USED DEFAULT OF NO LIST
Meaning: The list option is not specified correctly on the option card.
Action: If listings are desired, correct the error and resubmit the
job.
PEMEFAC 005 ABORT - INPUT SCC DESC FILE OUT OF SEQUENCE, SEE RECORDS ABOVE
Meaning: The input emission factor description file is not in the
proper sequence. The two consecutive records causing this
error are listed prior to the message in the order in which
they were read. Program execution was terminated.
Action: Insure that the proper file is being used and resubmit the job.
If the proper file was used, contact personnel at the
National Air Data Branch for further assistance.
PEMEFAC 006 ABORT - INPUT SCC EMF FILE OUT OF SEQUENCE, SEE RECORDS ABOVE
Meaning: The input emission factor file is not in the proper sequence.
The two consecutive records causing this error are listed prior
to the message in the order in which they were read. Program
execution was terminated.
87
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 6
Release Date: 2/01/80
Update #: P-l
Action: Insure that the proper file is being used and resubmit the job.
If the proper file was used, contact personnel at the National
Air Data Branch for further assistance.
PEMEFAC 007 ABORT - TRANSACTION FILE OUT OF SEQUENCE, SEE CARDS ABOVE
Meaning: The input transactions are not in the proper sequence for
updating the files. The two consecutive transactions causing
this error are listed prior to the message in the order in
which they were read. Program execution was terminated.
Action: Verify that the transactions were sorted by PSREFTR (EP0030)
prior to being input to PEMEFAC (EP0040). If the transactions
were sorted, insure that the proper transactions were being
input to PSREFTR (EP0030). If the proper transactions were
used, contact personnel at the National Air Data Branch for
further assistance.
PEMEFAC 008 ABORT - SCC DESC FILE DATE NOT LESS THAN OPTION CARD DATE
Meaning: The control date on the option card is not greater than the
control date in the emission factor description file header
record. Program execution was terminated.
Action: Change the control date on the option card and resubmit the
job.
PEMEFAC 009 ABORT - SCC EMF FILE DATE NOT LESS THAN OPTION CARD DATE
Meaning: The control date on the option card is not greater than the
control date in the emission factor file header record.
Program execution was terminated.
Action: Change the control date on the option card and resubmit the
job.
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 7
Release Date: 2/01/80
Update #: P-l
PEMEFAC 010 ERROR - NEW SCC DESC RECORD NOT COMPLETE, RECORD REJECTED
Meaning: A complete set of valid add transactions (types 1, 2, 3, and 4)
was not present for the specified SCC. Those transactions that
were present are listed prior to this message. No record was
created for either the emission factor description file or the
emission factor file.
Action: Supply the necessary transactions and resubmit the job.
PEMEFAC Oil ERROR - NEW SCC EMF RECORD NOT COMPLETE, RECORD REJECTED
Meaning: A complete set of valid add transactions (types 1, 2, 3, and 4)
was not present for the specified SCC. Those transactions that
were present are listed prior to this message. No record was
created for either the emission factor file or the emission
factor description file. Attempting to add an SCC to the files
without a type-4 add transaction with a zero pollutant ID will
also cause this message to be printed.
Action: Insure that no transactions associated with the specified SCC
were rejected. Secondly, insure that a type-4 add transaction
with a zero pollutant ID is present. Correct any errors and
resubmit the job.
PEMEFAC 012 ERROR - SCC DESC FILE AND SCC EMF FILE DO NOT MATCH DATES AND GEN
NUMBER
Meaning: The present control dates, previous control dates, and
generation numbers from the file header records do not match.
This indicates that the files were not created or updated in
the same run. Note that using such files may cause further
errors.
Action: If matching files were intended to be used, supply the
appropriate data set names in the run stream and resubmit the
job.
89
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 8
Release Date: 2/01/80
Update #: P-l
'EMEFAC 013 ERROR - COLUMN 18 - SCC DATE INVALID, CARD REJECTED
Meaning: Either the date is not numeric or the day is not between 1 and
366.
Action: Correct the error and resubmit the transaction.
PEMEFAC 014 ERROR - COLUMN 43 - FLAGS INVALID, CARD REJECTED
Meaning: The ash/sulfur flags are not ' ', ' S' or 'A '.
Action: Correct the error and resubmit the transaction.
PEMEFAC 015 WARNING - COLUMN 47 - UNIT OF MEASURE INVALID, CARD ACCEPTED
Meaning: The unit of measure is not alphabetic, numeric, or blank. The
field is rejected, but the transaction is accepted.
Action: The user can correct the error and resubmit the job or supply
the appropriate change transaction and submit a new job.
PEMEFAC 016 ERROR - COLUMN 49 - EMISSION FACTOR NOT NUMERIC, CARD REJECTED
Meaning: The emission factor is not numeric, or the emission factor (on
a type-4 add transaction) is blank.
Action: Correct the error and resubmit the transaction.
PEMEFAC 017 ERROR - COLUMN 58 - ASH CONTENT NOT NUMERIC, CARD REJECTED
Meaning: The ash content field is neither numeric nor blank.
Action: Correct the error and resubmit the transaction.
PEMEFAC 018 ERROR - COLUMN 61 - SULFUR CONTENT NOT NUMERIC, CARD REJECTED
Meaning: The sulfur content field is neither numeric nor blank.
Action: Correct the error and resubmit the transaction.
PEMEFAC 019 ERROR - COLUMN 64 - CONTROL DEVICE EFFICIENCY NOT NUMERIC, CARD
REJECTED
Meaning: The control device efficiency field is neither numeric nor
blank.
90
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 9
Release Date: 2/01/80
Update #: P-l
Action: Correct the error and resubmit the transaction.
PEMEFAC 020 ERROR - COLUMN 13 - POLLUTANT ID FIELD REQUIRED ON TYPE 4, CARD
REJECTED
Meaning: The pollutant ID field on a type-4 transaction is blank.
Action: Supply the appropriate pollutant ID and resubrnit the
transaction.
PEMEFAC 021 ERROR - COLUMN 1 - CARD TYPE INVALID, CARD REJECTED
Meaning: The card type is not '!', '2', '3', or '4'.
Action: Correct the error and resubmit the transaction.
PEMEFAC 022 ERROR - COLUMN 2 - ACTION CODE INVALID, CARD REJECTED
Meaning: The action code is not 'A', 'C', or 'D'; or,
the action code is 'D1 and the card type is '2' or '3'
and type-3 delete transactions are not valid.
Action: Correct the error and resubmit the transaction.
Type-2
PEMEFAC 023 ERROR - COLUMN 3 - SCC NUMBER NOT NUMERIC, CARD REJECTED
Meaning: The SCC number is not numeric.
Action: Correct the error and resubmit the transaction.
PEMEFAC 024 ERROR - COLUMN 13 - POLLUTANT ID INVALID, CARD REJECTED
Meaning: The pollutant ID field is blank or not numeric; or, the
pollutant ID is zero for a type-4 delete transaction.
Action: If the pollutant ID field is blank or not numeric, correct the
error and resubmit the transaction. Pollutant ID's are
required on type-4 transactions; however, a type-4 delete
transaction with a zero pollutant ID is not allowed. To delete
an emission factor file record containing a zero pollutant ID,
the user must delete the entire SCC from both files using a
type-1 delete transaction.
91
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 10
Release Date: 2/01/80
Update #: P-l
JEMEFAC 025 ERROR - ADD SPECIFIED FOR EXISTING SCC DESC RECORD, CARD REJECTED
Meaning: An add transaction was specified for an existing emission
factor description file record.
Action: Insure that the proper key is coded on the transaction and that
the appropriate files are being used. Resubmit the transaction
or job as necessary.
PEMEFAC 026 ERROR - CHANGE SPECIFIED FOR NONEXISTENT SCC DESC RECORD, CARD
REJECTED
Meaning: A change transaction was specified for an emission factor
description file record that does not exist in the file.
Action: Insure that the proper key is coded on the transaction and
that the appropriate files are being used. Resubmit the
transaction or job as necessary.
PEMEFAC 027 ERROR - DELETE SPECIFIED FOR NONEXISTENT SCC DESC RECORD, CARD
REJECTED
Meaning: A delete transaction was specified for an emission factor
description file record that does not exist in the file.
Action: Insure that the proper key is coded on the transaction and
that the appropriate files are being used. Resubmit the
transaction or job as necessary.
PEMEFAC 028 ERROR - ADD SPECIFIED FOR EXISTING SCC EMF RECORD, CARD REJECTED
Meaning: A type-4 add transaction was specified for an existing emission
factor file record.
Action: Insure that the proper key is coded on the transaction and
that the appropriate files are being used. Resubmit the
transaction or job as necessary.
92
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 11
Release Date: 2/01/80
Update #: P-l
PEMEFAC 029 ERROR - ADD SPECIFIED FOR SCC EMF BUT NO DESC EXISTS FOR SCC, CARD
REJECTED
Meaning: A type-4 add transaction was specified for an SCC that does not
exist in the emission factor description file.
Action: Insure that the proper key is coded on the transaction and
that the appropriate files are being used. Resubmit the job,
if necessary, supplying the associated type-1, type-2, and
type-3 transactions.
PEMEFAC 030 WARNING - CHANGE SPECIFIED FOR NONEXISTENT SCC EMF RECORD,
ACCEPTED AS ADD
Meaning: A type-4 change transaction was specified for an emission
factor file record that does not exist in the file. The
transaction was accepted as a type-4 add transaction. The
pollutant ID will be added to the emission factor file only if
the transaction is not rejected due to another error.
Action: Correct any errors that are evident and resubmit the job if
necessary.
PEMEFAC 031 ERROR - DELETE SPECIFIED FOR NONEXISTENT SCC EMF RECORD, CARD
REJECTED
Meaning: A type-4 delete transaction was specified for an emission
factor file record that does not exist in the file.
Action: Insure that the proper key is coded on the transaction and
that the appropriate files are being used. Resubmit the
transaction or job as necessary.
PEMEFAC 032 ERROR - COLUMN 11 - EF ORIGIN INVALID, CARD REJECTED
Meaning: The emission factor origin on a type-4 transaction is not 'F',
'S', or 'L1; or, the emission factor origin on a type-1,
type-2, or type-3 transaction is not blank.
Action: Correct the error and resubmit the transaction.
93
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 12
Release Date: 2/01/80
Update #: P-l
,'EMEFAC 033 ABORT - NO HEADER RECORD FOR DESC FILE
Meaning: The emission factor description file contains no header record.
Program execution was terminated since this record is necessary
for control purposes.
Action: Insure that the proper file is being used and resubmit the job.
If the proper file was used, contact personnel at the National
Air Data Branch for further assistance.
PEMEFAC 034 ABORT - NO HEADER RECORD FOR SCC EMF FILE
Meaning: The emission factor file contains no header record. Program
execution was terminated since this record is necessary for
control purposes.
Action: Insure that the proper file is being used and resubmit the job.
If the proper file was used, contact personnel at the National
Air Data Branch for further assistance.
PEMEFAC 035 ERROR - MORE THAN 16 POLLUTANTS FOR THIS SCC/ORIGIN/SOURCE
COMBINATION
Meaning: There are more than 16 pollutants, excluding the zero
pollutant ID, present for the specified SCC/origin/source
combination. The zero pollutant ID is not included in the 16
pollutants since it pertains to the SCC/origin/source
combination and not to a specific pollutant.
Action: Insure that the appropriate files are being used. If the error
occurred during an attempt to add a pollutant to the emission
factor file, insure that the proper key is coded on the
transaction. It may be necessary to delete some pollutants
from the SCC/origin/source combination in order to add new
pollutants. Resubmit the job if necessary.
94
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 13
Release Date: 2/01/80
Update #: P-l
PEMEFAC 036 ERROR - DUPLICATE TYPE 1 ADD TRANSACTION, CARDS REJECTED
Meaning: A type-1 add transaction contains a key that is identical to
another type-1 add transaction. Both transactions were
rejected.
Action: Insure that the proper keys are coded on each transaction.
Correct any errors and resubmit the transactions or exclude the
duplicate transaction.
PEMEFAC 037 ERROR - DUPLICATE TYPE 4 ADD TRANSACTION, CARD REJECTED
Meaning: A type-4 add transaction contains a key that is identical to
another type-4 add transaction. Both transactions were
rejected.
Action: Insure that the proper keys are coded on each transaction.
Correct any errors and resubmit the transactions or exclude the
duplicate transaction.
PEMEFAC 038 ABORT - NO HEADER RECORD FOR TRANSACTION FILE
Meaning: The transaction file contains no header record. This indicates
that the transactions were not sorted by the emission factor
transaction sort program, PSREFTR (EP0030), which generates the
header record.
Action: Sort the transactions using PSREFTR (EP0030) and resubmit the
job. If the error recurs, contact personnel at the National
Air Data Branch for further assistance.
PEMEFAC 039 ERROR - COLUMN 12 - INVALID EF SOURCE TYPE, CARD REJECTED
Meaning: The emission factor origin field of the transaction contains
'F' or !S', but the emission factor source type field is not
blank. This message pertains only to type-4 transactions.
Action: Correct the error and resubmit the transaction.
95
-------
LIS/PS
FILC CRLATIOfJ AUU
MAINTtNANCL
SECTION 4.2.5
EMF FILE EUIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 14
Release Date: 2/01/80
Update #: P-l
PEMEFAC 040 ABORT - ERROR MESSAGE TABLE OVERFLOW, INCREASE TABLE SIZE
Meaning: A transaction has accumulated more error messages than the
error message storage table will currently accommodate.
'Action: Contact personnel at the National Air Data Branch for
instructions on increasing the size of the error message
storage table. Resubmit the transaction.
PEMEFAC 041 DISASTER - SUBSCRIPT FIELD (ERROR-CODE) IS ZERO, CALL NADB
Meaning: The subscript field named 'ERROR-CODE1 contains zero. This
indicates a program malfunction.
Action: Contact personnel at the National Air Data Branch for
assistance.
PEMEFAC 042 ERROR - ZERO POLLUTANT RECORD MISSING, CARD REJECTED
Meaning: There is no emission factor file record containing a zero
pollutant ID for the specified SCC/origin/source combination.
This message pertains only to type-4 add transactions.
Action: Create a type-4 add transaction which contains a zero pollutant
ID and the appropriate ash and sulfur contents for the
specified SCC/origin/source combination. Resubmit the
transaction.
4.2.5.5 Cataloged JCL - EPEME10
4.2.5.5.1 JCL listing - PEMEFAC (EP0040) can be run by executing the
cataloged procedure EPEME10. This procedure also executes the emission factor
file transaction sort program, PSREFTR (EP0030), prior to executing PEMEFAC
(EP0040). See Figure 4.2.5-1 for a listing of EPEME10.
96
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 15
Release Date: 2/01/80
Update*: P-l
4.2.5.5.2 Cross-reference of DP names and files -
Program Name: PSREFTR (EP0030)
DP Name
EPSINPT
EPSOUTP
EPSDIAG
SORTWK01
File Description
Unsorted emission factor file
transactions
Sorted emission factor file
transactions
Diagnostic report
Sort work file
Program Name: PEMEFAC (EP0040)
DD Name
File Description
Input/Output
Input
Output
Output
Internal
Input/Output
EPSOPTN Option card Input
EPSTRAN Emission factor file transactions Input
EPSOLEF Old EIS/PS emission factor file Input
EPSOLDS Old EIS/PS emission factor description file Input
EPSNWEF New or updated EIS/PS emission factor file Output
EPSNWDS New or updated EIS/PS emission factor Output
description file
EPSDIAG Diagnostic report Output
EPSTRNL Transaction listing Output
EPSOEFL Old emission factor file listing Output
EPSODSL Old emission factor description file listing Output
EPSNEFL New or updated emission factor file listing Output
EPSNDSL New or updated emission factor description Output
file listing
97
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 16
Release Date: 2/01/80
Update #: P-l
4.2.5.5.3 User-supplied JCL - To execute the cataloged procedure EPEME10, the
user must supply the emission factor file transactions and specify the data
set names of the input and output emission factor files and the input and
output emission factor description files. An option card for PEMEFAC (EP0040)
must also be supplied. See Figure 4.2.5-m for a description of the
procedure's substitutable parameters.
4.2.5.5.4 Sample run stream - The following run stream would sort the
emission factor file transactions and update the EIS/PS emission factor and
emission factor description files. The data set names of these files are
their respective default values. The files and the transactions will be
listed and any warning messages will be printed in the diagnostic report.
// EXEC EPEME10
//SORT.INPUT DD *
Unsorted emission factor file transactions
/*
//UPDATE.OPTIONS DD *
79339 FLAGW LIST
/*
4.2.5.6 Warnings and Special Instructions
Ash and sulfur contents are necessary only on type-4 transactions that
contain a zero pollutant ID. Therefore, the ash and sulfur contents will
appear only once for each SCC/origin/source combination in the emission factor
file. There will be a maximum of 17 pollutant records for each
SCC/origin/source combination: 1 zero pollutant record and 16 subordinate
pollutant records.
The user must manually code the ash and sulfur contents on the type-4
zero pollutant transactions. These transactions will be automatically
98
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EPQQ401
Page 17
Release Date: 2/01/80
llpdat.p ff- P-3
generated by PCVNEEF (EP0020) when converting NEDS transactions to EIS/PS
emission factor file transactions; however, the ash and sulfur contents fields
will be blank since NEDS transactions do not contain this data. The file
built by test run 1 is supplied with federal "average" ash and sulfur contents
for appropriate SCC's. These values may be used or the user can revise those
values to suit fuels in his specific area.
The EIS/PS transactions must be sorted into master file sequence by
PSREFTR (EP0030) prior to being used by PEMEFAC (EP0040). The sort program
also generates a header record for the transaction file.
4.2.5.7 Cost Considerations
To reduce the cost of executing PEMEFAC (EP0040), the user may wish to
suppress warning messages and file listings. This is accomplished by leaving
the associated option card fields blank.
The estimates listed below are based on the execution of the run stream
in Section 4.2.5.5.4 on an IBM 370/168:
Number of emission factor file transactions: 302 transactions
Number of input emission factor file records: 565 records
Number of input emission factor description
file records: 102 records
Number of output emission factor file records: 638 records
Number of output emission factor
description file records: 101 records
CPU time: 1.68 seconds
I/O time: 3.21 seconds
Total time: 4.87 seconds
Estimated cost: $.68
99
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 18
Release Date: 2/01/80
Update #: P-l
r.2.5.8 Related Programs and Procedures
PSREFTR (EP0030), the emission factor file transaction sort program, must
be run prior to executing PEMEFAC (EP0040). Both programs are executed by the
cataloged procedure EPEME10, which is discussed in Section 4.2.5.5.
Two other programs related to PEMEFAC (EP0040) are the NEDS emission
factor file transaction sort program, PSRNEEF (EP0010), and the NEDS to EIS/PS
emission factor file transaction conversion program, PCVNEEF (EP0020). Refer
to Sections 4.2.2 and 4.2.3, respectively, for a discussion of these programs.
All four of the programs listed above can be executed by the
rnulti-program cataloged procedure EPEME20. Refer to Section 4.4.2 for a
discussion of this procedure.
100
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 19
Release Date: 2/01/80
Update l.:__M:
Header Record
Columns
Field Length
Description
1 - 15
16 - 20
21 - 25
26 - 31
32 - 70
15
5
5
6
39
Zeroes
Control Date
Previous Control Date
File Generation Number
Not Used
Figure 4.2.5-a.
(Page 1 of 2)
Emission Factor File Record Formats
101
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 20
Release Date: 2/01/80
Update #: P-l
Emission Factor File Record
Columns
Field Length
8
1
1
5
5
5
20
2
1
1
2
9
3
3
3
1
*0nly used in zero pollutant ID record
1 -
11 -
16 -
21 -
26 -
46 -
50 -
52 -
61 -
64 -
67 -
8
9
10
15
20
25
45
47
48
49
51
60
63
66
69
70
Description
SCC Number
Emission Factor Origin
Emission Factor Source Type
Pollutant ID
Record Date
Control Date
Pollutant Name
NEDS V Flags (not used)
Ash Flag
Sulfur Flag
Unit of Measure Code
Emission Factor
Ash Content*
Sulfur Content*
Control Device Efficiency
Emission Factor Confidence Level
Figure 4.2.5-a - continued.
(Page 2 of 2)
Emission Factor File Record Formats
102
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 21
Release Date: 2/01/80
Update f: P-l
Header Record
Columns
Field Length
Description
1 - 8
9 - 13
14 - 18
19 - 24
25 - 150
8
5
5
6
126
Zeroes
Control Date
Previous Control Date
File Generation Number
Not Used
(Page 1 of 2)
Figure 4.2.5-b. Emission Factor Description File Record Formats
103
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM P'EMEFAC (EP004Q)
Page 22
Release Date: 2/01/80
Update #: P-l
Emission Factor Description Record
Columns
1 -
g
14 -
31 -
48 -
65 -
82 -
117 -
8
13
30
47
64
81
116
150
Field Length
8
5
17
17
17
17
35
34
Description
SCC Number
Record Date
SCC Description - Category 1
SCC Description - Category 2
SCC Description - Category 3
SCC Description - Category 4
Units Description, Characters 1 to 35
Units Description, Characters 36 to 69
(Page 2 of 2)
Figure 4.2.5-b - continued. Emission Factor Description File Record Formats
104
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 23
Release Date: 2/01/80
Update #: P-l
Columns
1 - 22
23 - 80
Field Length
22
58
Header Card
Data Type
Numeric
Definition
Zeroes
Not Used
Figure 4.2.5-c.
(Page 1 of 5)
Emission Factor File Transaction Formats
105
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 24
Release Date: 2/01/80
Update #: P-I
Card 1
Columns
Field Length
Data Type
Description
3
11
18
23
40
57
74
1
2
10
17
22
39
56
73
80
1
1
8
7
5
17
17
17
7
Numeric
Alphabetic
Numeri c
Blank
Numeric
Alphanumeric
Alphanumeric
Alphanumeric
Card Type
Action Code
SCC Number
Key Alignment
Date
SCC Description
SCC Description
SCC Description
Not Used
Category 1
Category 2
Category 3
(Page 2 of 5)
Figure 4.2.5-c - continued. Emission Factor File Transaction Formats
106
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 25
Release Date: 2/01/80
Update #: P-l
Card 2
Columns
Field Length
Data Type
Description
1
2
3 - 10
11 - 17
18 - 22
23 - 39
40 - 74
75 - 80
1
1
8
7
5
17
35
6
Numeric
Alphabetic
Numeri c
Blank
Numeric
Alphanumeric
Alphanumeric
Card Type
Action Code
SCC Number
Key Alignment
Date
SCC Description - Category 4
Units Description, Characters 1 to 35
Not Used
(Page 3 of 5)
Figure 4.2.5-c - continued. Emission Factor File Transaction Formats
107
-------
tIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 26
Release Date: 2/01/80
Update #: P-l
Card 3
Columns
Field Length
3 -
11 -
18 -
23 -
57 -
1
2
10
17
22
56
80
1
1
8
7
5
34
24
Data Type
Numeric
Alphabetic
Numeric
Blank
Numeric
Alphanumeric
Definition
Card Type
Action Code
SCC Number
Key Alignment
Date
Units Description, Characters 36 to 69
Not Used
(Page 4 of 5)
Figure 4.2.5-c - continued. Emission Factor File Transaction Formats
108
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 27
Release Date: 2/01/80
Update #: P-l
Card 4
Columns
Field Length
Data Type
Description
3 -
13 -
18 -
23 -
43 -
47 -
49 -
58 -
61 -
64 -
68 -
1
2
10
11
12
17
22
42
44
45
46
48
57
60
63
66
67
80
1
1
8
1
1
5
5
20
2
1
1
2
9
3
3
3
1
13
Numeric
Alphabetic
Numeric
Alphabetic
Alphanumeric
Numeric
Numeric
Alphanumeric
Alphabetic
Alphabetic
Alphanumeric
Numeric
Numeric
Numeric
Numeri c
Alphanumeric
Card Type
Action Code
SCC Number
Emission Factor Origin
Emission Factor Source Type
Pollutant ID
Date
Pollutant Name
NEDS V Flags (not used)
Ash Flag
Sulfur Flag
Unit of Measure Code
Emission Factor
Ash Content*
Sulfur Content*
Control Device Efficiency
Emission Factor Confidence Level
Not Used
Necessary only on zero pollutant transactions
(Page 5 of 5)
Figure 4.2.5-c - continued. Emission Factor File Transaction Formats
109
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
ACTION 4.2.5
EMF FILE EDIT-MAINT
>ROGRAM PEMEFAC (EP0040)
Page 28
Release Date: 2/01/80
Update #: P-l
Action Code: Identifies the intended action of the transaction.
Valid Codes: A - Add, C - Change, D - Delete
Field Length: 1 character
Card Number: All transactions
Ash Content: A weight percentage which indicates the ash content for
combustion processes.
Valid Codes: The field must be numeric.
Field Length: 3 characters with one decimal position assumed
Card Number: 4
Ash Flag: Indicates whether or not the ash content is to be used in the
calculation of the estimated emissions.
Valid Codes: A - Ash content to be used
Blank - Ash content not to be used
Field Length: 1 character
Card Number: 4
Card Type: The card number of the transaction.
Valid Codes: 1, 2, 3, 4
Field Length: 1 character
Card Number: All transactions
Control Device Efficiency: The overall collection efficiencies in weight
percentage of all control equipment at the source. Assume that the
pollutant load entering the control equipment is the normal, uncontrolled
quantity for that specific process.
Valid Codes: The field must be numeric.
Field Length: 3 characters with one decimal position assumed
Card Number: 4
(Page 1 of 5)
Figure 4.2.5-d. Data Field Definitions
110
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 29
Release Date: 2/01/80
Update #: P-l
Date: The Julian date of the transaction in the form YYDDD.
Valid Codes: YY must be a valid year; ODD must be a valid day from 1
to 366.
Field Length: 5 characters
Card Number: All transactions
Emission Factor: A statistical average of the rate at which a pollutant is
released into the atmosphere as a result of some activity.
Valid Codes: The field must be numeric. The emission factors for each
SCC can be found in Compilation of Air Pollutant Emission
Factors, EPA Publication no. AP-42.
Field Length: 9 characters with 3 decimal positions assumed
Card Number: 4
Emission Factor Confidence Level: A user-defined value assigned to show the
reliability of the emission factor.
Valid Codes: The field must be numeric or blank.
Field Length: 1 character
Card Number: 4
Emission Factor Origin: Indicates the origin of the emission factor
information.
Valid Codes: F - Federal
S - State
L - Local
Field Length: 1 character
Card Number: 4
Emission Factor Source Type: A user-defined code to specify individual local
emission factor information.
(Page 2 of 5)
Figure 4.2.5-d - continued. Data Field Definitions
111
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 30
Release Date: 2/01/80
Update #: P-l
Valid Codes: User-specified
Field Length: 1 character
Card Number: 4
NEDS V Flags: Reserved for future use.
Field Length: 2 characters
Card Number: 4
Pollutant ID: The SAROAD parameter code of the pollutant whose emissions are
being measured.
Valid Codes: The field must be numeric. Refer to AEROS Manual Series,
Volume V: AEROS Manual of Codes for a listing of SAROAD
parameter codes.
Field Length: 5 characters
Card Number: 4
Pollutant Name: The actual name or the chemical representation of the
pollutant referred to by the pollutant ID.
Valid Codes: Refer to AEROS Manual Series, Volume V: AEROS Manual of
Codes
Field Length: 20 characters
Card Number: 4
SCC Description: Information pertaining to the process associated with a
given SCC. The field is divided into 4 subfields each of which is 17
characters in length. The 4 subfields contain descriptions of the 4
parts of the SCC number.
Valid Codes: Refer to AEROS Manual Series, Volume V: AEROS Manual of
Codes, Section 3.7.0 for the given SCC.
Field Length: 68 characters
(Page 3 of 5)
Figure 4.2.5-d - continued. Data Field Definitions
112
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 31
Release Date: 2/01/80
Update #: P-l
Card Number:
1 - Sub-fields 1, 2, and 3
2 - Subfield 4
SCC Number: The source classification code number that describes the process.
Valid Codes:
Field Length:
Card Number:
Refer to AEROS Manual Series, Volume V:
Codes, Section 3.7.0 for SCC numbers.
8 characters
All transactions
AEROS Manual o
Sulfur Content: A weight percentage which indicates the sulfur content for
combustion processes.
Valid Codes: The field must be numeric.
Field Length: 3 characters with 2 decimal positions assumed
Card Number: 4
Sulfur Flag: Indicates whether or not the sulfur content is to be used in
the calculation of the estimated emissions.
Valid Codes: S - Sulfur content to be used
Blank - Sulfur content not to be used
Field Length: 1 character
Card Number: 4
Unit of Measure Code: This field is not used at present; in the future this
field will allow emission factors to be coded in units other than the
NEDS units.
Field Length: 2 characters
Card Number: 4
Figure 4.2.5-d - continued,
(Page 4 of 5)
Data Field Definitions
113
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PRORRAM
Page 32
Release Date: 2/01/80
Update //i—(M
i'nits Description: Information pertaining to the unit of measure code which
describes the units in which the emission factor is calculated.
Valid Codes: Refer to AEROS Manual Series, Volume V: AEROS Manual of Codes,
Section 3.7.0 for the given SCC.
Field Length: 69 characters
Card Number: 2 - Characters 1 to 35
3 - Characters 36 to 69
(Page 5 of 5)
Figure 4.2.5-d - continued. Data Field Definitions
114
-------
fcTS/PS F.MSSKW FACIllH FILt L0| t-MATNH NAMCf. PKUGHAM - D1AUNIJSIIC KF.PMKT
PAGE
PROGRAM NAMt; PtMbFAC (tPonuo)
•JfcVlSIMN LFVFL: 1-00
I AST UPOAIF *• f>-l
DATE. INCORPORATED: FEBRUARY \, 19»0
GAUD
DAIF is nnos/, tHHrm OPIIIIN is FLAGM , LIST OPTIMN is LIST
NIIMHFK OF INPUT TRANSAC 11 DNS HFAO:
«HI«VU1IIUMAL «fcSSA6E3!
NUMBER OF TRANSACT TUNS HFJFCTfn:
NUMBER UF SCC-DbSC"IPTtUN FILE RECOHnS READ:
OF SCC-f)eSe»I°TtON FILt RFCOHOS WRITTEN:
UF SCC-FMISSIHN-FACTOR FUE Rfcnnns RFA»:
NUMBER OF .SCC-EMISSION-FACTD" FILE RiicnRns HHITFFN:
o
o
o
n
(i
o
o
102
n
S6S
m oo
•n o
o
JO
r>
D
Xa «—i O
2 I— Z
•o
•n m
3 O
•n 1-1
TI —i
> i
ro
•
tn
Figure 4.2.5-e. Diagnostic Report
n>
cu
w>
n>
o
o>
e+
n>
ro
o
00
o
cu
CO
CO
-------
CTl
"F IJPnAU - FMlSSlUN FACfMH FILE INPUT LIST
I'AU.
oooooooOOOOOOOOH0057
o o o o o i
101001011
loioninii
101001011
loiooiobi
10IOOIOS1
lOlOOlObl
luiooiobi
tuionmsi
lOluOlObl
1 | 10t«OOS7«OOb7PAHTlClll ATt FACHIH
a2ioi»nos/floob7cn FACHIH
«2«01MOOS7«0057SU2 FACTUP
0«>60?dOi)S7«OOb7Nr)X FACTtlO
43t01HO(i5/<)OOb7HC FACIIIH
ooooo»oos/aoob7
II tOIBDQS/flOOSTPAKT JCUl Alt FACTIIH
U«>IOI»0057nOOb7Cn FACI'IK
42 KALTOK
toiooiooi u<>(>o?MOos/H<;ni}7Nrix FALTIIK
IdlOOlOhl Oil »MHOr. /flOOb7tir FACIMK
io?uo«>o«i oonooeous/Ruos?
10200<»0q| I 1 lOttiOOS/ftfln^HAkTICULATt. FACIIIP
i»200i>ol)bl
102002061
10?00^06l
102002061
102002061
1020020/1
1020020/1
102002071
102«020/1
I0200«>o/i
102002071
102004011
102004011
io2uoaon
102004011
102000011
102004011
102004021
FACTUR
FACTtIR
Oi1(ileOOS7t»0057HC FAC1HR
(iOOIi0800S7fl0057
I 1 IOl«OOS7flOOb7KAHTICULATh MCllJR
'l2I01H0057flOOS7CM FAC1UK
')U?800S7flUOb7NOx FACTOR
OJ1 ()1«OOS7«OOS7HC FAC1HK
OOOUOBOOS7HOOS7
1 1 10l80ilS/fli)057»'AHTlCULAIt FACTllR
121G1aOOS7AOOb7C'l FACTIlk
FACTllH
FACTOR
13l0100(iS7AOOS7HC FACIDK
OOOOOflOOS7*OOb7
1 1101«JOOS7«OOb7PARTiri)LATb FACTOR
a2«Ul80oS/flOflb7S(l2 FACTOR
02fi02600<>/600b7NfU FACTOR
3ni>oo
H00000300
000012000
000060000
000001000
m o co
-o m c/>
•a 2 rn
O ~n o
O —l
•73 -n ~
Is >—< O
m m
3 o
m i—i
-n —i
-o
O
o
ro
•
en
Figure 4.2.5-f. Input Emission Factor File Listing
-a
a.
Cu
=»fc
cu
(ft CO
a
a>
ro
o
CO
o
-------
0000000010157 000001
IOI0010inoO!>7bXICOMU till ILL"
10l0010b«OOS7t XICO^B dOILbK
ioiooi06floob7txTcuMH BOILER
to?oo,»n4Boos7£xir.iiMB BOILER
10200<>flS800S7fcXICU»b BOILER
10?00,>07HOOb7tXICl|MH
10?00401«OOb7tXICi.)Mtl
io2ooHun<>7l-nUO/AtiRICULTUKE
EUM INl>RY
EUH IN|)RV
IN|)RY
30S0020JHOOS7PFIPUI tUM
30SOI60160057MTNEKAL
30501602800b7MINtRAL fRUDUCTS
}OS0160S«0057M1NEKAL PRODUCTS
trS/f'S FMF IIPPATI- - SCC DESCRIPTION FILI- INPUT LIS1
PARE
ELfCTrtTC GFNf RAINANI HHAC I IF m«L
ELFCTKlC OENtHAINANFHKACI IF C.J4L
EI.FCTHIC UENEHAINANrHKACI IF
I NOUS I IV I AL
IM1USIHIAL
Hi
INniJSIRlAL
COAL
COAL
CuAL
HTfUMIUOuS DIAL
BHUM!NOUS COAL
PUIVFHIZFO CDAI. TONS KIIKIJFU
100MMB|H/HK
10-lOOMMIUU/HK
INDUSIPIAL
INDUSTRIAL
INDUSTRIAL
COMKFHfL-lNSTUTNLBNUMINOUS COAL
COMMF.KCL-INS1UTNLKE.SIIHIAL Oil.
.COMMEHCL-INSTuTNl.KESIOI'Al OIL
COMMFKCL-INSTuTNLItTSTILLAlE OH
CUMMFRCL-lNSTUTNLDTSTllLAIK. Oil
euMMEKCL-INSTUTMLDlSTRLAIE Oil
COMHCHCL-INSTnTNLDIiTHLATE OIL
COMMERCL-INSTUTNl NAIUKAL GAS
COMMERCL-INSTliTM-NAniHAL GA3
COMMEHCL-INSTUTNLNAIUKAL
CARBON BLACK CHANNEL
AGRlCULtUMAL
ALFALFA
ALFALFA DEhYOrtMICYCLUMf AND OHYEHPKIMAKY
ALFALFA DEHYDKAT1MFAI CULLFCIu* CYCLONE
ALFALFA OEHYDHAIIPFLLET CUOLU* CYCLONE
CUFEEE KOASI1UG rfDASIFH DIRtCI FIKF.O
10-IOOMMHIU liFS**U'«iS
10-IOOMnnill PtlL*»l')NS
Nil b OIL 1000 I.AILO.MS
IO-IOQMMHIU/HK **IOUO GAlLUNS
100>lhB|ll/HH
tO-lOOMMBIU/HK
<10HMHTU/HR
ABSHUR TAILGAS/NHIOI-JS
GENERAL
COFFEt ROASTING
CHAIN FLEVATOKS
GHAIM ELEVAIOPS
ASPHALT ROOFING
ASPHALT Ci.iNcft.tr. KOI ANY OHYER
ASPHALT CONCMLlE (101
ASPHALT (OHL«t.TF
I. IMF flFG
I I ft '-1F K
ACID PKOOUCFD
**TMhS MtA|_ PPIIOUCED
TONS P-POOUCI
TONS PRODUCT
IONS PRODUCT
TONS GKF.F.N BEANS
FlrtFD TONS GRhEN HfcANS
IFKHI'JAI. FLFVAIM«3HIPMG/RtCLlVI««TONS G»A1N PSUCFSSED
TFHM|NAl ELFV»IOHTRANSFFR/CONVEY**TONS GRAIN PROCESSED
FFLT SAT OPFKAIN TONS SATURATED PEL I PRODUCED
CONVENTIONAL Pl.NTiONS PROOUCti)
< IONS PHODUCEU
10'JS PROCESSED
TONS PKOCESStD
n TONS PROCESSED
CALClMINii VERIICAL ML" II1...S PKOCFSSfcD
CALCINING RIJTAtiY ML'1 IONS PKIICISSEO
STllRAGF IMLFS
PRIMARY
Figure 4.2.5-g. Input Emission Factor Description File Listing
•— • r~ oo
•z. m ^^.
— \ -o
m. o co
m i— i
o
"o m co
73 3 rn
O -n o
o —i
73 ~f\ >->
> >-> O
2 r- 2:
m m
2 o
m t-t
o
o
o
ro
C 73 -O
T3 ^D p*
O. —i tO
o» ro n>
<~F O)
(B trt CO
n> en
.. a
a>
-o n>
ro
1—
o
CO
o
-------
00
'S F"F UPIIAIF - FMISS1DN FACTIIH FILt. HIIIPUT FILt
f'Afit
1 HOlB005/«OOS7PAKIlCULATfc FACTOR
4i)lflOOS7H00573'l2 MCTHH
a2f.o2»nos/noo57unx FACTIIR
1flOOS7«0057Hr FACHIH
IU200204I
tO?00^0«1
10?00?0/M
lUul80oS7«0057PAHTirUI.ATE KACTdR
q2IO!«P057«0057Cn FACIOR
12101 »0|}Sjr«o057S'12 t-ACTHH
a?hO?HOOS/«OOb7NUX FACTUH
niiuiioos/«oos7Hr FAC KIH
0000080057X0057
1 1 101ttOOS/«0057PAkTICUl
4210I0005790057CH
1020020(11
10?0020i|1
10?0020b1
10?002051
10?0020bl
1020020S1
102002051
I0?00206t
102002061
10?00?06l
102002061
10?0020bl
I0?002061
102002071
102002071
107002071
102002071
102002071
10?002<>71
io?oo«on
10?00
m i—i
>
o
o
o
en
I
c:
•a
ex
a>
=«=
-o
I
70
(0
Ql
in
ro
Ql
o
* •
rva
o
CD
o
-o
a>
(O
fl)
CO
-------
\£>
oononoooBOOb? OQOOOI
1010niniH0057EXfCUMB BOILER
10100I05MII057EXICUMB BOILER
IOI00106«OOb7tX!CuMB BOILE"
BOIIER
B'UIER
lU?0020t>nOOb7tXICi|MB BOILER
tl»?00^07flOP57EXICU*'B BOILER
io?oo«ni«oos7txiru"o BOILER
lo?ooao«jnons,7iXfCu«B BOILE"
I 020040 jno0^7EXICUMB BOILER
io?ooaon«o«>57EXiciauB HOIIER
io2oosoinoo57txirnMH BOILER
10200502800S7EXTCUM|« BOILER
l0200bOJ80057tXTCUMB HOILtR
lO?OObnanooS7tXICU"e BtiJLt"
iozooboinons7txic(iuu BOILER
10?602«OOS7EXTCOMH BORER
IO?OOh04*0057EXICOMB BOILER
10?al|02«onS7fcXICUHB BORE"
10?01 I03H0057EXICIJMH 8ORE»
1030n209"0057EXTCU"M UUILER
10300«02800b7EXICOHB BOILER
10SOO«03800S7tXrCU"U BOILER
HOIttR
H01LER
10SOOSOJHOOS7tXICOMb BOILER
l050050afl0057tXIC(|MB
tOJ00601flOOS7tXICUMB
tu30A60390057tX1CUMB BOILER
30IOOS01600S7CHt"lCAL
30?OOIO|«OOS7F(!UO/»GRICULn»HE
3o?oo i oi>qoo^7FnuP/ AGR ICUL i URE
30?0n501 800S7I- OUD/ AGRICULTURE
30S0010S«Of>b7PF rWlllfcllM 1NUHY
30S0020|»OOS7priRUl.EUM INO»V
30S00202HOOS7PFTHULEHM 1NURY
J0500203«0«57PFTPOLE'JM 1WI)R>
3050l60iaon&7MINEHAL PRUOUCfS
3050l602e0057M?NE«AL PPUOUCIS
3050tt.03flOOS7MINFRAL PRUDUC IS
EIS/PS tMf UPDATE - SCC OESCR1PIIUN ftLt UUIPUT LISI
PAGt
FLFCTKIC GENFRAINANIHRACTIE COAL
ELECTNIC GENFRAI'IA'm'RACl IF CUAL
FLEtTkIC GENERAlriANIHRACIIF COAL
INDUSTRIAL
INDUSTRIAL
INDUSTRIAL
INDUSTRIAL
INDUSTRIAL
INDUSTRIAL
INDUSTRIAL
INDUS!RIAL
INDUSTRIAL
INDUSTRIAL
INDUSTRIAL
INDUSTRIAL
INDUSTRIAL
INDUSTRIAL
HI1IIMINMUS CUAL
HiriiMiN'ius CIJAL
HI IUMINOUS riJ*L
HT1UMINDUS CUAL
HFSIPUAL OR
HFSTU»AL 'UL
RESIDUAL MM.
RFSIO'JAL '111.
DTSTILLAIE OIL
PISTRLAIF OR
DISTILLATE OH
NA1HKAL GAS
NA1HNAL GAS
NATURAL GAS
BAGASSE
BA(,ASSE
CLIMMEKCL-1MSTUTNI III I OMINOUS CUAL
COMMFRCL-INSTUTNLRFSIDUAL OR
COMMERCL-1NSTUTNLRESIDUAL OIL
COMHFKCL-1NSTHTNLRFS10UAL OR
COMMF.KCL-INSTUTNLDISTILLAIE OR
CUMMEkCL-INSTUTNLUISTRLATF OH
COMMFHCL-INSTUTNLDISTRLATF OIL
CliMMEKCL-INSTUTNLDISTRLATF OR
CCIMMERCL-INSTUTNI.NAIURAL OAS
Cn«MERCL-INSTUTNI.NATUHAL GAS
COMMFRCL-INSTUTNLNAIURAL GAS
CARBON HI ACh CHANNEL PROCESS
AGRICill TUfAL CHEMNTIH1C ACID
ALFALFA PEHYPWA1NGENFHAL
ALFALFA PEHYPRAIICYCl ONE AND DRYERPRIMARY
ALFALFA DEHYORAIIMFAL COLLFCTUH CYCLONF
ALFALFA DEMYPRAlIPFLLET CUOLFK CYCLONF
PULVFRUFD COAL IONS BURNED
IOMM(»TU/HH1"NS MIJRNED
10-100MMBTH UFS**IONS HUHNFD
1U-10QMHHTO PUL**TONS HORNED
NO 6 OIL 1000 GALLONS HORNED
lo-iooMMRiii/HR **inon CALLOUS BURNED
<|OMMBTU/HR **100n GALLONS RURNED
Nil 5 MR 1000 GALLONS KILNED
NO I AN(> NO ? MIL 1000 GALLONS BURNF.D
10-lOOMMBfH/HH **moO GALLONS nU»NFD
**1000 GALLONS RIIRNFD
10QO GALLONS MUMMED
MILLION CUBIC FFET BURNED
MILLION CUBIC FELT RURNFD
MILLION CUBIC FEET BURNED
<|OMMBTU/MR
NO 'I OIL
10-10QMMHTU/HH
<10HMBIU/HR
10-100HHHTU/HK **TONS BURNED
<|OHMBTU/HR **|riNS HURNFD
SPREADER STdKtR IONS RURNED
10-IOOMKHIU/HH **IOOO GALLONS PUPPED
<|OMMBTU/HR *MOOO GALLONS BURNED
NU <3 OIL 1000 GALLONS HURNFD
NU 1 AND NO ? OIL 1 000 GALLONS BURNED
10-lOOMMRpJ/HH **IOOO GALLONS RURNF.U
<|OMHBTU/HR **1000 GALLONS BURNFU
NU a UIL
>10QHMHIU/HH
10-inOMMRIU/HK
m
O -H
•o m co
33 2 m
o -n o
TO T] i—i
1 P i
m
a ro
O
m
-o
o
o
o>
c: so
•o ro
CL —-* tQ
o> ro ro
C+ Q)
ro in co
ro ~^
=«=
.. o
o>
rh
TJ ro
ro
^>^
o
00
o
-------
ro
o
FIS/P3 F«F (IPOA1F. - TRANSACTION I II.E L 1 S I
?Aioiooinj
H0057FXTUIMH HMJLEH
aoos7PU(.vFut/F(> COAL
"A I 01 00 10 IF
"AIO'OPIOIF
«AIUtOOl01F
OAIOIOOI01F
ooouiinoos?
1 1 101BPOS/PAH1 IC'ILAIF FACTOK
«21<>1fln05/COS7SU2 FACTHrt
OAlOlOOlOdF 1?fO?HOOS7NOX FACTOR
OAioinniPb^ qjioiBons/HC FACTOR
IAIO?00?0« 800S7F.XTCHMH M1IILFK
?Ato?on<;nii
tDAL
nuniHnnon
nuooianon
nnnunonin
r.fcMkPATNAHTHKACITt COAL
POOD I (10(10
OUODJBPOO
nuPi)oo?oo
H]
HIIHNFI)
0
CUAL
oAio?on,>o«F
«AIO?00?OUF
(AlO?on?nb
nooooanos?
11101HOOS7PAHIICOlA1F FACIOK t
'1^1 01 800S/CII FACTOR
0^nOIBOOS7SO? FAClflF)
4i>fiO?BOOS7MUX FACIOK
«31018POS7HC FACTOR
HOOS/FXTCOMH HllILER INDUSTRIAL
BOUS/rif./UF >|OMMHTU/HRTI)NS HURNFIi
«P«S7
«Aio?ooeosF
iAto?oo?06
ooooljo«n
nunooaoon
oynojHOoo
noooibooo
nuoootooo
RITUMINUUS CHAL
1 101HOUS/PAIM ICULA1F FACIOK A PUUOOSOIIO
FACTOR OoOOOPOOO
FACIOK s OUOOMIOOP
FACTOK nnouisouo
FACTOR ouooniono
HOOS7FXTCOHB HUlLtK INUI'STKIAI KHUMlMilHS COAL
HOOS7 1 0-1 OyMMHTU IIFS**IONS HOPN^Ii
BOOS/ 0
nononanos7
Figure 4.2.5-j. Transaction Listing
js ,-,
•z. m
•H
m o
~3> m
o —i
m i—i
o
m co
O -n
"TJ i—'
HH O
m
m m
3 o
m i—i
m
-o
o
o
ro
en
a
a.
Oi
=«=
70
(0
Cu
to
n>
o
CU
rt
n>
ro
o
oo
o
Qi
CO
oo
co
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 39
Release Date: 2/01/80
Update #: P-l
Card
Column 1
13
\f
YYDDD FLAGW LIST
Note: YYDDD represents the Julian date (year/day)
Figure 4.2.5-k. Option Card Format
121
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 40
Release Date: 2/01/80
Update #: P-l
//» FF-Al M>,/AOh7 IIFIH.FF'F. I H, LLliYh A. (V 1 1) SOI-SU1?!
//*
//* Hf. VlS|tllM I. F.VfL: 1-0 H
//« i»ATt I ficiiK'f'io'A FF i>: JULY i, IP/«
ii on no 1 no
AI i IMS IMF HSMV in "AIIIIAIM IHI- f. I.S/H.S FMI ;>s IM.J
//
//*
Si MM
//S.HMI IF-
//*
//Silh 1 '-I Mi
//
1
»=lOOK,
( I-If 1 = '1 ,0',
I (MF f>= ' 1 , 0 ' ,
ill OF «iFC = FP')l DFI-iF ,
Ml lllH.S(,=t FMII UDiii:,
/ / * rms
//* FAT in* ( TLF
//*
//*
//r I'Ffif in PKIH. ft* II.IF r i = TN.F. I'AI.'-IH. A on ;.c OHM. MM. CM •,
// HF'ii(:i=r'siiMV=f NK *•»«:* ILK, »ELtTc '
,SFC'J|>Y/=) 0,
ri-Mf> = SYSi)A,
I [,.. i =( K,l I'H i )
F II ( 1KA |S
'ii.ii r i. .LOAD,
MlS^sfSH^rf'AbS)
i»u U.SI--AI-F =.sr«? j.:."» n i ><,
F 1 1. h ,iK -UK.
//
III- llll| T = H |F"f.
il'»r h =1 lit'H , (4 •ni.h SIM ) , ,( ilf I 1C )
i),i ii' 11 -1 f. n •••>', b» I'=.S'IK i '<• 111,
-,l'(lf I =( (•"• , f N "I -'K-SCC I , ,f i"iJ| ID
oooon srii)
o tin no'i no
Illl (I 11(1 Ml) I)
O I) fill |)'/Oil
n o o o I n 0 o
no (MM i no
OOIM) 1 S"ll
ill) 00 I 'Kill
fill 111) 1 Ml (I
0 H 01) 1 n HII
IIII0II I / UIJ
n i) no I MOO
oonor^oo
00 (III? II (III
iinilii?! no
01) 0 0 ? 'I IIH
nono^soo
Oonu^7oo
onno?woo
Oil no
no no A soil
n n n n 3 / o o
no OH oo
nonouiuMi
n o o u'»I o u
o o i" ii ()()
II |l III! 'l>Jl|[l
(I II Oil SHIM)
(M)Hl.lS | Oil
Olio.is V'li
0 on nS') "it
(Page 1 of 4)
Figure 4.2.5-1. Cataloged Procedure EPEME10
122
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 41
Release Date: 2/01/80
Update •#: P-l
xx»
//.SUM i MHO 5 DO IIMJ rr r KH (JIF>,.SFH = lini'Al-F =[iJPltf ,
n ii 'I n s / (in
//*
//* Mill KIM Dftlfl St 1 - SiH'If-U 1'«|S3I-IH FACffiK HLF TiifiS
XX*
//(•PStU'lP OK l)Sr'jAl".F
xx I/MI isi
xx liT:iP = (
XX*
//* IUJTPIM OAIA St T - OiaiiMljSlIC
//*
//f HSOUG 1)1) sys(IUT=MllM
//*
//* niilPUF I'AIA SFTS - SYSTt1* 'lprn A I
//*
//SYSPHl'M l)l> SY.SHlM=K.iMM
//*
//SYSuiM on sYsnnT=Riiii|
//*
//SYSOHiHM Ml) SYS(HlT = Kl)H|
//*
//SYSDltMM HI) SYSIHM=Ri.llM
//*
//SYSul>U"P 0(i .SY.Sf'llT =
//*
//"Pl'fllt FXfcC fi:H"=v
//* "AINU!* FlS/t"? F I'll SRI MM FAf.lijtJ
//*
//SIFI'LJH r»l) l).SHAi>iF=».l»Mil.H C I . .1
// V I ILI !'•* = ( PHI tfA If ,1'^ I A
//*
//* I'JPlM DATfl SF I - M« I'JirilA, f h. LiMlUHL CftHI>
//*
X/Ff'SllPI'l HI
//*
//* r'iPiM PAIA SF I - snpii.n F^Iss|nlM FA
XX*
XXFPSlWoM 110 DS'-iA.'HsK.K.SiJim i>,
XX Dl •>"=( aHKjf.'AS'?)
XX*
XX* liviPlil I>/\TA tiF I - Hl.li h'-lS.SIn") F/iflMK I-IL^
XX*
SUt t F no iiKi-*i- F sRl'P.i.u f I . ,c.»T 'i.x')| nt "hr ,
t^»'"SAi:r
IMIOllM) II ||
(III (I'll. 1 11(1
o u n i
(Mill II /./J fill
III! I'llfiS'Ml
IMidOAnl. n
II (I (I lid /III)
(in on 7 ii ID
f>i|(»o7 1 '•(>
i) •) 'i o 7 / r- '.i
•Ml 'I I) 7 i^'l
II (I 'I i| 7J"!I
i. (i 'i, i 7s'ui
n y n i j 7 (, 1 1 o
niiOO 7 7<*o
n ii 1 <> 7 V 0 0
MM/
I'O
no(io«
o o fi i) » i n ()
o ii
n i, (i ii
o o o i) i n (i
D-Mll)
I I "
(Page 2 of 4)
Figure 4.2.5-1 - continued. Cataloged Procedure EPEME10
123
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 42
Release Date: 2/01/80
Update #: P-l
// VII HMFsCHKI VAtt f I4FI AIM),
// D I S"=f SHU, I'ASS )
//*
//* [Mf'UT DAlA bf 1 - ULIJ h.'-ll SSJMM hACIMi< uFSFKIl'IliM Fill
//*
//FPSliLDS IM
//
. VILDDF bC t
rfi»W| VAlf , rtt I A INJ ,
/ / *
//* nuTHMl DATA SL T - Hf-V FMT.SSIfH FACTuW F- 1 L I
|).SlJ«'- .F=KIM>fl.ltr I . .lift r
VII|.II.1F = {P><1 \ll\ || ,«h ffl l
Dt j"=(K.DlSf'l ),
U'i| r = ^ur'l T I ,
HI-1 AT I- stK.Sf't'lfM I . (*»'R1WHV| ,*SLCrJOYl ) . '•I. dF 1
//
//
//
//»
//* mitC'll UAIft Se T - Nlr'l FMfSSI'm
//*
HI) D
urn I=KIIM
//
//* runt'ur i»AfA st T - DiAu
//*
HI) SYS'lllf =KIMI!
OtSC«I p I I 'I*' Ftl.t
. .OAF A.itNfcfn)F3C»
SF
//* iiuipii! I-AIA sh i - F.Mia
//•
//r»'S I Wi.l |)l> SYSlill f = RIMI I
//*
//* UllTf'tM DAIA S[.T - ULI) FMT.SSJf'.j
//*
nit.
I.T.STIAII;
F H.h LISIIf'(;
//»
//* injfiMii DAIA SKI - 111. i)
//*
//FHSi.lHt>l OD .srolillT=KIMM
//*
//* iinrHiil DAM SHI - ut-".
n m> sY.siiur=
AC fun
IHN riih
i- UK i. i:>i |i'M,
//«
//* Dtltt'lH DAIA Sl.l - "It '! I I'il •'•>•'•> I Mii Mf,f !•• DK.'>I -»! F1 Ml"- t- I I H L1-'>Ill"'i
//*
//M'Sui'Si on .SV;»IIHI=MIII i
//»
//* MiiU'iM uAIA ';M:. - HYoil-1- nt't-KAl HIM
I>D .SY :>iini =x,nii i
l'l> SY.-iUlM =MIM I
Sl'I'llMJ Ml' -.Y.ililll sl
//4
//iYSillll
(HlO
oi/o
000
OuO
HUP
1100
so (i
/(III
it no
0 (( 0 1 ? 1 1 0
n»n|,V»0
OiHI|?/H)ll
IIOH I PMOtl
'iitni^'MXi
000 1*00(1
0001 MlMI
.| on
OOOMhOi)
01(015/00
0001«l(IOo
oun i-/Ji(i(i
»(ioiu«»ifo
(11)01 0500
'»D'1 1 -I'JOO
00 01 /I SOU
'I 7 on
in) 0| SI 0(i
oiioiS4.S'i n
(Page 3 of 4)
• Wf
Figure 4.2.5-1 - continued. Cataloged Procedure EPEME10
124
-------
HS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 43
Release Date: 2/01/80
Update #: P-l
//*
//.S
//*
//$
//*
00
DP
'I I) 'I
00 "
'ion
0 i) 0
"00
nun
71'Ml
;«"i;i
7401,
(Page 4 of 4)
Figure 4.2.5-1 - continued. Cataloged Procedure EPEME10
125
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 44
Release Date: 2/01/80
Update #: P-l
Parameter
Name
Default
Value
Description
PROJECT
'CN.EPALMH.A087.
CDHS.HQ.PNT1
PROG1
PROG2
REGION1
REGION2
TIME1
TIME2
OLDEMFC
OLDDESC
PSREFTR
PEMEFAC
150K
100K
'1,0'
'1,0'
EPOLDEMF
EPOLDDSC
NEWEMFC
NEWDESC
UNIT1
UNIT2
EPNEWEMF
EPNEWDSC
3330
3330
Highest-level index of data set names (e.g.,
CN.EPALMH.A087.CDHS.HQ.PNT.DATA.EPOLDEMF
would be the full data set name of the input
emission factor file)
Emission factor file transaction sort program
Emission factor file edit-maintenance program
Region size allocated for execution of PSREFTR
Region size allocated for execution of PEMEFAC
Time (minutes, seconds) allocated for
execution of PSREFTR
Time (minutes, seconds) allocated for
execution of PEMEFAC
Lowest-level index of input emission factor
file
Lowest-level index of input emission factor
description file
Lowest-level index of output emission factor
file
Lowest-level index of output emission factor
description file
Unit type to which output emission factor file
is to be written
Unit type to which output emission factor
description file is to be written
(Page 1 of 2)
Figure 4.2.5-m. Substitutable Parameters for EPEME10
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
Parameter
Name
SERIAL1
SERIAL2
TEMP
WORKSPC
OUT
SECTION 4.2.5
EMF FILE EDIT-MAINT
PROGRAM PEMEFAC (EP0040)
Page 45
Release Date: 2/01/80
Update #: P-l
DISP1
DISP2
SPCUNT1
SPCUNT2
PRIMRY1
PRIMRY2
SECNDY1
SECNDY2
'NE1
'NEI
TRK
TRK
20
20
10
10
Default
Value
CDHSPK
CDHSPK
1 NEW,CATLG,DELETE1
'NEW.CATLG.DELETE'
SYSDA
'20,10'
A
Description
Volume serial number of the volume to which
the output emission factor file is to be
written
Volume serial number of the volume to which
the output emission factor description file
is to be written
Disposition of the output emission factor
file
Disposition of the output emission factor
description file
Units in which space for the output emission
factor file is to be allocated
Units in which space for the output emission
factor description file is to be allocated
Primary space allocation for the output
emission factor file
Primary space allocation for the output
emission factor description file
Secondary space allocation for the output
emission factor file
Secondary space allocation for the output
emission factor description file
Unit type for temporary sort space
Space allocation for the temporary sort
files
SYSOUT class for all print files
(Page 2 of 2)
Figure 4.2.5-m - continued. Substitutable Parameters for EPEME10
127
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3
MASTER FILE
INTRODUCTION
Page 1
Release Date: 2/01/80
Update #: P-l
4." MASTER FILE
4.3.1. INTRODUCTION
The EIS/PS master file is created and maintained by EIS/PS master file
internal transactions. The internal transactions can be created from either
EIS/PS format or NEDS format transactions. If the transactions are coded in
EIS/PS format, they are input to the master file transaction sort program,
PSRMFTR (EPQ07G), and passed to the master file transaction edit program,
PEDMSTR (EP0080). PEDMSTR (EP0080) edits the transactions and creates
internal trans-actions from those that pass the edit criteria. See Figure
4.3-a for a flowchart illustrating the EIS/PS master file transaction edit.
If the transactions are coded in NEDS format, they are input to the NEDS
transaction sort program, PSRNETR (EP0050), and passed to the NEDS to EIS/PS
conversion-edit program, PCENETR (EP0060). PCENETR (EP0060) converts the
transactions to EIS/PS format, edits the converted transactions, and creates
internal transactions from those that pass the edit criteria. See Figure
4.3-b for a flowchart of the NEDS to EIS/PS master file transaction
conversion-edit.
Emission factor information is inserted into the internal transactions
produced by either PEDMSTR (EP0060) or PCENETR (EP0080). The internal
transactions must first be sorted by the master file internal transaction
pre-insertion sort program, PSREFIN (EP0090). The sorted transactions are
then passed to the master file internal transaction emission factor insertion
program, PMSEFIN (EP0100). See Figure 4.3-c for a flowchart illustrating the
master file internal transaction emission factor insertion.
128
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3
MASTER FILE
INTRODUCTION
Page 2
Release Date: 2/01/80
Update »: P-l
After the emission factor insertion has been performed, or if no
insertion is to be performed, the internal transactions must be sorted by the
master file internal transaction sort program, PSRINTR (EP0110). The sorted
internal transactions are then input to the master file maintenance program,
PFMMSTR (EP0120), to create or up-date the EIS/PS master file. No old master
file is input to PFMMSTR (EP0120) when the initial file is being created;
however, when an existing file is being updated, that file is input to PFMMSTR
(EP0120). See Figure 4.3.d for a flowchart illustrating the master file
mainte-nance procedure.
The master file emission factor transaction generator program, PMSEFGN
(EP0130), is used to update the emission factor information in the EIS/PS
master file after updating the emission factor file. The master file and the
emission factor file are compared, and internal transactions are created. The
updated emission factor information is inserted in these transactions, using
PSREFIN (EP0090) and PMSEFIN (EP010Q). The completed transactions are then
used to update the master file. See Figure 4.3-e for a flowchart illustrating
master file emission factor transaction generation.
Detailed discussion of these programs can be found in the follow-ing
sections: 4.3.2, PSRNETR (EP0050); 4.3.3, PCENETR (EP0060); 4.3.4, PSRMFTR
(EP0070); 4.3.5, PEDMSTR (EP0080); 4.3.6, PSREFIN (EP0090); 4.3.7, PMSEFIN
(EP0100); 4.3.8, PSRINTR (EP0110); 4.3.9, PFMMSTR (EP0120); and 4.3.10,
PMSEFGN (EP0130).
PSRNETR (EP0050) and PCENETR (EP0060) are executed by the cataloged
procedure EPCET10, which is discussed in Section 4.3.3.5; PSRMFTR (EP0070)
129
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3
MASTER FILE
INTRODUCTION
Page 3
Release Date: 2/01/80
Update #: P-l
?nd PEDMSTR (EP0080) by EPEDT10, discussed in Section 4.3.5.5; PSREFIN
(EP0090) and PMSEFIN (EP0100) by EPMST10, discussed in Section 4.3.7.5;
PSRINTR (EP0110) and PFMMSTR (EP0120) by EPFMM10, discussed in Section
4.3.9.5; and PMSEFGN (EP0130) by EPMSM10, discussed in Section 4.3.10.5.
Other cataloged procedures for creating or updating the master file are
discussed in Section 4.4
130
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
ORTED MASTER FILE/
TRANSACTIONS
DIAGNOSTIC
REPORT
SECTION 4.3
MASTER FILE
INTRODUCTION
EIS/PS MASTER FILE
TRANSACTIONS
1
PSRMFTR (EP0070)
MASTER FILE TRANS-
ACTION SORT PROGRAM
PEDMSTR (EP0080)
MASTER FILE TRANSACTION
EDIT PROGRAM
Page 4
Release Date: 2/01/80
Update #: P-l
'EDITED INTERNAL/
TRANSACTIONS
SORT WORK
FILE
(Temporary)
DIAGNOSTIC
REPORT
OPTION
CARD
INPUT TRANSACTION
LISTING (Optional]
INTERNAL TRANS-
ACTION LISTING
(Optional)
(See Figure 4.3-c.)
Figure 4.3-a. EIS/PS Master File Transaction Edit Flowchart
131
-------
EIS/PS
FILE CREATION AMD
MAINTENANCE
SECTION 4.3
MASTER FILE
INTRODUCTION
Page 5
Release Date: 2/01/80
Update #: P-l
NEDS TRANSACTIONS
PSRNETR (EP0050)
NEDS TRANSACTION
SORT PROGRAM
SORT WORK
FILE
(Temporary)
SORTED NEDS TRANS-
ACTIONS (Temporary)
DIAGNOSTIC
REPORT
OPTION
CARD
T
PCENETER (EP0060)
NEDS TO EIS/PS MASTER FILE
TRANSACTION CONVERSION-EDIT
PROGRAM
DIAGNOSTIC
REPORT
/EDITED EIS/PS
( INTERNAL TRANS-f
V ACTIONS
NEDS TRANSACTION
LISTING (Optional;
EIS/PS TRANS-
ACTION LISTING
(Optional
(See Figure 4.3-c.)
Figure 4.3-b. NEDS to EIS/PS Master File Transaction
Conversion-Edit Flowchart
132
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3
MASTER FILE
INTRODUCTION
Page 6
Release Date: 2/01/80
Update #: P-l
PSREFIN (EP0090)
MASTER FILE INTERNAL TRANS-
ACTION PRE-INSERTION SORT
PROGRAM
/SORT WORK FILE
-j (Temporary)
'SORTED INTERNAL TRANS-/
ACTIONS (Temporary)
v
DIAGNOSTIC
REPORT
EMISSION FACTOR
FILE \
OPTION CARD
PMSEFIN (EP0100)
MASTER FILE INTERNAL
TRANSACTION EMISSION
FACTOR INSERTION
PROGRAM
/INTERNAL TRANSACTIONS
( CONTAINING EMISSION
V FACTOR INFORMATION
DIAGNOSTIC
REPORT
(See Figure 4.3-d.)
Figure 4.3-c. Master File Internal Transaction Emission
Factor Insertion Flowchart
133
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3
MASTER FILE
INTRODUCTION
Page 7
Release Date: 2/01/80
Update #: P-l
DIAGNOSTIC
REPORT
PSRINTR (EP0110)
MASTER FILE INTERNAL
TRANSACTION SORT PROGRAM
SORTED INTERNAL TRANS-
ACTIONS (Temporary)
OLD EIS/PS MASTER
\FILE (Optional) V
±
PFMMSTR (EP0120)
MASTER FILE MAINTENANCE
PROGRAM
TRANSACTION
LISTING
(Optional
/SORT WORK FILE/
(Temporary)
DIAGNOSTIC
REPORT
OPTION CARD
OLD MASTER FILE
LISTING (Optional)
/NEW EIS/PS
[ MASTER FILE
V
NEW MASTER
FILE LISTING
(Optional
Figure 4.3-d. EIS/PS Master File Maintenance Flowchart
134
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3
MASTER FILE
INTRODUCTION
Page 8
Release Date: 2/01/80
Update #: P-l
EMISSION FACTOR FIL
EIS/PS MASTER FILE
OPTION CARD
PMSEF6N (EP0130)
MASTER FILE EMISSION
FACTOR TRANSACTION
GENERATOR PROGRAM
[ INTERNAL f
V TRANSACTIONS I
DIAGNOSTIC
REPORT
(See Figure 4.3-c.)
Figure 4.3-e. Master File Emission Factor Transaction Generator Flowchart
135
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.2
NEDS TRANSACTION SORT
PROGRAM PSRNETR (EP0050)
Page 1
Release Date: 2/01/80
Update #: P-l
4.3.2. NEDS TRANSACTION SORT PROGRAM - PSRNETR (EP0050)
4.3.2.1 Description
PSRNETR (EP0050) sorts NEDS point source transactions into the sequence
required by the NEDS to EIS/PS master file transaction conversion-edit
program, PCENETR (EP0060); Figure 4.3.2-a details this sort order. All NEDS
transactions must be sorted by PSRNETR (EP0050) before they can be converted
to EIS/PS master file transactions. See Section 4.3.3 for additional
information on the NEDS transactions.
4.3.2.2 File Formats
Input to this program consists solely of NEDS point source transactions.
Refer to Figure 4.3.3-a for a description of the NEDS point source transaction
formats.
PSRNETR (EP0050) produces two output files: a diagnostic report and a
temporary file containing the sorted NEDS point source transactions. The
sorted transactions are in the correct sequence for use as input to the NEDS
to EIS/PS master file transaction conversion-edit program, PCENETR (EP0060).
An example of the diagnostic report is shown in Figure 4.3.2-b.
4.3.2.3 Options and Control Cards
There are no options.
136
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.2
NEDS TRANSACTION SORT
PROGRAM PSRNETR (EP0050)
Page 2
Release Date: 2/01/80
Update #: P-l
4.3.2.4 Error Messages
There are no error messages.
4.3.2.5 Cataloged JCL
PSRNETR (EP0050) should always be executed in conjunction with the NEDS
to EIS/PS master file transaction conversion-edit .program, PCENETR (EP0060).
See Section 4.3.3.5 for a discussion of the cataloged procedure PECET10, which
executes both programs.
4.3.2.6 Warnings and Special Instructions
Note that the COBOL sort verb is used in this program; therefore, the
collating sequence for alphanumeric fields is determined by the computer at
the user's particular installation.
In addition to the diagnostic report produced by PSRNETR (EP0050),
messages generated by the sort-merge package will be printed. The format and
content, as well as the physical location, of these messages depend upon the
user's particular installation.
4.3.2.7 Cost Considerations
The following estimates are for the execution of PSRNETR (EP0050) on an
IBM 370/168:
137
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.2
NEDS TRANSACTION SORT
PROGRAM PSRNETR (EP0050)
Page 3
Release Date: 2/01/80
Update #: P-l
Number of NEDS master file transactions:
CPU time:
I/O time:
Total time:
Estimated cost:
4.3.2.8 Related Programs and Procedures
322 transactions
1.11 seconds
1.63 seconds
2.74 seconds
$.38
PSRNETR (EP0050) should always be executed in conjunction with the NEDS
to EIS/PS master file transaction conversion-edit program, PCENETR (EP0060).
The cataloged procedure EPCET10 executes both programs.
Also, PSRNETR (EP0050) and PCENETR (EP0060) can be executed in
conjunction with the master file internal transaction pre-insertion sort
program, PSREFIN (EP0090); the master file internal transaction emission
factor insertion program, PMSEFIN (EP0100); the master file internal
transaction sort program, PSRINTR (EP0110); and the master file maintenance
program, PFMMSTR (EP0120), by the cataloged procedure EPFMM20.
138
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.2
NEDS TRANSACTION SORT
PROGRAM PSRNETR (EP0050)
Page 4
Release Date: 2/01/80
Update #: P-l
Record Position
Description
Sort Sequence
1
3
7
10
14
18
2
6
9
13
15
25
80
78
State
County
AQCR
Plant ID
Point ID
SCC
Card Number
Action Code
Ascending
Ascending
Ascending
Ascending
Ascending
Ascending
Ascending
Ascending
Figure 4.3.2-a. Sort Sequence for NEDS Point Source Transactions
139
-------
tlS/l'S
PHUGK»M NAMF: PSKNtTk (FP0050)
HFVTSIUN LtVH.! 1-00
LAST IIFDATK «: P-l
OAfF |ig(.UUH'lMA tFO: FtBHHA«?y 1, I9BO
NUMHEH UF TN»UT IWANS&CI
NU"HFk UF HUIHUI IK4NS4CT10NS:
IHANSACTlDii Sdi CO
o •
i -H ro
J "-1
;o o
m oo
-o o
o :*>
o -H
T3 tt> O>
f~i ~j tf^
o> fD ro
r+ Oi
fp C/l CTl
=«=
-o
i
(Ni
O
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
OS TO EIS/PS
ROGRAM PCENETR (EP0060)
Page 1
Release Date: 2/01/80
Update #: P-l
4.3.3 NEDS TO EIS/PS MASTER FILE TRANSACTION CONVERSION-EDIT PROGRAM
PCENETR (EP0060)
4.3.3.1 Description
The EIS/PS master file can be created and updated using NEDS point source
transactions. The NEDS transactions are sorted by PSRNETR (EP0050) and are
edited and converted into EIS/PS internal transactions by PCENETR (EP0060).
The internal transactions can then be sorted by PSREFIN (EP0090) and input to
the master file internal transaction emission factor insertion program,
PMSEFIN (EP0100). The internal transactions can also be sorted by PSRINTR
(EP0110) and input to the master file maintenance program, PFMMSTR (EP0120).
The NEDS point source transactions include the PI through P7 cards; refer
to Figure 4.3.3-a for the formats of these cards. All data fields from the
NEDS transactions are included in the EIS/PS master file. Plant, point, and
SCC records can be added, changed, or deleted using NEDS transactions.
Comment records do not correspond to any NEDS information and cannot be
processed using NEDS transactions. (Note, the NEDS P7 comments are contained
as fields in the other EIS/PS transactions). Each NEDS transaction is
processed separately. The sort prior to executing PCENETR (EP0060) insures
that plant groups will be processed and printed together if errors occur or if
listings are requested.
All NEDS transactions are edited for valid state, county, AQCR, plant ID,
action code, P-type card, and card number. If any of these fields are in
error, the transaction is rejected; i.e., the entire card is rejected, and no
EIS/PS internal transactions will be created from the NEDS transaction. All
other NEDS fields are edited and, if flagged as errors, the entire card is
rejected. If flagged as conditionals, the data is accepted, and a message is
printed in the diagnostic report.
141
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
5ECTION 4.3.3
RQGRAM PCENETR (EP0060)
Page 2
Release Date: 2/01/80
Update #: P-l
The state, county, AQCR, plant ID, and action code fields of all valid
NEDS transactions are converted to the respective fields of any EIS/PS
transactions generated. Fields not contained in the NEDS cards are blank. In
addition, individual fields (when nonblank) are converted as follows:
NEDS PI Card: The year and a generated day of 000 are output on all
transactions generated. City, UTM-zone, contact, and
ownership code are output on an 01 card. Name and address
are output on an 02 card. For an add transaction, an 03
card is generated with a blank mailing address.
The NEDS P2 through P5 cards are used to generate the 11, 12, and 13
internal transactions. As each NEDS card is read, the fields from that
card are moved to the EIS/PS transactions, but no transactions are
written until all the cards for a given NEDS point ID are processed.
All transactions generated will contain the NEDS point ID. In addition,
the following fields are converted:
NEDS P2 Card: SIC, IPP, and UTM coordinates are output on the 11
transaction. The stack information is output on the
12 transaction.
NEDS P3 Card: Boiler design is output on the 11 transaction.
Control equipment and estimated control device
efficiency are output on five 13 transactions (one
for each of the five criteria pollutants).
NEDS P4 Card: Throughput, operating rate, and space heat are
output on the 11 transaction. Emissions estimate
and estimation method are output on five 13
transactions (one for each of. the five criteria
pollutants.
142
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
OS TO EIS/PS
>ROGRAM PCENETR (EP0060)
Page 3
Release Date: 2/01/80
Update #: P-l
NEDS P5 Card:
NEDS P6 Card:
Compliance information, ECAP, and control
regulations are output on the 12 transaction.
Allowable emissions are output on five 13 transactions
(one for each of the five criteria pollutants).
NEDS point ID and SCC are output on all generated
transactions. An SCC sequence number of 00 is
always used. Fuel process rate, maximum design
rate, ash and sulfur contents, and heat contents are
output on the 21 transaction. Source code, source
description, and confidentiality are output on the
22 transaction. For an add transaction, a 23
transaction with a zero pollutant ID is used. This
23 transaction is used in the master file internal
transaction emission factor insertion program,
PMSEFIN (EP0100), to signal that a 23 transaction is
to be generated for each pollutant in the emission
facator file for that SCC.
NEDS P7 Card: If the point ID and SCC are blank, an 04 transaction
is generated containing the P7 comment. If only the
SCC is blank, a 14 transaction is generated with the
P7 comment. Otherwise, a 24 transaction and a 25
transaction are output containing, respectively, the
left and right sections of the comment.
4.3.2.2 File Formats
PCENETR (EP0060) uses two input files: the NEDS transaction file and an
option card. See Figure 4.3.3-a for the NEDS transaction formats.
Description of the NEDS point source fields and instructions for coding the
forms can be found in AEROS Manual Series, Volume II: AEROS User's Manual,
Section 3.1.2. A discussion of the option card can be found in the following
section of this manual.
143
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 4
Release Date: 2/01/80
Update #: P-l
PCENETR (EP0060) produces a diagnostic report and a file containing
EIS/PS internal transactions. The output internal transactions are in the
format required for input to the master file internal transaction emission
factor insertion program, PMSEFIN (EP0100) and the master file maintenance
program, PFMMSTR (EP0120). Note that the internal transactions must be sorted
prior to running either of these programs. Figure 4.3.5-c illustrates the
format of the internal transactions.
The diagnostic report consists of a listing of NEDS transactions
containing one or more invalid fields. Each invalid field is underlined with
a B under the beginning character and an E under the ending character. In
addition, a message is printed for each invalid field to give a brief
description of the error. Warning messages are not printed in the report
unless the user requests so on the option card. The diagnostic report also
lists the update messages as well as summary statistics giving the options in
effect, the number of NEDS transactions, the number of output internal
transactions, and the number of errors detected. See Figure 4.3.3-b for an
example of the diagnostic report.
PCENETR (EP0060) produces two optional listings: a listing of all input
NEDS transactions and a listing of'all output internal transactions. These
listings must be requested using the option card as described in the following
section. See Figures 4.3.3-c and 4.3.3-d for examples of the NEDS transaction
listing and the internal transaction listing, respectively.
4.3.2.3 Options and Control Cards
An option card must be entered into PCENETR (EP0060). Failure to enter
the card will cause program execution to be terminated prematurely. There are
three fields on the option card: a date, a FLAGW option, and a LIST option.
The format of the option card is shown in Figure 4.3.3-e.
144
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
SEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 5
Release Date: 2/01/80
Update #: P-l
The date field is required. If this field is not present or if it is not
numeric, the program will be aborted. A year is entered into the date field
and is used to edit the year field in the NEDS transactions (the transaction
year must not be greater than the option card year).
The FLAGW option is used to indicate that warning messages should be
printed in the diagnostic report. Warning messages are used to indicate that
data was accepted but that the data might be questionable. A value of FLAGW
in the field is required if warning messages are to be printed. The field
should be left blank if the warning messages are not to be printed.
The LIST option is used to indicate that listings of the input NEDS
transactions and of the output internal transactions should be produced.
Examples of these listings are shown in Figures 4.3.3-c and 4.3.3-d. A value
of LIST in the field is required to produce both listings. The field should
be left blank if no listing are desired.
4.3.3.4 Error Messages
PCENETR 001 ERROR - COLUMN 01 - INVALID STATE CODE, CARD REJECTED
Meaning: The valid state codes are 01-55.
Action: Correct and resubmit the transaction.
PCENETR 002 ERROR - COLUMN 03 - NON-NUMERIC COUNTY CODE, CARD REJECTED
Meaning: The field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 003 ERROR - COLUMN 07 - INVALID AQCR CODE, CARD REJECTED
Meaning: The valid AQCR codes are 001-247.
Action: Correct and resubmit the transaction.
145
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 6
Release Date: 2/01/8Q
Update #: P-l
PCENETR 004 ERROR - COLUMN 79 - INVALID ACTION TYPE, CARD REJECTED
Meaning: Valid action types are A (add), D (delete), and C (change).
Action: Correct and resubmit the transaction.
PCENETR 005 ERROR - COLUMN 78 - INVALID CARD TYPE, CARD REJECTED
Meaning: Valid card type is P (point source)
Action: Correct and resubmit the transaction.
PCENETR 006 ERROR - COLUMN 80 - INVALID CARD NUMBER, CARD REJECTED
Meaning: The valid card numbers are 1-7.
Action: Correct and resubmit the transaction.
PCENETR 007 ERROR - COLUMN 10 - INVALID PLANT ID, CARD REJECTED
Meaning: The plant ID must contain only numbers and letters; blanks
cannot be included.
Action: Correct and resubmit the transaction.
PCENETR 008 - CONDITIONAL - COLUMN 18 - UTM-ZONE BLANK FOR ADD TRANSACTION
Meaning: The UTM zone should be coded for an add transaction; however,
failure to code it dpes not cause the transaction to be
rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 009 CONDITIONAL - COLUMN 18 - UTM ZONE OUT OF RANGE
Meaning: Valid UTM zones can be found in Appendix A, Table A-l; however,
an invalid range does not cause the transaction to be rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
146
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 7
Release Date: 2/01/80
Update #: P-l
PCENETR 010 CONDITIONAL - COLUMN 20 - INVALID YEAR
Meaning: The year must be numeric and must not be greater than the
option card date; however, an invalid year does not cause the
transaction to be rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR Oil ERROR - COLUMN 22 - NAME/ADDRESS FIELD BLANK FOR ADD TRANSACTION,
CARD REJECTED
Meaning: The field is required-for an add transaction.
Action: Correct and resubmit the transaction.
PCENETR 012 CONDITIONAL - COLUMN 74 - INVALID OWNERSHIP CODE
Meaning: The valid codes are P, F, S, L, and U; however, an invalid
code does not cause the transaction to be rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 013 CONDITIONAL - COLUMN 16 - INVALID YEAR
Meaning: The year must be numeric and must not be greater than the
option card date; however, an invalid year does not cause
the transaction to be rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 014 ERROR - COLUMN 14 - INVALID POINT ID, CARD REJECTED
Meaning: The point ID can contain numbers or letters; blanks cannot be
included.
Action: Correct and resubmit the transaction.
147
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 8
Release Date: 2/01/80
Update #: P-l
PCENETR 015 CONDITIONAL - COLUMN 24 - UTM-HORIZONTAL COORDINATE BLANK FOR ADD
TRANSACTION
Meaning: A UTM horizontal coordinate should be coded for an add
transaction; however, a blank coordinate does not cause the
transaction to be rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 016 CONDITIONAL - COLUMN 24 - UTM-HORIZONTAL COORDINATE OUT OF RANGE
Meaning: Valid UTM coordinates are given in Appendix A, Table A-l;
however, an invalid coordinate does not cause the transaction
to be rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 017 CONDITIONAL - COLUMN 28 - UTM VERTICAL COORDINATE BLANK FOR ADD
TRANSACTION
Meaning: A UTM vertical coordinate should be coded for an add
transaction; however, a blank coordinate does not cause the
transaction to be rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 018 CONDITIONAL - COLUMN 28 - UTM-VERTICAL COORDINATE OUT OF RANGE
Meaning: Valid UTM coordinates are given in Appendix A, Table A-l;
however, an invalid coordinate does not cause the transaction
to be rejected.
148
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 9
Release Date: 2/01/80
Update #: P-l
Action: The field can be corrected and the job resumitted, or the
master file record can be updated later using a change
transaction.
PCENETR 019 CONDITIONAL - COLUMN 33 - STACK HEIGHT LESS THAN 0 OR GREATER
THAN 500
Meaning: The stack height is not in the range of 0 to 500 feet; however,
an out-of-range value does not cause the transaction to be
rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 020 ERROR - COLUMN 33 - NON-NUMERIC STACK HEIGHT, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 021 CONDITIONAL - COLUMN 37 - STACK DIAMETER EXCEEDS (0.2 * STACK
HEIGHT
Meaning: The stack diameter exceeds 0.2 times the stack height; however,
an invalid stack diameter does not cause the transaction to be
rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 022 ERROR - COLUMN 37 - NON-NUMERIC STACK DIAMETER, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
149
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
OS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 10
Release Date: 2/01/80
Update #: P-l
PCENETR 023 CONDITIONAL - COLUMN 40 - INVALID STACK TEMPERATURE
Meaning: The stack temperature is outside the range of 77° to 2000°
Fahrenheit; however, an out-of-range temperature does not cause
the transaction to be rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 024 ERROR - COLUMN 40 - NON-NUMERIC STACK TEMPERATURE, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 025 ERROR - COLUMN 44 - NON-NUMERIC EXHAUST FLOW RATE, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 026 CONDITIONAL - COLUMN 51 - INVALID PLUME HEIGHT
Meaning: The plume height is not in the range of 0 to 200 feet; however,
an out-of-range plume height does not cause the transaction to
be rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 027 ERROR - COLUMN 51 - NON-NUMERIC PLUME HEIGHT, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 028 ERROR - COLUMN 18 - NON-NUMERIC BOILER DESIGN CAPACITY, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
150
-------
EIS/PS
FILE CREATION AND
HAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 11
Release Date: 2/01/80
Update #: P-l
PCENETR 029 CONDITIONAL - COLUMN 26 - INVALID DAY FOR OPERATING RATE
Meaning: The valid hours per day are 00-24; however, an invalid value
does not cause the transaction to be rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 030 ERROR - COLUMN 26 - NON-NUMERIC DAY FOR OPERATING RATE, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 031 CONDITIONAL - COLUMN 28 - INVALID WEEK FOR OPERATING RATE
Meaning: The valid days per week are 0-7; however, an invalid value does
not cause the transaction to be rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 032 ERROR - COLUMN 28 - NON-NUMERIC WEEK FOR OPERATING RATE, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 033 CONDITIONAL - COLUMN 29 - INVALID YEAR FOR OPERATING RATE
Meaning: The valid weeks per year are 00-52; however, an invalid value
does not cause the transaction to be rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
151
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 12
Release Date: 2/01/80
Update #: P-l
PCENETR 034 ERROR - COLUMN 29 - NON-NUMERIC YEAR FOR OPERATING RATE, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 035 ERROR - COLUMN 71 - NON-NUMERIC HEATED SPACE PERCENTAGE, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 036 CONDITIONAL - COLUMN 51 - SOURCE DESCRIPTION BLANK FOR ADD
TRANSACTION
Meaning: SCC's ending in 97, 98, or 99 require a non-blank source
description for an add transaction; however, a blank source
description does not cause the transaction to be rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 037 CONDITIONAL - COLUMN 64 - INVALID ECAP CODE
Meaning: The valid ECAP codes are 0, 1, 2, and blank; however, an
invalid code does not cause the transaction to be rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 038 ERROR - COLUMN 64 - NON-NUMERIC ECAP CODE, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
152
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 13
Release Date: 2/01/80
Update #: P-l
PCENETR 039 CONDITIONAL - COLUMN 53 - INVALID COMPLIANCE STATUS
Meaning: The only valid values for the compliance status are 1-4;
however, an invalid value does not cause the transaction to be
rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 040 ERROR - COLUMN 53 - NON-NUMERIC COMPLIANCE STATUS, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 041 CONDITIONAL - COLUMN 56 - COMMON STACK POINTS NOT BOTH BLANK FOR
ADD TRANSACTION
Meaning: One of the two points is blank and the other is non-blank;
however, this inconsistency does not cause the transaction
to be rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 042 CONDITIONAL - COLUMN 56 - 1ST COMMON STACK PT NOT LESS THAN 2ND
COMMON STACK PT
Meaning: The first point is not less than the second point; however,
the transaction was not rejected.
Action: The field can be corrected and the job resubrnitted, or the
master file record can be updated later using a change
transaction.
153
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 14
Release Date: 2/01/80
Update #: P-l
PCENETR 043 CONDITIONAL - COLUMN 14 - NEDS POINT ID NOT WITHIN COMMON STACK
POINTS
Meaning: The NEDS point ID does not fall within the two points specified
with common stack; however, the transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 044 CONDITIONAL - COLUMN 18 - INVALID THRUPUT PERCENTAGE SUM
Meaning: The thruput percentage should sum to 100%; however, the
transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 045 ERROR - COLUMN 18 - NON-NUMERIC THRUPUT PERCENTAGE, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 046 ERROR - COLUMN 66 - TSP ESTIMATION METHOD IS INVALID, CARD
REJECTED j
Meaning: The valid estimation methods are 0-7 or blank.
Action: Correct and resubmit the transaction.
PCENETR 047 ERROR - COLUMN 67 - S02 ESTIMATION METHOD IS INVALID, CARD
REJECTED
Meaning: The valid estimation methods are 0-7 or blank.
Action: Correct and resubmit the transaction.
154
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 15
Release Date: 2/01/80
Update #: P-l
PCENETR 048 ERROR - COLUMN 68 - NOX ESTIMATION METHOD IS INVALID, CARD
REJECTED
Meaning: The valid estimation methods are 0-7 or blank.
Action: Correct and resubmit the transaction.
PCENETR 049 ERROR - COLUMN 69 - HC ESTIMATION METHOD IS INVALID, CARD REJECTED
Meaning: The valid estimation methods are 0-7 and blank.
Action: Correct and resubmit the transaction.
PCENETR 050 ERROR - COLUMN 70 - CO ESTIMATION METHOD IS INVALID, CARD REJECTED
Meaning: The valid estimation methods are 0-7 and blank.
Action: Correct and resubmit the transaction.
PCENETR 051 ERROR - COLUMN 31 - TSP EMISSIONS ESTIMATE IS BLANK, CARD REJECTED
Meaning: An emissions estimate is required for methods 1, 2, 4, and 5.
Action: Correct and resubmit the transaction.
PCENETR 052 ERROR - COLUMN 38 - S02 EMISSIONS ESTIMATE IS BLANK, CARD REJECTED
Meaning: An emissions estimate is required for methods 1, 2, 4, and 5.
Action: Correct and resubmit the transaction.
PCENETR 053 ERROR - COLUMN 45 - NOX EMISSIONS ESTIMATE IS BLANK, CARD REJECTED
Meaning: An emissions estimate is required for methods 1, 2, 4, and 5.
Action: Correct and resubmit the transaction.
PCENETR 054 ERROR - COLUMN 52 - HC EMISSIONS ESTIMATE IS BLANK, CARD REJECTED
Meaning: An emissions estimate is required for methods 1, 2, 4, and 5.
Action: Correct and resubmit the transaction.
PCENETR 055 ERROR - COLUMN 59 - CO EMISSIONS ESTIMATE IS BLANK, CARD REJECTED
Meaning: An emissions estimate is required for methods 1, 2, 4, and 5.
Action: Correct and resubmit the transaction.
155
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 16
Release Date: 2/01/80
Update #: P-l
PCENETR 056 ERROR - COLUMN 31 - TSP EMISSIONS ESTIMATE INVALID, CARD REJECTED
Meaning: The emissions estimate is greater than 800,000.
Action: Correct and resubmit the transaction.
PCENETR 057 ERROR - COLUMN 38 - S02 EMISSIONS ESTIMATE INVALID, CARD REJECTED
Meaning: The emissions estimate is greater than 800,000.
Action: Correct and resubmit the transaction.
PCENETR 058 ERROR - COLUMN 45 - NOX EMISSIONS ESTIMATE INVALID, CARD REJECTED
Meaning: The emissions estimate is greater than 800,000.
Action: Correct and resubmit the transaction.
PCENETR 059 ERROR - COLUMN 52 - HC EMISSIONS ESTIMATE INVALID, CARD REJECTED
Meaning: The emissions estimate is greater than 800,000.
Action: Correct and resubmit the transaction.
PCENETR 060 ERROR - COLUMN 59 - CO EMISSIONS ESTIMATE INVALID, CARD REJECTED
Meaning: The emissions estimate is greater than 800,000.
Action: Correct and resubmit the transaction.
PCENETR 061 CONDITIONAL - COLUMN 31 - TSP EMISSIONS ESTIMATE OUT OF RANGE
Meaning: The emissions estimate is between 25,000 and 800,000; however,
the transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 062 CONDITIONAL - COLUMN 38 - S02 EMISSIONS ESTIMATE OUT OF RANGE
Meaning: The emissions estimate is between 25,000 and 800,000; however,
the transaction was not rejected.
156
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 17
Release Date: 2/01/80
Update $: P-l
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 063 CONDITIONAL - COLUMN 45 - NOX EMISSIONS ESTIMATE OUT OF RANGE
Meaning: The emissions estimate is between 25,000 and 800,000; however,
the transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 064 CONDITIONAL - COLUMN 52 - HC EMISSIONS ESTIMATE OUT OF RANGE
Meaning: The emissions estimate is between 25,000 and 800,000; however,
the transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 065 CONDITIONAL - COLUMN 59 - CO EMISSIONS ESTIMATE OUT OF RANGE
Meaning: The emissions estimate is between 25,000 and 800,000; however,
the transaction was not rejected.
Action: The field can be corrected and the job resubrnitted, or the
master file record can be updated later using a change
transaction.
PCENETR 066 CONDITIONAL - COLUMN 18 - TSP ALLOWABLE EMISSIONS OUT OF RANGE
Meaning: The allowable emissions were greater than 25,000; however,
the transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
157
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 18
Release Date: 2/01/80
Update #: P-l -
PCENETR 067 CONDITIONAL - COLUMN 25 - S02 ALLOWABLE EMISSIONS OUT OF RANGE
Meaning: The allowable emissions were greater than 25,000; however,
the transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 068 CONDITIONAL - COLUMN 32 - NOX ALLOWABLE EMISSIONS OUT OF RANGE
Meaning: The allowable emissions were greater than 25,000; however,
the transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 069 CONDITIONAL - COLUMN 39 - HC ALLOWABLE EMISSIONS OUT OF RANGE
Meaning: The allowable emissions were greater than 25,000; however,
the transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction. j
PCENETR 070 CONDITIONAL - COLUMN 46 - CO ALLOWABLE EMISSIONS OUT OF RANGE
Meaning: The allowable emissions were greater than 25,000; however,
the transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
•. &,?.
PCENETR 071 ERROR - COLUMN 18 - TSP ALLOWABLE EMISSIONS NON-NUMERIC, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
158
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCLNETR (EP0060)
Page 19
Release Date: 2/01/80
Update //: P-l
PCENETR 072 ERROR - COLUMN 25 - S02 ALLOWABLE EMISSIONS NON-NUMERIC, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 073 ERROR - COLUMN 32 - NOX ALLOWABLE EMISSIONS NON-NUMERIC, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 074 ERROR - COLUMN 39 - HC ALLOWABLE EMISSIONS NON-NUMERIC, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 075 ERROR - COLUMN 46 - CO ALLOWABLE EMISSIONS NON-NUMERIC, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 076 ERROR - COLUMN 72 - CONFIDENTIALITY OF 3 NOT ALLOWED, CARD
REJECTED
Meaning: The valid confidentiality codes are .1 and 2; 3 is rejected.
Action: Correct and resubmit the transaction.
PCENETR 077 CONDITIONAL - COLUMN 72 - INVALID CONFIDENTIALITY CODE
Meaning: The valid confidentiality codes are 1 and 2; however, the
transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
159
-------
LIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 20
Release Date: 2/01/80
Update #: P-l
PCENETR 078 ERROR - COLUMN 26 - NON-NUMERIC FUEL PROCESS RATE, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 079 ERROR - COLUMN 33 - NON-NUMERIC MAXIMUM DESIGN CAPACITY, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 080 ERROR - COLUMN 58 - INVALID COMPLIANCE UPDATE, CARD REJECTED
Meaning: This field must be numeric, with the month less than 13 and the
day less than 32.
Action: Correct and resubmit the transaction.
PCENETR 081 CONDITIONAL - COLUMN 58 - COMPLIANCE UPDATE GREATER THAN CURRENT
DATE
Meaning: The year must be greater than the option card year; however,
the transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PCENETR 082 ERROR - COLUMN 54 - INVALID COMPLIANCE SCHEDULE, CARD REJECTED
Meaning: This field must be numeric, with the month less than 13 and the
day less than 32.
Action: Correct and resubmit the transaction.
PCENETR 083 CONDITIONAL - COLUMN 54 - COMPLIANCE SCHEDULE NOT WITHIN 5 YEARS
Meaning: The compliance schedule year must not be more than the option
year plus 5; however, the transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
160
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 21
Release Date: 2/01/80
Update #: P-l
master file record can be updated later using a change
transaction.
PCENETR 084 ERROR - COLUMN 28 - NON-NUMERIC UTM VERTICAL, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubrnit the transaction.
PCENETR 085 ERROR - INVALID CHARACTER DETECTED IN BASE 36 CONVERSION ROUTINE,
CARD REJECTED
Meaning: In converting a point or plant ID, an invalid character was
encountered; only numbers and letters are allowed for these
fields.
Action: Correct and resubmit the transaction.
PCENETR 086 ERROR - COLUMN 24 - NON-NUMERIC UTM HORIZONTAL, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 087 ABORT - NO OPTION CARD PRESENT
Meaning: The option card is required.
Action: Include the option card and resubmit the job.
PCENETR 088 ABORT - NON-NUMERIC OPTION CONTROL DATE
Meaning: The date must be numeric.
Action: Correct the option card and resubmit the job.
PCENETR 089 CONDITIONAL - INVALID FLAGW OPTION, DEFAULT (NOFLAGW) ASSUMED
Meaning: The values allowed for the option are FLAGW and blank; the
default of no FLAGW was used.
Action: No action need be taken unless the warning messages are
required; in that case, correct the option card and resubmit
the job.
161
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 22
Release Date: 2/01/80
Update #: P-l
PCENETR 090 CONDITIONAL - INVALID LIST OPTION, DEFAULT (NOLIST) ASSUMED
Meaning: The values allowed for the option are LIST and blank; the
default of no LIST was used.
Action: No action need be taken unless listings of the files are
required; in that case, correct the option card and resubmit
the job.
PCENETR 091 ERROR - COLUMN 18 - NON-NUMERIC SCC CODE, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 092 ERROR - COLUMN 18 - UTM ZONE NOT NUMERIC, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 093 ERROR - COLUMN 80 - INVALID CARD NUMBER FOR DELETE, CARD REJECTED
Meaning: Only 1, 2, and 6 cards can have an action code of delete.
Action: Correct and resubmit the transaction.
PCENETR 094 ERROR - COLUMN 56 - INVALID POINTS WITH COMMON STACK, CARD
REJECTED
Meaning: The point ID's can contain numbers or letters; blanks cannot be
included.
Action: Correct and resubmit the transaction.
PCENETR 095 ERROR - COLUMN 23 - INVALID PRIMARY CONTROL EQUIP FOR TSP, CARD
REJECTED
Meaning: Valid control equipment codes can be found in Appendix A, Table
A-2.
Action: Correct and resubmit the transaction.
162
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
I
Page 23
Release Date: 2/01/80
Update #: P-l
PCENETR 096 ERROR - COLUMN 29 - INVALID PRIMARY CONTROL EQUIP FOR S02, CARD
REJECTED
Meaning: Valid control equipment codes can be found in Appendix A, Table
A-2.
Action: Correct and resubmit the transaction.
PCENETR 097 ERROR - COLUMN 35 - INVALID PRIMARY CONTROL EQUIP FOR NOX, CARD
REJECTED
Meaning: Valid control equipment codes can be found in Appendix A, Table
A-2.
Action: Correct and resubmit the transaction.
PCENETR 098 ERROR - COLUMN 41 - INVALID PRIMARY CONTROL EQUIP FOR HC, CARD
REJECTED
Meaning: Valid control equipment codes can be found in Appendix A, Table
A-2.
Action: Correct and resubmit the transaction.
PCENETR 099 ERROR - COLUMN 47 - INVALID PRIMARY CONTROL EQUIP FOR CO, CARD
REJECTED
Meaning: Valid control equipment codes can be found in Appendix A,
Table A-2.
Action: Correct and resubmit the transaction.
PCENETR 100 ERROR - COLUMN 26 - INVALID SECNDRY CONTROL EQUIP FOR TSP, CARD
REJECTED
Meaning: Valid control equipment codes can be found in Appendix A, Table
A-2.
Action: Correct and resubmit the transaction.
163
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 24
Release Date: 2/01/80
Update #: P-l
PCENETR 101 ERROR - COLUMN 32 - INVALID SECNDRY CONTROL EQUIP FOR S02, CARD
REJECTED
Meaning: Valid control equipment codes can be found in Appendix A, Table
A-2.
Action: Correct and resubmit the transaction.
PCENETR 102 ERROR - COLUMN 38 - INVALID SECNDRY CONTROL EQUIP FOR NOX, CARD
REJECTED
Meaning: Valid control equipment codes can be found in Appendix A, Table
A-2.
Action: Correct and resubmit the transaction.
PCENETR 103 ERROR - COLUMN 44 - INVALID SECNDRY CONTROL EQUIP FOR HC, CARD
REJECTED
Meaning: Valid control equipment codes can be found in Appendix A, Table
A-2.
Action: Correct and resubmit the transaction.
PCENETR 104 ERROR - COLUMN 50 - INVALID SECNDRY CONTROL EQUIP FOR CO, CARD
REJECTED
Meaning: Valid control equipment
codes can be found in Appendix A, Table
A-2.
Action: Correct and resubmit the transaction.
PCENETR 105 ERROR - COLUMN 53 - NON-NUMERIC EST CONTROL EFF FOR TSP, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
164
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 25
Release Date: 2/01/80
Update #: P-l
PCENETR 106 ERROR - COLUMN 56 - NON-NUMERIC EST CONTROL EFF FOR S02, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 107 ERROR - COLUMN 59 - NON-NUMERIC EST CONTROL EFF FOR NOX, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 108 ERROR - COLUMN 62 - NON-NUMERIC EST CONTROL EFF FOR HC, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 109 ERROR - COLUMN 65 - NON-NUMERIC EST CONTROL EFF FOR CO, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PCENETR 110 ERROR - TSP PRI CONT EQUIP AND EST EFF NOT BOTH BLANK FOR ADD,
CARD REJECTED
Meaning: Both or neither of the fields must be blank on an add
transaction.
Action: Correct and resubmit the transaction.
165
-------
CIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 26
Release Date: 2/01/80
Update #: P-l
PCENETR 111 ERROR - S02 PR I CONT EQUIP AND EST EFF NOT BOTH BLANK FOR ADD,
CARD REJECTED
Meaning: Both or neither of the fields must be blank on an add
transaction.
Action: Correct and resubmit the transaction.
PCENETR 112 ERROR - NOX PR I CONT EQUIP AND EST EFF NOT BOTH BLANK FOR ADD,
CARD REJECTED
Meaning: Both or neither of the fields must be blank on an add
transaction.
Action: Correct and resubmit the transaction.
PCENETR 113 ERROR - HC PRI CONT EQUIP AND EST EFF NOT BOTH BLANK FOR ADD,
CARD REJECTED
Meaning: Both or neither of the fields must be blank on an add
transaction.
Action: Correct and resubmit the transaction.
PCENETR 114 ERROR - CO PRI CONT EQUIP AND EST EFF NOT BOTH BLANK FOR ADD,
CARD REJECTED
Meaning: Both or neither of the fields must be blank on an add
transaction.
Action: Correct and resubmit the transaction.
166
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 27
Release Date: 2/01/80
Update #: P-l
4.3.3.5 Cataloged JCL - EPCET10
4.3.3.5.1 JCL listing - PCENETR (EP0060) can be run by executing the
cataloged procedure EPCET10, which also executes the NEDS transaction sort
program, PSRNETR (EP0050). See Figure 4.3.3-f for a listing of EPCET10.
4.3.3.5.2 Cross-reference of DP names and files
Program Name: PSRNETR (EP0050)
DD Name
File Description
Input/Output
EPSINPT
EPSOUTP
EPSDIAG
SORTWK01
NEDS transactions
Sorted NEDS transactions
Diagnostic report
Sort work file
Input
Output
Output
Internal
Program Name: PCENETR (EP0060)
DD Name
File Description
Input/Output
EPSTRAN
EPSOPTN
EPSINTR
EPSDIAG
EPSTRNL
EPSINTL
Sorted NEDS transactions
Option card
EIS/PS internal transactions
Diagnostic report
NEDS transaction listing
Internal transaction listing
Input
Input
Output
Output
Output
Output
167
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 28
Release Date: 2/01/80
Update #: P-l
4.3.3.5.3 User-supplied JCL - To execute the cataloged procedure CPCET10, the
user must supply the NEDS transactions, an option card, and the data set name
for the internal transaction file. See Figure 4.3.3-g for a description of
the procedure's substitutable parameters.
4.3.3.5.4 Sample run stream - The following run stream would sort, edit, and
convert NEDS transactions. A year of 80 is entered on the option card, and
LIST is specified. The default value is used for the internal transaction
data set name.
// EXEC EPCET10
//SORT.INPUT DD *
Transaction cards
//CONV.OPTIONS DD *
80 LIST
/*
4.3.3.6 Warninys and Special Instructions
• •!-
If the user chooses to ignore CONDITIONAL error messages, places the data
in his master file and does not correct the data 1n a later file maintenance
activity; he will receive warning messages for that data from NEDS when 1t is
submitted to NEDS.
4.3.3.7 Cost Considerations
To reduce the cost of running PCENETR (EP0060), use the default options
unless the listings are required.
168
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 29
Release Date: 2/01/80
Update #: P-l
The estimates listed below are based on the execution on an IBM 370/168
of the run stream discussed In Section 4.3.3.5.4:
Number of Input NEDS transactions:
Number of output Internal transactions:
CPU time:
I/O time:
Total Time:
Estimated cost:
4.3.3.8 Related Programs and Procedures
322 records
576 records
1.12 seconds
2.05 seconds
3.17 seconds
$.44
The cataloged procedure EPFMM20 can be executed to edit and convert NEDS
transactions and update the EIS/PS master file. See Section 4.4.4 for a
complete discussion of EPFMM20.
169
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
NEDS TRANSACTION - PI CARD
Column # Field Length Data Type
1-2 2
3-6 4
7-9 3
10-13 4
14-17 4
18-19 2
20-21 2
22 - 61 40
62 - 73 12
74 1
75-77 3
78 1
79 1
80 1
Numeric
Numeric
Numeric
Alphanumeric
Numeric
Numeri c
Numeri c
Alphanumeric
Alphanumeric
Alphabetic
Alphabetic
Alphabetic
Numeric
Page 30
Release Date: 2/01/80
Update #: P-l
Description
State
County
AQCR
Plant ID
City
UTM Zone
Year of Record
Name and Address
Contact
Ownership Code
Unused
Action Code
• p.
Card Number
(Page 1 of 8)
Figure 4.3.3-a. NEDS Transaction Formats
170 -
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 31
Release Date: 2/01/80
Update #: P-l
Column #
Field Length
1 -
3 -
7 -
10 -
14 -
16 -
18 -
22 -
24 -
28 -
33 -
37 -
40 -
44 -
51 -
56 -
60 -
2
6
9
13
15
17
21
23
27
32
36
39
43
50
54
55
59
77
78
79
80
2
4
3
4
2
2
4
2
4
5
4
3
4
7
4
1
4
18
1
1
1
NEDS TRANSACTION - P2 CARD
Data Type
Numeric
Numeric
Numeric
Alphanumeric
Alphanumeric
Numeri c
Numeric
Numeri c
Numeric
Numeric
Numeric
Numeric
Numeri c
Numeric
Numeric
Numeric
Alphabetic
Alphabetic
Numeric
Description
State
County
AQCR
Plant ID
Point ID
Year of Record
SIC
IPP
UTM Horizontal Coordinate
UTM Vertical Coordinate
Stack Height
Stack Diameter
Stack Temperature
Exhaust Flow Rate
Plume Height
Unused
Points with Common Stack
Unused
Action Code
• p.
Card Number
Figure 4.3.3-a - continued,
(Page 2 of 8)
NEDS Transaction Formats
171
-------
EIS/PS
FILE CREATION ANU
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
NEDS TRANSACTION - P3 CARD
Column # Field Length Data Type
1-2 2
3-6 4
7-9 3
10-13 4
14-15 2
16-17 2
18-22 5
23-25 3
26-28 3
29-31 3
32-34 3
35-37 3
38-40 3
41-43 3
44-46 3
47-49 3
Numeric
Numeric
Numeric
Alphanumeric
Alphanumeric
Numeric
Numeri c
Numeric
Numeri c
Numeric
Numeric
Numeri c
!
Numeric
Numeric
Numeric
Numeric
Page 32
Release Date: 2/01/80
Update #: P-l
Description
State
County
AQCR
Plant ID
Point ID
Year of Record
Boiler Design Capacity
Primary Control Equipment •
TSP
Secondary Control Equipmenl
TSP
Primary Control Equipment'
S02
Secondary Control Equipmenl
S02
Primary Control Equipment'
NOX
Secondary Control Equipmenl
NOX
Primary Control Equipment
HC
Secondary Control Equipment
HC
Primary Control Equipment
CO
(Page 3 of 8)
Figure 4.3.3-a - continued. NEDS Transaction Formats
172
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
NEDS TRANSACTION - P3 CARD
Column # Field Length Data Type
50-52 3
53-55 3
56-58 3
59-61 3
62-64 3
65-67 3
68 - 77 10
78 1
79 1
80 1
Numeric
Numeric
Numeric
Numeric
Numeri c
Numeric
Alphabetic
Alphabetic
Numeri c
Page 33
Release Date: 2/01/80
Update #: P-l
- continued.
Description
Secondary Control Equipment
CO
Estimated Control Efficiency
TSP
Estimated Control Efficiency
S02
Estimated Control Efficiency
NOX
Estimated Control Efficiency
HC
Estimated Control Efficiency
CO
Unused
Action Code
• p.
Card Number
. (Page 4 of 8)
Figure 4.3.3-a - continued. NEDS Transaction Formats
173
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
Column # Field Length
1-2 2
3-6 4
7-9 3
10-13 4
14-15 2
16-17 2
18-25 8
26-30 5
31-37 7
38-44 7
45-51 7
52-58 7
59-65 7
66 1
67 1
68 1
69 1
70 1
71-73 3
74-77 4
78 1
79 1
80 1
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
NEDS TRANSACTION - P4 CARD
Data Type
Numeric
Numeric
Numeric
Alphanumeric
Alphanumeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Alphabetic
Alphabetic
Numeric
Page 34
Release Date: 2/01/80
Update #: P-l
Description
State
County
AQCR
Plant ID
Point ID
Year of Record
Percentage Thruput
Operating Rate
Emissions Estimate - TSF
Emissions Estimate - SO;
Emissions Estimate - NO,
Emissions Estimate - HC
Emissions Estimate - CO
Estimation Method - TSP
Estimation Method - SOg
Estimation Method - NOX
Estimation Method - HC
Estimation Method - CO
Space Heat
Unused
Action Code
• p.
Card Number
Figure 4.3.3-a - continued.
(Page 5 of 8)
NEDS Transaction Formats
174
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 35
Release Date: 2/01/80
Update *: P-l
Column
Field Length
1 -
3 -
7 -
10 -
14 -
16 -
18 -
25 -
32 -
39 -
46 -
54 -
58 -
65 -
2
6
9
13
15
17
24
31
38
45
52
53
57
63
64
76
77
78
79
80
2
4
3
4
2
2
7
7
7
7
7
1
4
6
1
12
1
1
1
1
NEDS TRANSACTION - P5 CARD
Data Type
Numeric
Numeric
Numeric
Alphanumeric
Alphanumeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Alphabetic
Alphabetic
Numeric
Description
State
County
AQCR
Plant ID
Point ID
Year of Record
Allowable Emission - TSP
Allowable Emission - S02
Allowable Emission - NOX
Allowable Emission - HC
Allowable Emissiort - CO
Compliance Status
Compliance Schedule
Compliance Update
ECAP
Control Regulations
Unused
Action Code
• p.
Card Number
(Page 6 of 8)
Figure 4.3.3-a - continued. NEDS Transaction Formats
175
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
NEDS TRANSACTION - P6 CARD
Column # Field Length Data Type
1-2 2
3-6 4
7-9 3
10-13 4
14-15 2
16-17 2
18-25 8
26-32 7
33-39 7
40-42 3
43-45 3
46-50 5
51 - 70 20
71 1
72 1
73-77 5
78 1
79 1
80 1
Numeric
Numeric
Numeric
Alphanumeric
Alphanumeric
Numeric
Numeric
Numeric
Numeric
Numeri c
Numeri c
Numeric
Alphanumeric
Alphabetic
Numeric
Alphabetic
Alphabetic
Numeric
Page 36
Release Date: 2/01/80
Update #: P-l
Description
State
County
AQCR
Plant ID
Point ID
Year of Record
sec
Fuel Process Rate
Maximum Design Rate
Sulfur Content
Ash Content
Heat Content
Source Description
Source Code
Confidentiality
Unused
Action Code
• p.
Card Number
(Page 7 of 8)
Figure 4.3.3-a - continued. NEDS Transaction Formats
176
-------
EIS/PS
FILE CREATION AND .
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 37
Release Date: 2/01/80
Update #: P-l
Column #
1
3
7
10
14
16
18
26
2
6
9
13
15
17
25
77
78
79
80
Field Length
2
4
3
4
2
2
8
52
1
1
1
NEDS TRANSACTION - P7 CARD
Data Type
Numeric
Numeric
Numeric
Alphanumeric
Alphanumeric
Numeric
Numeric
Alphanumeric
Alphabetic
Alphabetic
Numeric
Description
State
County
AQCR
Plant ID
Point ID
Year of Record
SCC
Comment
Action Code
• p.
Card Number
(Page 8 of 8)
Figure 4.3.3-a - continued. NEDS Transaction Formats
177
-------
00
i
CO
•
CO
cr
at
to
i
o
JO
•s
o
I os rn f IS/MS cnim;M:IIMN-» m I I>HIK;MAM - utAf.nn.sfir
f'AM
PKIII.RAM NA"t! Pt.F.NFIM
i FVFLI i-no
Hi p.|
I>'CIIHI'U»ATfcl>| FFHRUAHY I, |9H1
OPTION
I INT Kill DA IF 18 »0 , tHKIIK HP II UN |M M. ACrl , LI Hi Ml* I I UN 19 I I SI
en FH
Oil) FKHIIH
*•* I'CFNFIR 00?
• *• PCFNF.M' 00^
• ** PCENKIM oo« KHHIIH
• »* »CFr*» TQ 005 FHRUH
••• I'CJNFI" 006 ENRIIP
no? THRUM
0|'l FHHlllf
OHS EHfiuw
OMS FKflim
OH* FHHIIR
**•
* * *
•*• PCFNfTR
*•• PCFNFTR
PCFNFIH oai EHRUR -
nun
CUl.UMN Ul - INVALID SMIF Cunt« CAM) HtJKTtn
Cl'UIMN OH - UllM-NUMl"IC rilMNlY t'lOF , (.M lT.ltr.IFI)
CIJHIMN n7 - INVALID AUCH C'IUF> LAKH in.iicifu
CllMIMN l R(..ltriFll
COLUMN RO - INVAI 10 raVIl NIIMHE.M, fAUD 1'tJtriM)
COLUMN 10 - INVALID PLAN? In, CARD NFJFCUD
rOLH^M t'l • INVALID PIIM! Til, CAni) injfCUO
INVAI in CHAMACIC* nturifi) IN MASt t*> cu«ivfMSMIN HOUUNI:, r.AHi) H
INVAI II) CHAHAtltM DtTFMFO IN I'ASt 56 rUNVFHnillN tMIIITlNh, CARD HFJFtH.D
INVAI in CHAHAt'H' nfitriFo iu MASK i'l CUNVFHAIIIN MODTINK, CAHO KFjFcTtn
iNVALin CMARACTFR otunn> IN HASK itNiHa*iip cunt
APrf
ii t II F
*** PlFNFIR 0|M niNUM TUNA) - CHI UMN iK • ll|U.vtP I 1C AL CMllHnlNAIF HUT OF HANP.f
*•* PCFNFIR Oi\ riiNutiUiNAi - rut UMN (7 - MACK DIAMFTF^ txcFfcn:) -H r~ oo
z m -^s,
H -o
m o co
5 5
•o
73
8
o
oo
co
m
o
-o m 4*
O ft •
m co co
~! *»^ •
m "o co
I 00
TO
m
- 50 -O
T3 n> a)
O. — < (O
fD fB
QJ
n>
oo
fD
a>
ro
o
co
00
-------
m
i— ,
oo
1MKIII NH)8 (MUNI miNKO.
Mlf t WANSAL I MlNS
I'AUb
la
^
•
CO
»
CO
o
•
CO
i
(/>
0»
o
a
(O
?*xxxxxxxxxxxXxx»xx)ixxxxxxxifxximxxxxvxx)i¥xxxxx»xxxyxxxyxxxxxxxxxKAPi
AiooAinotonoi
OHOun«?«oanoi
Afines MILLS
ilfi?.\ v?f»Kvo4A(«nolHn|A HO i» RH I JO. 6^ IIIR»t8 H
o«ny«o?«o«noioi 7hi'»blo^o760oos560ojonih»?r!5iin(40fl0ooooo onon
AHOOAo?uotiooioi /hononunooooioononooooooocionooonooiinonsnoniinooononoo
Abnono?uAbOOIui/62%292Si>SiiA95inAon)?HonoAoO(iooiuiAuAooannounnAuO(iniaaauHuo
OMOOMU?«n»n01ni 76 90<')9P9<»'4«>V9<»«l< KM. 139. A .
/73?M »77 »oo5«/nononononHnoniinonnnoMi nnun
77uoonuooooooAoonnonuAAAuAOAiioonnnonuniiiiii(Minonununuo
PI
AHAo*u?'JOMno?oi 77oflOAOA90ooiiAoooAoounoooni)Ooovnoni)no7
A7?Hni
1. 1 I Y
i
nMVItf/ t)
API
A>M
APrf
A«V
APS
Al>|
API
APJ>
AIM
API
AP<>
API
APA
APS
AP&
API
*»i
APJ
API
AP?
A*»i
AP«
APS
At***
API
AMI
ot/)
70
z >
•o z co
TO m rn
o o o
25 co -H
so >-<
"o m **
o I-H •
m co co
z -v. •
m tJ co
C= 3D -D
•a fD O)
O. —J IQ
oi ro o
rt- ai
n> w> co
a> (A
,. o
O)
ro
o
-------
00
o
ia
a>
4=>
•
CO
CO
I
ex
n>
-j
o<
o>
2
in
Oi
o
rt-
—i.
3
10
tlMTIf FIS/PS HASIEM FJLt IWANS»CHOt43 (INIEKNAL
OHOuna?iinoRuoonoiuni>ouoi)nononnnno6
fl80099?oooio0Qi2ii);>onsQ}oiinoooo?;>ioHOoo8;>4nftooi 7/inooni i OPOOSOSOOIHI 72oo3fc.r. II-AH MFG
n»ooon?ano«onoooioooi^i o?oobOiOOOO"00^3i OHOOOH^HOPOO 17100001 io?QOS0300F ooooo
OBflOOH?OOOHOOOOO?OOOOOOOOOno00000000001 10«noO«?q080u27700(l 1 HP". A.I JliNt S
OHOiiot}panoRonoou?oouoooonooonoouooo»QoplOHonoa?aoBOo?770ooct'JtRAL INC TAYLMK
OBOOOB?40UROn0002Q001
OHOOOM?400P-0000020001 1000000000000OQO l?l 080008240800? 7700001 0110 /0OP0OR00000 Sfco .00000001 771 031 1
OHov>82400'ono2onoi inooooononoooonoi3ionooo0240flOu?77ooui>i 11101 OOOUOQOOOO' 10000 ooooooi 3
OaOOOA?4QO"0000020AOI1000000000oOOOOOni0800082408002770flOOl«260? OOOOOOOQOO' '0000 3
OBOOO
I 10000000UOOOOOOOI31080008240800?/700001431I>1 02 1 0009900li'!000fl 9999999 3
I 1000000000000000H108000»»240{J002770000142101 0000000000'MOOOb 9999999 3
080oOB2400noOOOu2u0012tO?00']0300000002110800082408002/40000)1020050300 000001 '• 0000010000000001OHF
OBO008240OR00000700012102005030000000221OH0008240800274000011020050300 IB
OflOOOfl?400«00000?OrtOI2IO?0050300000(;02310»0(lOH?40>»0027'l00001 I020050300F 00000
OH0006?4 0 0«000 005000 00 00 0000 OUO 000000 01 1080008240800S/7000 1 «P
Ot«OOOe2400XOOOOU5000000oooflOOOOO000000210800082408005 77000GE''IF.HAL INC TAYLDK
OBOOOB?000«000005onoOOOOOOn(inoOn00000031080008240800577000
OnOOOtt2HOon;ai>no eohoin 1 r
OitnoftO;>40uAOOOnOOOOUOOOOflOOoOOOOOuOOOU?lflM008U240bOOO/'IOOOAi; SF.HV ADMIN AU LIMFST >>LT
OBOORO?a0080000000000000000 0000000 000031080080240^00074 000
OrtOOHO?400rt000000080llOoOOOOOOODOOOOnil lOH0080240t«OOfl/7uOo81 1422 064200603
OB0080?40080000OOuROl1OOOUOOOuOOOOOOO12 IOBOO«0240(iOOO7700081OOOOO000080(1000000 On$000007
0800HG240080000000HOI10000000000000i)0HIOHOO80240800077000^111101 0030006000OQOU31
OHOOHU24 0080000000* 01 !OUOUOl>OOOOOUOi)0|310oO(lMn240MO(lO/7uOOMia2t>02 000000000000000II
00004024 00"OOOOOOOAO 110000 OOOOO OOOOO 01 31 0«OOHOJ>4080007700i)fll4<>4il 1 OOOOOOOQOOnOOOOO
003R3
o
O)
n>
ro
^^^
o
oo
0
m
CO
CO
CO
m
o
-\
HH
O
^»
•
CO
CO
-o
CU
If)
n>
-t*
0
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 41
Release Date: 2/01/80
Update #: P-l
Column
#!•
YY
Co
umn
Column
#10
FLAGW
LIST
Note:
A two-digit year must be coded in columns 1-2 for editing purposes.
Figure 4.3.3-e. Option Card Format
181
-------
HIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 42
Release Date: 2/01/80
Update #: P-l
//* F I'Al Mli/ArtM? HH'1-.F I'F IH, U IIYI.i -1. (VlV) M1-S'I«M
//*
//* citiir.Fi'iir'F i«/n>'f : FPCi-ljn
//» I'l. V I S|IIU l_F Vt L ! 1 -00
//* HMF i i(;ni: F-HJIMIAKY 1, r>*o
//*
//• Ffilb F'UnI tl"IPt Al LHnS |H> H.iH< III CUfVlKF NKI'h MAUM' Flit
//» IKA,.•",„( | 11 n>'S III f IS/PS /-ASItP FILF |hrt"SAtl I"'IS A..HI lulu
//• Mill (HtSh |h AN.HAC. I JM JS
//*
//f PC i- r i n Phi ii. pwu.it r i ^ri.i.hi'
// Pl'lii;i rl'SMIU IK,
// MI'lil, ,> = !'( I "(. |l/f
//
//
//
I'l I. lU.J^r 1 HUM ,
I iMf 1=' I ,0',
I IMf ,»=• 1 »tl' ,
I'1',
//
//
//
//
/'/
//SUN I
//
//
:->F K I A| =ruii'ji'K ,
ill M'= ' Hf ,(. A || l
M (
I M-.I' = SYS|)A,
, J 0«
I I'iF =( Hf l"t I )
//* 3(ihl liFdS MASIFr- MI.F- F •< A'lS AC I I ilf'S |M||| F1U
//*
//SIH'IJI-. I'n 1/S-jAiiF =",P"i|Jtr I . .1 HAH,
// VIILHMF- =( Hi' I VA I» ,» F- I A ] r> ) ,
// |iJM'=(SI'U,rJA',ln
//sin')L I it nn u8i>/A.-if. =.si•*I.i>i'uTl l'<.
//*
I V.K O | !)ll II'' I I =*• I F "I*1.
,SCA( i =( IIVH , f ,..»iii.KMT ), ,rnii| n.)
//*
> Ml ) ,
S>'AC r =( T') )
// .>r AH = 1 1 »!• , f •.»•!!'•* SPf. ; , ,rn'j | 1 1. 1
|. I- II.
III" S
//*
//hi :; i '••(• i
//
)• irt1 f = I ji'ui
f i.ri'.l KS| /I r
(Page 1 of 3)
Figure 4.3.3-f. Cataloged Procedure EPCET10
II Ul' il(l | (In
Oil Oil H^li n
I) (; IMI II 4Hfi
'i H (HI II •! II 0
UllfXlOfiflll
i> ii o ii n /n n
(MIOUIIMIMI
(1 1 1 (HI t lldll
no on i i IMI
0(1 (Mil U'll
(I II (III I
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 43
Release Date: 2/01/80
Update I:' P-l
//• nilll'IM liAIA SM - SlIIMHi l«H.lS
/ft
//H'SiHIII1 nil OKIJA ,F slUSlll'IF |l,
// Uh | 1 =K. I F •(!',
// l»IM'=((ll"-i,HASS,|il I MM ,
// !,t'Arh = ( IKK, (-fVIM'k.SHD/KI SM
// «
//. IMIIt'UI HAIA SM - |)| A|,M|lS| |(. HFIMIKT
//»
//Ff'SIJt AH OH 3Y8IIII! =Kllll|
//»
//* MUIPIM I'll* .SMS - SVSlt" HHI-KAf Ill-l
//»
Ml> 1 KAJSAC I |IH' i
//*
//HYSiHH 1)1) .SYSH'l I=M/H |
//*
//SYSDIJllMI |>|» :.YljMilT=MIIM
'//*
//SlfSiJIfcfM l>() SVSM'iI=Ki|H[
//*
//SYSIIIU.IMP nu SY.Sii'J?=f.iiii|
//*
//»
txfc f'BH=*PMUii^f
//* riH'.VHd A.40 hull IKAMiiAt r i
//*
//SIMM 1H HI) DSNAjlFsAPUlMLri ..LIlAD,
s(l>H|VATl-rl|i USMAnF =C.*Si|M|Fll,
s MAS If I. Flllr |lv«'-i.SA( ! Kins
//* |,(t>nr OAIA sit - HIM HIM r:
//*
hi) lillNAiiEsllPII'l.iS,
//•
//• HI.IIPMI |iAI« SM - M)UFl> MS/I'S MA.'ilh" F 1 1. 1
//«
//Fl'.Sji-i II' l(n I'SNA-'I suHWil.lK. I . ,1'AI A./,l'Jli«lHrif
// i/MLlhif =(»'M| Vfllf ,KF f « |"',Sk f =^.in<|
// nl :i'' = ( F )
IMUlilS / HI II
iHIOil'i'»0(l
110'MMilHH)
/On
IIIMI(I<>(UUI
Oil Hi) t\ 'Ml
Oilflil / .S'HI
ililiiil /-nil)
iMi(iu7/On
nilfni f / 0 II
i) ii n (i u^ (MI
OIMUIM|
IMMI |H/Hii
Oil 0|(1 MM II
OilO I OVDll
ii ii (i ) I ii on
UD ( i
(Page 2 of 3)
Figure 4.3.3-f - continued. Cataloged Procedure EPCET10
183
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 44
Release Date: 2/01/80
Update #: P-l
//* H(,1MI| IjAIA SKT - NK'i.S MAHTfW Fill. I P Af-SAt fj '''4 LI-SlI'JIj
//*
//FI'SMM 00 3YSiit)T = Kiilir
//»
//* llllThMII DfllA Sf 1 - flS/t'S HflSUM f II h iNimM/M rcA.4SACI1l.IM I ISM II.
//*
//F»'S|W|L f'H ,SY3"li1=f (I'll
//*
//» Mlir^HI l,A|/\ SKT.") - SYSlI* Ml-'f-KAf Tufa
//*
r Oh .SYti"tir
//s> s
On .sYs
.SYilMjTrMHU
0001
nnni
.mill
400
'I III!
Son
h'll)
ooo
OllOJ?500
nuOi?7ni)
(Page 3 of 3)
Figure 4.3.3-f - continued. Cataloged Procedure EPCET10
184
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 45
Release Date: 2/01/80
Update #: P-l
Parameter
Name
PROJECT
PROG1
PROG2
Default
Value
'CN.EPALMH.A087,
CDHS.HQ.PNT'
PSRNETR
PCENETR
TIME1
TIME2
UNIT
'1,0'
'1,0'
3330
SERIAL
DISP
SPCUNIT
PRIMARY
SECNDRY
INTRTRN
OUT
CDHSPK
'NEW,CATLG,
DELETE1
TRK
20
10
EPINTERN
A
Description
Highest-level index of data set names (e.g.,
CN.EPALMH.A087.CDHS.HQ.PNT.DATA.EPMASTR would
be the full data set name of the EIS/PS master
file)
NEDS transaction sort program
NEDS to EIS/PS master file transaction
conversion-edit program
Time allocated for execution of PSRNETR
Time allocated for execution of PCENETR
Unit type to which internal transactions
are to be written
Volume identification to which internal
transactions are to be written
Disposition of internal transactions
Units in which space for internal
transactions is to be allocated
Primary space allocation for internal
transactions
Secondary space allocation for internal
transactions
Lowest-level index of data set to contain
internal transactions
SYSOUT class for all print files
(Page 1 of 2)
Figure 4.3.3-g. Substitutable Parameters for EPCET10
185
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.3
NEDS TO EIS/PS
PROGRAM PCENETR (EP0060)
Page 46
Release Date: 2/01/80
Update #: P-l
Parameter
Name
REGION1
REGION2
TEMP
WORKSPC
Default
Value
150K
100K
SYSDA
'20,10'
Description
Region size allocated for execution of PSRNETR
Region size allocated for execution of PCENETR
Unit to be allocated for temporary files
Space to be allocated for sort work files
(Page 2 of 2)
Figure 4.3.3-g - continued. Substitutable Parameters for EPCET10
*•
186
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.4
TRANSACTION SORT PROGRAM
PSRMFTR (EP0070)
Page 1
Release Date: 2/01/80
Update #: P-l
4.3.4 MASTER FILE TRANSACTION SORT PROGRAM - PSRMFTR (EP0070)
4.3.4.1 Description
PSRMFTR (EP0070) sorts EIS/PS master file transactions into the sequence
required by the master file transaction edit program, PEDMSTR (EP0080); Figure
4.3.4-a details this sort order. All master file transactions must be sorted
by PSRMFTR (EP0070) before they can be edited by the master file transaction
edit program. See Section 4.3.5 for additional information on the master file
transactions.
4.3.4.2 File Formats
Input to this program consists solely of EIS/PS master file transactions.
Refer to Figure 4.3.5-a for a description of the master file transaction
formats.
PSRMFTR (EP0070) produces two output files: a diagnostic report and a
temporary file containing the sorted master file transactions. The sorted
transactions are in the correct sequence for use as input to the master file
transaction edit program, PEDMSTR (EP0080). An example of the diagnostic
report is shown in Figure 4.3.4-b.
4.3.4.3 Options and Control Cards
There are no options.
187
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.4
TRANSACTION SORT PROGRAM
PSRMFTR (EP0070)
Page 2
Release Date: 2/01/80
Update #: P-l
4.3.4.4 Error Messages
There are no error messages.
4.3.4.5 Cataloged JCL
PSRMFTR (EP0070) should always be executed in conjnction with the master
file transaction edit program, PEDMSTR (EP0080). See Section 4.3.5.5 for a
discussion of the cataloged procedure EPEDT10, which executes both programs.
4.3.4.6 Warnings and Special Instructions
Note that the COBOL sort verb is used in this program; therefore, the
collating sequence for alphanumeric fields is determined by the computer at
the user's particular installation. '
In addition to the diagnostic reort produced by PSRMFTR (EP0070),
messages generated by the sort-merge package will be printed. The format and
content, as well as the physical location, of these messages depend upon the
user's particular installation.
4.3.4.7 Cost Considerations
The following estimates are for the execution of PSRMFTR (EP0070) on an
IBM 370/168:
188
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.4
TRANSACTION SORT PROGRAM
PSRMFTR (EP0070)
Page 3
Release Date: 2/01/80
Update #: P-l
Number of master file transactions:
CPU time:
I/O time:
Total time:
Estimated cost:
239 records
1.31 seconds
1.63 seconds
2.94 seconds
$.41
4.3.4.8 Related Programs and Procedures
PSRMFTR (EP0070) should always be executed in conjunction with the master
file transaction edit program, PEDMSTR (EP0080). The cataloged procedure
EPEDT10 executes both programs.
The cataloged procedure EPEMM10 can be executed to sort master file
transactions, edit the transactions, re-sort, insert emission factors into the
transactions, re-sort, and update (or create) the emission factor file with
the transactions. See Section 4.4.3 for a complete description of this
procedure.
189
-------
EIS/PS
FILE CREATION
AND MAINTENANCE
SECTION 4.3.4
TRANSACTION SORT PROGRAM
PSRMFTR (EP0070)
Page 4
Release Date: 2/01/80
Update #: P-l
Record Position
1 -
3 -
7 -
10 -
19 -
21 -
21 -
23 -
78 -
2
6
9
13
20
78
28
22
25
26
79
80
Description
State
County
AQCR
Plant ID
Point ID
Segment Type
SCC
PNR Sequence Number
Line Number
Comment Flag
Card Number
Action Code
Sort Sequence
Ascendiny
Ascending
Ascending
Ascending
Ascending
Ascending
Ascending
Ascending
Ascending
Ascending
Ascending
Ascending
Figure 4.3.4-a. Sort Sequence for EIS/PS Master File Transactions
190
-------
tIS/PS MASIF.H FILF IHANSACTJUN SUM I PRUGKAM - DIAGNOSTIC RtPURf
PAGt
PRDRfJAH NAMF: PSHMf-TH (FP0070)
KFvisruN itVLL: i-oo
LAS I UPDATE *t P-l
TNCURPDHAIFD: FbKHUARY i,
NUMHFK Uf- INPUT TNAKSAC I IUNS!
NUH8FK IJF nUTPUl I«ANSACTIOHS:
259
Figure 4.3.4-b. Diagnostic Report
m
rn
3> O
CO
-a
co
-o —I
CO 50
•n co i-<
—t > o
50 o z
o •
-O 2 CO
O •
O CO -P»
^J O
50
o
o
20
U
•h
D
tfc
50
fD
fl>
O
QJ
C+
ro
• •
ro
o
oo
o
O)
ua
n>
-------
L IS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 1
Release Date: 02/01/80
Update #: P-l
4.3.5 MASTER FILE TRANSACTION EDIT PROGRAM - PEDMSTR (EP0080)
4.3.5.1 Description
The EIS/PS master file can be created and updated using EIS/PS input
transactions. These transactions can be either add, delete, or change. The
master file transaction edit program edits the input transactions and converts
those that pass the edit criteria into internal transactions. The internal
transactions can be sorted and input to the master file internal transaction
emission factor insertion program, PMSEFIN (EP0100), and the master file
maintenance program, PFMMSTR (EP0120). There are 14 different transaction
formats (see Figure 4.3.5-a). A description of the transaction fields is given
in Figure 4.3.5-b. The format of the internal transactions is given in Figure
4.3.5-c. Load sheets for the transactions are shown in Appendix C.
A sort program, PSRMFTR (EP0070), is provided to sort the input
transactions prior to executing PEDMSTR (EP0080). Having the transactions
sorted facilitates checking the results of the edit by grouping transactions
for an individual plant, point, SCC, etc. However, the editing of a
transaction is done independently of all other transactions. That is, if
transactions 01, 02, and 03 are entered to add a plant, and the 02 transaction
is rejected by the edit, the 01 and 03 transactions will be output as valid
internal transactions. If the file maintenance program was run at that time,
the absence of the 02 card would cause the rejection of the plant addition.
Thus, it is recommended that the edit be run alone until all transactions are
correct; the insertion and file maintenance can then be run.
The transaction edit checks correspond to the NEDS point source edit
checks, as documented by NADB, for fields that are used by NEDS. In addition,
the EIS/PS fields are edited. Figure 4.3.5-b gives information on valid codes
192
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 2
Release Date: 02/01/80
Update f; P-l
for the fields and references additional information sources. Further
information on NEDS point source coding can be found in AEROS Manual Series,
Volume II: AEROS User's Manual, Section 3.1.2.
A key is added to the input record format to form an internal transaction
(see Figure 4.3.5-c). In this key, the four-character alphanumeric plant ID is
changed to an eight-character numeric field. This is done so that numeric
plant ID's will occur at the beginning of the file on all computers; i.e., the
first plant in a county is 0001, not AAAA. Likewise, the two-character
alphanumeric NEDS point ID is changed to a four-character numeric field. Use
of this technique allows generated reports to be produced with all plant, point
information appearing together and in proper sequence even though alphanumeric
plant/point ID's may have been coded by the user.
4,3.5.2 File Formats
Two files are input to PEDMSTR (EP0080): the input transaction file and
an option card. See Figure .4.3.5-a for the transaction formats and Figure
4.3.5-b for a description of the fields. The options are discussed in the
following section.
PEDMSTR (EP0080) produces a diagnostic report and a file containing
internal transactions. The output internal transactions are in the format
required for input to the master file internal transaction emission factor
insertion program, PMSEFIN (EP0100), and the master file maintenance program,
PFMMSTR (EP0120). However, each of these programs requires that the
transactions be sorted; that is, the master file internal transaction
pre-insertion sort program, PSREFIN (EP0090), must be run prior to executing
PMSEFIN (EP0100), and the master file internal transaction sort program,
193
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 3
Release Date: 02/01/80
Update #: P-l
PSRINTR (EP0110), must be run prior to executing PFMMSTR (EP0120). Figure
4.3.5-c illustrates the format of the internal transactions.
The diagnostic report contains a listing of the input transactions found
to be in error. Each incorrect field is underlined with a B in the beginning
column of the field and an E in the ending column. A corresponding error
message is also printed. The listing does not contain information on warning
messages unless requested on the option card. The diagnostic report also lists
the summary statistics. See Figure 4.3.5-d for an example of the diagnostic
report.
PEDMSTR (EP0080) also produces optional listings of the ihput transactions
and of the output internal transactions. Figures 4.5.3-e and 4.5.3-f show
examples of these listings. Further information can be found in the discussion
of options in the following section.
4.3.5.3 Options and Control Cards
An option card is required for PEDMSTR (EP0080). This card must contain a
year date, which is used to validate dates on the transactions. No date
(except compliance schedule) is allowed to be greater than the option card
date.
The FLAGW option allows the user to request that warning messages be
listed in the diagnostic report. A warning message indicates that an EIS/PS
field contains questionable data which is not rejected. Transactions which-
have been flagged with warnings will be printed in the diagnostic report only
if FLAGW is specified. A value of NOFLAGW or no entry in the field (default
of NOFLAGW) indicates that warning messages will not be printed in the
diagnostic report.
194
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 4
Release Date: 02/01/80
Update #: P-l
The LIST option allows the user to request that listings of the input
transactions and of the output internal transactions be produced. If the value
NOLIST or no entry appears in the field, no listings of these files will be
produced.
If no option card is included in the execution deck, an ABORT message will
be printed and program execution will be terminated. The year must be valid
for the program to be executed; however, default values of NOLIST and NOFLAGW
will be used when invalid specifications are encountered in these fields.
4.3.5.4 Error Messages
PEDMSTR 001 ABORT - NO OPTION CARD PRESENT
Meaning: The option card is required.
Action: Include an option card and resubmit the job.
PEDMSTR 002 ABORT - NON-NUMERIC YEAR ON OPTION CARD
Meaning: This field must be numeric.
Action: Correct the option card and resubmit the job.
PEDMSTR 003 CONDITIONAL - INVALID FLAGW OPTION, DEFAULT (NOFLAGW) ASSUMED
Meaning: The only valid values are FLAGW and NOFLAGW. The default,
NOFLAGW, is assumed.
Action: No action need be taken unless the warning messages are
required; in that case, correct the option card and resubmit
the job.
PEDMSTR 004 CONDITIONAL - INVALID LIST OPTION, DEFAULT (NOLIST) ASSUMED
Meaning: The only valid values are LIST and NOLIST; therefore, the
default, NOLIST, is assumed.
195
-------
EIS/PS
FILi: CREATION AND
MAINTENANCE:
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 5
Release Date: 02/01/80
Update #: P-l
Action: No action need be taken unless the file listings are required;
in that case, correct the option card and resubmit the job.
PEDMSTR 005 ERROR - COLUMN 1 - INVALID STATE CODE, CARD REJECTED
Meaning: The valid codes are 01-55.
Action: Correct and resubmit the transaction.
PEDMSTR 006 ERROR - COLUMN 03 - NON-NUMERIC COUNTY CODE, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 007 ERROR - COLUMN 07 - INVALID AQCR, CARD REJECTED
Meaning: The valid AQCR's are 001-247.
Action: Correct and resubmit the transaction.
PEDMSTR 008 ERROR - COLUMN 10 - INVALID PLANT-ID, CARD REJECTED
Meaning: The plant ID must contain only numbers and/or letters; no blanks
can be included.
Action: Correct and resubmit the transaction.
PEDMSTR 009 ERROR - COLUMN 19 - INVALID POINT-ID, CARD REJECTED
Meaning: The point ID must contain only numbers and/or letters; no blanks
can be included.
Action: Correct and resubmit the transaction.
PEDMSTR 010 ERROR - COLUMN 21 - NON-NUMERIC SCC NUMBER, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR Oil ERROR - COLUMN 29 - NON-NUMERIC SCC SEGMENT NUMBER, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
196
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 6
Release Date: 02/01/80
Update #: P-l
PEDMSTR 012 ERROR - COLUMN 21 - NON-NUMERIC PNR SEQUENCE NUMBER, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 013 ERROR - COLUMN 23 - NON-NUMERIC PNR LINE NUMBER, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 014 ERROR - COLUMN 78 - INVALID TRANSACTION CARD NUMBER, CARD REJECTED
Meaning: The valid codes are 01, 02, 03, 04 (plant); 11, 12, 13, 14
(point); 21, 22, 23, 24, 25 (SCC); and 30 (comment).
Action: Correct and resubmit the transaction.
PEDMSTR 015 ERROR - COLUMN 80 - INVALID ACTION TYPE, CARD REJECTED
Meaning: The valid codes are A (add), C (change), and D(delete).
Action: Correct and resubmit the transaction.
PEDMSTR 016 WARNING - COLUMN 14 - INVALID DATE SPECIFIED, CARD REJECTED
Meaning: This field must be numeric and the day must be 001-366.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 017 CONDITIONAL - COLUMN 14 - YEAR SPECIFIED IS GREATER THAN OPTION
YEAR
Meaning: The year must not be greater than the year specified on the
option card.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
197
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 7
Release Date: 02/01/80
Update #: P-l
PEDMSTR 018 CONDITIONAL - COLUMN 36 - INVALID CITY SPECIFIED
Meaning: This field must be numeric; however, the transaction was not
rejected. :
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 019 ERROR - COLUMN 40 - NON-NUMERIC UTM ZONE NUMBER, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 020 CONDITIONAL - COLUMN 40 - UTM ZONE NUMBER OUT OF RANGE
Meaning: Valid UTM zones can be found in Appendix A, Table A-l.
The transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 021 CONDITIONAL - COLUMN 40 - UTM ZONE NUMBER BLANK FOR ADD TRANSACTION
Meaning: The UTM zone is required for an add transaction; however, the
transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 022 CONDITIONAL - COLUMN 42 - INVALID OWNERSHIP CODE
Meaning: The valid codes are P, S, L, U, and F; however, the transaction
was not rejected.
198 *
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 8
Release Date: 02/01/80
Update #: P-l
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 023 ERROR - COLUMN 58 - NON-NUMERIC TELEPHONE NUMBER, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 024 ERROR - COLUMN 19 - NAME/ADDRESS FIELD BLANK FOR ADD TRANSACTION,
CARD REJECTED
Meaning: This field is required for an add transaction.
Action: Correct and resubmit the transaction.
PEDMSTR 025 ERROR - COLUMN 67 - NON-NUMERIC NUMBER OF EMPLOYEES, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 026 CONDITIONAL - COLUMN 71 - NON-NUMERIC PROPERTY AREA
Meaning: This field must be numeric; however, the transaction was not
rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 027 CONDITIONAL - COLUMN 24 - SIC CODE BLANK FOR ADD TRANSACTION
Meaning: This field is required for an add transaction; however, the
transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
199
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 9
Release Date: 02/01/80
Update #: P-l
PEDMSTR 028 CONDITIONAL - COLUMN 24 - NON-NUMERIC SIC CODE
Meaning: This field must be numeric; however, the transaction was not
rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 029 ERROR - COLUMN 28 - NON-NUMERIC IPP CODE, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 030 ERROR - COLUMN 30 - NON-NUMERIC UTM - HORIZONTAL CODE, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 031 CONDITIONAL - COLUMN 30 - UTM - HORIZONTAL CODE OUT OF RANGE
Meaning: The valid codes can be found in Appendix A, Table A-l. The
transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 032 CONDITIONAL - COLUMN 30 - UTM - HORIZONTAL CODE BLANK FOR ADD
TRANSACTION
Meaning: This field is required on an add transaction; however, the
transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
200
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 10
Release Date: 02/01/80
Update #: P-l
PEDMSTR 033 ERROR - COLUMN 34 - NON-NUMERIC UTM - VERTICAL CODE, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 034 CONDITIONAL - COLUMN 34 - UTM - VERTICAL CODE OUT OF RANGE
Meaning: The valid codes can be found in Appendix A, Table A-l. The
transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 035 CONDITIONAL - COLUMN 34 - UTM - VERTICAL CODE BLANK FOR ADD
TRANSACTION
Meaning: This field is required on an add transaction; however, the
transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 036 ERROR - COLUMN 39 - NON-NUMERIC LATITUDE, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 037 ERROR - COLUMN 45 - NON-NUMERIC LONGITUDE, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 038 ERROR - COLUMN 52 - NON-NUMERIC ANNUAL THRUPUT PERCENTAGE, CARD
REJECTED
Meaning: This field must be numeric.
201
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 11
Release Date: 02/01/80
Update #: P-l
Action: Correct and resubmit the transaction.
PEDMSTR 039 CONDITIONAL - COLUMN 60 - INVALID DAY FOR OPERATING RATE
Meaning: The hours per day must be 00-24; however, the transaction was
not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 040 ERROR - COLUMN 65 - NON-NUMERIC BOILER DESIGN CAPACITY, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 041 ERROR - COLUMN 70 - NON-NUMERIC HEATED SPACE PERCENTAGE, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 042 ERROR - COLUMN 21 - NON-NUMERIC STACK HEIGHT, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 043 ERROR - COLUMN 25 - NON-NUMERIC STACK DIAMETER, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
202
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 12
Release Date: 02/01/80
Update #: P-l
PEDMSTR 044 CONDITIONAL - COLUMN 25 - STACK DIAMETER EXCEEDS 20 PERCENT OF THE
STACK HEIGHT
Meaning: The stack diameter must be less than 20% of the stack height;
however, the transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 045 ERROR - COLUMN 28 - NON-NUMERIC STACK TEMPERATURE, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 046 CONDITIONAL - COLUMN 28 - STACK TEMPERATURE LESS THAN 77 OR GREATER
THAN 2000
Meaning: The temperature must be 77°-2000° F; however, the transaction
was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 047 ERROR - COLUMN 32 - NON-NUMERIC EXHAUST FLOW RATE, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 048 ERROR - COLUMN 39 - NON-NUMERIC VELOCITY, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
203
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 13
Release Date: 02/01/80
Update #: P-l
PEDMSTR 049 ERROR - COLUMN 44 - NON-NUMERIC PLUME HEIGHT, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 050 CONDITIONAL - COLUMN 44 - PLUME HEIGHT IS GREATER THAN 200
Meaning: The plume height must be less than 200; however, the transaction
was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 051 ERROR - COLUMN 48 - INVALID POINTS WITH COMMON STACK, CARD REJECTED
Meaning: The point ID's must contain letters or numbers; no blanks are
allowed.
Action: Correct and resubmit the transaction.
PEDMSTR 052 CONDITIONAL - COLUMN 48 - 1ST POINT GREATER THAN OR EQUAL TO 2ND
POINT
Meaning: The first point with common stack must be less than the second
point; however, the transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 053 CONDITIONAL - COLUMN 52 - INVALID COMPLIANCE STATUS
Meaning: The valid codes are 1-4; however, the transaction was not
rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
204
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 14
Release Date: 02/01/80
Update #: P-l
PEDMSTR 054 ERROR - COLUMN 53 - INVALID COMPLIANCE SCHEDULE , CARD REJECTED
Meaning: This field must be numeric with the month less than 13.
Action: Correct and resubmit the transaction.
PEDMSTR 055 CONDITIONAL - COLUMN 53 - YEAR OF COMPLIANCE SCHEDULE NOT WITHIN 5
YEARS
Meaning: The year of compliance schedule must not be greater than the
option year plus 5; however, the transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 056 ERROR - COLUMN 57 - INVALID YEAR OF COMPLIANCE UPDATE, CARD
REJECTED
Meaning: The field must be numeric with the month between 00 and 12 and
the day between 00 and 31.
Action: Correct and resubmit the transaction.
PEDMSTR 057 CONDITIONAL - COLUMN 57 - YEAR OF COMPLIANCE UPDATE GREATER THAN
OPTION YEAR
Meaning: The year of compliance update must not be greater than the
option year; however, the transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 058 ERROR - COLUMN 60 - NON-NUMERIC DAY FOR OPERATING RATE, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
205
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 15
Release Date: 02/01/80
Update #: P-l
PEDMSTR 059 ERROR - COLUMN 21 - NON-NUMERIC POLLUTANT ID, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 060 ERROR - COLUMN 26 - NON-NUMERIC CONTROL EQUIPMENT COST, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 061 ERROR - COLUMN 33 - INVALID PRIMARY CONTROL EQUIPMENT, CARD
REJECTED
Meaning: The valid codes can be found in Appendix A, Table A-2.
Action: Correct and resubmit the transaction.
PEDMSTR 062 ERROR - PRIMARY EQUIP AND EST CONTROL EFF NOT BOTH BLANK FOR ADD,
CARD REJECTED
Meaning: Both the primary control equipment and the estimated control
efficiency, or neither, must be blank for an add transaction.
Action: Correct and resubmit the transaction.
PEDMSTR 063 ERROR - COLUMN 36 - INVALID SECONDARY CONTROL EQUIPMENT, CARD
REJECTED
Meaning: The valid codes can be found in Appendix A, Table A-2.
Action: Correct and resubmit the transaction.
PEDMSTR 064 ERROR - COLUMN 39 - NON-NUMERIC ESTIMATED CONTROL EFFICIENCY, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
206
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 16
Release Date: 02/01/80
Update #: P-l
PEDMSTR 065 ERROR - COLUMN 42 - NON-NUMERIC EMISSIONS ESTIMATE, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 066 ERROR - COLUMN 42 - EMISSION ESTIMATE TOO LARGE
Meaning: The emissions estimate must not be greater than 800,000 tons.
Action: Correct and resubmit the transaction.
PEDMSTR 067 ERROR - COLUMN 42 - EMISS. EST. REQUIRED FOR METHODS 2, 4, 5; CARD
REJECTED
Meaning: Estimation codes 2, 4, and 5 require an estimated emissions.
Action: Correct and resubmit the transaction.
PEDMSTR 068 ERROR - COLUMN 49 - NON-NUMERIC MEASURED EMISSIONS, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 069 ERROR - COLUMN 56 - NON-NUMERIC ALLOWABLE EMISSIONS, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 070 WARNING - COLUMN 63 - NON-NUMERIC EMISSIONS UNITS CODE
Meaning: This field must be numeric; however, the transaction was not
rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
207
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 17
Release Date: 02/01/80
Update #: P-l
PCDMSTR 071 ERROR - COLUMN 64 - INVALID ESTIMATION METHOD, CARD REJECTED
Meaning: The valid codes are 0-7 and blank.
Action: Correct and resubmit the transaction.
PEDMSTR 072 WARNING - COLUMN 65 - NON-NUMERIC TEST METHOD
Meaning: This field must be numeric; however, the transaction was not
rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 073 WARNING - COLUMN 31 - NON-NUMERIC BEC CODE
Meaning: This field must be numeric; however, the transaction was not
rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 074 WARNING - COLUMN 36- NON-NUMERIC FUEL UNITS CODE
Meaning: This field must be numeric; however, the transaction was not
rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 075 ERROR - COLUMN 37 - NON-NUMERIC FUEL PROCESS RATE, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
208
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTfl (EP0080)
Page 18
Release Date: 02/01/80
Update #: P-l
PEDMSTR 076 ERROR - COLUMN 44 - NON-NUMERIC MAXIMUM DESIGN RATE, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 077 ERROR - COLUMN 51 - NON-NUMERIC SULFUR CONTENT, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 078 ERROR - COLUMN 54 - NON-NUMERIC ASH CONTENT, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 079 ERROR - COLUMN 57 - NON-NUMERIC HEAT CONTENT, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 080 CONDITIONAL - COLUMN 31 - INVALID CONFIDENTIALITY, REPLACING WITH 1
Meaning: The valid codes are 1 and 2; however, the transaction was not
rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 081 ERROR - COLUMN 31 - CONFIDENTIALITY OF 3 IS NOT ALLOWED, CARD
REJECTED
Meaning: The valid codes are 1 and 2.
Action: Correct and resubmit the transaction.
209
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 19
Release Date: 02/01/80
Update #: P-l
PEDMSTR 082 ERROR - COLUMN 63 - INVALID ECAP, CARD REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 083 ERROR - COLUMN 62 - INVALID ASH/SULFUR ORIGIN, CARD REJECTED
Meaning: The valid codes are F (federal), S (state), and L (local).
Action: Correct and resubmit the transaction.
PEDMSTR 084 ERROR - COLUMN 33 - FIRST POLLUTANT ID IS NON-NUMERIC, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 085 ERROR - COLUMN 38 - FIRST EMISSION FACTOR IS NON-NUMERIC, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 086 CONDITIONAL - COLUMN 47 - FIRST ASH/SULFUR CODE IS INVALID
Meaning: The valid codes are A (ash), S (sulfur) and blank; however,
the transaction was not rejected.
Action: The field can be corrected and the job resubnn'tted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 087 WARNING - COLUMN 48 - FIRST EMISSION FACTOR UNITS CODE IS
NON-NUMERIC
Meaning: This field must be numeric; however, the transaction was not
rejected.
210 ..
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 20
Release Date: 02/01/80
Update #: P-l
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 088 ERROR - COLUMN 49 - SECOND POLLUTANT ID IS NON-NUMERIC, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 089 ERROR - COLUMN 54 - SECOND EMISSION FACTOR IS NON-NUMERIC, CARD
REJECTED
Meaning: This field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 090 CONDITIONAL - COLUMN 63 - SECOND ASH/SULFUR CODE IS INVALID
Meaning: The valid codes are A (ash), S (sulfur), and blank; however,
the transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 091 WARNING - COLUMN 64 - SECOND EMISSION FACTOR UNITS CODE IS
NON-NUMERIC
Meaning: This field must be numeric; however, the transaction was not
rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
211
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 21
Release Date: 02/01/80
Update #: P-l
PEDMSTR 092 ERROR - COLUMN 78 - INVALID CARD NUMBER FOR DELETE, CARD REJECTED
Meaning: The valid delete transactions are 01, 11, 13, 21, 23, and 30.
Action: Correct and resubmit the transaction.
PEDMSTR 093 CONDITIONAL - COLUMN 52 - INVALID THRUPUT SUM
Meaning: Thruput should sum to 100%; however, the transaction was not
rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 094 CONDITIONAL - COLUMN 21 - STACK HEIGHT LESS THAN ZERO OR GREATER
THAN 500
Meaning: The valid stack height is 0-500 feet; however, the transaction
was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 095 CONDITIONAL - COLUMN 63 - INVALID ECAP CODE
Meaning: The valid codes are 0, 1, and 2; however, the transaction was
not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 096 ERROR - COLUMN 26 - INVALID COMMENT FLAG, CARD REJECTED
Meaning: The valid codes are L (left) and R (right).
Action: Correct and resubmit the transaction.
212
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 22
Release Date: 02/01/80
Update #: P-l
PEDMSTR 097 CONDITIONAL - COLUMN 56 - ALLOWABLE EMISSIONS OUT OF RANGE
Meaning: The field is greater than 25,000; however, the transaction was
not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 098 ERROR - INVALID CHARACTER DETECTED IN CONVERSION ROUTINE, CARD
REJECTED
Meaning: In converting a point or plant ID, an invalid character was
encountered. Only numbers and letters are allowed for these
fields.
Action: Correct and resubmit the transaction.
PEDMSTR 099 CONDITIONAL - COLUMN 33 - SOURCE DESCRIPTION BLANK FOR SCC 97,
98, OR 99
Meaning: A source description is required for add transactions for SCC's
ending in 97, 98, or 99; however, the transaction was not
rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 100 CONDITIONAL - NEDS POINT ID NOT WITHIN COMMON STACK POINTS
Meaning: The NEDS point ID must lie between the common stack points;
however, the transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
213
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 23
Release Date: 02/01/80
Update #: P-l
PEDMSTR 101 CONDITIONAL - COLUMN 42 - ESTIMATED EMISSIONS BETWEEN 25,000 AND
800,000
Meaning: The value is expected to be below 25,000; however, the
transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 102 ERROR - COLUMN 19 - NAME/ADDRESS FIELD CANNOT BE DELETED, CARD
REJECTED
Meaning: This field cannot be deleted.
Action: Correct and resubmit the transaction.
PEDMSTR 103 ERROR - COLUMN 33 - SOURCE DESCRIPTION CANNOT BE DELETED, CARD
REJECTED
Meaning: This field cannnot be deleted.
Action: Correct and resubmit the transaction.
PEDMSTR 104 ERROR - NON-KEY FIELDS NOT BLANK FOR DELETE, CARD REJECTED
Meaning: All non-key fields are required to be blank on a delete
transaction (this is to insure that records are not deleted by
mistake).
Action: Correct and resubmit the transaction.
PEDMSTR 105 ERROR - COLUMN 63 - INVALID ASH/SULFUR SOURCE, CARD REJECTED
Meaning: Source codes of F, S, or L are not allowed; all other letters
and numbers are accepted.
Action: Correct and resubmit the transaction.
214
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 24
Release Date: 02/01/80
Update #: P-l
PEDMSTR 106 ERROR - COLUMN 31 - INVALID EMF ORIGIN, CARD REJECTED
Meaning: Valid codes are F (federal), S (state), and L (local).
Action: Correct and resubmit the transaction.
PEDMSTR 107 ERROR - COLUMN 32 - INVALID EMF SOURCE, CARD REJECTED
Meaning: Source codes of F, S, or L are not allowed; all other letters
and numbers are accepted.
Action: Correct and resubmit the transaction.
PEDMSTR 108 - CONDITIONAL - COLUMN 62 - INVALID WEEK FOR OPERATING RATE
Meaning: The day per week is expected to be 0 thru 7; however, the
transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 109 ERROR - COLUMN 62 - NON-NUMERIC WEEK FOR OPERATING RATE, CARD
REJECTED
Meaning: The field must be numeric.
Action: Correct and resubmit the transaction.
PEDMSTR 110 - CONDITIONAL - COLUMN 63 - INVALID YEAR FOR OPERATING RATE
Meaning: The weeks per year is expected to be 0 thru 52; however, the
transaction was not rejected.
Action: The field can be corrected and the job resubmitted, or the
master file record can be updated later using a change
transaction.
PEDMSTR 111 ERROR - COLUMN 63 - NON-NUMERIC YEAR FOR OPERATING RATE, CARD
REJECTED
Meaning: The field must be numeric.
Action: Correct and resubmit the transaction.
215
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 25
Release Date: 02/01/80
Update #: P-l
4.3.5.5 Cataloged JCL - EPEDT10
4.3.5.5.1 JCL listing - PEDMSTR (EP0080) can be run by executing the cataloged
procedure EPEDT10. This procedure also executes the master file transaction
sort program, PSRMFTR (EP0070). See Figure 4.3.5-h for a listing of EPEDT10.
4.3.5.5.2 Cross-reference of DP names and files
Program Name: PSRMFTR (EP0070)
DD Name
File Description
Input/Output
EPSINPT
EPSOUTP
EPSDIAG
SORTWK01
Master file transactions
Sorted master file transactions
Diagnostic report
Sort work file
Input
Output
Output
Internal
Program Name: PEDMSTR (EP0080)
DD Name
File Description
Input/Output
EPSTRAN
EPSOPTN
EPSINTR
EPSDIAG
EPSTRNL
EPSINTL
Sorted master file transactions Input
Option card Input
Internal transactions Output
Diagnostic report Output
Input transaction listing Output
Output internal transaction listing Output
4.3.5.5.3 User-supplied JCL - To execute the cataloged procedure EPEDT10, the
user must specifiy the data set name of the internal transaction file. An
option card must be included. See Figure 4.3.5-i for a description of the
procedure's substitutable parameters.
216
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 26
Release Date: 02/01/80
Update #: P-l
4.3.5.5.4 Sample run stream - The following run stream would edit input
transactions entered on cards. A year of 80 is specified, along with the
default options NOLIST and NOFLAGW. The data set name for the internal
transactions is 'CN.EPALMH.A087.CDHS.HQ.PNT.DATA.INTRNS1.
// EXEC EPEDT10,
// INTRTRN=INTRNS
//SORT.INPUT DD *
Transaction cards
//EDIT.OPTIONS DD *
80
/*
4.3.5.6 Warnings and Special Instructions
See warning for PCENETR.
4.3.5.7 Cost Considerations
To reduce the cost of running PEDMSTR (EP0080), use the default options
NOLIST and NOFLAGW.
The estimates listed below are based on the execution, on an IBM 370/168,
of the run stream discussed in Section 4.3.5.5.4:
Number of input transactions: 239 transactions
Number of output internal transactions: 236 transactions
CPU time: .8 seconds
I/O time: 1.37 seconds
217
-------
LIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 27
Release Date: 02/01/80
Update #: P-l
Total time:
2.23 seconds
Estimated cost:
$.31
4.3.5.8 Related Programs and Procedures
The cataloged procedure EPEMM10 can be executed to edit the EIS/PS
transactions, insert emission factor information into the transactions, sort
thei.i, and update the master file. See Section 4.4.3 for a complete description
of this procedure.
218
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 28
Release Date: 02/01/80
Update #: P-l
EIS/PS Master File Transaction - 01 Card
Column #
Field Length
Data Type
Description
1 -
3 -
7 -
10 -
14 -
19 -
22 -
24 -
36 -
40 -
43 -
58 -
68 -
78 -
2
6
9
13
18
21
23
35
39
41
42
57
67
77
79
80
2
4
3
4
5
3
2
12
4
2
1
15
10
10
2
1
Numeric
Numeric
Numeric
Alphanumeric
Numeric
Alphanumeric
Alphanumeric
Alphanumeric
Numeric
Numeric
Alphabetic
Alphanumeric
Numeri c
Alphanumeric
Numeric
Alphabetic
State
County
AQCR
Plant ID
Date
User Control Region
Local Control
User Plant ID
City
UTM Zone
Ownership Code
Contact
Telephone
Principal Product
Card Number
Action Code
(Page 1 of 14)
Figure 4.3.5-a. EIS/PS Master File Transaction Formats
219
-------
EIS/PS
FUJI CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 29
Release Date: 02/01/80
Update #: P-l
EIS/PS Master File Transaction - 02 Card
Column #
Field Length
1 -
3 -
7 -
10 -
14 -
19 -
67 -
71 -
78 -
2
6
9
13
18
66
70
76
77
79
80
2
4
3
4
5
48
4
6
1
2
1
Data Type
Numeric
Numeric
Numeric
Alphanumeric
Numeric
Alphanumeric
Numeric
Numeric
Numeric
Alphabetic
Description
State
County
AQCR
Plant ID
Date
Name and Address
Number of Employees
Property Area
Unused
Card Number
Action Code
(Page 2 of 14)
Figure 4.3.5-a - continued. EIS/PS Master File Transaction Formats
220
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 30
Release Date: 02/01/80
Update #: P-l
EIS/PS Master File Transaction - 03 Card
Column #
Field Length
Data Type
Description
1
3
7
10
14
19
67
78
2
6
9
13
18
66
77
79
80
2
4
3
4
5
48
11
2
1
Numeric
Numeric
Numeric
Alphanumeric
Numeric
Alphanumeric
Numeric
Alphabetic
State
County
AQCR
Plant ID
Date
Mailing Address
Unused
Card Number
Action Code
(Page 3 of 14)
Figure 4.3.5-a - continued. EIS/PS Master File Transaction Formats
221
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 31
Release Date: 02/01/80
Update #: P-l
EIS/PS Master File Transaction - 04 Card
Column #
Field Length
Data Type
Description
1
3
7
10
14
19
71
78
2
6
9
13
18
70
77
79
80
2
4
3
4
5
52
7
2
1
Numeric
Numeri c
Numeric
Alphanumeric
Numeric
Alphanumeric
Numeric
Alphabetic
State
County
AQCR
Plant ID
Date
NEDS P7 Plant Comment
Unused
Card Number
Action Code
(Page 4 of 14)
Figure 4.3.5-a - continued. EIS/PS Master File Transaction Formats
222 .
-------
E IS/PS
FILE CREATION
MAINTENANCE
AND
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
E IS/PS Master File Transaction - 11
Column #
1 - 2
3 - 6
7 - 9
10 - 13
14 - 18
19 - 20
21 - 23
24 - 27
28 - 29
30 - 33
34 - 38
39 - 44
45 - 51
52 - 59
60 - 64
65 - 69
70 - 72
73 - 77
78 - 79
80
Field Length
2
4
3
4
5
2
3
4
2
4
5
6
7
8
5
5
3
5
2
1
Data Type
Numeric
Numeric
Numeric
Alphanumeric
Numeric
Alphanumeric
Alphanumeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Alphabetic
Page 32
Release Date: 02/01/80
Update #: P-l
Card
Description
State
County
AQCR
Plant ID
Date
NEDS Point ID
User Point ID
SIC Code
IPP Code
UTM Horizontal Coordinate
UTM Vertical Coordinate
Latitude
Longitude
Percentage Annual Thruput
Normal Operating Rate
Boiler Design Capacity
Space Heat Percentage
Unused
Card Number
Action Code
(Page 5 of 14)
Figure 4.3.5-a - continued. EIS/PS Master File Transaction Formats
223
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 33
Release Date: 02/01/80
Update #: P-l
EIS/PS Master File Transaction - 12 Card
Column #
Field Length
1 -
3 -
7 -
10 -
14 -
19 -
21 -
25 -
28 -
32 -
39 -
44 -
48 -
53 -
57 -
64 -
76 -
78 -
2
6
9
13
18
20
24
27
31
38
43
47
51
52
56
62
63
75
77
79
80
2
4
3
4
5
2
4
3
4
7
5
4
4
1
4
6
1
12
2
2
1
Data Type
Numeric
Numeric
Numeric
Alphanumeric
Numeric
Alphanumeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Alphanumeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Alphabetic
Description
State
County
AQCR
Plant ID
Date
NEDS Point ID
Stack Height
Stack Diameter
Stack Temperature
Exhaust Flow Rate
Velocity
Plume Height
Points with Common Stack
Compliance Status
Compliance Schedule
Compliance Update
ECAP
Control Regulations
Unused
Card Number
Action Code
(Page 6 of 14)
Figure 4.3.5-a - continued. EIS/PS Master File Transaction Formats
224
-------
EIS/PS
FILE CREATION
MAINTENANCE
AND
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
EIS/PS Master File Transaction - 13
Column #
1 - 2
3 - 6
7 - 9
10 - 13
14 - 18
19 - 20
21 - 25
26 - 32
33 - 35
36 - 38
39 - 41
42 - 48
49 - 55
56 - 62
63
64
65
66 - 77
78 - 79
80
Field Length
2
4
3
4
5
2
5
7
3
3
3
7
7
7
1
1
1
12
2
1
Data Type
Numeric
Numeric
Numeric
Alphanumeric
Numeric
Alphanumeric
Numeric
Numeric
Numeric
Numeri c
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeri c
Numeric
Alphabetic
Page 34
Release Date: 02/01/80
Update #: P-l
Card
Description
State
County
AQCR
Plant ID
Date
NEDS Point ID
Point Pollutant ID
Control Equipment Cost
Primary Control Equipment
Secondary Control Equipment
Estimated Control Efficiency
Estimated Emissions
Measured Emissions
Allowable Emissions
Emissions Units
Estimation Method
Test Method
Unused
Card Number
Action Code
(Page 7 of 14)
Figure 4.3.5-a - continued. EIS/PS Master File Transaction Formats
225
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 35
Release Date: 02/01/80
Update #: P-l
EIS/PS Master File Transaction - 14 Card
Column #
Field Length.
Data Type
Description
1
3
7
10
14
19
21
73
78
2
6
9
13
18
20
72
77
79
80
2
4
3
4
5
2
52
5
2
1
Numeric
Numeric
Numeric
Alphanumeric
Numeric
Alphanumeric
Alphanumeric
Numeric
Alphabetic
State
County
AQCR
Plant ID
Date
NEDS Point ID
NEDS P7 Point Comment
Unused
Card Number
Action Code
(Page 8 of 14)
Figure 4.3.5-a - continued. EIS/PS Master File Transaction Formats
226
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 36
Release Date: 02/01/80
Update #: P-l
EIS/PS Master File Transaction - 21 Card
Column #
Field Length
Data Type
Description
1 -
3 -
7 -
10 -
14 -
19 -
21 -
29 -
31 -
37 -
44 .
51 -
54 -
57 -
64 -
78 -
2
6
9
13
18
20
28
30
35
36
43
50
53
56
61
62
63
77
79
80
2
4
3
4
5
2
8
2
5
1
7
7
3
3
5
1
1
14
2
1
Numeric
Numeric
Numeric
Alphanumeric
Numeric
Alphanumeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Alphabetic
Alphabetic
Numeric
Alphabetic
State
County
AQCR
Plant ID
Date
NEDS Point ID
SCC
SCC Sequence Number
BEC Code
Fuel Units
Fuel Process Rate
Maximum Design Rate
Sulfur Content
Ash Content
Heat Content
Ash-Sulfur Origin
Ash-Sulfur Source
Unused
Card Number
Action Code
(Page 9 of 14)
Figure 4.3.5-a - continued. EIS/PS Master File Transaction Formats
227
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 37
Release Date: 02/01/80
Update #: P-l
EIS/PS Master File Transaction - 22 Card
Column #
Field Length
1 -
3 -
7 -
10 -
14 -
19 -
21 -
29 -
33 -
53 -
78 -
2
6
9
13
18
20
28
30
31
32
57
77
79
80
2
4
3
4
5
2
8
2
1
1
25
20
2
1
Data Type
Numeric
Numeric
i
Numeric
Alphanumeric
Numeric
Alphanumeric
Numeric
Numeric
Numeric
Alphabetic
Alphanumeric
Numeric
Alphabetic
Description
State
County
AQCR
Plant ID
Date
NEDS Point ID
SCC
SCC Sequence Number
Confidentiality
Source Code
Source Description
Unused
Card Number
Action Code
(Page 10 of 14)
Figure 4.3.5-a - continued. EIS/PS Master File Transaction Formats
228
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 38
Release Date: 02/01/80
Update #: P-l
EIS/PS Master File Transaction - 23 Card
Column #
Field Length
1
3
7
10
14
19
21
29
33
38
49
65
78
- 2
- 6
- 9
- 13
- 18
- 20
- 28
- 30
31
32
- 37
- 46
47
48
- 64
- 77
- 79
80
2
4
3
4
5
2
8
2
1
1
5
9
1
1
16
13
2
1
Data Type
Numeric
Numeric
Numeric
Alphanumeric
Numeric
Alphanumeric
Numeric
Numeric
Alphabetic
Alphanumeric
Numeric
Numeri c
Alphabetic
Numeric
Numeric
Alphabetic
Description
State
County
AQCR
Plant ID
Date
NEDS Point ID
SCC
SCC Sequence Number
EMF Origin
EMF Source
SCC Pollutant ID
Emission Factor
Ash-Sulfur Code
EMF Units
Repeat Column 33 - 48
Unused
Card Number
Action Code
(Page 11 of 14)
Figure 4.3.5-a - continued. EIS/PS Master File Transaction Formats
229
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 39
Release Date: 02/01/80
Update #: P-l
EIS/PS Master File Transaction - 24 Card
Column #
Field Length
Data Type
Description
1 -
3 -
7 -
10 -
14. -
19 -
21 -
29 -
31 -
57 -
78 -
2
6
9
13
18
20
28
30
56
77
79
80
2
4
3
4
5
2
8
2
26
21
2
1
Numeric
Numeric
Numeric
Alphanumeric
Numeric
Alphanumeric
Numeric
Numeric
Alphanumeric
Numeri c
Alphabetic
State
County
AQCR
Plant ID
Date
NEDS Point ID
SCC
SCC Sequence Number
NEDS P7 SCC Comment
(Left Half)
Unused
Card Number
Action Code
(Page 12 of 14)
Figure 4.3.5-a - continued. EIS/PS Master File Transaction Formats
230
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 40
Release Date: 02/01/80
Update #: P-l
EIS/PS Master File Transaction - 25 Card
Column #
Field Length
Data Type
1 -
3 -
7 -
10 -
14 -
19 -
21 -
29 -
31 -
57 -
78 -
2
6
9
13
18
20
28
30
56
77
79
80
2
4
3
4
5
2
8
2
26
21
2
1
Numeric
Numeric
Numeric
Alphanumeric
Numeric
Alphanumeric
Numeri c
Numeric
Alphanumeric
Numeric
Alphabetic
Description
State
County
AQCR
Plant ID
Date
NEDS Point ID
SCC
SCC Sequence Number
NEDS P7 SCC Comment
(Right Half)
Unused
Card Number
Action Code
(Page 13 of 14)
Figure 4.3^5-a - continued. EIS/PS Master File Transaction Formats
231
-------
EIS/PS
FILE CREATION
MAINTENANCE
AND
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 41
Release Date: 02/01/
Update #: P-l
EIS/PS Master File Transaction - 30 Card
Column #
1 - 2
3 - 6
7 - 9
10 - 13
14 - 18
19 - 20
21 - 22
23 - 25
26
27 - 77
78 - 79
80
Field Length
2
4
3
4
5
2
2
3
1
51
2
1
Data Type Description
Numeric State
Numeric County
Numeric AQCR
Alphanumeric Plant ID
Numeric Date
Alphanumeric NEDS Point ID
Numeric PNR Sequence Number
Numeric PNR Line Number
Alphabetic Comment Flag
Alphanumeric Comment
Numeric Card Number
Alphabetic Action Code
(Page 14 of 14)
Figure 4.3.5-a - continued. EIS/PS Master File Transaction Formats
232
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 42
Release Date: 2/01/80
Update #: P-l
Action Code: Indicates whether the transaction is an add, change, or delete
transaction.
Card Number: All transactions
Valid Codes: A - Add
C - Change
D - Delete
Field Length: 1 character
Allowable Emissions: The maximum emissions, in tons per year, that the source
is legally allowed to discharge into the atmosphere.
Card Number: 13
Valid Codes: The fields must be numeric. Values above 25,000 will cause
a conditional diagnostic message to be printed.
Field Length: 7 characters
AQCR: Identifies the Air Quality Control Region (AQCR) in which the plant is
located. Valid AQCR's for each state can be found in AEROS Manual
Series, Volume V: AEROS Manual of Codes, Section 2.3.0.
Card Number: All transactions
Valid Codes: 001 - 247
Field Length: 3 characters
Ash Content: The ash content for combustion processes. The ash content is
indicated as a weight percentage.
Card Number: 21
Valid Codes: The field must be numeric.
Field Length: 3 characters with one decimal position assumed
(Page 1 of 21)
Figure 4.3.5-b. Definition of EIS/PS Master File Transaction Fields
233
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 44
Release Date: 2/01/80
Update #: P-l
Ash-Sulfur Code: Indicates whether or not the ash or sulfur contents are to
be used in the calculation of the estimated emissions.
Card Number: 23
Valid Codes: A - Ash
S - Sulfur
Field Length: 1 character
Ash-Sulfur Origin: Indicates the origin of the emission factor information
related to the SCC.
Card Number: 21
Valid Codes: F - Federal
S - State
L - Local
Field Length: 1 character
Ash-Sulfur Source: A user-defined code to specify individual local emission
factor information.
Card Number: 21
Field Length: 1 character
BEC Code: The first three characters indicate the basic equipment
classification code. The last two characters are used to number
units at the same source.
Card Number: 21
Valid Codes: The field must be numeric. A listing of BEC codes can be
found in the Air Pollution Manual of Coding, A Coding
System for Identification of Basic Equipment and Control
Devices Used in Industrial Processes, Peter Loquercio and
Figure 4.3.5-b - continued.
Transaction Fields
(Page 2. of 21)
Definition of EIS/PS Master File
234
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 45
Release Date: 2/01/80
Update i: P-l
Stanley, U. S. Dept. of HEW, Public Health Service,
National Center for Air Pollution Control, 1968.
Field Length: 5 characters
Boiler Design Capacity: The boiler input capacity before heat transfer.
Units are in millions of BTU per hour. Zero should be used for
points not containing a boiler. Note that a boiler is defined as a
burner, firebox, or heat exchanger, and a means of creating and
directing a flow of gases through the unit.
Card Number: 11
Valid Codes: The field must be numeric.
Field Length: 5 characters
Card Number: The card number of the transaction.
Card Number: All transactions
Valid Codes: 01, 02, 03, 04, 11, 12, 13, 14, 21, 22, 23, 24, 25, 30
Field Length: 2 characters
City: The SAROAD code number corresponding to the city in which the
source is located.
Card Number: 01
Valid Codes: Refer to the AEROS Manual Series, Volume 5: AEROS Manual
of Codes, Section 2.2.0 for a full list of city codes. If
the city is not listed or the plant is not in a city,
leave the field blank.
Field Length: 4 characters
Comment: Contains a portion of a line for the permits and registration
information.
(Page 3 of 21)
Figure 4.3.5-b - continued. Definition of IIS/PS Master File
Transaction Fields
235
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 46
Release Date: 2/01/80
Update I; P-l
Card Number: 30
Field Length: 51 characters
Comment Flag: Indicates the left (L) or right (R) half of a comment line.
Each half contains 51 characters.
Card Number: 30
Valid Codes: L - Left half
R - Right half
Field Length: 1 character
Compliance Schedule: The year and month by which the source must be in
compliance. Used for sources with compliance status of 2 or 3 (not
in compliance).
Card Number: 12
Valid Codes: The field must be numeric. The year (first two characters)
must not be more than 5 years greater than the year
entered on the option card.
Field Length: 4 characters
Compliance Status: Indicates the present status of the source under existing
legislation.
Card Number: 12
Valid Codes: 1 - Source is in compliance with existing legislation.
2 - Source is not in compliance, and no variance has been
given.
3 - Source is not in compliance, but a variance has been
given.
4 - Compliance status is unknown.
Field Length: 1 character
(Page 4 of 21)
Figure 4.3.5-b - continued. Definition of EIS/PS Master File
Transaction Fields
236
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 47
Release Date: 2/01/80
Update #: P-l
Compliance Update: Indicates the date (year, month, and day) of the most
recent change in the compliance status of the source. The field
should be blank for sources with compliance status of 4 (unknown).
Card Number: 12
Valid Codes: The field must be numeric. The year (first two characters)
must not be greater than the year entered on the option
card.
Field Length: 6 characters
Confidentiality: Indicates whether or not data for this source is considered
confidential; that is, not to be released to the public.
Card Number: 22
Valid Codes: 1 - Source is confidential.
2 - Source is not confidential.
Field Length: 1 character
Contact: The last name of the person responsible for the pollution control
activity at the source. If an individual is not identified,
a position title should be given.
Card Number: 01
Field Length: 15 characters
Control Equipment Cost: The annual cost of maintenance and operation of
pollution control equipment.
Card Number: 13
Valid Codes: The field must be numeric.
Field Length: 7 characters with 2 decimal positions assumed
(Page 5 of 21)
Figure 4.3.5-b - continued. Definition of EIS/PS Master File
. . • - **
Transaction Fields
237
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 48
Release Date: 2/01/80
Update #: P-l
Control Regulations: Identifies the air pollution control regulations that
are in effect and apply to the source.
Card Number: 12
Valid Codes: The field must be numeric.
Field Length: 12 characters
County: The county code associated with the source.
Card Number: All transactions
Valid Codes: Refer to the AEROS Manual Series, Volume V: AEROS Manual
of Codes, Section 2.2.0 for a complete list of county
codes.
Field Length: 4 characters
Date: The Julian date of the information recorded in the transaction. The
format is YYDDD, where YY represents the year and ODD represents the
day.
Card Number: All transactions
Valid Codes: The year (first two characters) must not be greater than
the option date year. The day must be between 000 and 366.
Field Length: 5 characters
ECAP: Indicates the status of the ECAP (emergency control action program) for
the source.
Card Number: 12
Valid Codes: 0 - ECAP is not required
1 - ECAP required but not submitted
2 - ECAP has been submitted
(Page 6 of 21)
Figure 4.3.5-b - continued. Definition of EIS/PS Master File
Transaction Fields
238 *
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 49
Release Date: 2/01/80
Update *: P-l
Field Length: 1 character
EMF Origin: Indicates the origin of the emission factor information.
Card Number: 23
Valid Codes: F - Federal
S - State
L - Local
Field Length: 1 character
EMF Source: A user-defined code to specify individual local emission factor
information.
Card Number: 23
Field Length: 1 character
EMF Units: This field is not used at present; in the future this field will
allow emission factors to be coded in units other than the NEDS
units.
Card Number: 23
Field Length: 1 character
Emission Factor: A statistical average of the rate at which a pollutant is
released into the atmosphere as a result of some activity.
Card Number: 23
Valid Codes: The field must be numeric. The emission factors for each
SCC can be found in Compilation of Air Pollutant Emission
Factors, EPA Publication No. AP-42.
Field Length: 9 characters with 3 decimal positions assumed
Figure 4.3.5-b - continued.
Transaction Fields
(Page 7 of 21)
Definition of'EIS/PS Master File
239
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 50
Release Date: 2/01/80
Update #: P-l
Emissions Units: This field is not used at present; in the future this field
will allow emissions to be coded in units other than the NEDS units.
Card Number: 13
Field Length: 1
Estimated Control Efficiency: The overall collection efficiencies in weight
percentage of all control equipment at the source. Assume that the
pollutant load entering the control equipment is the normal,
uncontrolled quantity for that specific process.
Card Number: 13
Valid Codes: The field must be numeric.
Field Length: 3 characters with one decimal position assumed
Estimated Emissions: The annual, controlled emissions from the point source
in tons per year.
Card Number: 13
Valid Codes: The field must be numeric. Values under 25,000 tons
per year are valid. Values between 25,001 and 800,000 tons
per year cause a conditional message to be printed but are
accepted. Values above 800,000 are rejected.
Field Length: 7 characters
Estimation Method: Indicates the method used to ascertain the estimated
emissions.
Card Number: 13
Valid Codes: 0 - Not applicable (emissions are negligible)
1 - Stack test results or other emission measurement
2 - Material balance
(Page 8 of 21)
Figure 4.3.5-b - continued. Definition of EIS/PS Master File
Transaction Fields
240
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 51
Release Date: 2/01/80
Update #: P-l
3 - Calculated using the Federal emission factor
4 - Guess
5 - Calculated using a special emission factor
other than that given for the SCC
6 - New construction, not yet operational
7 - Facility closed, operations ceased
Field Length: 1 character
Exhaust Flow Rate: The total volume in cubic feet per minute of exhaust gas
released at the operating temperature and normal atmospheric
pressure. The value is given in cubic feet per minute. Design or
maximum exhaust-gas volume can be used if actual measurements are
not available.
Card Number: 12
Valid Codes: The field must be numeric.
Field Length: 7 characters
Fuel Process Rate: The average annual fuel, process, or solid waste operating
rate. The emission factor file prescribes the units to be used for
each SCC.
Card Number: 21
Valid Codes: The field must be numeric.
Field Length: 7 characters
Fuel Units: This field is not used at the present time. Future expansion of
the system will allow the user to specify the fuel process rate in
units other than the NEDS units.
(Page 9 of 21)
Figure 4.3.5-b - continued. Definition of EIS/PS Master File
Transaction Fields
241
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 52
Release Date: 2/01/80
Update #: P-l
Card Number: 21
Field Length: 1 character
Heat Content: The heat content for combustion processes, specified in
millions of BTU per SCC.
Card Number: 21
Valid Codes: The field must be numeric.
Field Length: 5 characters
IPP Code: Identifies the implementation planning program process (IPP).
Card Number:
Valid Codes:
Field Length:
11
The field must be numeric. Refer to the AEROS Manual
Series Volume V: AEROS Manual of Codes, Section 3.2.0 for
a full list of IPP codes.
2 characters
Latitude: The latitude of a point source. Coordinates can be obtained from
a USGS map.
Card Number: 11
Valid Codes: The field must be numeric.
Field Length: 6 characters
Local Control: Allows the user to identify plants that are physically
located in one control region, but whose control is under the
jurisdiction of another control region.
Card Number: 01
Field Length: 2 characters
(Page 10 of 21)
Figure 4.3.5-b - continued. Definition of EIS/PS Master File
Transaction Fields
242,.
-------
EIS/PS
PILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 53
Release Date: 2/01/80
Update #: P-l
Longitude: The longitude of a point source. Coordinates can be obtained from
a USGS map.
Card Number: 11
Valid Codes: The field must be numeric.
Field Length: 7 characters
Mailing Address: The address to contact as opposed to the establishment name
and address.
Card Number: 03
Field Length: 48 characters
Maximum Design Rate: The maximum hourly design rate of the most
important process equipment, or the upper operating limit that
generally would not be exceeded in normal practice. Units are the
NEDS units for the SCC for the process, expressed as an hourly rate.
Card Number: 21
Valid Codes: The field must be numeric.
Field Length: 7 characters with 3 decimal positions assumed
Measured Emissions: The actual measured annual, controlled emissions in tons
per year.
Card Number: 13
Valid Codes: The field must be numeric.
Field Length: 7 characters
Name and Address: A descriptive name for the plant and a usable mailing
address.
Card Number: 02
Figure 4.3.5-b - continued.
Transaction Fields
(Page 11 of 21)
Definition of EIS/PS Master File
243
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 54
Release Date: 2/01/80
Update #: P-l
Field Length: 48 characters
NEDS P7 Comment: Information to be entered on a NEDS P7 card.
Card Numbers: 04 - plant comment
14 - point comment
24, 25 - SCC comment
Field Length: 52 characters on 04 and 14 cards, 26 characters on 24 and
25 cards
NEDS Point ID: A sequential number used to designate an emission point within
the plant.
Card Number: 11 - 30
Valid Codes: Field must be all numeric or all alphabetic. Numbers will
sort first, beginning with 00.
Field Length: 2 characters
-4
Normal Operating Rate: The first two digits indicate the hours per day of
normal operation; the third digit, the days per week; and the last
two, the weeks per year.
Card Number: 11
Valid codes: Hours: 0-24
Days: 0-7
Weeks: 0-52
Field Length: 5 characters
Number of Employees: The number of persons who work at the plant.
Card Number: 02
Valid Codes: The field must be numeric.
Field Length: 4 characters
(Page 12 of 21)
Figure 4.3.5-b - continued. Definition of EIS/PS Master File
Transaction Fields
244
-------
EIS/PS
PILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 55
Release Date: 2/01/80
Update #: P-l
Ownership Code: The NEDS code used to designate the type of ownership.
Card Number:
Valid Codes:
Field Length:
01
P - Private
L - Local government
S - State government
F - Federal government
U - Utility
1 character
Percentage Annual Thruput: The field .is divided into four three-month periods
representing one year. Each subfield contains the weighted
percentage of the yearly activity for that period. If all activity
occurs in one period, enter 99 for that period and zeroes for the
other periods.
Card Number: 11
Valid Codes: The field must be numeric. The four quarterly percentages
should add up to 95-105%.
Field Length: 8 characters
Plant ID: Identifies the source (plant) within a county. Plant ID's are
assigned sequentially by county.
Card Number: All transactions
Valid Codes: The field must not contain blanks but can contain numbers
or letters. Numbers will sort first, beginning with 0000.
Field Length: 4 characters
Figure 4.3.5-b - continued.
Transaction Fields
(Page 13 of 21)
Definition of EIS/PS Master File
245
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 56
Release Date: 2/01/80
Update #: P-l
Plume Height: A gross estimate (in feet) of source volume when the source has
no definable stack. This field must be coded for an add transaction
if the stack information is blank.
Card Number: 12
Valid Codes: The field must be numeric. Values greater than 200 will
cause a conditional message to be printed.
Field Length: 4 characters
PNR Line Number: Each point can have up to 99 comments, which are identified
by a PNR sequence number. Each of those comments can contain up to
999 lines, which are identified by a PNR line number. Each line of
comment is an individual record in the EIS/PS master file and can be
added, changed, or deleted. Lines are numbered sequentially within
an individual comment (PNR sequence number).
Card Number: 30
Valid Codes: 001 - 999
Field Length: 3 characters
PNR Sequence Number: Identifies a comment for a point. Each point can have
up to 99 comments, which are numbered sequentially by a PNR sequence
number. Each comment can contain up to 999 lines, which are
identified by a PNR line number. Comments are added and changed by
line number. Individual lines can be deleted, or an entire comment
can be deleted by specifying a PNR line number of 000.
Card Number: 30
Valid Codes: 01 - 99
Field Length: 2 characters
(Page 14 of 21)
Figure 4.3.5-b - continued. Definition of EIS/PS Master File
Transaction Fields
246
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 57
Release Date: 2/01/80
•Update #: P-l
Point Pollutant ID: The SAROAD parameter code for the pollutant whose
emissions are being measured.
Card Number: 13
Valid Codes: The field must be numeric. Refer to AEROS Manual Series,
Volume V: Manual of Codes for a listing of SAROAD
parameter codes.
Field Length: 5 characters
Points with Common Stack: Indicates the range of points using a common stack.
Points which discharge through a common stack must be numbered
sequentially, and all of the points must exist. The first two
characters of the field indicate the NEDS point ID of the point with
the lowest number in the group and the last two characters indicate
the point whose ID is the highest. For a complete definition of
common stack, see AEROS Manual Series, Volume V: Manual of Codes.
Card Number: 12
Valid Codes: Each of the two points represented must be valid point
ID's; that is, they must be all numeric or all alphabetic
and contain no blanks. Also, the NEDS point ID must not be
less than the lower point nor greater than the upper
point.
Field Length: 4 characters
Primary Control Equipment: The Control Equipment Identification code for
control devices. Report only control devices that reduce the
uncontrolled emissions normally associated with the specific source,
(Page 15 of 21)
Figure 4.3.5-b - continued. Definition of EIS/PS Master File
Transaction Fields
247
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 58
Release Date: 2/01/80
Update #: P-l
Card Number: 13
Valid Codes: See Appendix A, Table A-2.
Field Length: 3 characters
Principal Product: Describes the principal product produced by the plant.
Card Number: 01
Field Length: 10 characters
Property Area: The area, to the nearest tenth of an acre, of the land
occupied by the facility.
Card Number: 02
Valid Codes: The field must be numeric.
Field Length: 6 characters with one decimal position assumed
SCC: The source classification code that describes the process.
Card Number: 21 - 25
Valid Codes: Refer to AEROS Manual Series, Volume V: AEROS Manual of
Codes, Section 3.7.0 for SCC's.
Field Length: 8 characters
SCC Pollutant ID: The SAROAD parameter code for the pollutant whose emission
factor information is being recorded.
Card Number: 23
Valid Codes: Refer to AEROS Manual Series, Volume V: AEROS Manual of
Codes for a listing of SAROAD parameter codes.
Field Length: 5 characters
(Page 16 of 21)
Figure 4.3.5-b - continued. Definition of EIS/PS Master File
Transaction Fields
248 ,
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 59
Release Date: 2/01/80
Update #: P-l
SCC Sequence Number: Allows the user to specify duplicate SCC's for a given
point. If only one record is needed for an SCC, the SCC sequence
number should be 00. Additional records can be numbered
sequentially.
Card Number: 21 - 25
Valid Codes: The field must be numeric.
Field Length: 2 characters
Secondary Control Equipment: Used in conjunction with the primary control
equipment field to indicate an additional control device for the
point.
Card Number: 13
Valid Codes: See Appendix A, Table A-2.
Field Length: 3 characters
SIC Code: Identifies the Standard Industrial Classification code associated
with the point.
Card Number: 11
Valid Codes: SIC codes can be found in the Standard Industrial
Classifications Manual, 1973.
Field Length: 4 characters
Source Code: Identifies the process category for the SCC.
Card Number: 22
Valid Codes: B - Boiler
p - Process
(Page 17 of 21)
Figure 4.3.5-b - continued. Definition of EIS/PS Master File
Transaction Fields
249
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 60
Release Date: 2/01/80
Update #: P-l
Field Length:
C - Other combustion unit
S - Solid v/aste
1 character
Source Description: A brief description of the source. This field can also
be used for comments. The field must be coded for SCC's ending in
97, 98, or 99.
Card Number: 22
Field Length: 25 characters
Space Heat Percentage: Indicates the'percentage of total fuel used for space
heating the plant. If no fuel is used for space heating, enter
zeroes.
Card Number: 11
Valid Codes: The field must be numeric.
Field Length: 3 characters with one decimal position assumed
Stack Diameter: The inside diameter (in feet) of a round gas exit at the
point of emission. If the exit is not round, an equivalent stack
diameter is calculated from the cross-sectional area at the point of
discharge, using the equation D=1.128"/A, the A is the cross-
sectional area in square feet and D is the equivalent diameter.
Card Number: 12
Valid Codes: The field must be numeric. A conditional message will be
printed if the stack diameter is greater than .2 times the
stack height.
Field Length: 3 characters with one decimal position assumed
Figure 4.3.5-b - continued,
Transaction Fields
(Page 18 of 21)
Definition of EIS/PS Master File
250
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
FRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 61
Release Date: 2/01/80
Update #: P-l
Stack Height: The vertical distance in feet between the point of discharge
and the ground level where it can be identified. If no stack is
defined, code only the plume height information and leave the stack
information blank.
Card Number: 12
Valid Codes: The field must be numeric. A conditional message will be
printed if the stack height is over 500 feet.
Field Length: 4 characters
Stack Temperature: The temperature of the exhaust stream at the stack exit.
Stack temperature should be the temperature, in degrees Fahrenheit,
under normal operating conditions.
Card Number: 12
Valid Codes: The field must be numeric. A conditional message will be
printed if the stack temperature is less than 77° or
greater than 2000°.
Field Length: 4 characters
State: The state identification code for the plant.
Card Number:
Valid Codes:
All transactions
Refer to AEROS Manual Series, Volume V;
Codes, Section 2.1.0.
Field Length: 2 characters
AEROS Manual of
Sulfur Content: The sulfur content for combustion processes, indicated as a
weight percentage.
Card Number: 21
Valid Codes: The field must be numeric.
Field Length: 3 characters with 2 decimal positions assumed
(Page 19 of 21)
Figure 4.3.5-b - continued. Definition of EIS/PS Master File
Transaction Fields
251
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EPQQ8Q)
Page 62
Release Date: 2/01/80
Update *: P-1
Telephone: The telephone number (including area code) of the person listed in
the contact field.
Card Number: 01
Valid Codes: The field must be numeric.
Field Length: 10 characters
Test Method: A user-defined code for the method used to ascertain the
measured emissions.
Card Number: 13
Valid Codes: The field must be numeric.
Field Length: 1 character
User Control Region: A user-defined field to identify state or local control
areas.
Card Number: 01
Field Length: 3 characters
User Plant ID: A user-defined field that is used if local plant
identification differs from the NEDS conventions.
Card Number: 01
Field Length: 12 characters
User Point ID: A user-defined point source identification which may differ
from the NEDS conventions.
Card Number: 11
Field Length: 3 characters
(Page 20 of 21)
Figure 4.3.5-b - continued. Definition of EIS/PS Master File
Transaction Fields
252
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 63
Release Date: 2/01/80
Update #: P-l
UTM Horizontal Coordinate: The horizontal (or easting) coordinate for the
UTM (Universal Transversal Mercator Projection System) measurement
of the source. UTM coordinates can be obtained from USGS maps.
Card Number: 11
Valid Codes: See Appendix A, Table A-l.
Field Length: 4 characters with one decimal position assumed
UTM Vertical Coordinate: The vertical (or northing) coordinate for the UTM
measurement of the source. UTM coordinates can be obtained from
USGS maps.
Card Number: 11
Valid Codes: See Appendix A, Table A-l.
Field Length: 5 characters with one decimal position assumed
UTM Zone: The zone associated with the UTM coordinates given for the source.
UTM coordinates can be obtained from USGS maps.
Card Number: 01
Valid Codes: See Appendix A, Table A-l.
Field Length: 2 characters
Velocity: The exhaust-gas velocity for the point. If the actual measurement
is not available, use the design or maximum value.
Card Number: 12
Valid Codes: The field must be numeric.
Field Length: 5 characters
(Page 21 of 21)
Figure 4.3.5-b - continued. Definition of EIS/PS Master File
Transaction Fields
253
-------
EIS/PS
FILE CREATION
MAINTENANCE
Column #
1 - 2
3 - 6
7 - 9
10 - 17
18 - 21
22
23 - 30
31 - 32
33 - 34
35 - 37
38 - 39
40
41 - 120
AND
Field Length
2
4
3
8
4
1
8
2
2
3
2
1
80
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Data Type
Numeric
Numeric
Numeric
Numeric
Numeric
Numeri c
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Page 64
Release Date: 02/01/80
Update #: P-l
Description
Key State
Key County
Key AQCR
Key Plant ID (Modified
to Base 36)
Key NEDS Point ID
(Modified to Base 36)
Key Segment Type
Key SCC
Key SCC Sequence Number
Key PNR Sequence Number
Key PNR Line Number
Key Card Number
Key Action Code
Original Input
Transaction
Figure 4.3.5-c. EIS/PS Internal Transaction Format
254
-------
E1S/PS MASTER FILt TRANSACTION EDIT PROGRAM - DIAGNOSTIC. HEPOKJ
PAGE
NAMES PtOHSIW ftPUOHO)
REVISION LEVELS t-oo
IASI UPflAIF «! P-l
DAIE INCORPORATED: FEBRUARY 1, I9HO
OPTIONS IN EFHKC': FLAG*
ClINIHtll YEAR: BO
LIST
to
c:
(0
CO
•
en
~
10547001370«»7 HA
HE HE
*** PtPMSIR Oi4 CUNOTTTIINAI - COl OMN 34 - U1M-VERIICAL CPOE OUT OF RANGE
•*« PfcDMSTR 0V? CHhOTT IllNAL - COLUMN S? - INVALID THRiJPUT SUM
44 IS 17 1?A
r\>
01
en
o>
ID
3
o
to
•a
o
ct
061 vMio-jlOOQiaooa/oi 9o 10 mo i?s I«»n ooool oi,?8l I079iai5l
"~~ H Ftt f
*«* PtDMSIR 050 CONUM IllNAL - COLUMN 44 - PLUME HtlGHI IS GREATER THAN ZOO
*** PbOMSIR OS? CONOT1IUNAL - COLUMN 4R - 1ST PUl.Jl GRF.ATER THAN OR EuUAL TO 2ND POINT
*** PEDMS1R 100 CONDITIONAL - NEDS PII|MI ID NUI WITHIN C"^MUN STACK POINTS
0619*005400010011311)01 11 t412t245400SS57i;>tZI05l5l5;»U?0*030l lflS4 7001 37097 11 A
b t H t
*** PtOMSIR 034 CUNDTTIUMAL - CUt.lIMN 34 - UTM-VEflIICAL COUF OUT OF RANGE
*** PLDriSIR 09f CONOI1IllNAL - COLUMN 5? - INVALID THRUPUl SUM
IIF fKAHSAf I TU'13 HFAO:
(IF IMkRMAL TRANSACTIONS nkITIt»:
OF ThANSAC)IUMS MFJEcTtO;
NU«HFR OF ABUHT MtssAGFs:
NIIMHI-K OF EKHUH MESSAGES:
NUMHFf* IjF COMllI I IllNAL MESSAGES:
NU"hFH (IF EARNING "ESSAGFS:
M«ME: PEOMSIR (EPuOHfl)
RLVJR10N LfVFL: 1-00
LAS I UPl)A|F a; P-l
FFMPUARY i,
—I co
20 m
> o
z —i
CO t-i
> o
-a t-i
m o
o -z.
co m
—I o
rn
TJ
o
o
oo
o
co
c:
•o
o.
D)
c-h
a>
=«=
n>
to
o>
in
n>
D
Oi
r+
(D
O
ro
CO
o
OJ
UD
CD
cn
-------
ro
en
f.oob3onoition(}S 100 ?00
IS 17
MA
I/I A
21A
11 in
nbi96o0b3on0t8ooi70iutt3oniniooscr LEFf (
lOlODSCr WIGHT P7
Obi «*bOOb30001 BO It 31 U
11
It
oo m ion 123 li
100022UQ19B5
1101
LtFT cfiMMtrir P7 3'iA
Ht CUM) 3/t/«n J"ft
NUT FIJLUMI^G r,im>iE LINES AS sti DOWN i2/i«/79iOA
11 A
ISA
13A
to is 17
AOObO ),»/HI/79
3000
300«33
150L"
100 ?00
100 200
1000912201
320|A1Q,>60?
11101 3^11 A 12nnb300016ni 131u1o300tn202l23
Ohl9hOOb30no|H0113IUO.»02tLPLANr NUT FULLHMlHG HUTDFLIuFS AS StT OUttM
Obi V«>unS300IS?l)2U3n301 10507001 37097
nbi9t>oob?oooi«oia/oi 90 t" ion I2i i1}? 9oooioi2«i 1079I21S1 11 is
230 ?oo 300133
^30 ?00
ADOLP
P7
2?A
504
01 A
19 0?A
03A
QOA
IIA
17 1?A
I < A
]4A
O
o
50
m
>
CO
co
50 50
o 3>
CD z
50 to
> :t»
3 O
m o
o z
co m
—I O
50 t—1
-o
O
O
oo
o
CO
m
o
—\
»-H
O
2
-fa-
•
CO
•
or
: 50 -o
-a n> o»
a. —• IQ
Q) ^D ^D
r+ Qi
n t/>
=«»=
0)
o
ro
oo
o
-------
F.01TEI) F IS/PS MASUU F-Ilt- I RAHSAC t 1HNS (IMUWI41
10
c
(T>
-P»
•
CO
•
en
i
-h
ro
01
a>
-s
a>
3
in
Oi
o
rt
=3
CO
Ohl9fiUnb30noOOOOIOOOOonoOUO{iOOO|ifllinon(l?1061VbU053U'>illHOO'17SYMIH(i.
Obi V6o OS ^oooonno I on tionnn nun iioo OO(PO oiinii^io^ iv60f>b3D oo IHOO'J/RF. n u«Kt,
06l960nb?000000(l|(inoOonuOOOuOOOOOOOUOO'l|Ot.l«»60053000IWOO«7PLA 0053UOOOOOO 10001 1 OonoOonOOOOOOUOl?! 061 fbOOS^'IOUlHOO/l 701 OU9UO I 001 00(10 UO 12300 150090001 01 2B1 I07V12IS1
Ofel Vf>llOS3i'0000001000l lOOOOfluOuflii'i|inoni3|Ohl96(i05^»Ool60u'i/01U2IOI UOOO|000220119h500001POOOOO?OOOOU0300'J33
nf,196o053UOOnu001UOUI 10iinonuO(lOOOOO(ini3|nbl9Au053noolAilU')/0| 1 1 1i)|00(i0100fl<>?0«19(t5uOonioonQ0020000U0300433
OblVh005?OOOOOOfllOOU1 1 OOOOnoOilOOOaOiiOl'llOM 9f>005 300U 1(1004 701 POINT AUntD
06 1 9MOS 30000000 l(lO()1?00300 10| OOOOOU021 1 061 9f>005 30001 «00fl 70 I 40300 I 0 | 00 1 2 30 1 2 "00 4000UOU40P091220 I 00 1 50LH
Ob196005fU0000001uOUl20v300l01000ilOOO,;2|Ofi1 9600530001 000470140300 1 OJ 00 IdEMGINt
Ob l9b0053UOUOUOO I 0001200 300101 0(IOIIOU02'I I 0(>1 96UOSXUOO I H0(ia 70 1 40 300 101 OOSCC LF-FT CUMMtNF P7
Ot>i96u053unonuouiuoui2i4f.oo'>3uo(ii8oo(i70i4i)3uoiniouscr NIGHT P7 COMMLMI
Ob 1V600530UOOU001UOO12«0?0010202000n021 1 0», I 'Vho05VlOi.il eoo'l 70 I 00.300 10202 I 2301 20OO30000001000912201OU150LH
OM 9f.005XOOOO(lO(l I 000 1241'TOO 10202000002? I Ob !Vb0053000lB004 70 100300 I 0202 IKFNR INF.
Oh19fcll053UOOOOOUl UQOI21U500 102020(1000231 OtOOS30dOOi>P0100012ao:*Ufl|0f00530001H004701403un|0202SLC LkF I CHMhLNT P7
Ob1960053unuOUOu1oilU13000UQOP(in(i0202l30inb1 Vf>0053unolHOu'l7010202IM »ILL Rt CITEU 3/1/Hfl
Ob19600S3uOOOOOol0001 300000unoO(i02n213010bl9600530001BO(l070102021LPLANT NUT FIJI. LOU ING GUIDELINES
Ob1'/bUOS3UPu00001ill2710uOunoOUnoOOi)uO|l 10M960053ii001 H0| I 3KJC11 II11 212154095557 12 121 051 5152020303uI 1054700137097
Ob 196005^0000000101271 000000000000000121 Ob IVhO0530001 HO I I 31UOQ9001 0010000001230015109001U20261107912151
Obi 96005$UOOOOO«10 I 27lOdOUOUOOOOOOOoOlMPoI 9600530001K0|1310021 01000010002204I9HSOOOO|000000?000000300433
Oo10053000 I HO I 1 JIUPOMt ADObD 12/11/79
0(>19(.uO.S3UOOOOOOtlll2724il3U010lflOOU00021 I Obi V6G05 tdOii I UOH SI U00300 I (I | 00 1 230 I 2000300000040009 | 220 1 00 150LB
0619600^30 000 vOO In 1272003001 01 00000002? I Obi V60053UOUI BO I 131 iJOO 300IOI001HFNR1NF.
Ob1V60053000000v1Ul272Qu3ilOt01000UOOn2310t>1460fl53000l«OI 1 31 UQO300101 OOLH12I 01 UOOOU32'! 1A | 42b020Oi)0004l5S2
061 96005*0000000 1U1 272*103(101 0)00000 II0231 Ob 196005300 01 HOI 1 J1 UOO300I 01 001U I 1 1 01 00000324 1 A 1 221 010000004 15S2
ObiV600530000uOblul272«030ni010000000241 ObiV6U05fi>OOIH01131U4U3001010USCC LfcF1 COMHtNl P7
06t9600530000ll001(ll272020ilOo021 I Obi 96005 3000! HOI 1 31 U4U3001 02021 c'30 I 200030000004000912201 001 50LB
06IV6U053UOOnoOU1(lt272403UO|0202000l)02?|Obl96U053UOUlH01 I 3 I U403001 02021 Ht NU I N\t
P6l9A00530000u0010l27240300102020UOu023|Ob196U05300u1ft01131U4U300102021 HI|10 I (10000324 I A I?2I04000000415S2
06196005300000001012720030010^02000(1023106196005300018011 J1U40300 I0202LM'I21010000032"I A I 42602000000415S2
Pbl96i)OS3uPOnunotot2724n3uni020200000241061960Ob30001 HOI I3IU40300I0202SIC I tFI CIIMMENI P7
O6JVA0053UOOOOOOIOI2730iiOUOiinon00202l30|06l96ilOS300ii|H01 I ilu0202IK rtlLL HE CITfil i/l/80
0619600^300000001 01 27300OQOUO0Oil0202130 I 0(, | 96UOS300U1H011 31 U02021 LPLANT NijT Fill LOrt ING GUI DEL INF. .S
Pb19600S30000040IUOOOUOuOOOOP(iOflOOOOnul 10bt9600<]30041HOl4712fil'IHL-31 75 00 I ? 1 2PGtfl«GK SKVTHE
06l96(l«lb30P000401uOOOOOUOOOoOOO(iOOOOOO?|061'v6uOc)3lini|l>|OU47!>YMIHt EMU INF f.lj
Obl9600b300U00401(M)UOOOOOOOiiOHOOOoO(iOIM10bl Vh(lOi3llf)«ldfll47lrtlLl IF3. CULllHAnil
061960053000001(11 oounoooooo(iooofioooiino'i|OM'»6on53iiomflotiii/PLAfH IUT IN HHuour.I Tii" 12/79 THHU /4/no
061 9600530000040 Ilifiyl I OoOUOOOOOvOOODO | I 1 061 96005300(11 i«0 |/I/O t 0 I 1 1 I 4 111 2'l5409bSlj / 1 2 I ? I OS 1 •> I b20?03o 3U 1 I 0^4 7001 3709 7
06i960053oooooifli(ioui Ioonooooofinonoooi?i061 V(soo51('0'4lHO|«/oinol»i)oioi)iooiiooni?ii>uil>2o<>»ooioi2<4l li)/9i,;ibl
fl61V6(l053UO(IOU'40luOUI lOOOOOOOnOOOOOdfll 31 Ub1>*6ll05Mi04 1 H" I 470 142 1111 000023o02?i)0 ITHSOOllO^iI)i)on0?
OblV6uOb*0000040l 0001 I OOOOftOOdOinl ,1000 I 3 11)6 I V6uO4 1 9K50Pl'Oc!3l>0000?liOOOGO 4P0433
nb19h00530PUP040ltlOOI 1 OOOOfKiOiHiliOoOliO | 4 1 0(, 1 VhUO'jX0041R010/OlP(llNT 4DHED 12/14/79
PAGt 1
b919S'l43/69ENGlNlS 01A
0014000019 0?A
03A
U U'lA
Ul 1054700137097 IIA
V12IS1 44 IS |7 1?A
U0300433 13A
00300«33 1 1A
14A
0150LH 21A
004I5S2 2JA
0041 5S2 23A
24A
U150LH 21A
22A
001155*2 *? 3 A
0041552 23A
24A
30A
AS 3E1 DOWN 12/I4/7930A
Ul 1054700137097 IIA
912151 44 15 17 1?A
00300433 1 *A
U0300433 1 3A
14A
>1 t Ct A 1 U ,> t A
II 1 j"l_ n c 1 A
2?A
00415S2 23*
00415S2 23A
24A
2SA
U150LB 2IA
22A
004155)2 23A
00415S2 23A
24A
SOA
«S StT OfJhN 12/14/7930A
b919544376VPLA.4TS OIA
0014000019 02A
(13 A
0 04A
OHOS4700137H97 HA
912151 44 15 17 I2A
00300433 13A
004P0433 13A
14A
•S.
t— 1
— \
m
3>
0
m
-Q
O
CD
70
1
TQ
m
o
>
— l
73
"m
0
o
03
O
^* '
<=.
CL
Ql
fi-
at
*<*:
"O
1
-n m
r~ co
m^^^
^^»»
-o
o co
m
—I
>— *
o
z
•z.
0
—1 00
TO m
> 0
Z —1
CO •-.
> o
o z
— 1
•— ' -F*
O •
Z CO
m ro
Ql
c/> cy>
fD --J
Oi
ct
fD
* *
O
ro
o
00
o
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 68
Release Date: 02/01/80
Update #: P-l
Column Column Column
1 3 11
V V V
YY
FLAGW
NOFLAGW
Blank
LIST
NOLIST
Blank
Note: YY must be a number indicating the year to be used for editing
the transactions.
Figure 4.3.5-g. Option Card Format
258
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 69
Release Date: 02/01/80
Update #: P-l
//» H'/»L"H/AOM/ MI-m.hPMH, LluYn 1. f'JIv)
//*
//• KM'I SIMM i.i vf i.: i-oi)
//* LAS I iil'iiftlF *: P-I
//» DATh JWCHKHIlWA Ihl): FFIjWUAMY 1, IVIJP
//*
//* Ih'TS HHIlCI-Dill'K fll L'l'JS I n» MSH< 111 Foil K IS/PS MASIKK hlt.F
//« Tkft'iSrtC I ni"a AMD fjAifti.ni, rnt uuito FKA^SAC I ni'i.s
//*
//*
//FIPFIiTIO PKDC f'WU.IFCf = 'CM.hP«l MM./
//
//
// *H; line's i no*,
// IIiFl='1,0',
// i i,-n «>=• i,o',
// I'-ilK fU\i = t,» \tl\t lii-]
// unir=3i3i),
Sf HI AI.=r.UHSJPK,
Hi:>P='NFm,(.A II.U.
// .Sfl.il I|I = H?K,
// i>mnflwr=«>o,
// .sh(.in)wy = i n,
// IF^P = SYRI»A,
// KIIIY,S1 ..SilhTl. lli
// Hi .'»(•'= f t>HK,HAoSj
On I) li o I 'in
//
MUNI ,
F n.f IKA.J.SAC i
ni> nSKfliiF. =K.pwn.it r i . .1 .IAD,
tfUL ll.lhsrPI'1 ViUl ,KH AIN
Fjit SF jut
l=«t |f
t =(
l Id)
•K 0.< Oil ll'-i) T = f
// b>'A(. I- = (
//*
//• Ififlif f>ftl« «F I - MA.SIH' Fill I i-/i-i;-iftC I lI'i-i.S
//*
//ri-Til'll'T |i|i iihlgAi"!-r I ul'U I ,
// (if i« = ill h.S I /t ~r\H
//*
//* niiH'iii DAFA ';t I - SHI'IH- .AMM1 MM I w«r :w 1.1 J i M',
1)1)01)0
00 0 1> 0 •> " II
I) II Oil') / (ill
OODuOHIMI
Don i) I o '' n
(I II 00 I ) oil
n no i) ir" IMI
')llO<) I 301)
OiiOo 1 'I I' II
000 ill SOU
Oil ill) I (•> i
n n it u? Vii n
Oij
0 it
nooii^ jOn
o n o i) * a IMI
'I 0 On *S'lil
000(1 It.lii)
01)01) ^ /Oil
no n (i 'i n fin
IMI o i) /i i on
II 00 II 'I id')
0 ii Oil it U ii ii
I'lil'lll'I'llMI
"i»0n i / Oil
lllllll'-IMIMI
n (i mi -i •) IMI
n •) o u1-, n u ii
II i| O U S | IMI
iMMMl'.'lli t|
.lOOllSSIMi
(Page 1 of 3)
Figure 4.3.5-h. Cataloged Procedure EPEDT10
259
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 70
Release Date: 02/01/80
Update #: P-l
//
//
//
//*
UIP Ml I'S(|A|> f = ? \Siil 1H),
UN l I =* IHiP,
liIM'sf Hf rt,l'A8S,li| I K It ) ,
.SPAfh =( luK , ( AHlhr SrT ) ,i<| SF )
//> IHMHII HA|A SI- I - HI Bl.r 'I IS I ll Klf'llwt
'./ *
il6f. IH' STJi
//* 'lllTl-'ll| I'AIA .•>»!'> - SYS !(• •'.
//•
nu SYSMIII=IIIHII
MI; svsnni =*,uui
ii II "US /nil
//*
//*
//SYSlllHlllI MI) .SYhMUl =X.I)II|
//*
//SYSOTtWM Ml) .Stb'IH I=K.UH1
//*
//SY8WHMH Mil oYJjl'lll =K(MM
//*
//fOJI f-XfL >'UM = XP
// r'F(,|l|.-J
// i iff =( i
// •
//* hull i-t;;/i'S "rtsiri
I.F II./VI.SAC I
//Slfl'll'l 01) llShAwF snl'WU.lhr I . .1 HAD,
// VHL'lMF =(PU1VAU rl ) ,"l .if J
//< Ullll'ill I'A|A S| I - II I AI.I'liS I I I iihHI'i'1
//*
//(-(•'.SO I M'> M|i SY SI ill I s>|ill I
//*
//« Mull-Hi i;AI/> SI- I - fA'.ll. MM I ./••••/>" I l'i;
11 Illl
I IU)
inline VI)
II I) ll ()*.<4'l II
/IK)
nn f'
H ii 0 1) 7uiiu
iii)(M)7 1 iiii
II ll Oil /(Mill
i) Ii 11 il /JO I)
oixui /a ii i)
il'tlitl /'ion
nnnn /I>IMI
nniiii / /(i i
OlMHl 7(1. Mi
0000 /Vl'l)
n i) o ii >• ii o ii
Illl Ollt' | Illl
n ii o n " f 11 1)
n no i)>*(. mi
Oil Oil'1 /Oil
00 0|,^ (II) U
nii(nr-»lon
n oo i)'»«? on
0(1 0,1 <)•((!()
o n n i) os o H
1' /oo
o n ii ii «M (i o
o IMI l oo n n
o n n i o loo
IMI i) j d^d ii
lino \ n *ou
n no l 0'imi
noil in son
'I ill) I liltO'.l
>i no i n /KII
(100 1 II. (00
HUM 1 H'Miii
0(1 'I | t n nil
'I ill) | 1 | (Ml
|I<|0 I I /mi
(Page 2 of 3)
Figure 4.3.5-h - continued. Cataloged Procedure EPEDT10
260
-------
E IS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 71
Release Date: 02/01/80
Update #: P-l
//*
01' SVSfllJT=H(|llt
//*
//* fUlTPtJl IIA1A ShT - MASIfK f Tt^ Fi-MKCNAL I I'ANJiAt fllin I. 1 « 1 1 Mi
//*
//KHSJNII 0|> KViillllTsKljriT
//*
//* OUTPUT llAIA SH.-> - 3YsrHM HHFHAM'11"
//*
//*
//SYSlHH
//*
//SYSoHlllll (1|)
//*
//SYSDTH^ 01)
//*
//SYSUOUMP 00
//*
//*
DO SYSI'UtsRDHI
S'MI
11 ii 0
/HO
mini
nun i
(Hill I
n u n l
nun i
n n o i
n n o i
'Hid I PlHIO
nun) ,> | .in
DDII i
i) IIDI,
VIM)
nun i,
(pin i
(H)O | ?H(><>
nun I
nun i
mini f, i n n
nun i vnu
(Page 3 of 3)
Figure 4.3.5-h - continued. Cataloged Procedure EPEDT10
4 if :i ,
261
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.5
TRANSACTION EDIT
PROGRAM PEDMSTR (EP0080)
Page 72
Release Date: 02/01/80
Update #: P-l
Parameter
Name
Default
Value
Description
PROJECT
'CN.EPALMH.A087,
CDHS.HQ.PNT'
PROG1
PROG2
TIME1
TIME2
UNIT
PSRMFTR
PEDMSTR
'1,0'
'1,0'
3330
SERIAL
DISP
SPCUNIT
PRIMARY
SECNDRY
INTRTRN
CDHSPK
'NEW.CATLG,
DELETE1
TRK
20
10
EP INTERN
OUT
REGI ONI
REGION2
TEMP
WORKSPC
A
150K
100K
SYSDA
'20,10'
Highest-level index of data set names (e.g.,
CN.EPALMH.A087.CDHS.HQ.PNT.DATA.EPINTERN
would be the full data set name of the
internal transaction file)
Master file transaction sort program
Master file transaction edit program
Time allocated for execution of PSRMFTR
Time allocated for execution of PEDMSTR
Unit type to which edited internal trans-
actions are to be written
Volume identification to which edited internal
transactions are to be written
Disposition of edited internal transactions
Units in which space for edited internal
transactions is to be allocated
Primary space allocation for edited internal
transactions
Secondary space allocation for edited internal
transactions
Lowest-level index of data set to contain
edited internal transactions
SYSOUT class for all print files
Region size allocated for execution of PSRMFTR
Region size allocated for execution of PEDMSTR
Unit type for temporary work space
Space allocated for sort work files
Figure 4.3.5-i. Substitutable Parameters for EPEDT10
262
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.6
PRE-INSERTION SORT
PROGRAM PSREFIN (EP0090)
Page 1
Release Date: 2/01/80
Update #: P-l
4.3.6 MASTER FILE INTERNAL TRANSACTION PRE-INSERTION SORT PROGRAM - PSREFIN
(EP0090)
4.3.6.1 Description
PSREFIN (EP0090) sorts master file internal transactions into the
sequence required by the master file internal transaction emission factor
insertion program, PMSEFIN (EP0100); Figure 4.3.6-a details this sort order.
All master file internal transactions must be sorted by PSREFIN (EP0090)
before they can be used as input to PMSEFIN (EP0100). See Section 4.3.5 for
additional information on the internal transactions.
4.3.6.2 File Formats
Input to this program consists of master file internal transactions
generated by PCENETR (EP0060), the NEDS to EIS/PS master file transaction
conversion-edit program; PEDMSTR (EP0080), the master file transaction edit
program; or PMSEFGN (EP0130), the master file emission factor transaction
generator program. Refer to Figure 4.3.5-c for the internal transaction
format.
PSREFIN (EP0090) produces two output files: a diagnostic report and a
temporary file containing the sorted transactions. The output transactions
differ from the input internal transactions in that the sort key has been
appended to the front of the internal transaction. The output transactions
are in the required sequence for use as input to the master file internal
transaction emission factor insertion program, PMSEFIN (EP0100). An example
of the diagnostic report is shown in Figure 4.3.6-b.
263
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.6
PRE-INSERTION SORT
PROGRAM PSREFIN (EP0090)
Page 2
Release Date: 2/01/80
Update #: P-l
4.3.6.3 Options and Control Cards
There are no options.
4.3.6.4 Error Messages
There are no error messages.
4.3.6.5 Cataloged JCL
PSREFIN (EP0090) should always be executed in conjunction with the master
file internal transaction emission factor insertion program, PMSEFIN (EP0100).
See Section 4.3.7.5 for a discussion of the cataloged procedure EPMST10, which
executes both programs.
4.3.6.6 Warnings and Special Instructions
Note that the COBOL sort verb is used in this program; therefore, the
collating sequence for alphanumeric fields is determined by the computer at
the user's particular installation.
In addition to the diagnostic report produced by PSREFIN (EP0090),
messages generated by the sort-merge package will be printed. The format and
content, as well as the physical location, of these messages depend upon the
user's particular installation.
4.3.6.7 Cost Considerations
The following, estimates are for the execution of PSREFIN (EP0090) on an
IBM 370/168:
264
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.6
PRE-INSERTION SORT
PROGRAM PSREFIN (EP0090)
Page 3
Release Date: 2/01/80
Update #: P-l
Number of internal transactions:
CPU time:
I/O time:
Total time:
576 records
1.20 seconds
2.93 seconds
4.17 seconds
Estimated cost:
$.58
4.3.6.8 Related Programs and Procedures
PSREFIN (EP0090) should always be executed in conjunction with the master
file internal transaction emission factor insertion program, PMSEFIN (EP0100).
The cataloged procedure EPMST10 executes both programs.
There are three other cataloged procedures which execute PSREFIN (EP0090)
and PMSEFIN (EP0100). The cataloged procedure EPEMM10 can be used to maintain
the master file with EIS/PS master file transactions as input. See Section
4.4.3 for a discussion of this procedure. To maintain the master file using
NEDS master file transactions, the cataloged procedure EPFMM20 can be
executed. See Section 4.4.4. To maintain the master file using emission
factor transactions, the cataloged procedure EPFMM30 can be used. Refer to
Section 4.4.5 for a discussion of EPFMM30.
265
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.6
PRE-INSERTION SORT
PROGRAM PSREFIN (EP0090)
Page 4
Release Date: 2/01/80
Update #: P-l
Record Position
Description
Sort Sequence
23 - 30
102
103
71 - 75
SCC
Origin
Source
Pollutant ID
Ascending
Ascending
Ascending
Ascendi ng
Figure 4.3.6-a. Insertion Sort Sequence for Master File Internal Transactions
266
-------
ETS/P3 MASTFK FILF INTERNAL JRANSACTJI1N PRfc-INSFKT |ON SHUT PROGRAM - PIAKNOSIIC REPORT
PAGt 1
ro
(O
c
-s
CO
CT>
I
0>
to
O
CO
H-
T3
O
C+
PRMi;i»AM NAM£: PSREFIN (EP0090)
REVISION Lfl/f-'L! 1-HII
LAST ItPljAH »! P-l
OAT> IMCnHPHKATtO: HEH»UAHY 1, I9HO
UF INPUT THANSACIIONS: S76
OF MilTHIH IffANSACTIONS:
T3
33
o
m
CO
m
m
m
-o
o
o
10
o
CO "Z.
m
73 -f*
1-1 CO
o •
•z. en
CO
o
73
C 73 TJ
"O fD p>
Q. —i id
o» n> n>
c+ o>
fD (/> CD
TJ
I
o
QJ
ro
o
00
o
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.7
EMISSION FACTOR INSERTION
PROGRAM PMSEFIN (EP0100)
Page 1
Release Date: 2/01/80
Update #: P-l
4.3.7 MASTER FILE INTERNAL TRANSACTION EMISSION FACTOR INSERTION PROGRAM -
PMSEFIN (EP0100)
4.3.7.1 Description
Emission factor information from the EIS/PS emission factor file can be
inserted into the type 21 and 23 internal transactions by executing PMSEFIN
(EP0100) after the internal transactions have been created by either PEDMSTR
(EP0080) or PCENETR (EP0060). The information to be inserted, as well as the
conditions for insertion, are specified by the user via an option card (see
Section 4.3.5.3). Note that the internal transactions must be sorted by the
master file internal transaction pre-ihsertion sort program, PSREFIN (EP0090),
before they can be input to PMSEFIN (EP0100).
PMSEFIN (EP0100) matches the type 23 internal transactions to the
emission factor file records by SCC "number, origin, source, and pollutant ID.
It matches the type 21 internal transactions by SCC number, origin, and source
to emission factor file records which have pollutant ID's of zero and contain
the ash and sulfur contents for their respective SCC number. If an internal
transaction has a source of 'H', (hand calculate) no insertion will be made
into that transaction.
If a matching emission factor file record is found for an internal
transaction, the information in that record is inserted into the appropriate
fields of the transaction (see Figure 4.3.7-a for a list of the valid fields
for insertion). If the user submits a type 23 internal transaction containing
a pollutant ID of zero, PMSEFIN (EP0100) will create a type 23 internal
transaction to correspond to each pollutant ID contained in the emission
factor file for that SCC, origin, and source combination. No changes are made
to any of the other input internal transactions. The output file created by
268 .
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.7
EMISSION FACTOR INSERTION
PROGRAM PMSEFIN (EP0100)
Page 2
Release Date: 2/01/80
Update #: P-l
PMSEFIN (EP0100) is not in master file sequence and must be sorted by the
master file internal transaction sort program, PSRINTR (EP0110), prior to
being input to the master file maintenance program, PFMMSTR (EP0120).
4.3.7.2 File Formats
PMSEFIN (EP0100) uses three input files: the file of sorted EIS/PS
master file internal transactions, the EIS/PS emission factor file, and an
option card. See Figure 4.3.5-c for the format of the internal transaction
file and Figure 4.2.5-a for that of the emission factor file. The option card
is discussed in Section 4.3.7.3.
Two output files are produced: the file of completed internal
transactions and a diagnostic report. The output transactions have the same
format and are in the same sequence as the input transactions; they must be
sorted by PSRINTR (EP0110) before being input to PFMMSTR (EP0120) to update
the master file.
The diagnostic report contains the update messages, program statistics,
option messages, and error messages. A heading is printed on each page of the
diagnostic report to indicate the selected insertion fields and conditions.
See Figure 4.3.7-b for a sample diagnostic report.
4.3.7.3 Options and Control Cards
The user can specify, via an option card, the transaction fields for
insertion and can specify whether or not data from the emission factor file
should override (i.e., replace) existing data in any of those fields. He can
also specify whether or not emission factor-file data must satisfy a date
criterion, whether or not the input internal transactions must satisfy a date
269
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.7
EMISSION FACTOR INSERTION
PROGRAM PMSEFIN (EP0100)
Page 3
Release Date: 2/01/80
Update #: P-l
criterion, whether or not the date of the internal transactions is to be
replaced by the date of the emission factor information, and whether or not
warning messages should be printed. All options are specified in fixed fields
on the option card. See Figure 4.3.7-c for the format of the option card.
A transaction field is specified for insertion by coding its identifier
and an 'I' in the appropriate option card field. The valid fields for
insertion and their identifiers are as follows:
Field Identifier
Sulfur Content SUL
Ash Content ASH
Emission Factor EMISSION
The emission factor field is the default insertion field if no valid fields
are specified for insertion.
If a valid transaction field has been specified for insertion, that field
must be blank for any data to be inserted. If the user desires to insert data
into a field regardless of its content, he can specify an override for that
field by coding an '0' in the appropriate option card field. If an override
is specified for a particular field, any data in that field will be replaced
with data from the matching emission factor file record.
A date criterion can be established for the emission factor file data by
coding a date identifier of 'EDAT1 and a date value. The date value is
expressed as a Julian date; that is, as a 5-character number, the first two
digits of which represent the year, and the last three the day within the
year. No insertion will be made into a field if the date of the matching
270 ,
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3*7
EMISSION FACTOR INSERTION
PROGRAM PMSEFIN (EP0100)
Page 4
Release Date: 2/01/80
Update #: P-l
emission factor file record is prior to the specified date. If no date
criterion is specified, insertions will be made regardless of the date of the
emission, factor file data.
Likewise, a date criterion can be established for the input internal
transactions by coding a date identifier of 'TDAT' and a date value. No
insertion will be made into any transaction with a date prior to this date.
If no date criterion is specified, insertions into the transactions will be
made regardless of their dates.
If the user desires to replace the date of each transaction with the date
of the matching emission factor file record, he can do so by coding 'R1 in
column 80 of the option card. Otherwise, no change will be made in the date
of the transaction.
If 'FLAGW is coded in the warning message suppression field of the
option card, all warning messages will be printed in the diagnostic report; if
'NOFLAGW is coded, no warning messages will be printed. If this field is
left blank or improperly coded, a default of NOFLAGW is assumed.
4.3.5.4 Error Messages
PMSEFIN 001 ABORT - INVALID EMISSION FACTOR FILE DATE SPECIFIED
Meaning: A nonnumeric value was specified on the option card for the
emission factor file date criterion; therefore, the run was
terminated.
Action: Correct the option card and resubrnit the job.
271
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.7
EMISSION FACTOR INSERTION
PROGRAM PMSEFIN (EP0100)
Page 5
Release Date: 2/01/80
Update #: P-l
PMSEFIN 002 ABORT - INVALID TRANSACTION DATE SPECIFIED
Meaning: A nonnumeric value was specified on the option card for the
transaction date criterion; therefore, the run was terminated.
Action: Correct the option card and resubmit the job.
PMSEFIN 003 ERROR - NO VALID INSERTIONS SPECIFIED - INSERT EMISSION FACTOR
ASSUMED
Meaning: No valid fields for insertion were specified on the option
card; therefore, the default field (emission factor) was
assumed.
Action: If other fields are required, resubmit the job with a valid
option card.
PMSEFIN 004 ABORT - EMISSION FACTOR FILE CONTAINS ONLY A HEADER RECORD
Meaning: The emission factor file specified for this run contains no
records except the header record; therefore, the run was
terminated.
Action: Specify a valid emission factor file and resubmit the job.
PMSEFIN 005 WARNING - NO MATCHING EMISSION FACTOR FILE RECORD
Meaning: The emission factor file contains no record to match the
specified internal transaction.
Action: None required.
PMSEFIN 006 WARNING - NO INSERTION DUE TO EMISSION FACTOR FILE DATE
Meaning: A matching emission factor file record was found, but no
insertions were made since the record did not meet the user-
specified date criterion.
Action: If an insertion is required for this transaction, specify a
different date on the option card and resubmit the transaction.
272
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.7
EMISSION FACTOR INSERTION
PROGRAM PMSEFIN (EP0100)
Page 6
Release Date: 2/01/80
Update #: P-l
PMSEFIN 007 WARNING - NO INSERTION DUE TO TRANSACTION DATE
Meaning: No insertions were made since the internal transaction did not
meet the user-specified date criterion.
Action: If an insertion is required for this transaction, specify a
different date on the option card and resubmit the
transaction.
PMSEFIN 008 CONDITIONAL - NO 23 TRANSACTIONS GENERATED
Meaning: The emission factor file contains no records to match the
specified SCC number, origin, and source combination.
Action: None required.
PMSEFIN 009 ERROR - INVALID FLAGW OPTION SPECIFIED - NOFLAGW ASSUMED
Meaning: The warning message suppression option was incorrectly
specified; therefore, the default option, NOFLAGW, was assumed.
Action: If a listing of all warning messages is required, correct the
option card and resubmit the job.
PMSEFIN 010 ABORT - INVALID EMISSION FACTOR FILE SPECIFIED
Meaning: ,,The specified emission factor file has an invalid header
record; therefore, the run was terminated.
Action: Specify a valid emission factor file and resubmit the job.
PMSEFIN Oil ERROR - NO OPTION CARD - INSERT EMISSION FACTOR ASSUMED
Meaning: No option card was specified; therefore, the default options of
insert emission factor, no overrides, no date criteria, no date
replacement, and warning message suppression were assumed.
Action: If other options are required, resubmit the job with a valid
option card.
273
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.7
EMISSION FACTOR INSERTION
PROGRAM PMSEFIN (EP0100)
Page 7
Release Date: 2/01/80
Update #: P-l
PMSEFIN 012 ERROR - NO VALID OVERRIDES SPECIFIED - NO OVERRIDES ASSUMED
Meaning: No valid overrides were specified on the option card;
therefore, the default of no overrides was assumed.
Action: If overrides are required, correct the option card and resubmit
the job.
4.3.7.5 Cataloyed JCL - EPMST10
4.3.7.5.1 JCL listing -PMSEFIN (EP0100) is executed by the cataloged
procedure EPMST10. This procedure also executes the master file internal
transaction pre-insertion sort program, PSREFIN (EP0090). See Figure 4.3.7-d
for a listing of EPMST10.
4.3.7.5.2 Cross-reference of DD names and files
Program Name: PSREFIN (EP0090)
DD Name
File Description
Input/Output
EPSINPT Unsorted internal transactions
SORTWK01 Sort work file
EPSOUTP Sorted^internal transactions
EPSDIAG Diagnostic report
Input
Internal
Output
Output
274
-------
E IS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.7
EMISSION FACTOR INSERTION
PROGRAM PMSEFIN (EP0100)
Page 8
Release Date: 2/01/80
Update #: P-l
Program Name: PMSEFIN (EP0100)
DD Name
File Description
Input/Output
EPSOPTN
EPSINPT
EPSEMFC
EPSOUTP
EPSDIAG
Option card Input
Sorted internal transactions Input
EIS/PS emission factor file Input
Internal transactions with insertions Output
Diagnostic report Output
4.3.7.5.3 User-supplied JCL - To execute the cataloged procedure EPMST10, the
user must specify the data set names of the EIS/PS emission factor file and
the input and output internal transaction files. An option card should be
included to select the insertion fields and to specify the conditions for
insertion. See Figure 4.3.7-e for a description of the procedure's
substitutable parameters.
4.3.7.5.4 Sample run stream - The following run stream would insert
information from the EIS/PS emission factor file 'CN.EPALMH.A087.CDHS.HQ.PNT.
DATA.EMFFIL1 into all of the valid insertion fields for the internal
transactions contained in the file 'CN.EPALMH.A087.CDHS.HQ.PNT.DATA.TRANSF3'.
The file containing the output transactions would be named 'CN.EPALMH.A087.
CDHS.HQ.PNT.DATA.INSTRAN1. Note that the FLAGW option, date criteria, and
overrides are specified.
// EXEC EPMST10,
// EMFCFIL=EMFFIL,
// OLDINTR=TRANSF3,
// NEWINTR=INSTRAN
//INSERT.OPTIONS DD *
FLAGW SUL 10 ASH 10 EMISSION 10 EDAT 79179 TDAT 79200
/*
275
-------
E IS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.7
EMISSION FACTOR INSERTION
PROGRAM PMSEFIN (EP0100)
Page 9
Release Date: 2/01/80
Update #: P-l
4.3.7.6 Warnings and Special Instructions
The input internal transactions must be sorted by the master file
internal transaction pre-insertion sort program, PSREFIN (EP0090), prior to
being input to PMSEFIN (EP0100); and the output internal transactions must be
sorted by the master file internal transaction sort program, PSRINTR (EP0110),
prior to being input to the master file maintenance program, PFMMSTR
(EP0120).
If an override option is specified for an insertion field, any data coded
in that field will be replaced by the data in the matching emission factor
file record.
If an internal transaction with a source of 'H' is submitted, no
insertions will be made into that transaction. If a type 23 internal
transaction with a pollutant ID of zero is submitted, type 23 internal
transactions will be generated for each pollutant ID in the emission factor
file for that SCC, origin, and source combination.
4.3.7.7 Cost Considerations
The estimates listed below are for the execution of PMSEFIN (EP0100) on
an IBM 370/168:
Number of internal transactions: 576 transactions
Number of emission factor file records: 475 records
Number of transactions receiving insertions: 25 transactions
Number of type 23 transactions generated: 184 transactions
CPU time: .53 seconds
I/O time: 2.10 seconds
Total time: 2.63 seconds
Estimated cost: $.37
276
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.7
EMISSION FACTOR INSERTION
PROGRAM PMSEFIN (EP0100)
Page 10
Release Date: 2/01/80
Update #: P-l
4.3.7.8 Related Programs and Procedures
The master file internal transaction pre-insertion sort program, PSREFIN
(EP0090), must be executed prior to PMSEFIN (EP0100). The cataloged procedure
EPMST10 executes both of these programs.
EIS/PS master file internal transactions can be created, sorted, have the
insertions made, and be used to update (or create) the master file by
executing the cataloged procedure EPEMM10 or the cataloged procedure EPFMM20.
See Section 4.4.3 for information on EPEMM10 and Section 4.4.4 for information
on EPFMM20.
277
-------
E IS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.7 •••"
EMISSION FACTOR INSERTION
PROGRAM PMSEFIN (EP0100)
Page 11
Release Date: 2/01/80
Update #: P-l
Type of Transaction
Valid Insertion Fields
21
23
Sulfur Content
Ash Content
Emission Factor
Figure 4.3.7-a. Valid Insertion Fields
278
-------
Flit
IKAMSAC i ni'i r.-nssinw I-ALII.IR
MA»t: PMSF.FIN
»tVISION LfVFt: l-uo
IASI uf'bAT^ •>: P-l
OAlt INCnHt'ClWArtl': FtHHtURY 1, 19»0
IN EFhFCT: FL*r,W
FIH.OS StLFCItO FUR INSLRIIU'IS: SUL AS" t"[S.StuN
in HE ovhRKiuof-'i: SUL ARM
SUIFUK i n ASH i n
FACIHH ( u
DA IF. S t"ISSIUN FACI'IK N
ro
**• PHSEHN 005 "»AWf,llMf; - NU MAIfHlNG f.nlSSiriN FACUrR FM.t KFCtlKO
nonun
*»* PMStFIN 0(lS WARNING - Nil HAICHlNC FMISSION F«CT(iH ULt KECMKH
UF INPUT TKANSACITUNSS
NUMHFK OF EM I S31 UN F AC CUR HtCUPOS
UF INSERTIONS HADE:
UF IIOTPHI (PANS AC THINS:
1UMBFR UF ?!, IRANSACTIONS CHF.AUD:
NllMriF.H OF rtARN
OF CUNOIHUNAI.
UF FHRUW
UF AbHRI M[S3AUFS:
UK HJSASIfif MESSAGES:
720
iai
II
A
n
o
n
Figure 4.3.9-c. Diagnostic Report
> «-•
CO
--^
-o
co
3» m
z 3>
o — i
n »— «
o
•o m co
50 3 m
o «-• o
o co —j
73 in t->
S> 1-1 o
2 O 32
CO 3»
m o
•n -H
"i O
m z
•o co
o m
H-« ^3
o -H
O •—i
— o
.£•
*
CO
T3 CD CU
Q- —' ua
Ql ($ f0
r+ OJ
fl> » I—»
n> ro
=«=
o
Q)
i n>
i—» .«
ro
o
oo
o
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.7
EMISSION FACTOR INSERTION
PROGRAM PMSEFIN (EP0100)
Page 13
Release Date: 2/01/80
Update #: P-l
Column Column Column Column Column Column
PI j
/ V
P9
/ >
#16 i
/ \
P23 i
/ >
£35 j
/ >
K6
/
FLAGW SUL I ASH I EMISSION I EDAT XXYYY TDAT XXYYY
or or or or
NOFLAGW SUL 10 ASH 10 EMISSION 10
Column
#80
v
V^M.
R
Note: 1. XX denotes the year; YYY the Julian date
2. Each field must contain one of the possible values indicated for it or!
blank.
Figure 4.3.7-c. Option Card Format
280
-------
E IS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.7
EMISSION FACTOR INSERTION
PROGRAM PMSEFIN (EP0100)
Page 14
Release Date: 2/01/80
Update #: P-l
//• M'Ai.MH/«OM? Mt.IM.f-pf- I H, LlHVu M. (V1V) S
//* IHIS p«?nf:nnipt Ai.Lu.-js IMF U.SFK in INSKHI int ».I'lssMu F.xrnii<
//» INTO I Ml. tlS/KS l'ASI»K MLF Trttl-HrtAL I WA.MS AC I IHU
//*
//*
//FI'MSTIO PK'IL P"«.l.lfct I = TM,
//
//
//
KF l,I
I 1 "IF I = ' I , ') ' .
II »*,»=• 1,11',
III i) iMTHSt 1'ilLUlNl ,
Wl Ir
//
//
it
'ut- /',fAn r;,i>hLfc \\
SPCUHI i=i
//
//
//SUP) l»tC POM
// WK,
//
SHWI t !;>/t'S
, I f>'
, IIIMJ ,
Hl> Mll-KrjAI.
; r PIUS l*4lil \-\\.\
//*
//S II- HI ] It III.) O.SHAMF=U"«.I.UC I . .'.
// VflL(Mt- = (PUl Vail ,"rIAIM),
.|K
USi4A -it-s.SYSl ..
//
= ( IKK,
tin;)
//*
//SHI'l»T.n/> HI) II', | | = (x I h •<»«,. -.1-PsJi IKlv.KUl ),
=t iw» , r s <''ii,v, SIT ) , ,t.u
// ,>"AI > =( I'
,iu r --'MM ,:>HI, JI.H n? ) ) ,
i'r ) , ,t ii'ti h,»
|Ji|fi«'--.U I Kfci,:; Af I I ii ' i
(I III) 11 (I I 01)
nonnn jno
n o o ii 0 s n ii
III) Oil Ofi fit)
mi rM i n /'io
rlllll .KlMOll
n n (i *i (i von
'1110(1 1 1(00
on n u I I On
OOOOf r'J'O
Hun id 'i no
Oil Oil ) V'H
OnOo 1 .,110
•M)0tl t /"O
MM;
Oil OOP H'MI
l i) 'III < II Oil
tiOiHl 01)
Oil I) i)
iHM>i» Woo
n ii on {MOO
(li)ili)
OiKID'J 1 0(1
i| 01' II 'IS" I)
il II 1 1) 'I r,0 II
ii nn u 'j /fin
ntinii/iHui)
nil oi) fi-4 on
'i II O OS II "i|
on cos i nij
(Page 1 of 3)
Figure 4.3.7-d. Cataloged Procedure EPMST10
281
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.7
EMISSION FACTOR INSERTION
PROGRAM PMSEFIN (EP0100)
Page 15
Release Date: 2/01/80
Update #: P-l
// lilSt'rf MM SIM )
//*
//« Ui.lTl'lll DATA ?if t - S'I»IH> MA;
//*
//F.MSlJIItf "D liS.JA-1F-zOl.SllU I f- i),
// III, | 1 =». II- ,1P,
// I>1 SIJ= ('•!!• «, I' ASS, MM K TK ) r
// SMAO =( IMK , f A. 'JiiUKSMt ),Kl 3F )
//»
//« MiJtHIM HAIA SM - IUAUHIISIIC KH'IJKT
//*
//Ff'SlifAR Di) SYSMHl=IU)li|
//*
//* (M)IPIII |)A1A Shlli - SVSTfl Hf'FKAT ll)M
//*
f ||. (• [NltkNAL I H A-ISAC | | IMS
//SYSiiUI
//«
//SYSDHllHI
//*
f)|) 8 Y SHU I = *
SY:JUIII=((,IJUI
//*
//S
//*
//
X/
//
no
I.F
//*
//* t'jShwi I-MISKUIN FAI. inws
//*
//SK-HI.IH Oil DS'.Ai'-l: =«Pi*II.M f. I . .1 HAD,
// VI U H-F =(t'»\ VAlh ,!MII OATA .SHI - iicir.".'
//*
//Ff'SuMfM I'D DfUjA 'F =ll(-1 II1MS,
i.ASIH* ^IL^ Imll-WHAL
I. 1 | IMS
//« r.iPIIT OAlrt -.M - I l.i/MS (-..iISSlH.J hAC
//*
//H'Sl.;>r i M i iiS.>. i-=M'i H.li r 1 . .i>nln.A,f-«iM.F II ,
// -\/ii| H I =(H'J | \/AU , i. F I A [f) ,
MM
//* ll'lll'l'l I/AIA St I - li-'IlflAI U-'A'JijAt I I'll S -If) >'••('' >l'i'
SilM I I' On |i'4>4A-'r =Kt'Nil.l| r 1 . .I'rt I A . : ''h • I •• I '•' ,
0 1| II I) tt II (i I)
, i i>(i
000i)», JO I)
n M (i « h n i>ii
(I I) l< On /•. On
0 (I (Ml ^ /(in
"00 (I 71 110
011007^(1(1
0 0 0 0 7 « 0 1)
oony7sno
'Ml 0 (> 7 h 0 0
(1 000 7 /'I II
no o it 7 MO it
000 1) 7 'JO (i
0110(18.^0(1
OOOi)Hi|00
O(iOOMSOi)
on do H 700
II 1)009 I 00
on no o^n 0
IK) ltd V ^i|(|
'til On '"I'1 1)
0 0 0 0 '' *> (1 0
0(1 Oil Ol, (I ||
0(1 Oil" 7 Oil
(to Oil
0 I III)
oo fur"-; oo
0(10
o ii o
nno
0 il (I
O Ii 0
'I II fl
'lull
inio
0 4 n o
noon
On'lu
O /(Ml
Oi.Oil
//
i 'I
I t , •» I A | i , Si •• = : ,1 I I '. I ) ,
IIDO | I U'MI
Olid I 1 I "n
nii'11 I
(Page 2 of 3)
Figure 4.3.7-d - continued. Cataloged Procedure EPMST10
282
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.7
EMISSION FACTOR INSERTION
PROGRAM PMSEFIN (EP0100)
Page 16
Release Date: 2/01/80
Update #: P-l
UM TrRl)M| t ,
//*
//* 1)1)1 Hill OAIA 8H - M| AU'IUSI II. Ml-RUHl
//*
//*
//* llliM'IH ''A1A StlS - :>».SU>'
//*
//?rS)'Kl|M| HI) SYS'lllT=Killl|
//*
//SY.'JlHM "U SYJiMlllzKIIIII
//*
I'D bYhi
[)D •S
//SYSlJDl)MP
//*
//*
'ton i
t; u () 1
o o n |
oooi
no'»l
DUO 1
nun i
Oil 01
(MI 01
'UlO 1
00n I
0 U 0 I
it no i
oooi
oooi
0(10)
noii i
oooi
oooi
oooi
0 (MM
1 JOO
'IHII
Vi II
I,'Ml
/'Ml
i o
MOO
> f f 0
•too
?MMI
? I 'I 0
Jino
V0<)
(Page 3 of 3)
Figure 4.3.7-d - continued. Cataloged Procedure EPMST10
283
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
Parameter
Name
PROJECT
SECTION 4.3.7
EMISSION FACTOR INSERTION
PROGRAM PMSEFIN (EP0100)
Page 17
Release Date: 2/01/80
Update #: P-l
Default
Value
'CN.EPALMH.A087.
CDHS.HQ.PNT'
PROG1
PROG2
REGION1
REGION2
TIME1
TIME2
OLDINTR
NEWINTR
EMFCFIL
UNIT
PSREFIN
PMSEFIN
150K
100K
'1,0'
'1,0'
EPOLDINT
!
!
EPNEWINT
EPEMFFIL
3330
Description
Highest-level index of data set names
(e.g., CN.EPALMH.A087.CDHS.HQ.PNT.
DATA.EPEMFFIL would be the full data
set name of the emission factor file)
Master file internal transaction
pre-insertion sort program
Master file internal transaction
emission factor insertion program
Region size allocated for execution
of PSREFIN
Region size allocated for execution
of PMSEFIN
Time allocated for execution of
PSREFIN
Time allocated for execution of
PMSEFIN
Lowest-level index of input internal
transaction file
Lowest-level index of output internal
transaction file
Lowest-level index of emission factor
file
Unit type to which output internal
transaction file is to be written
(Page 1 of 2)
Figure 4.3.7-e. Substitutable Parameters for EPMST10
284
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.7
EMISSION FACTOR INSERTION
PROGRAM PMSEFIN (EP0100)
Page 18
Release Date: 2/01/80
Update #: P-l
Parameter
Name
SERIAL
DISP1
DISP2
SPCUNIT
TEMP
WORKSPC
OUT
Default
Value
CDHSPK
OLD,PASS
'NEW,CATLG,
DELETE'
TRK
PRIMARY
SECNDRY
20
10
SYSDA
'20,10'
A
Description
Serial number of volume to which
output internal transaction file is
to be written
Disposition of input internal
transactions
Disposition of output internal
transaction file
Units in which space for output
internal transactions is to be
allocated
Primary space allocation for output
internal transactions
Secondary space allocation for output
internal transactions
Unit type for temporary work space
Space allocation for sort work areas
SYSOUT class for all print files
(Page 2 of 2)
Figure 4.3.7-e - continued. Substitutable Parameters for EPMST10
285
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.8
INTERNAL TRANSACTION SORT
PROGRAM PSRINTR (EP0110)
Page 1
Release Date: 2/01/80
Update #: P-l
4.3.8. MASTER FILE INTERNAL TRANSACTION SORT PROGRAM - PSRINTR (EP0110)
4.3.8.1 Description
PSRINTR (EP0110) sorts master file internal transactions into the
sequence required by the master file maintenance program PFMMSTR (EP0120);
Figure 4.3.8-a details this sort order. All master file internal transac-
tions must be sorted by PSRINTR (EP0110) before they can be used to update
(or create) the master file. See Section 4.3.5 for additional information on
the internal transactions.
4.3.8.2 File Formats
Input to this program consists solely of master file internal transac-
tions generated by PCENETR (EP0060), the NEDS to EIS/PS master file transac-
tion conversion-edit program; PEDMSTR (EP0080), the master file transaction
edit program; PMSEFIN (EP0100), the master file internal transaction emission
factor insertion program; or PMSEFGN (EP0130), the master file emission factor
transaction generator program. Refer to Figure 4.3.5-c for the internal
transaction format.
PSRINTR (EP0110) produces two output files: a diagnostic report and a
temporary file containing the sorted internal transactions. The sorted
transactions are in the same sequence as the master file and can be used as
input to the master file maintenance program, PFMMSTR (EP0120). An example of
the diagnostic report is shown in Figure 4.3.8-b.
4.3.8.3 Options and Control Cards
There are no options.
286
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.8
INTERNAL TRANSACTION SORT
PROGRAM PSRINTR (EP0110)
Page 2
Release Date: 2/01/80
Update #: P-l
4.3.8.4 Error Messages
There are no error messages.
4.3.8.5 Cataloged JCL
PSRINTR (EP0110) should always be executed in conjunction with the
master file maintenance program, PFMMSTR (EP0120). See Section 4.3.9.5 for a
discussion of the cataloged procedure EPFMM10, which executes both programs.
4.3.8.6 Warnings and Special Instructions
Note that the COBOL sort verb is used in this program; therefore, the
collating sequence for alphanumeric fields is determined by the computer at
the user's particular installation.
In addition to the diagnostic report produced by PSRINTR (EP0110),
messages generated by the sort-merge package will be printed. The format and
content, as well as the physical location, of these messages depend upon the
user's particular installation.
4.3.8.7 Cost Considerations
The following estimates are for the execution of PSRINTR (EP0110) on an
IBM 370/168:
287
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.8
INTERNAL TRANSACTION SORT
PROGRAM PSRINTR (EP0110)
Page 3
Release Date: 2/01/80
Update #: P-l
Number of internal transactions:
CPU time:
I/O time:
Total time:
720 records
1.70 seconds
5.01 seconds
6.71 seconds
Estimated cost:
$.94
4.3.8.8 Related Programs and Procedures
PSRINTR (EP0110) should always be executed in conjunction with the master
file maintenance program, PFMMSTR (EP0120). The cataloged procedure EPFMM10
executes both programs.
There are three other cataloged procedures which execute PSRINTR (EP0110)
and PFMMSTR (EP0120). The cataloged procedure EPEMM10 can be used to maintain
the master file with EIS/PS master file transactions as input. See Section
4.4.3 for a discussion of this procedure. To maintain the master file using
NEDS master file transactions, the cataloged procedure EPFMM20 can be executed
(refer to Section 4.4.4.). And, to maintain the master file using emission
factor transactions, the cataloged procedure EPFMM30 can be used. Refer to
Section 4.4.5 for a discussion of EPFMM30.
288
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.8
INTERNAL TRANSACTION SORT
PROGRAM PSRINTR (EP0110)
Page 4
Release Date: 2/01/80
Update #: P-l
Position
1 - 2
3 - 6
7 - 9
10 - 17
18 - 21
22
23 - 30
31 - 32
33 - 34
35 - 37
38 - 39
40
Description
State
County
AQCR
Plant ID
Point ID
Segment Type
SCC
SCC Segment Number
PNR Sequence Number
PNR Line Number
Card Number
Action Type
Sort Sequence
Ascending
Ascending
Ascending
Ascending
Ascending
Ascending
Ascending
Ascending
Ascending
Ascending
Ascending
Ascending
Figure 4.3.8-a. Sort Sequence for Master File.Internal Transactions
289
-------
s MASIM MLF tnrt«NAL IPANSACUHN SHUT
-lAMfc. PSRIMTR
LFVTL: i-oo
L»St U^l'*lt »I I'-l
0»U IMCOHPUHAlfchj
1,
ro
c
n>
4^
•
CO
00
I
cr
Ol
to
o
70
•a
o
3
NUMHFR IJF INPUT rwi-jSAr I IUMSJ
<—i r~ oo
—I ~o
m o co
> m
z >
O —I
m •—i
O
>
-o
73
O
-o
CO
a.
a>
d-
0)
HH CO
•J*
—I •
TO CO
Z 00
CO
o
-o o
o z
I—'
I-' CO
o o
rt>
n>
QJ
co
n>
o
Ot
o>
ro
o
i—«
00
T3
o>
IQ
n>
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 1
Release Date: 2/01/80
Update #: P-l
4.3.9 MASTER FILE MAINTENANCE PROGRAM - PFMMSTR (EP0120)
4.3.9.1 Description
The master file maintenance program, PFMMSTR (EP0120), is used to create
and/or update the EIS/PS master file. Internal format transactions produced
either by the master file transaction edit program, PEDMSTR (EC0080), or the
NEDS to EIS/PS master file transaction conversion-edit program, PCENETR
(EP0060), are used as input to the file maintenance program. These internal
transactions must be sorted into master file sequence by the master file
internal transaction sort program, PSRINTR (EP0110), before they are input to
the file maintenance program. In addition, emission factor information can be
inserted into the internal transactions by the master file internal
transaction emission factor insertion program, PMSEFIN (EP0100), prior to
running the file maintenance.
Each internal transaction either creates, changes, or flags as delete a
record in the master file. Any combination of transactions can be entered in
one execution of the file maintenance program.
The EIS/PS master file contains four types of records: plant, point,
SCC, and comment. Figure 4.3.9-a shows the formats of these records. The
plant record contains general descriptive information pertaining to an
individual plant (point source). Plants are defined by a plant ID within the
county. These ID's are assigned sequentially beginning with 0001.
Each plant can contain up to 1,296 emission points. Each emission point
is defined by a point record. Refer to AEROS Manual Series, Volume II: AEROS
User's Manual, Section 3.1.2 for a discussion of the grouping of emission
points. NEDS point ID's are used to identify the points. The point record
291
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 2
Release Date: 2/01/80
Update #: P-l
contains descriptive information on the point and its emissions, as well as
detailed emission information for a maximum of 16 pollutants.
Each point record can have up to ten SCC records associated with it.
More than one SCC record can be defined for an SCC by using the SCC sequence
number. The SCC record contains descriptive information related to the SCC as
well as detailed emission factor information for a maximum of 16 pollutants.
Comment records are related to emission points. Up to 99 comments with
up to 999 lines (records) each can be used for a single point. The comment
records are 'free form1 and can contain permits and registration information
as well as other comments desired for the point. No information from the
comment records is transmitted to NEDS. A chart of the general structure of
the EIS/PS file can be seen in Figure 4.3.9-b.
All EIS/PS master file records contain a common key area at the beginning
of the record. The plant ID field in this key is an eight-character number.
This number is used instead of the four-character alphanumeric field coded by
the user to insure that the file will be in the proper sequence on all
computers. That is, to insure that plant 0001 will be the first possible and
plant ZZZZ, the last possible plant for a county. Similarly, a four-digit
number is used for point ID. These eight and four digit numbers are generated
by converting the respective plant and point ID's to a totally numeric code.
All records contain flags to indicate their status for NEDS and EIS/PS
The flags are used by the annual report program, PRPENTR (EP0200). One flag
exists in each record for each type of NEDS and EIS/PS transaction used to
create that record. A code of A for a flag indicates that the record has been
added since the last execution of PRPENTR (EP0200); a code of C, that some
change has been made to the record for a field on that transaction, a code of
D or E, that the record (or pollutant) has been deleted. Note that deleted
292
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9 '
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 3
Release Date: 2/01/80
Update #: P-l
records remain physically in the master file until PRPENTR (EP0200) is run and
that PRPENTR (EP0200) physically deletes all records flagged as deleted.
The requirements for adding records to the master file are as follows:
Plant - Valid 01, 02, and 03 transactions are required to add a
plant record.
Point - A plant record must be present in the master file before
any points will be accepted for that plant. Valid 11 and
12 transactions .and at least one valid 13 transaction are
required to add a point record.
SCC - A point record must be present in the master file before
any SCC's will be accepted for that point. Valid 21 and
22 transactions and at least one valid 23 transaction are
required to add an SCC record.
Comment - A point record must be present in the master file before
any comments will be accepted for that point. A valid 30
transaction is required to add a comment. Any numeric
line number can be used.
Emissions calculations are also performed by PFMMSTR (EP0120). The
calculation involves a point record and all SCC records associated with it and
is performed for each pollutant on the point record. The calculated emissions
estimate is a sum of the estimates for all SCC's with a matching pollutant ID.
The control device efficiency from the point record is edited; if it is
nonnumeric, a value of zero is used for the' emissions calculation. The fuel
process rate and emission factors in each SCC record are edited; if either is
293
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
WSTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 4
Release Date: 2/01/80
Update #: P-l
found to be nonnumeric, the calculation is bypassed for that SCC. The ash or
sulfur content is edited when the ash/sulfur flag indicates that it will be
used; if it is found to be nonnumeric, the calculation will be bypassed.
For each SCC/pollutant ID combination which passes the edit, the
following calculation is performed:
Estimated Emissons = (F)(EF)(A/S)(1-CDEF)/2000
where
F = Fuel process rate
EF = Emission factor
A/S = Ash content or sulfur content
(only if present)
CDEF = Control device efficiency
A calculation of the potential emissions is made using the formula:
Potential = (F)(EF)(A/S)/2000,
where the variables are the same as defined for the estimated emissions.
4.3.9.2 File Formats
PFMMSTR (EP0120) uses three input files: the current EIS/PS master file,
the file of sorted internal transactions, and an option card. If PFMMSTR
(EP0120) is being executed to create a EIS/PS master file rather than update a
current one, there is no input master file. See Figure 4.3.5-c for the format
of the internal transactions and Figure 4.3.9-a for the format of the master
file. The option card is discussed in Section 4.3.9.3.
PFMMSTR (EP0120) produces a new (or updated) master file and a
diagnostic report. The format of the master file is illustrated in Figure
294
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 5
Release Date: 2/01/80
Update f: P-l
4.3.9-a. The individual fields are the same as those described for the master
file transactions in Figure 4.3.5-b with the addition of the sort key and the
following fields:
potential emissions - a calculation performed by PFMMSTR (EP0120)
apportioned emissions - a calculation performed by PFMMSTR (EP0120)
record type - indicates the type of record (plant, point, SCC, or
comment)
record size - the length of the record
NEDS and EIS flags - indicate NEDS and EIS activity
number of point pollutants - the number of pollutants in the point
record
number of SCC pollutants - the number of pollutants in the SCC
record
The diagnostic report contains the program update messages, option
messages, diagnostic messages, and summary statistics. When a transaction is
found to be invalid, it is printed in the diagnostic report along with a
message indicating the error. Warning messages are not printed unless the
user so specifies on the option card (see Section 4.3.9.3). See Figure
4.3.9-c for an example of the diagnostic report.
PFMMSTR (EP0120) also produces optional listings of the input and output
master files and the internal transactions. See Figures 4.3.9-d, e, and f
respectively for samples of these listings; information on obtaining these
listings can be found in the following section.
4.3.9.3 Options and Control Cards
An option card should be entered into PFMMSTR (EP0120). There are three
fields on the option card: a date, a FLAGW option, and a LIST option field.
The format of the option card is shown in Figure 4.3.9-g.
295
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 6
Release Date: 2/01/80
Update #: P-l
A two-digit year is entered into the date field and is used for editing
purposes.
The FLAGW option is used to indicate that warning messages should be
printed in the diagnostic report. Warning messages are used to indicate that
data was accepted but that the data may be questionable. A value of FLAGW in
the field will allow the warning messages to be printed. If the field is
blank or invalid, no warning messages will be printed.
The LIST option is used to indicate that listings of the input and output
master files and of the internal transactions should be produced. Examples of
these listings are shown in Figures 4.3.9-d, e, and f. A value of LIST in
the field will produce all listings. If the field is blank or invalid, the
listings are not produced.
4.3.9.4. Error Messages
PFMMSTR 001 CONDITIONAL - NO OPTION CARD
Meaning: The option card is required.
Action: Include an option card and resubmit the job.
PFMMSTR 002 WARNING - INVALID DATE ON OPTION CARD
Meaning: The date (year) must be numeric.
Action: No action is required.
PFMMSTR 003 CONDITIONAL - INVALID FLAGW FIELD ON OPTION CARD
Meaning: The valid codes are FLAGW and blank. A default of no FLAGW
was assumed.
Action: No action need be taken unless the warning messages are
required; in that case, correct the option card and resubmit
the job.
296 .
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 7
Release Date: 2/01/80
Update #: P-l
PFMMSTR 004 ERROR - FIELDS MISSING FOR EMISSIONS CALCULATIONS, 0 USED FOR-
EST I MATE
Meaning: One or more needed fields were missing for an SCC, zero was
used for the emission estimate for that SCC.
Action: Information for the point should be checked, and any needed
information added to the master file.
PFMMSTR 005 ERROR - NO MATCH ON MASTER FILE FOR TRANSACTION, CARD REJECTED
Meaning: A change or delete transaction was entered, but there was no
matching record in the master file.
Action: If the transaction was coded incorrectly, correct and resubmit
it.
PFMMSTR 006 ERROR - ADD TRANSACTION, RECORD ALREADY ON MASTER FILE, CARD
REJECTED
Meaning: An add transaction was entered for a record that already exists
in the master file (and is not flagged as deleted).
Action: If the transaction was coded incorrectly, correct and resubmit
it.
PFMMSTR 007 ERROR - TRANSACTION NOT ADD, BUT NO MASTER ON FILE, CARD REJECTED
Meaning: A transaction other than an add transaction was entered for a
record that is not in the master file.
Action: If the transaction was coded incorrectly, correct and resubmit
it.
PFMMSTR 008 CONDITIONAL - INVALID LIST FIELD ON OPTION CARD
Meaning: The valid codes are LIST and blank. A default of no LIST was
assumed.
Action: If the listings are required, correct the option card and
resubmit the job.
297
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 8
Release Date: 2/01/80
Update #: P-l
PFMMSTR 009 ABORT - TRANSACTION FILE OUT OF SEQUENCE
Meaning: The internal transactions must be sorted prior to being entered
into PFMMSTR (EP0120).
Action: Sort the transactions using PSRINTR (EP0110) and resubmit the
job using the sorted transactions. The procedure EPFMM10
executes both PSRINTR (EP0110) and PFMMSTR (EP0120).
PFMMSTR 010 ERROR - INVALID ACTION CODE ON TRANSACTION, CARD REJECTED
Meaning: Valid action codes are A (add), C (change), and D (delete).
Action: Correct and resubmit the transaction.
PFMMSTR Oil ERROR - INVALID CARD NUMBER ON TRANSACTION, CARD REJECTED
Meaning: Valid card numbers are 01-04 for plants, 11-14 for points,
21-25 for SCC's, and 30 for comments.
Action: Correct and resubmit the transaction.
PFMMSTR 012 ERROR - POINT POLLUTANT ID ALREADY ON FILE, CARD REJECTED
Meaning: An add transaction was entered for a pollutant that already
exists for the point.
Action: If the transaction was coded incorrectly, correct and resubmit
it.
PFMMSTR 013 ERROR - ATTEMPT TO ADD MORE THAN MAXIMUM NUMBER OF POINT
POLLUTANTS
Meaning: A maximum of 16 pollutants can be specified for a point record.
Action: If more than 16 pollutants are necessary, see Appendix B for
instructions on program table modifications.
298
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 9
Release Date: 2/01/80
Update #: P-l
PFMMSTR 014 ERROR - NO MATCHING POINT POLLUTANT ID FOR TRANSACTION, CARD
REJECTED
Meaning: A change transaction was input for a pollutant that does not
exist for the point.
Action: If the transaction was coded incorrectly, correct and resubmit
it.
PFMMSTR 015 ERROR - SCC POLLUTANT ID ALREADY ON FILE, POLLUTANT REJECTED
Meaning: An add transaction was entered for a pollutant that already
exists for-the SCC.
Action: If the transaction was coded incorrectly, correct and resubmit
it.
PFMMSTR 016 ERROR - ATTEMPT TO ADD MORE THAN MAX NUMBER OF SCC POLLUTANTS
Meaning: A maximum of 16 pollutants can be specified for an SCC.
Action: If more than 16 pollutants are necessary, see Appendix B for
instructions on program table modifications.
PFMMSTR 017 ERROR - NO MATCHING SCC POLLUTANT ID FOR TRANSACTION, CARD
REJECTED
Meaning: A change transaction was input for a pollutant that does not
exist for the SCC.
Action: If the transaction was coded incorrectly, correct and resubmit
it.
PFMMSTR 018 ABORT - INPUT MASTER FILE OUT OF SEQUENCE
Meaning: An out-of-sequence master file record was found, and therefore,
the run was terminated. Do not use the output from this run.
299
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 10
Release Date: 2/01/80
Update #: P-l
Action: Determine if the input master file has been sorted by PSRGENR
(EP0170). If it has, execute PFMMSTR (EP0120) again using the
correct master file (i.e., a master file not sorted by PSRGENR
(EP0170)). If the correct master file was entered, there is a
serious problem with that master file, and the user should
contact NADB.
PFMMSTR 019 ERROR - NEW MASTER RECORD INCOMPLETE, NOT WRITTEN
Meaning: Valid 01, 02, and 03 cards are needed to add a plant record.
Valid 11 and 12 cards and at least one 13 card are needed to
add a point. Valid 21 and 22 cards and at least one 23 card
are needed to add an SCC.
Action: Insure that all required transactions are present and valid,
then resubmit them.
PFMMSTR 020 ERROR - POINT INCOMPLETE, SCC NOT WRITTEN TO OUTPUT MASTER FILE
Meaning: Valid 11 and 12 cards and at least one 13 card are needed
to add a point. At least one of these was not present. No
SCC records will be written for the point, even though they
may have all necessary cards.
Action: Insure that all required transactions are present and valid;
then resubmit them.
PFMMSTR 021 ABORT - OUTPUT MASTER FILE OUT OF SEQUENCE
Meaning: An attempt was made to write a master file record out of
sequence, and therefore, the run was terminated. Do not use
the output from this run.
Action: Contact NADB.
300
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120.)
Page 11
Release Date: 2/01/80
Update #: P-l
PFMMSTR 022 ABORT - INVALID RECORD ON INPUT MASTER FILE
Meaning: A master file record was read that was not a point, plant, SCC,
or comment record.
Action: Determine if a correct EIS/PS master file was entered. If not,
execute PFMMSTR (EP0120) again using the correct input file.
If a correct file was used, there is a serious problem with
that master file, and the user should contact NADB.
PFMMSTR 023 ERROR - OVERFLOW FOR EMISSIONS ESTIMATE - RESULT INVALID
Meaning: While performing the calculation routine, a value greater than
10' was found. Therefore, zero was moved to the emissions
estimate.
Action: Determine if the fuel process rate, emission factor, and other
fields used in the calculation are correct; if not, correct the
invalid fields through normal file maintenance procedures.
PFMMSTR 024 ERROR - ATTEMPT TO ADD COMMENT TO NONEXISTENT POINT
Meaning: Comment records can only be added when the corresponding point
record exists.
Action: If the transaction was coded incorrectly, correct and resubmit
it.
PFMMSTR 025 ERROR - ATTEMPT TO ADD SCC TO NONEXISTENT POINT
Meaning: SCC records can only be added when the corresponding point
record exists.
Action: If the transaction was coded incorrectly, correct and resubmit
it.
301
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 12
Release Date: 2/01/80
Update #: P-l
PFMMSTR 026 ERROR - ATTEMPT TO ADD POINT TO NONEXISTENT PLANT
Meaning: Point records can only be added when the corresponding plant
record exists.
Action: If the transaction was coded incorrectly, correct and resubmit
it.
PFMMSTR 027 ERROR - INVALID CARD NUMBER FOR DELETE
Meaning: The valid card numbers for deletes are 01, 11, 13, 21, 23, and
30.
Action: If the transaction was coded incorrectly, correct and resubmit
it.
PFMMSTR 028 ERROR - INVALID INITIAL ADD CARD NUMBER
Meaning: An 01, 11, 21, or 30 card is required to initialize the
addition of a record.
Action: If the transaction is incomplete or coded incorrectly,
correct and resubmit it.
PFMMSTR 029 ERROR - ATTEMPT TO ADD DUPLICATE SCC
Meaning: Up to fifteen SCC records (including SCC's marked for deletion)
can be used for a single point. If additional records are
needed for an SCC, different SCC sequence numbers should be
assigned to each record.
Action: If the transaction was coded incorrectly, correct and resubmit
it.
PFMMSTR 030 ERROR - ATTEMPT TO DELETE POINT POLL NOT ON FILE
Meaning: A delete card was entered for a pollutant that does not exist
in the point record.
Action: If the transaction was coded incorrectly, correct and resubmit
it.
302
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 13
Release Date: 2/01/80
Update #: P-l
PFMMSTR 031 ERROR - ATTEMPT TO DELETE SCC POLLUTANT NOT ON FILE
Meaning: A delete card was entered for a pollutant that does not exist
in the SCC record.
Action: If the transaction was coded incorrectly, correct and resubmit
it.
PFMMSTR 032 ERROR - MASTER FILE CONTAINS SCC WITH NO POINT
Meaning: An SCC was encountered with no matching point. It will not be
written to the output file.
Action: Contact NADB.
PFMMSTR 033 ERROR - MORE THAN MAXIMUM NUMBER OF SCC FOR POINT
Meaning: A maximum of 15 SCC's are allowed for a single point
(including SCC's flagged delete).
Action: If more than 15 SCC's are necessary, contact NADB for
instructions on program table modifications.
PFMMSTR 034 ERROR - DUPLICATE TRANSACTION - CARD REJECTED
Meaning: Duplicate keys are allowed only on change transactions. The
first card is accepted; the second rejected.
Action: If an incorrect transaction was accepted, correct the error
and resubmit the job.
303
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 14
Release Date: 2/01/80
Update #: P-l
4.3.9.5 Cataloged JCL - EPFMM10
4.3.9.5.1 JCL listing - PFMMSTR (EP0120) is executed by the cataloged
procedure EPFMM10. This procedure also executes the master file internal
transaction sort program, PSRINTR (EP0110). See Figure 4.3.9-h for a listing
of the procedure.
4.3.9.5.2 Cross-reference of DP names and files
Program Name: PSRINTR (EP0110)
DD Name
File Description
Input/Output
EPSINPT
EPSOUTP
EPSDIAG
SORTWK01
Unsorted internal transactions
Sorted internal transactions
Diagnostic report
Sort work file
Input
Output
Output
Internal
Program Name: PFMMSTR (EP0120)
DD Name
File Description
Input/Output
EPSINTR
EPSOLMF
EPSOPTN
EPSNWMF
EPSDIAG
EPSINTL
EPSOLDL
EPSNEWL
Sorted internal transactions
Old EIS/PS master file
Option card
New or updated EIS/PS master file
Diagnostic report
Internal transaction listing
Old master file listing
New master file listing
Input
Input
Input
Output
Output
Output
Output
Output
304
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 15
Release Date: 2/01/80
Update #: P-l
4.3.9.5.3 User-supplied JCL - To execute the cataloged procedure EPFMM10, the
user must specify the data set names of the input (old) master file, the input
internal transactions, and the output (new or updated) master file. See
Figure 4.3.9-i for a description of the procedure's substitutable parameters.
4.3.9.5.4 Sample Run Stream - The following run stream would update the
EIS/PS master file 'CN.EPALMH.A087.CDHS.HQ.PNT.EPMASTR11. The updated file is
named 'CN.EPALMH.A087.CDHS.HQ.PNT.EPMASTR21. The option card specifies a year
of 80, but no LIST or FLAGW options are specified. The default name is used
for the input internal transaction file.
// EXEC EPFMM10,
// OLDMSTR = EPMASTR1,
// NEWMSTR = EPMASTR2
//UPDATE.OPTIONS DD *
80
/*
4.3.9.6 Warnings and Special Instructions
There are no warnings for this program.
4.3.9.7 Cost Considerations
To reduce the cost of running PFMMSTR (EP0120), use the default options
of no LIST and no FLAGW unless you actually need the information.
The estimates listed below are for the execution of PFMMSTR (EP0120) on
an IBM 370/168:
305
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 16
Release Date: 2/01/80
Update #: P-l
Number of old EIS/PS master file records:
Number of internal transactions:
Number of updated master file records:
CPU time:
I/O time:
Total time:
Estimated Cost:
123 records
243 records
172 records
.89 seconds
1.83 seconds
2.72 seconds
$.38
4.3.9.8 Related -Programs and Procedures
The cataloged procedure EPEMM10 can be executed to update"the master file
using EIS/PS input transactions. NEDS transactions can be entered into the
procedure EPFMM20 to be converted to EIS/PS internal transactions format and
used to update the master file. The master file can also be updated using
generated transactions containing emission factor information by executing the
procedure EPFMM30. Information on these procedures is given in Section 4.4.
306
-------
E IS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 17
Release Date: 02/01/8C
Update #: P-l
E IS/PS Master File - Plant Record
Column # Field Length • Data Type
1-37 37
38-41 4
42-43 2
44-45 2
46 - 49 4
50-52 3
53-56 4
57-61 5
62 1
63-64 2
65-67 3
68-69 2
70 - 81 12
82-85 4
86 - 87 2
88 1
89 - 103 15
104 - 113 10
114 - 123 10
124 - 171 48
172 - 175 4
Numeric
Numeric
Numeric
Numeric
Numeric
•Alphanumeric
Numeri c
Numeric
Alphanumeric
Alphanumeric
Alphanumeric
Numeric
Numeri c
Alphabetic
Alphanumeric
Numeric
Alphanumeric
Alphanumeric
Numeri c
Description
Sort Key
Record Size
Unused
State
County
AQCR
Plant ID
Date
Record Type
Unused
User Control Region
Local Control
User Plant ID
City
UTM Zone
Ownership Code
Contact
Telephone
Principal Product
Name and Address
Number of Employees
(Page 1 of 8)
Figure 4.3.9-a. EIS/PS Master File Format
307
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 18
Release Date: 02/01/8C
Update #: P-l
EIS/PS Master File - Plant Record (continued)
Column #
176 -
182 -
231 -
288 -
181
229
230
282
283
284
285
286
287
292
Field Length
6
48
1
52
1
1
1
1
1
5
Data Type
Numeric
Alphanumeric
Alphabetic
Alphanumeric
Alphabetic
Alphabetic
Alphabetic
Alphabetic
Alphabetic
Description
Property Area
Mailing Address
NEDS PI Card Flag
NEDS P7 Plant Comment
NEDS P7 Plant Card Flag
EIS 01 Card Flag
EIS 02 Card Flag
EIS 03 Card Flag
EIS 04 Card Flag
Unused
(Page 2 of 8)
Figure 4.3.9-a - continued. EIS/PS Master File Format
308
-------
E IS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 19
Release Date: 02/01/80
llnHato M- P-1
E IS/PS Master File - Point Record
Column # Field Length Data Type
1-37 37
38-41 4
42 - 43 ^ 2
44 - 45 2
46-49 v 4
50- 52 3
53-56 4
57-61 5
62 1
63-64 2
65-67 3
68-71 4
72-73 2
74-77 4
78-82 5
83-88 6
89-95 7
96 - 103 8
104 - 108 5
109 - 113 5
114 - 116 3
117 - 120 4
121 - 123 3
124 - 127 4
Numeric
Numeric
Numeric
Numeric
Numeri c
Alphanumeric
Numeric
Numeri c
Alphanumeric
Alphanumeric
Numeric
Numeric
Numeric
Numeri c
Numeric
Numeric
Numeri c
Numeri c
Numeric
Numeric
Numeric
Numeric
Numeric
Description
Sort Key
Record Size
Unused
State
County
AQCR
Plant ID
Date
Record Type
NEDS Point ID
User Point ID
SIC Code
IPP Code
UTM Horizontal Coordinate
UTM Vertical Coordinate
Latitude
Longitude
Percentage Annual Thruput
Normal Operating Rate
Boiler Design Capacity
Space Heat Percentage
Stack Height
Stack Diameter
Stack Temperature
(Page 3 of 8)
Figure 4.3.9-a - continued. EIS/PS Master File Format
309
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 20
Release Date: 02/01/80
Update #: P-l
EIS/PS Master File - Point Record (continued)
Column #
Field Length
128
135
140
144
149
153
160
177
233
239
241
246
253
- 134
- 139
- 143
- 147
148
- 152
- 158
159
- 171
172
173
174
175
176
- 228
229
230
231
232
- 238
- 240
- 245
- 252
- 255
7
5
4
4
1
4
6
1
12
1
1
1
1
1
52
1
1
1
1
6
2
5
7
3
Data Type
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Numeric
Alphabetic
Alphabetic
Alphabetic
Alphabetic
Alphabetic
Alphanumeric
Alphabetic
Alphabetic
Alphabetic
Alphabetic
Numeric
Numeric
Numeric
Numeric
Description
Exhaust Flow Rate
Velocity
Plume Height
Points with Common Stack
Compliance Status
Compliance Schedule
Compliance Update
ECAP
Control Regulations
NEDS P2 Card Flag
NEDS P3 Card Flag
NEDS P4 Card Flag
NEDS P5 Card Flag
PWCS NEDS Flag
NEDS P7 Point Comment
NEDS P7 Point Card Flag
EIS 11 Card Flag
EIS 12 Card Flag
EIS 14 Card Flag
Unused
Number of Point Pollutants
Point Pollutant ID
Control Equipment Cost
Primary Control Equipment
• y (Page 4 of 8)
Figure 4.3.9-a - continued. EIS/PS Master File Format
310.
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 21
Release Date: 02/01/80
Update I: P-l
EIS/PS Master File - Point Record (continued)
Column I
256
259
262
269
276
283
258
261
268
275
282
289
290
291
292
293
Field Length
3
3
7
7
7
7
1
1
1
1
Data Type
Numeric
Numeric
Numeri c
Numeri c
Numeric
Numeric
Numeric
Numeric
Numeric
Alphabetic
Description
Secondary Control Equipment
Estimated Control Efficiency
Estimated Emissions
Measured Emissions
Allowable Emissions
Potential Emissions
Emissions Units
Estimation Method
Test Method
EIS 13 Card Flag
Positions 241 - 293 can be
repeated up to 15 times
(Page 5 of 8)
Figure 4.3.9-a - continued. EIS/PS Master File Format
311
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 22
Release Date: 02/01/80
Update #: P-l
EIS/PS Master File - SCC Record
Column #
Field Length
1
38
42
44
46
50
53
57
63
65
73
75
81
88
95
98
101
108
- 37
- 41
- 43
- 45
- 49
- 52
- 56
- 61
62
- 64
- 72
- 74
- 79
80
- 87
- 94
- 97
- 100
- 105
106
107
- 132
133
134
37
4
2
2
4
3
4
5
1
2
8
2
5
1
7
7
3
3
5
1
1
25
1
1
Data Type
Numeri c
Numeric
Numeric
Numeric
Numeri c
Numeric
Alphanumeric
Numeric
Numeric
Alphanumeric
Numeric
Numeric
Numeric
Numeri c
Numeri c
Numeric
Numeric
Numeri c
Numeric
Numeric
Alphabetic
Alphanumeric
Alphabetic
Alphabetic
Description
Sort Key '
Record Size
Unused
State
County
AQCR
Plant ID
Date
Record Type
NEDS Point ID
SCC
SCC Sequence Number
BEC Code
Fuel Units
Fuel Process Rate
Maximum Design Rate
Sulfur Content
Ash Content
Heat Content
Confidentiality
Source Code
Source Description
EMF Origin
NEDS P6 Card Flag
(Page 6 of 8)
Figure 4.3.9-a - continued. EIS/PS Master File Format
312
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 23
Release Date: 02/01/80
Update #: P-l
EIS/PS Master File - SCC Record (continued)
Column # Field Length
135 - 186 52
187 1
188 1
189 1
190 1
191 1
192 - 196 5
197 - 198 2
199 - 203 5
204 - 212 9
213 1
214 1
215 1
216 - 222 7
Data Type
Alphanumeric
Alphabetic
Alphabetic
Alphabetic
Alphabetic
Alphabetic
Alphabetic
Numeric
Numeric
Numeric
Alphabetic
Alphabetic
Numeric
Numeric
Description
NEDS P7 SCC Comment
NEDS P7 SCC Card Flag
EIS 21 Card Flag
EIS 22 Card Flag
EIS 24 Card Flag
EIS 25 Card Flag
Unused
Number of SCC Pollutants
SCC Pollutant ID
Emission Factor
EIS 23 Card Flag
Ash-Sulfur Code
EMF Units
Apportioned Emissions
Positions 199 - 222 can be
repeated up to 15 times
(Page 7 of 8)
Figure 4.3.9-a - continued. EIS/PS Master File Format
313
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 24
Release Date: 02/01/80
Update #: P-l
EIS/PS Master File - Comment Record
Column #
Field Length
1 -
38 -
42 -
44 _
46 -
50 -
53 -
57 -
63 -
65 -
67 -
71 -
37
41
43
45
49
52
56
61
62
64
66
69
70
172
37
4
2
2
4
3
4
5
1
2
2
3
1
102
Data Type
Numeric
Numeric
Numeric
Numeri c
Numeric
Alphanumeric
Numeric
Numeri c
Alphanumeric
Numeric
Numeric
Alphabetic
Alphanumeric
Description
Sort Key
Record Size
Unused
State
County
AQCR
Plant ID
Date
Record Type
NEDS Point ID
PNR Sequence Number
PNR Line Number
EIS 30 Card Flag
Comment
(Page 8 of 8)
Figure 4.3.9-a - continued. EIS/PS Master File Format
314
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 25
Release Date: 2/01/80
Update #: P-l
Up to 1,679,616 plants per county
Up to 1,296 points per plant
sec
Comments
Up to 10 SCC's
per point
Up to 99 comments
per point
with 999 lines
per comment
Figure 4.3.9-b. Structure of EIS/PS Master File
315
-------
CO
I—»
01
IQ
c
-s
(0
•t*
•
CO
3
O
H-
_j.
O
O
3
US Flit MAINIFNANCF I'MMCKAM - l> I AGNUS 1 If Mt.S.'iSAKb S
PHflGRA« NAMts PFM.ISIR ff Pill 20)
»eVlSlf»N LFVFLS 1-00
LASI UPDAIF «: P-l
s FEHPUAKY 1, 10«n
OPTION
CMMKOL OAIF IS HO , f.PHOl« (IPttlHI IS .>((IFI AH,,, I (SI fU'UHH IS IJSI
*••
nun
- I-HLDS
s CAI ri/LH I h AH3ALT I MM,
. f
ons
n,j
IUA"SACTMII., CAMD
F timi
i»"S incni,' - 1,0 »'AICI« OM MASIL*' FII.I I-OH IWAMSACI i
OftS L«HOK - N'l V
(IF INPUT ThANRACHllM.S UFA')
Mu'«bi K UF msAsiFks
OF ABORTS OFfFCTtn
UF fulfills OFlFt'TH>
Mll»hFN rjF fHNU! 1 KlMAlS
4 HASItP FRf f"K I t-'A'XSACT 1 Hi',
F a^ftti?
nob t»Kiirt - N(I "AIXH MM MASH" file ^|>^^ HiANSAc i ifi'ir r«R» i.-
'
f.PKdi« - rwi MAICM nm MAbHf- F n e enK IMAHSAUTIIIN, T
Tj
0
0
?0
U
0
UF TMhSACI IMNS Kf JFCTkO
UF PUlivT SlMIWCe. HLF
DF PUI.'JT suiiwrt eiLf
ill AD
oui
17S
3 -n m
_ [— co
~^ ~o
m o co
O
m
-O 2 CO
33 3> m
o oo o
o —i —i
73 m >-,
> xD O
m co
co
m m
-o z
o >
>-• z
IS3 O
o m
T3 fB Oi
o. —• IQ
oi o> n>
c+ o»
n> w ro
CD O1
=»fc
.. o
D)
rt-
-O (D
rvi
o
. OO
O
-------
F.IK FILt MA1NIHUWCF PPlir.HA-1 - (|L 1> MISTED L I8 I 1 NC
'•Af.f
06196005300000001000000000000000000000?9?
061V60OStOOOOoooI II OoIIOOP0000000000000346
Obi 9600530000000 I 000 1240 300 101 00000000?V1
flb I9600b3ooooiifloi 01271 ooo 0000000000000316
06 i^oosiooooooo 1 0127240300)0 1 oup<>pooo?9'i
Ob 1 960 os,3oo oooooi oi272imon i p;»02 oon ooo? va
Ob 19600S30000040 loooooo oo ooooooooooooo2«;>
Ob 1960Pbf 0000040 10P01 I OOOoOpOOOOOO 1)000146
Obl96oos3ooooo4otoool2lo?o?3P202oooooo?94
ObiTMiossoooood 01 ooo 1240^001 PI 00000000291
"6 196005300000001 000 1JPOO 0011000002021 01 /?
OM 9600530000040 10002 10000000000000000346
Obl96oioiioooo?46
OM 9600530000000 10»0?2?.0'-001<» 705000000366
ni, 1 961105300 ooo4 ui 00 022?<»60Pi9HPboooooo?22
06196110530000010100022301032030100000022?
CO
I—»
^sl
if
!27o/inioooi
onoi 30 ooo nu no no npnsoiooooflono?9i
72
06?004053 II 273301 00000000001)000(iOOOllOO?9?
06?00405M1273301012710000000000000000346
Ot,2UO<405311275301 0127 500000000000202 I 017?
nh?00405til 2733011 Il?100noOOOOOO000000346
06?()04053l
1
06|9(,OOS JOOOI4l)P47o1 12504PI-M75 00 I 2 1 ?\'f IIMKt. SMYTMF- S<> I °'i'l J ^/f- H NC. 1 Nt S SYi'THF F ••»
061960055000 1«0047 101 01 1 1 1 4 1 2 I 24S409SS5 7 1 ? 1 ? 1 0^1 SI S?()?H3lHo 1 I OS4 7 (Ml 1 57(l<>/tiuiiio 1 00 I oPopoO 1
0619600S400P1R001720I10300101 Ool 230 1 20003H(|00004i)(>(iS 7«O?30O 1 SO 1 BtNUl ,-if
|i6I060oS3000|flOO')73010i'f
OA19600H40001R01 l331U02021SPLftnll 'Ji)l 1-ilLLIin lun r,i|| i>FLIriFS »S St 1
0'<19600S3«»Oai'IOl4701 1230'I('L-31 7S 00 \7\fVt,\ l'i«Gh S«Y1HF h9| •
|i6l96005S'I700 I WOO/ 0090 01 001 (Ml lid 00 1
Ofcl9600SS SU1 Hii'-.-i lP/lu//«> 'll.L rtf Cl
0619bO(iS3004|R014l«|02P| 1 I 14121?4S«0'>SSS7l21?|f>H1S1S?l>?0^03ol I 0 VI 700 I 3 7u9 ZOO^oo l 01) i uOnnoO 1
H(.19hOOS3P04inolg920210?0?JO^O| 12101 00 V»60l!01 AMI
06 10600S 40041 0002320220600 1980S1 2 ^0?JO|)P«000000?000 Ol>370| Pl.Ai-il
06 i060i)S30ii'il«o1 4^20230 10 J2P4P1 1 Oi)09?5000034«l ?00097H/I'IM AVt
06 1 960053004 1«01 49202 30?0020 I OS?OOft | OOSOOOOPO"3000034«l?OOo2901HP|. AMI
0619t>OHS30041HOP2320230?002«] 1 01240? 0030Q000004QOO 00?90 I I«PL AMT
06 19600S 3001 1 flOP»>320<'3i)?il050 100 I 2 <0 12000 3000000000091 2201001 SO IHt'l i\f||
06|9t>OoS3PO'llH00232P230?OOS0202t2Xo1200030000004000OIIS300'I1R01492024030010401 1210 ? 000200000 I nono 003701 KIAMI
061<'(>ooS30041HOl4920290?i)?02001 12301 0030000004000(1 00?S02P^l.<.l>' I
061o1i>F L 1.4ES nS SKI hn«j |?/|4/79
06200'IOS3Au41 AOJ4701 !2304Pt-3l7b 00 1 ?1 ^PGt'lKUt br'YTHK 7«l 9544 3/69HJI. SI H«AlSn»: HI
062001053AIJ41H0147101011 I 141212"S409SSS71?1210S1S1S?0?030^01 10547001 370'» /OOOiiO 1 001 (lOOOHO 1
0620 On U55AWM «002 3201 3O200SP1 001 2301 2000 300000040009 12201 P01 SOI Pl.i \ L Sf
06200405 5 Aun | n()02320 1 3U200SP202 1 230 I 2000300000040009 122P I Oo ISPiru I L .ST
06200'lo53AU4| Rot 'I730I02021SPLAUI Mill FULLIIWlNi; C-IM UFL I '-if- S AS S[ 1 1'iji.,, l?/l'i//<) r. 1 1 L MT D
1162000 OS J»U4 | HO 148 1020 11 11 4 1 2 1 245009b557 1 ? 1 ? I 05 I 5 1 S?u2il3i) 30 1 10S47001 •> 709 /009OO I 001 nOoPOP I
1162004 ti5i«ui4 1 Ri)P2 3202 <02oOSO I 00 1230 1 r>PO03POOiiP04 00091 ?20 10'MbP I MPl AN I
i)6200405^Au4|Mun232123U?00'>02P2123il1r'00030000li0400iiQl?201 00 I 50 1 HMI. AM I
062004oS3Au01HUl4B3P202021SPLAfjr "-'III fill I (liy I IMP. C-ll I DFL I «F 3 AS SL1 DU^h I2/I-I//9 "i I LI. Hf fl
ii620040SiAiJt»l«004701 12304CI -31 7S 00 1 2 1 ?Pr,nmi:e SMYTHF 2°1 •I'jttmih-iH.r. [ N| S MA-JSHM f t.
062PO'H)53Aur.l«Ol 131 1UO| 1 1 1 4 Ul 24 VI 0«-j5S 7 1 ? I 2 1 "'i I S 1 S?0?0 <0 30 1 IPS4/OH1 i 709 70|)'>HO I (Ml 1 000000 1
06200U05 3»ij(- I HO 02 32 I 'j3o?i)OS02»2 1 2*" l1 1'O iOOPOO 04 00(19 l 7f(\ inn ISO 1 n I- '.'(, \'i\-
062POaoS3Aw^lROll331U02021SPLANl Mil f Ul.l."*1 Nf- CUtuFL Iwl- :> AS SF t nijfo l?/1n/79 1 1I L HF CI
0620fl'l1 lit Nl, IWl-
Figure 4.3.9-d. Input Master File Listing
m
i—i
CO
-o
O CO
33
33
O
3 co
^ m
CO O
3D O
-O •-<
m
CO 2
33 >->
• —I
n m
T3 "Z.
o >
I—1 "Si
ro o
o m
co
Q.
Cu
rt
ft)
33
m
ro
QJ
V)
tt>
Q>
c+
n>
00
o
O)
ft>
ro
-------
MS FlU HAlNrF/r-iANO
Of>i9f>oftS3ooiiPooo I (mooco
n<) I 1
- Nt-« MAS IF H I IS I ING
'I -M7S
no | ? |?|'
SS'j? I ?\?\ <
Obl9*t0os-idooooo()t uoul
iiopooiiooii(>()<">;>;>oi
n|OI I t
«d 5o 01 in out /
r'^0 ' <>ndnsi>li0nnnood00^ ?0 1 ,")U 1 SO I M^ wr,
02001 ATHIS CIM«^N[ Af>nf I) (H/PI/KO
NH'. FniL".'tNn cninn. I.-JF- s AS s( I nn,.i-i \f/\a/T»
IS Inf F r^n ()F | m s CU««i1Ful
1 1 iuir'i1»/is'iii9sssMr'i?instsis?d?(mj :'»ln( tu
i' I nnl on " "II. L hf PI
'iToi i? nii5 ,. 1 1. L
(I6|9()OOS jnO'J|«IMi4fll02n| 1 I I J 1 2 I <»USa DOSS'S 7 I ? 1? I fjl SI S^d?cMiHO 1 I HSU /Oill i7('9 7011900 I nn |
no v;
Ob 1 V600S tooooo'i 01 on o??;?flftofl i9«o-jo ooan »???
CO
I—«
00
lotion?
'|P|
Ono?nnniioiOOOI>
puwni KI A"
nt\
A-4'
i\ii
AM
PLA"
CI. AMI
ObI9bOOS30liaiR(IO?-4i020201S''LA"Jl Mill F III L'lrt INR GUI i>Fl. IMPS AS Sf T IMI'IN |?/1»l//'>
Oh?00'IPS IIP I ? 1 ?l'Gt MKRI SMYInF 79 1 9S'»« * I hW ] I SI HAiiSlin III
TPOI <7ii">7(iii'''*iil<'PPO".p'iPoPo<'op09tP2olPi>isoin"i. si
Of.20000StAijniHOI<-73P10202n)PLANT 'Jilt F(IIL'"»lNG Pll II'F I. INF S AS SH Dlir.fi |?/1<)//«< '.'ILL HF
oh200flUSiAij HIL MF CI
Figure 4.3.9-e. Output Master File Listing
•Js. t—i i—i
»—i r~ oo
oo
m
§
3 OO
^ m
CO O
—I -H
m i—«
33 O
-n
-o i—i
-n r—
2 m
co 2
—I 3>
•3D I-H
m m
13 32
o 3>
I-* Z
ro o
CD m
T3
CL
O)
ft-
0>
•yo
n>
—i
o>
fD
CJ
CU
c+
O>
ro
o
oo
o
-o
cc
n>
ro
00
-------
CO
FIS Fill MAJMlFNANCt PRllCKAM - I H ftNS»C T I r)IJ
Obi vhons^ooononoi o no oonon ono no non n niiou??nhiw6u 05^1100 inn 06SSMY THE tNGTNF CUM-HANY INC.
n«>19fconb300oni)notunonono'»nnoOfiOO'n(>1»»^onb^lln(l1BOll<^sn|u^l«ooto^n2 F«NIMI t XMAUSI F iihf s
Oh1 VM)0^000"OOOl OOOl?00;UIO|0^0(>POOI)0?3(IOl>14hOOM<1OOIHnohS01''0*tlOirvtl? ?^1 (I"
061 vfcoob^onooooot«noi2'io?unin«»n?ni)Oon?nian^oninl»ii2i>iaLiii AMI ??i oa IHLMHI
...ic
13*
i K
1001 1)00130000000001102001 .<0| Oil V6II0530001HOP650102001LTFHS CfMMfNl APOf I) OV?1/HO 40*
06l96UOb3UOOOOOO|OOOI300flOOOOflOli020213020b19600S300ii1»oo6S01fl?02ILPLANT M(l« FHLL'twING T.U IDFLI NFS AS St 1 MdwiM l?/1 *0|.
OM V600b30000000l I|00130000000ll0li02021 i02°6l96UOSb010202?LTHtS IS TMF FuO flF IMIS
Ob19600b3000nOA01000l IOOOOOOOOOOO(iO(iOI300b19600S30n41ft006bO|12llll
llFI.F IF|i
06 1 9fcOOS $000001 01 00 0?230?OOSO 100.000002 32061 9MinS3UO«l«OOftl|
06 I 9^(10^30000000 1 000?2^0?00b01 01)00 000? 3^0 h I 0053 n 031 1270401 1)0(1000000000000011 01)001 OOh^uOlObfAliqlMOdftS
Ob?00?OOttOS3AH« I HOOAO
Ob?0040S3l
Ob?OOU"53i t 2 7 111 01 unol230?00'j020?00000?320l!>?llO«0'j3A(i'l I 800*0
Ob?OOaOS31 1^70001 000?2 30?1I05-0 1 00000002 320670 OilOS 3 A'XllHOOhO
06?00<)0b31 127330l(/l27250?OOSO|0(iOilOi)023?nb?(iOaosjAH -
F ?2t 0'JOOOOO?«03
F 11101
F '1260?
F '121 Ul
F 11101
F 0260?
F «2HM
f ??1 o'iuonoo?aoi
F ?2K"IOOOOO?<40*
F t1101
F 02101
F "2MI?
F U2I01
F ?2I O'ioonou?no \
F Mini
^ 111 o i
F (12 1 0 I
F ?2Io«ooooo?ao.i
F
F It 101
F ?f\ u'iooooi)?un i
F 1 I 101
F
Figure 4.3.9-f. Internal Transaction Listing
Oil/
2't,
23L
23L
2H
•—i r~ t/>
—^ ^3
m c~> GO
o —i
m i—i
o
O
O
3E CO
:> m
co o
—I —I
m »—i
•yo o
-o «-i 4s»
TI r— •
2 m co
—1 3>
33 1-1
m rn
-o =e
o >
I-1 2
ro o
o m
c:
TJ
Q.
ft
Q
O)
(A
O>
O
Ol
ro
o
oo
o
O)
ua
n>
ro
oo
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 30
Release Date: 2/01/80
Update #: P-l
COLUMN 1 COLUMN 4 COLUMN 10
V
FLAGW
LIST
Note: YY is the two-digit year to be used for editing purposes
Figure 4.3.9-g. Option Card Format
320
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 31
Release Date: 2/01/80
Update #: P-l
//* f f'Al MM//IOM7 HtlU.fHMH, (.I'lfl* H. f <) I •*) S'll-S'l'M
//* I'KIU.F Dl'KF '''AMI ! H'F I'M"!
//» "I- \/l S l"i-i I f v/l i.: I-on
//'» I AS I IJl'UA If ": I'-l
//* OAll- I MU'lkPIII'A TF l>: (-M)l-'llM. V 1, t'»HO
//*
//* rms fwnrfcnu"! nii.r>«.s inr n.sn< in MAiwiuifa nu. i.
//* Flit US (Ml. Pi'l-VIMURI Y MTIH) I IMMUAc T I tins
//*
//*
//Fi'l- .«iM| o (>i'ii(; ^•l/ll,?^ r i = 'c-j.i I'ni M»I. A(>H /.(;I>H:>.HIJ.»'N i •.
// I'IVIK;I si'SKi jr«.
// C^dii^rp
Hi'.f l = '
M
III
//
//
//
//
//
//
//
//*
IIMI l=
SFwl Al =f
1)1 Sl'
ItwPsSYSOA,
v\f||!), JO',
'-'ASIH<
H(,n=i ,
// 1 IMF = UT |"!| 1 )
//*
//» Sll«1 hIS/HS MftSlfK hTLf lult"HAL I K AMSrtf t |HHS 1'illl Ml.f
IM I)D KS'-lA -'I =^H|'||.IM. I ..MlAi),
»KH A JN),
//SMDIIJH mi ii.snA'.f =svsi .
//
//*
Oil IJM| IsKIIVI'.
// SPAf I =( FK* , C^-Mii'hSI'C), ,C I Mi I |l.)
//*
//Snk|iSKO,» l)|i U"l ! = (*lt ''I'r.tf f = !i I'v I ' * Hi >r
//
//*
II*
//*
< Ull IH'I I = f IvU* I'.Sf ('=( Sil'-' I !!• "I ,.S'HT') ) ,
.jl'/if.l = I IKK , ( k. "ill'KMT ) , ,f'l 1 1 1 1.)
linl/. .si- I - i-iColM-' f-MI I " 1 1- -'i'«l I - iiSnA. F => C>-li.lL( I . ."ft I ». %I-'IW1». ,
nun on | no
iii'HiMVC'i
(I lid (I 0 Sill!
mi Oiio -I ID
ll()0 1)0., l>i)
oonon /on
0(1 Hi)
n ii on
no
-I'll)
sno
OdOll 1 (,01)
OOOi) t MM1
o 1 vfio
.)? i) no
no
'Kino;'
o o o ij f 1 o o
') 'I 00 ?.^ 'Ml
no do
o>ioo
'MlOn
oonu Viou
01)1)0 \ /Oil
nu no "O
(Page 1 of 3)
Figure 4.3.9-h. Cataloged Procedure EPFMM10
321
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 32
Release Date: 2/01/80
Update #: P-l
//» HUTI'lll |iA|A SM - !ii|W|FH riA.S
//*
x/r fsiHiic nu DM) i sniF-Mf,
// u t :>f = f '<»•*-., r A *jS,!M
// M'ftf^ =( II.k.Slil- I F 1;
//» fiillKlll HA1A Sfl - I>1 Ai.'JUR MC
//»
i; nil 5>YSnn1=Knll|
¥ 1 1 f
//*
//* lOiiHin DMA ,sti;> - ar
//*
//.SYSI'P INI Dl) t>YJ>IO)l=>KIIM
//SYSIIIIT
//SYSIilililll III) tt
//*
//SYSltTb"-" I'll S>SI"ITsx.iHI|
//*
//*
//*
//*
//* xlAM-:! AI'v Fl-S/MS MAS IF- 1. TILF
//*
//SlfKMM nil lKSl\!A->iF-=K.F'l.-|)>It r I . ,LUAI)»
// vi it ii. >r = (fM«ivAtt,«r I A ju
OATA S^ I - ilPltll'l TAfl)
//*
//* iNl
//*
//f-t'SIIPIN HI) lif»NAH»-=HHT
// HCHSI'I.K.SI/FSMO
//*
//* iM'iil DATA sh r - .snr!) nr.iiiA.-iF=n.'.Sijl' IF n,
// II I .>''= f :iHK,»'AH.S)
//*
//« Pil-'IM HAfA hi- I - III II i..«S!M' F ll.t
//*
//K'SMI '--I' I'D H.'iNA it- sXC'i'iiJlC I . .I'rtl l».\HL"«
// v/IILHi-'.l- = Jf'K J VA ft , i^F I A I '•' ) >
/'/ |> | >>'=f SDK ,1 />:iS I
! I* A JSAT I I Ill-is
H'AMSAI T in j<;
'HII'
//• illlll'lll i. A I A M.I - '
//«
Su.v -r
"ASM
Mlf
//
i'n <•:•,(>* F s/.i'iM u r i . .(.-ft i A. -.i'i
in. i r i'tin i i »
OllliliS 7 i) II
(HldilSriilll
rut (>il 'i II 'Ml
Oil U IK, 1 Oil
o u n u h no ii
Oil II II /I) (Mi
Ot>nii7 l no
I) I) no 7^nii
on nu 7 4011
n o (i ii 7 u n (i
OH 0(1 7 SIM)
(M)ni.i 7t>t»i
0 (i nu j 7011
on oo HUD i)
| 01)
^
0 on OH /o (i
| no
OlIOlJ •>!,
no" I nin'o
00"
000
ooo
I'00
o o ri
oon
ono
'11)0
n il 0
nun
ooo
o j mi
o Vi«
O/"
0-fH
I nu
(Page 2 of 3)
Figure 4.3.9-h - continued. Cataloged Procedure EPFMM10
322
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 33
Release Date: 2/01/80
Update #: P-l
//« iiiiifiii
//*
| Vftlt ,K
,
ll , (K,PH|M/uvY,N8t(:MI»kY),Kl
:>t i - D| A(;nnsi H.
//* Ml) II-'M I l.iAIA Shi - MfiSlf-K Ml F lultw,,|A| I h AU5AL1 I H'<
//*
//FfSINIl ni> SY3f'JT=S.il'M
//*
//* iiurpiif »Au si- r - nun ^ASIH, LIST INI,
//*
//ff'SUU'l f"1 Dli
//*
//SYSiJI'llup in, ;iYSlliJI=lk«|ll|
//*
Ond
0 I) fi
'Mid
Olio
nun
Dill'
rni n
oo"
nun
'M)"
fin "
/) n 1}
SOU
MM)
/nil
nun
(Hill
II l| (I
"on
•Jill)
i ;> .i-.M
\?\ MO
1?4""
) ^'l no
I ? / '• i)
I ?M(")
mi" 1
no" I
Ollll I
nun i }f>iit)
"On 1 \/'in
"nn I
n (i 0 1
i
>
I
I
nun i /i.jo (i
o n n i /i i n
"•)() 1 iiftn
n (to i u 50
Figure 4.3.9-h - continued.
(Page 3 of 3)
Cataloged Procedure EPFMM10
323
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 34
Release Date: 2/01/80
Update #: P-l
Parameter
Name
PROJECT
PROG1
PROG2
REGION1
REGION2
TIME1
TIME2
OLDMSTR
NEWMSTR
UNIT
SERIAL
DISP1
DISP2
SPCUNIT
PRIMARY
SECNDRY
TEMP
Default
Value
'CN.EPALMH.A087,
CDHS.HQ.PNT1
PSRINTR
PFMMSTR
100K
150K
'1,0'
'2,0'
EPOLDMST
EPNEWMST
3330
CDHSPK
'OLD,DELETE1
'NEW,CATLG,
DELETE1
TRK
20
10
SYSDA
Description
Highest-level index of data set names (e.g.,
CN.EPALMH.A087.CDHS.HQ.PNT.DATA.EPOLDMST would be
the full data set name of the old master file)
Master file iriternal transaction sort program
Master file maintenance program
Region size allocated for execution of PSRINTR
Region size allocated for execution of PFMMSTR
Time allocated for execution of PSRINTR
Time allocated for execution of PFMMSTR
Lowest-level index of old master file
Lowest-level index of new (or updated) master file
Unit type to which new (or updated) master file is
to be written
Serial number of volume to which new (or updated)
master file is to be written
Disposition of internal transactions
Disposition of new (or updated) master file
Units in which space for new (or updated) master
file is to be allocated
Primary space allocation for new (or updated)
master file
Secondary space allocation for new (or updated)
master file
Unit type for temporary work space
Figure 4.3.9-i
(Page 1 of 2)
Substitutable Parameters for EPFMM10
324 .
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.9
MASTER FILE MAINTENANCE
PROGRAM PFMMSTR (EP0120)
Page 35
Release Date: 2/01/80
Update t: P-l
Parameter
Name
WORKSPC
INTRTRN
Default
Value
'20,10'
EP INTERN
OUT
A
Description
Space allocation for sort work areas
Lowest-level index of unsorted internal
transactions
SYSOUT class for all print files
(Page 2 of 2)
Figure 4.5.9-i - continued. Substitutable Parameters for EPFMM10
325
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.10
TRANSACTION GENERATOR
PROGRAM PMSEFGN (EP0130)
Page 1
Release Date: 2/01/80
Update #: P-l
4.3.10 MASTER FILE EMISSION FACTOR TRANSACTION GENERATOR PROGRAM - PMSEFGN
(EP0130)
4.3.10.1 Description
PMSEFGN (EP0130) generates EIS/PS 21 and 23 internal transactions to
update the emission factor information in the master file SCC records. The
transactions created by PMSEFGN (EP0130) must be sorted by the master file
internal transaction pre-insertion sort program, PSREFIN (EP0090), and
processed by the master file internal transaction emission factor insertion
program, PMSEFIN (EP0100), before they can be used to update the master file.
See Section 4.3.6 for information on PSREFIN (EP0110) and Section 4.3.7 for
information on PMSEFIN (EP0100).
PMSEFGN (EP0130) will only generate transactions for one user-specified
origin/source combination per run and will only compare the master file to the
first 2500 emission factor records with the same origin/source combination and
with a date equal to or more recent than a user-specified date. In addition,
the date of a master file record must be earlier than this user-specified date
for any transactions to be generated for that record. The origin/source
combination and the date are specified by an option card, which is discussed
in Section 4.3.10.3.
PMSEFGN (EP0130) generates one 21 change internal transaction for each
SCC record in the master file that satisfies the origin/source and date
criteria and for which the matching emission factor file record satisfies the
date criterion. One 23 change internal transaction is generated for each of
the pollutant ID's contained in the master file record. The date of the
generated transactions will be the same as the date specified on the option
card. This date will be changed by PMSEFIN (EP0100) to that of the matching
emission factor file record.
326
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.10
TRANSACTION GENERATOR
PROGRAM PMSEFGN (EP0130)
Page 2
Release Date: 2/01/80
Update #: P-l
The generated transactions must be processed by PMSEFIN (EP0100) to have
the sulfur content, ash content, and emission factor inserted into the
appropriate fields. They must then be sorted by the master file internal
transaction sort program, PSRINTR (EP0110), and processed by the master file
maintenance program, PFMMSTR (EP0120).
4.3.10.2 File Formats
PMSEFGN (EP0130) uses three input files: the EIS/PS master file, the
EIS/PS emission factor file, and an option card. See Figure 4.3.9-a for the
format of the master file and Figure 4.2.5-a for that of the emission factor
file. The option card is discussed in Section 4.3.10.3.
Three output files are produced: a diagnostic report, a file containing
the generated internal transactions, and a file containing an option card to
be passed to PMSEFIN (EP0100).
The format of the output option card is the same as that shown in Figure
4.3.7-c. The options specified for PMSEFIN (EP0100) are as follows:
1. Insert sulfur and ash contents
2. Insert emission factor
3. EDAT=XXYYY, where XXYYY is equal to the date specified for PMSEFGN
(EP0130)
4. Replace the date of the transaction with the emission factor file
date
5. The same warning message suppression option as specified for PMSEFGN
(EP0130).
327
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.10
TRANSACTION GENERATOR
PROGRAM PMSEFGN (EP0130)
Page 3
Release Date: 2/01/80
Update #: P-l
For a complete description of these options, see Section 4.3.7.3.
The output transactions are in master file internal transaction format
(see Figure 4.3.5-c) but must be processed by PMSEFIN (EP0100) before being
used to update the master file.
The diagnostic report contains the update messages, program statistics,
option messages, and error messages; see Figure 4.3.10-a for a sample
diagnostic report.
4.3.10.3 Options and Control Cards
An option card is input to PMSEFGN (EP0130) to specify the origin/source
combination and date and to specify whether or not warning messages should be
printed. All options are specified in fixed fields on the option card; see
Figure 4.3.10-b for the format of the option card.
The user must specify an origin/source combination to be satisfied by
both the emission factor file records and the master file records. If
transactions are desired fqr Federal-origin SCC records, the user must code an
origin of 'F' in column 1 of the option card; for State-origin records, he
must code 'S1 in column 1; and for Local-origin records, he must code 'L' in
column 1 and the desired source in column 2. If no origin/source combination
is specified, or if an invalid combination is specified, program execution
will be terminated.
The user must also specify a date to be satisfied by both the emission
factor file records and the master file records. The date of the emission
factor file record must be greater than or equal to the specified date and the
328
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.10
TRANSACTION GENERATOR
PROGRAM PMSEFGN •(EP0130)
Page 4
Release Date: 2/01/80
Update f; P-l
date of the master file record must be less than the specified date for a
transaction to be generated. The date is specified by coding a five-digit
Julian date in columns 8 through 12 of the option card, where the first two
digits represent the year and the last three, .the day within the year. If no
date is specified, or if the date is not numeric, program execution will be
terminated.
If 'FLAGW1 is coded in the warning message suppression field (columns 18
through 24) of the option card, all warning messages will be printed in the
diagnostic report; if 'NOFLAGW' is coded, no warning messages will be printed.
If this field is left blank or improperly coded, a default of NOFLAGW is
assumed.
4.3.10.4 Error Messages
PMSEFGN 001 ABORT - INVALID DATE SPECIFIED
Meaning: No date was specified, or a nonnumeric value was specified for
the date therefore, program execution was terminated.
Action: Correct the option card and resubmit the job.
PMSEFGN 002 ABORT - INVALID ORIGIN/SOURCE SPECIFIED
Meaning: A value other than 'F', 'S1, or 'L1 was coded for the origin,
or a source was specified for an origin other than 'L'.
Action: Correct the option card and resubmit the job.
PMSEFGN 003 ABORT - EMISSION FACTOR FILE CONTAINS ONLY A HEADER RECORD
Meaning: The emission factor file specified for this run contains no
records except the header record; therefore, program execution
was terminated.
Action: Specify a valid emission factor file and resubmit the job.
329
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.10
TRANSACTION GENERATOR
PROGRAM PMSEFGN (EP0130)
Page 5
Release Date: 2/01/80
Update f: P-l
PMSEFGN 004 WARNING - NO MATCHING EMISSION FACTOR FILE RECORD FOR ORIGIN/
SOURCE AND DATE SPECIFIED
Meaning: There is no emission factor file record to match the specified
master file record.
Action: None required.
PMSEFGN 005 WARNING - NO TRANSACTION GENERATED DUE TO MASTER FILE DATE
Meaning: No transaction was generated since the date of the master file
record was greater than or equal to the user-specified date.
Action: If a transaction is required for this record, specify a
different date on the option and resubmit the job.
PMSEFGN 006 ERROR - INVALID FLAGW OPTION SPECIFIED - NOFLAGW ASSUMED
Meaning: The warning message suppression option was incorrectly
specified; therefore, the default option, NOFLAGW, was
assumed.
Action: If a listing of all warning messages is required, correct the
option card and resubmit the job.
PMSEFGN 007 ABORT - INVALID EMISSION FACTOR FILE SPECIFIED
Meaning: The specified emission factor file has an invalid header
record; therefore, program execution was terminated.
Action: Specify a valid emission factor file and resubmit the job.
PMSEFGN 008 ABORT - NO OPTION CARD
Meaning: No option card was entered; therefore, program execution was
terminated.
Action: Enter an option card specifying a valid origin/source and a
valid date and resubmit the job.
330
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.10
TRANSACTION GENERATOR
PROGRAM PMSEFGN (EP0130)
Page 6
Release Date: 2/01/80
Update #: P-l
PMSEFGN 009 ERROR - EMISSION FACTOR FILE CONTAINS MORE THAN THE MAX NO OF SCC
Meaning: The emission factor file contains more than 2500 records that
satisfy the origin/source and date criteria. Only the first
2500 records are processed.
Action: See Appendix B for instructions on increasing the number of
emission factor file records allowed by PMSEFGN (EP0130) if the
additional records are required.
4.3.10.5 Cataloged JCL
4.3.10.5.1 JCL listing - PMSEFGN (EP0130) is executed by the cataloged
procedure EPMSM10. This procedure also executes PSREFIN (EP0090) and PMSEFIN
(EP0100). See Figure 4.3.10-c for a listing of EPMSM10.
4.3.10.5.2 Cross-reference of DD names and files
Program Name: PMSEFGN (EP0130)
DD Name File Description
EPSMSTR
EPSEMFC
EPSOPTN
EPSOUTP
EPSOPTO
EPSDIAG
EIS/PS master file
EIS/PS emission factor file
Option card
Internal transactions
Option card for PMSEFIN (EP0100)
Diagnostic report
Input/Output
Input
Input
Input
Output
Output
Output
331
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.10
TRANSACTION GENERATOR
PROGRAM PMSEFGN (EP0130)
Page 7
Release Date: 2/01/80
Update #: P-l
Program Name: PSREFIN (EP0090)
DP Name File Description
EPSINPT
SORTWK01
EPSOUTP
EPSDIAG
Unsorted internal transactions
Sort work file
Sorted internal transactions
Diagnostic report
Program Name: PMSEFIN (EP0100)
DP Name File Description
EPSOPTN
EPSINPT
EPSEMFC
EPSOUTP
EPSDIAG
Input/Output
Input
Internal
Output
Output
Option card
Sorted internal transactions
EIS/PS emission factor file
Internal transactions with insertions
Diagnostic report
Input/Output
Input
Input
Input
Output
Output
4.3.10.5.3 User-supplied JCL - To execute the cataloged procedure EPMSM10,
the user must specify the data set names of the EIS/PS master file, the EIS/PS
emission factor file, and the file of generated internal transactions. An
option card must be included to specify the origin/source and date criteria.
See Figure 4.3.10-d for a description of the procedure's substitutable
parameters.
4.3.10.5.4 Sample run stream - The following run stream would generate
internal transactions for the EIS/PS master file 'CN.EPALMH.A087.CDHS.HQ.PNT.
DATA.PSMSTR', using the EIS/PS emission factor file 'CN.EPALMH.A087.CDHS.HQ.
PNT.DATA.ASEMFL1. The file containing the generated transactions would be
332
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.10
TRANSACTION GENERATOR
PROGRAM PMSEFGN (EP0130)
Page 8
Release Date: 2/01/80
Update #: P^l
named 'CN.EPALMH.A087.CDHS.HQ.PNT.DATA.PSINTR'. Note that the NOFLAGW option,
Federal origin and a date of 79341 are specified.
// EXEC EPMSM10,
// MSTRFIL=PSMSTR,
// EMFCFIL=PSEMFL,
// INTRTRN=PSINTR
//GENER.OPTIONS DD *
F 79341 NOFLAGW
/*
4.3.10.6 Warnings and Special Instructions
Transactions are generated for only one origin/source combination per
run. The master file and emission factor file records must both satisfy a
user-specified date criterion for any transactions to be generated.
PMSEFGN (EP0130) will process only 2500 emission factor file records that
satisfy the user-specified origin/source and date criteria. If additional
emission factor file records are required, PMSEFGN (EP0130) will have to be
modified to accept them; see Appendix B for instructions on modifying PMSEFGN
(EP0130).
The generated transactions are not complete and must be processed by the
master file internal transaction emission factor insertion program, PMSEFIN
(EP0100), before being used to update the master file. The cataloged
procedure EPMSM10 executes PMSEFGN (EP0130), PSREFIN (EP0090), and PMSEFIN
(EP0100).
333
-------
LIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.10
TRANSACTION GENERATOR
PROGRAM PMSEFGN (EP0130)
Page 9
Release Date: 2/01/80
Update t: P-l
4.3.10.7 Cost Considerations
The estimates listed below are for the execution of PMSEFGN (EP0130) on
an IBM 370/168:
Number of master file records: 172 records
Number of emission factor file records: 638 records
Number of 21 transactions: 10 transactions
Number of 23 transactions: 38 transactions
CPU time: .61 seconds
I/O time: 1.34 seconds
Total time: 1.95 seconds
Estimated cost: $.27
4.3.10.8 Related Programs and Procedures
The cataloged procedure EPFMM30 executes PMSEFGN (EP0130) to generate
internal transactions, PSREFIN (EP0090) to sort the generated transactions,
PMSEFIN (EP0100) to make insertions into the transactions, PSRINTR (EP0110) to
sort the completed transactions, and PFMMSTR (EP0120) to update the master
file with the transactions. See Section 4.4.5 for information on EPFMM30.
334
-------
HASTEN FILE EMISSION FACinK rRANSACTlDN UFNFKMCIM HRHGKAM
PAGf I
NAMt! PMStFGN
HEV1SIHN LFVFLt 1-un
I AS I UPDAIF a; P-l
\, JVHO
OHTIMNS IN EMfCI: FL»G"<
01
OATt
ROOMi
•** PMRtFUN OOU
» NU MA1CHINC FHISSldN FACUlK FILL HtCMHD HID OK IC
AND OAfk
lunnooo
*•• PMPEFUN 004 PANNING - Nil MAICHING EMISSION
F lit Ktt'lhili HIM MKlb IN/SIUIRCF AMI) OAU
(.If "ASrE« tlLf RECUROa HEAD*
OF (K13SIUN FACTOR HtClJRDS HE«0|
OF 21 IRANSACTIONS CHfAftOj
UF ?) !HAN3»CTlf)NS THFATEHs
OF WARDING MESSAGES:
*UI*»fH UF CUMOIIIUNAL
NijMefH UF fHuuR MESSAGES:
« O
O Z -J
SO CO i-«
25 3> o
§ o z
"O I—t J^
3C O •
CO Z CO
m •
-n {75 i-»
"^ m o
o o
CO
o
T3 fD Oi
u> •*••' (O
Qi rt> rt>
cu
n> (/> i—*
n> o
o
CU
rt
n>
00
o
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.10
TRANSACTION GENERATOR
PROGRAM PMSEFGN (EP0130)
Page 11
Release Date: 2/01/80
Update #: P-l
Column #1
Column #2
\]/'
Column #8 Column #18
I
F
S
L Source
XXYYY
FLAGW
NOFLAGW
Note: XX denotes the year; YYY the Julian date
Figure 4.3.10-b. Option Card Format
336
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.10
TRANSACTION GENERATOR
PROGRAM PMSEFGN (EP0130)
Page 12
Release Date: 2/01/80
Update 1; P-l
U.MYl) '1. (91 V)
//*
//* LASI UPDAH «: P-l
//* OAH lWCIH: FF>t°UAIF i< |H CKt.AJh
//* F.18/Pii IMlFwrftl MIS-Sllll. FACTlll' I NftNSAf I lllMb
II*
//*
//FP-MSI'MO PHIH: fcu.iFr.I = TN.IPAI MM.AOM/.cnHS.no.PNI',
// I'RIli; ]r|
//
//
//
//
//
//
//*
//*
//*
//*
//*
//*
//* 1 MI-HI
//*
tri,
KFMi"i3=inok,
II"if I = • 1,o•.
I IMF <>=•) ,n'.
ONI T = S J^||,
SI-KI AI.=C.UHSPK,
rn r - f IS/PS i-
i\l F'-ilSSIMij FAI;TIIP
i.ltCI . .1 ii'Hp
V A I r ,1'F I A 1C) ,
Ffll 11IH HI I-
DO DSigA -f sKrM'n.ir r i. .i>^i A. vF .FI;F )i ,
r ii
SI I - » I .«•/!';. .'Ail
//
i>.'in (..•'!• =yi'H||.ii r I . .DAI A... i,
Vlll. ir-Fr fr1" I V .1 It . I-l I A I'l ) ,
n | Oil
(ni(ii;d gnu
O(in i)O'-> Oil
lMM)(H>f>"il
noono /oil
o (i o o ii ••; I'D
iioooo voo
oono I 1 0"
o o o o I <"' (i
OU'Mi 1 S'Ml
(I II (10 1 '4 Ml)
00 00 I VK>
0 «l 0 () 1 h l> ()
(10(11) I /OO
oonoii-.'U)
OllOOr>llOO
I?! no
n it n o ? j n o
n (in op /on
OOOo *,} oo
norm:
(MI no
nooo
n (i no 5 /no
no Oil lumi
OOOO'III IM)
II i) Ol|'I 1 Hi)
IMIO WIUMil
oo no'Mi oo
ID no 'i /o o
oo ft ,i'ii'on
OOOtj'I'MMI
DilO-lSlMH.1
ni.n isyini
(Page 1 of 4)
Figure 4.3.10-c. Cataloged Procedure EPMSM10
337
-------
E IS/PS SECTION 4.3.1
FILE CREATION AND TRANSACTION G
MAINTENANCE PROGRAM PMSEK
// *
//• I'-H'iii IIAIA si- i - HIM jiii' i Akii
//*
//FHSMP1N 1)1) .H.,,A-F=n..T...,.S,
0 Page 13
ENERATOR Release Date: 2/01/80
GN (EP0130) Update #: P-l
•
minus /no
onniiSMriu
noon v/"n
'lil'UI^IJIIO
II 110 DM O'l
//* liMIPiir DATA Sr 1 - tt.WH.S IN1F.W.1AL f'MSHIIIIJ FACIMK 1 » A'"yAC T UJuS ')iiOO*.<»0Af-fMfLU|i|||i-|l JBfcjlViJfl^VI 1? *
/ / «;>rfll»|^3l\«a'l*''IVIlFl'>r""Ilf%»-
//* iiii|Piir DAfn SM - uf'irmJ tA"o HIK P.MJ.
//*
//FPSiiPin no i)SHV-iF = **rAWi,j,
// f>l SMr ( Mt WfPASS, DFLF t F ) ,
// 'IN I I =«. 1 1 l-.l'.
// SI'AMh = » 1 WK , 1 )
//* HlJ|°llT DATA S^ 1 - 1)1 AHMIIST IT H>H'i|K|
//*
//f-psniAf; '>!> squill =M)III
//*
//* niiil'uf »AlA :;I--IS - Srsifn iiPi-i-'/vl Jiiij
//*
//*
//SYSPHjnl 111) SYJilHITsAlllll
//*
//SYSliMlnlf I>H :iY.SIIllT=V.IMI
//*
//*
//SY3I/DUMP Ol> SY.'iMin = ^UiM
//*
//*
//SHIM MLC i-r:Mr%pwiii;?,
// IlMFsfMI-'l'?)
//*
//* SIIWI H IS/I'S Mfl.siF'w Kf|h lnTH/.jAL (WA'J
//*
//s rrf'i.. i '< on OR -i/uiF =*HWII.II c i . .1 IIAIJ,
// tfML'iMf- = rMi'^VArt ,»/F IA.IMI,
//SIIWMIM ni> I>S.-IA«F=SY.SI .ofKFL i'i.
// <)t:->t'=( SHH.h'ASS)
//*
//r.iip 1 .VKri) nil iifJ|l=MMiP,
// ;it-'Af I- = 1 x SITI'Ml^, f x('H .IKY?, -,
//*
//Sill/ | i«-ikf>^» 1)1) il'-l 1 f = f ^H '1i'».->' l' = .fli< 1 />« U 1 1 i
f f SI'dTf =( ^..iri.'l"! f r , I '.I'" I'/Y/3, '
//*
n ""!!!! "*!!-"
oon'oi!/')"
m'.n"hMn"
n (i n (i 7 n n <>
ft- 1H 0110(17 1 no
n n no TV 'Hi
oo oo 7. Sim
n o o i) 7 'i do
(Ml O'l /SCO
n no n 7 «.> IYII
Odoo 7 /«o
on rm /MOO
0 ooo /•/'")
'i on or< ti (MI
')tl"llM | III)
'I II 0 U H i> (I 0
, (in no Mn on
OOOOHSPO
Oiirti)'«j,ni|
nun IIH /nil
'"'nT^rt!'
no nn 'in on
(Ml1|J''l '10
ourig'/f'oo
o n n i)^ $1*1 o
0 II O (l^ij 0 II
o o n (j fi s n ii
nonii'M.no
Oi)()ll" /OU
iACTIH'JS 1- ) , ,i.n,i r in ) i>'i" o/oo
011(1 l>Mf)0
ft o «) nv/no
i( .jHi< r^ ) , , ( n , r 1 1, ) O'i'i In il if
it, ii\ t | nrj
'ill^ I -'h 0 -. I'M 11-' 1 I = (A II- ll', :,M'= ( .Sill' I TIM) I , :i'l'-" I "• it/* ) ) ,
Dill1
(Page 2 of 4)
Figure 4.3.10-c - continued. Cataloged Procedure EPMSM10
338 *
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.10
TRANSACTION GENERATOR
PROGRAM PMSEFGN (EP0130)
.Page 14
Release Date: 2/01/80
Update #: P-l
//
//*
//*
.-a-Aff =(Kj>i'f.Mij|<', ((•.t'ij.iMr,»,(i»rNi»WY^)> , i.n ,11 1 1, )
,>ii - i-iAsriw rut \HI\*HM IIVA.ISACI run;-;
ll.SUA '• F =
//M'SIMI'I
//
//*
//* llurHUI DAIA SKI - SIH'lFli HASH" rill I '< I (- Kll M. IrfAM.SAf: I II)''.S
//*
//ri'SlMMP I)H li.MilAM|-=K>C.S|iPII-|'f
// Hill T=K If-Mf,
// M'Ad-rtf.SI'CI'f-iF 1, (KHIMI'H , K.'iC'mKYI ) , KLS|- )
//»
//* nim'iii DATA st i - oi Ai;fMisi K ivn
//»
//I I'SIHAi", Dll SYMHlTsKlMII
II*
//* HillHlM |»AiA SKIS - SYSH*" 'I
//*
ni> .SY.M'ltlTsKiHIT
no .sYi>>Kil=Kuni
//*
//
//
//
//*
I'M SYS"Ul=l"ill|
rxft l'i;i..=)iPwni,?,
//
r>i) IISNAMF supvii.itr i . .1 HAD,
VI "I HMr = f t>i'J VAIt , «F I AIM) ,
//*
//* l;-'i'ur D/«TA .si- i - .
//*
I'D |i
//*
//* IP-.PIM IIAI.-I >M -
/I*
//
MI M'=(:i| n, I'ns.'
: I
HSM'K'
//
(• =\HI'II if r i . .m\f a. a •» i ' H ,
-\ =r PI/I \/i\ ii ,i0 I ?-SIIII
non i/> /no
(inn
ooo
0(11
ni)n
000
311'.1
noo
ouo
0 I) 0 1
nun i
on 01 j
0(10)
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.10
TRANSACTION GENERATOR
PROGRAM PMSEFGN (EP0130)
Page 15
Release Date: 2/01/80
Update #: P-l
//* IIIJTI'III iiAIA :;h I - liJlh.7iiA| I I'Af'IJflf. T 1 1 IMS I- 1 Tli t"IS->lll'l fi\riU|.S
XX*
XXF H. SI III |P nil (t.Si'iA -i| sKHiVil.lt f. t . . fi A I A . \.M- -«i| ft I K ,
xx vi it 1 1 if =(pwi \//t IK ,nt i A i w,;;i i>=>.;if-w i /ii j ,
//
//
//*
//»
//*
UNI Ir
T,
»'"'i< i
ftifl sti - ui«UMijsin
Dl) SV.SIMlTsMHII
AIA S»-TH - SYSU.M Ill'l- Hft I I IJ'M
//*
//* Mlinj'l|
XX*
//.SYS»'l*|fl| Mil SV:-.MilT=X,iHI I
XX*
X/SYSIIIII on s
xx*
//srsi»HiiH| nn
xx*
XXSfSliTI-K^ I>D
xx«
XXSf SlinilM
XX*
XX*
1)1) SVSIllJTsKIHtl
Ollll 1 >
till (I I 7 0 on
nun 1 / ) ( I 7S'"i
flu "I 7iiiiii
'Hi" 1 7 / no
nun | 7J-I-I)
•in 0 I r*'ni
Oil II I HiI'M)
f \ n o
i n
nun 1 t
nn') i
nun ) HI, no
nun IK •/mi
01)0 I'M'M)
i) o P 1 ') i " ii
'Mill I " ill II
(Page 4 of 4)
Figure 4.3.10-c - continued. Cataloged Procedure EPMSM10
340
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.10
TRANSACTION GENERATOR
PROGRAM PMSEFGN (EP0130)
Page 16
Release Date: 2/01/80
Update #: P-l .
Parameter
Name
PROJECT
PROG1
PROG2
PROGS
REGION1
REGION2
REGIONS
TIME1
TIME2
TIMES
EMFCFIL
MSTRFIL
NEWINTR
UNIT
Default
Value
'CN.EPALMH.A087
CDHS.HQ.PNT1
PMSEFGN
PSREFIN
PMSEFIN
100K
150K
100K
'1,0'
'1,0'
'1,0'
EMFFIL
OLDMST
NEWINT
3330
Description
Highest-level index of data set names
(e.g., CN.EPALMH.A087.CDHS.HQ.PNT.DATA.
EMFFIL would be the full data set name
of the emission factor file)
Master file emission factor transaction
generator program
Master file internal transaction
pre-insertion sort program
Master file internal transaction emission
factor insertion program
Region size allocated for execution of.
PMSEFGN
Region size allocated for execution of
PSREFIN
Region size allocated for execution of
PMSEFIN
Time allocated for execution of PMSEFGN
Time allocated for execution of PSREFIN
Time allocated for execution of PMSEFIN
Lowest-level index of emission factor file
Lowest-level index of master file
Lowest-level index of generated internal
transaction file from PMSEFIN
Unit type to which internal transaction
file from PMSEFIN is to be written
(Page 1 of 2)
Figure 4.3.10-d. Substitutable Parameters for EPMSM10
341
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.3.10
TRANSACTION GENERATOR
PROGRAM PMSEFGN (EP0130)
Page 17
Release Date: 2/01/80
Update #: P-l
Parameter
Name
SERIAL
DISP
SPCUNT1
SPCUNT2
PRMRY1
PRMRY2
SCNDRY1
SCNDRY2
OUT
Default
Value
CDHSPK
'NEW.CATLG,
DELETE1
TRK
TRK
20
20
10
10
A
Description
Serial number of volume to which internal
transaction file from PMSEFIN is to be
written
Disposition of internal transaction file
from PMSEFIN
Units in which space for internal
transactions from PMSEFGN and PMSEFIN is
to be allocated
Units in which space for work files is to
be allocated
Primary space allocation for internal
transactions from PMSEFGN and PMSEFIN
Primary space allocation for work files
Secondary space allocation for internal
transactions from PMSEFGN and PMSEFIN
Secondary space allocation for work files
SYSOUT class for all print files
(Page 2 of 2)
Figure 4.3.10-d - continued. Substitutable Parameters for EPMSM10
342 *
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4
MULTI-PROGRAM PROCEDURES
INTRODUCTION
Page 1
Release Date: 2/01/80
Update #: P-l
4.4 MULTI-PROGRAM PROCEDURES
4.4.1. INTRODUCTION
The cataloged procedures EPEME20, EPEMM10, EPFMM20, and EPFMM30 allow the
user to combine various file creation and maintenance functions into one job
step.
EPEME20 creates or updates the emission factor files using NEDS emission
factor file transactions. It executes the NEDS emission factor file
transaction sort program, PSRNEEF (EP0010); the NEDS to EIS/PS emission factor
file transaction conversion program, PCVNEEF (EP0020); the emission factor
file transaction sort program, PSREFTR (EP0030); and the emission factor file
edit-maintenance program, PEMEFAC (EP0040).
EPEMM10 edits master file transactions and creates or updates the master
file. The programs executed by this procedure are the master file transaction
sort program, PSRMFTR (EP0070); the master file transaction edit program,
PEDMSTR (EP0080); the master file internal transaction pre-insertion sort
program, PSREFIN (EP0090); the master file internal transaction emission
factor insertion program, PMSEFIN (EP0100); the master file internal
transaction sort program, PSRINTR (EP0110); and the master file maintenance
program, PFMMSTR (EP0120).
343
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4
MULTI-PROGRAM PROCEDURES
INTRODUCTION
Page 2
Release Date: 2/01/80
Update #: P-l
EPFMM20 allows the user to create or update the master file using NEDS
transactions. This procedure executes the NEDS transaction sort program,
PSRNETR (EP0050); the NEDS to EIS/PS master file transaction conversion-edit
program, PCENETR (EP0060); the master file internal transaction pre-insertion
sort program, PSREFIN (EP0090); the master file internal transaction emission
factor insertion program, PMSEFIN (EP0100); the master file internal
transaction sort program, PSRINTR (EP0110); and the master file maintenance
program, PFMMSTR (EP0120).
EPFMM30 creates or updates the master file using transactions generated
from the emission factor file. This procedure executes the master file
emission factor transaction generator program, PMSEFGN (EP0130); the master
file internal transaction pre-insertion sort program, PSREFIN (EP0090); the
master file internal transaction emission factor insertion program, PMSEFIN
(EP0100); the master file internal transaction sort program, PSRINTR (EP0110);
and the master file maintenance program, PFMMSTR (EP0120).
Refer to Sections 4.4.2, 4.4.3, 4.4.4, and 4.4.5 for detailed discussions
of EPEME20, EPEMM10, EPFMM20, and EPFMM30, respectively.
344
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.2
EMISSION FACTOR FILE
PROCEDURE EPEME20
Page 1
Release Date: 2/01/80
Update #: ,-P-l
4.4.2 EMISSION FACTOR FILE EDIT-MAINTENANCE FROM NEDS EMISSION FACTOR FILE
TRANSACTIONS - EPEME20
4.4.2.1 Description
The cataloged procedure EPEME20 allows the user to convert NEDS emission
factor file transactions and use the converted transactions to update (or
create) the EIS/PS emission factor file. This procedure executes the NEDS
emission factor file transaction sort program, PSRNEEF (EP0010); the NEDS to
EIS/PS emission factor file transaction conversion program, PCVNEEF (EP0020);
the emission factor file transaction sort program, PSREFTR (EP0030), and the
emission factor file edit-maintenance program, PEMEFAC (EP0040).
4.4.2.2 JCL Listing
See Figure 4.4.2-a for a listing of this procedure.
4.4.2.3 Cross-reference of DD Names and Files
Program Name: PSRNEEF (EP0010)
DD Name
File Description
Input/Output
EPSINPT Unsorted NEDS emission factor file transactions Input
EPSOUTP Sorted NEDS emission factor file transactions Output
EPSDIAG Diagnostic report Output
SORTWK01 Sort work file Internal
Program Name: PCVNEEF (EP0020)
DD Name
File Description
Input/Output
EPSINPT Sorted NEDS emission factor file transactions Input
EPSOPTN Option Card Input
345
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.2
EMISSION FACTOR FILE
PROCEDURE EPEME20
Page 2
Release Date: 2/01/80
Update #: P-l
DP Name
EPSOUTP
EPSDIAG
EPSTRNL
File Description
EIS/PS emission factor file transactions
Diagnostic report
Emission factor file transaction listing
Program Name: PSREFTR (EP0030)
DP Name File Description
EPSINPT Unsorted emission factor file transactions
EPSOUTP Sorted emission factor file transactions
EPSDIAG Diagnostic report
SORTWK01 Sort work file
Program Name: PEMEFAC (EP0040)
DP Name
EPSTRAN
EPSOPTN
EPSOLEF
EPSOLDS
EPSNWEF
EPSNWDS
EPSDIAG
EPSTRNL
EPSOEFL
EPSODFL
EPSNEFL
EPSNDFL
File Description
Sorted emission factor file transactions
Option card
Old emission factor file
Old emission factor description file
New emission factor file
New emission factor description file
Diagnostic report
Transaction listing
Old emission factor file listing
Old emission factor description file
listing
New emission factor file listing
New emission factor description file
listing
Input/Output
Output
Output
Output
Input/Output
Input
Output
Output
Internal
Input/Output
Input
Input
Input
Input
Output
Output
Output
Output
Output
Output
Output
Output
346
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.2
EMISSION FACTOR FILE
PROCEDURE EPEME20
Page 3
Release Date: 2/01/80
Update #: P-l
4.4.2.3 User-supplied JCL
To execute the cataloged procedure EPEME20, the user must supply job
accounting information, input transactions, the data set names of both the old
and the updated (or new) emission factor file and emission factor description
file, and option cards to specify any desired options. See Figure 4.4.2-b for
a description of the procedure's substitutable parameters.
4.4.2.4 Sample Run Stream
The following run stream illustrates the use of EPEME20 to create the
EIS/PS emission factor file and emission factor description file from input
transactions stored in a disk data set named 'CN.EPALMH.A087.HQ.PNT.DATA.
NEDEMFT'. The new emission factor file will be named 'CN.EPALMH.A087.HQ.PNT.
DATA.EPEMFL11 and the description file will be named 'CN.EPALMH.A087.HQ.PNT.
DATA.EPEMFD11. A date of 80347, but no list options, are specified for
PCVNEEF (EP0020) and PEMEFAC (EP0040).
//EXEC EPEME20,
// NEWEMFOEPEMFL1,
// NEWDESC=EPEMFD1
//SORT1.INPUT DD DSN=CN.EPALMH.A087.HQ.PNT.DATA.NEDEMFT
//CONVERT.OPTIONS DD *
80347
//UPDATE.EPSOLEF DD DUMMY
//UPDATE.EPSOLDS DD DUMMY
//UPDATE.OPTIONS DD *
80347
347
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.2
EMISSION FACTOR FILE
PROCEDURE EPEME20
Page 4
Release Date: 2/01/80
Update #: P-l
//* fPA|.MH/AOH7 Htl>l,n>riH, LI HYIi w. fVI'O S«ll-S0
//* ''tvisin-.j LFVF-L: i-no
//* I AS| UPDA IF -1
//*
//* fitly H'Uiin.i'i.'Pt /ii L'u'S liif 'Uif"< in ni;AiF IMF i
//* FACKIW F I LI MS I'M« NIPS FMJS.'JIUN (AC. I (IK F-II.F
//*
//*
Jl-r. (r'Cti.F-PAl Illl. Autt/.COllS.HU.KIII '
//*
//SllMI I
//*
//• P
ir:>i=pf dr
in I,|IIMI =
KF ui
11 i-if- \ = ' 1 , n •.
r • !,(!'
ill L'FMF C
ni iji>K8L=fc»>liU>r»sC,
NFrtl '.,F C=F''
i>Ji>P2='Ntyj,CATLr.,i'FJ t IF ',
^F. Y 1=<»I),
,SFCMHY|r|0,
Sf C •'>'!> Y ;;«t F I'MJ;; |,rt) Fill
SIMM I I1 Oil i;.SriAl> ( sXf'I'ii.lt r I . .1 llA.|i,
VIIL'I-I sCI"-1 | VAII. ,M I A | i'J ,
//Sill* II I U 11'
00IIHO I Oil
'I')')') Or?'* I)
i V">
f On
(I I] (Mill /Hi)
OOHOOMI'O
0()(H)0>JIMI
Hiioti | (ion
non 11|on
n o I10 11>. o 0
nodi) i \nu
» i) »ill '100
OIJP 01 S'lO
'innn l ndo
0000J /On
nuni) t MIMI
•I I VI* (I
OOOO^'l-lll
i)lion?/no
0 J 01) ? H 0')
n t) f* o ? 't n n
OO'Mi Vion
Ol)OU ^ I 00
0001) < JOII
oooij ^(.
I) I) 'I II'
Oil Oil
O 0 0 \,
n o oo/ii ii u
IIII Oil'I {Oil
OllOiKldOll
i)I)00'111*I;
i)ooi»4 /no
1 MI)
111.]
niiiiii^ ;
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.2
EMISSION FACTOR FILE
PROCEDURE EPEME20
Page b
•Release Date: 2/01/80
Update #: P-l
mum '•
-=( INK,
Oil
Sf'ACI =( IKK, ( vvill'KSfC), ,CUfH Hi)
//
//«
//SiJHT'NKOi l>l> Hl"l r = UlLMH,SH'=lSlJKl«*01 ,SMHT.\Kl);>M ,
// sPAri. = ( IKK, f VNiH/KSHf) , ,ctnl lu>
//«
//* IwPUT IVATA SM - .JFOS FMfSSplN MCl'll' FH.t 1
//*
I 1 1 n«S
//*
iiftin sn - su"in> ni-ns FI-ITSSION
f-ni
//
//
//
//*
T=K IF-MP,
l!l3>'=(iJFi<,l'AKS,l)F.OU >r
S^ATF. =1 I k", (K.>.)»KS^( ) ,uLSF )
Ililll-'lll DAIA SLJ - HI AU*'ilSI If.
//*
//•
//+
1)1; 3YS
00 8YS"iH=K.ijlM
//*
//SYSOIUillI f'O SYSlMlTsHillll
Ol> SYSIUJlzKiUlll
0|i .•iVSfilllsKllIM
IIHFKA i nm
//*
//»
//»
//(MnMVM'l Fxfl.
I |fi,gj>
//* rilMVFkl 'It-US I'MSSliiM FrtCIIIK f 1 1 F I WANS AT I I (IMS If MS/PS flS
//* FACI'llv »•!!.> T'tMnSoCI lll'o.i
//*
//.'UFHI.IH (>l) nSl-'Ai'i sM'Ml.ll-r I . .I.MAI.J,
// liISP
//*
//* 1,'lPlil OAlA SM - Hl'Mll" ri.l'li
// »
//FPSHPIM 00 IMillf i I stil'T |M -S,
// Of.l-.TTi.l KM/I =>Ul
//+
//* ii.r'ur oaTn SM - :iin 'i» o.>
\-\\.\
•:..-\n
IUinnMH.il
it no it <> /on
ni)0o
II (MM)
on flu? 7 "()
IIOA||H|OI|
>MI'IUN i nu
<) i| n i)
'»"i 1 (firm
notnoim,
Odd | n ,»<)0
nun ) u ^oii
inioio.ir.il
'"Ml I (.SOU
"II" 1 On '.Ml
(HM.|O/I.,I
i) on i /i rti-o
-i. M> I ti'ioii
nun 1 | nix)
'i>r> 11 | it.)
(Page 2 of 5)
Figure 4.4.2-a - continued. Cataloged Procedure EPEME20
349
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.2
EMISSION FACTOR FILE
PROCEDURE EPEME20
Page 6
Release Date: 2/01/80
Update #: P-l
//FPS |MH t
//* dim-Hi UAIA SM - M"»/l'S I'-'IR.SI'IM F AC I'M* MIF
//*
//*
//* OUTPUT
//*
11(1] T = "UI:'-H',
lj1SI'=(NFlv,t'«S';,l>t
M'nfh = (TNh , (*,• iii'hSPT ) ,V\ bf )
fli/i r>f i - IMAUNMSIIL HFPUKI
oil .lYamMsicuiij
//* nun-Ill DA1A S» I - IMJSSlllu MCHIW IKA.JSACI FUNS
//»
//FP8IKNI 111) SYSMIir = Ki|ll|
//*
//* DuU'HI I'AM .St f.S - SY.SH" HPFKAI HIM
//*
//
//SYSIIUI IM
//»
//SYSIiPdlll 01; SY
//*
XX*
XXSilKI? F.xFl.
//
//
//*
//* Si
//*
XXSIKVI H< l>l> USNAI'F. sKPPll.lt f I . .1 UAIJ,
XX VMl.H»»F rfPMl VATI-,».»• I A |"),
//SiiMH.1'1
//
It*
fcTS/MS FMtSSIDN
FILt I I'iiNSftC I 1!IHS
IH) l)SH»HF=SrS1 .S'li'ILT i,
DUJ T=R IbMP.
=( IK1* ,
, ,CilM IU
//*
hll.t
I vr !),-> l)|) llf.J | = (\Tf ••'!', oFHr.SHKl -if ill ) ,
// M'AO =( Tn* . (i ' -nKKSIT. ) , .Cil >\ It;)
//*
//SllW I '»*(! $ 1)1) li'l I I = ( n. If *"Pf SF ('=( Si|K I , f, n ) , SMri 1 >•.« (!<•') ) ,
// ,SI'/K> - ( II-'K , f r. "in KS>T ) , ,r.t'll 1 1. )
//*
//• riiPHf I*/1. Ki .SI I - I f| S.-)HlN F;.ri'i» hill 1 .i,S | ,
nun i
(Hi'i i
OlHi)
(Mill |
MM|
fl'l'l
/•MI
0 0 0 1
(M)01
II|IO 1 ?l|(l'l
•M) 0 1 ^ I fi (I
0110 I?
"HO 1 PoO
(MUM
o i) n i
mi MI
(MMM
oooi i/ioo
OHO I ^SOO
Oil 01 5h I (1(10(1
n u 0 1 'i i (i o
A " ii
il 0 0 I /I •! (I i|
0001 'J'jno
o i) o i « (j o n
o (i o i a / (i ii
o i) o i 'i »» o o
(I II (I | 'I 'Mi I)
Ollfl 1 SllfW)
0 u'M S I 0(1
mm i
0(10 \ S/IH')
OIK) I SMMI
"00 J S/IMI
nun i SHOO
Oil" ) "-.«!! Ij
Olid 1 »,(iii()
u 00 1 1> 1 mi
Ol) I' J /i,}Ml|
"00 1 M«.lll|
I'll" t *> / 'III
'Hill I (•.rflli,
(Page 3 of 5)
Figure 4.4.2-a - continued. Cataloged Procedure EPEME20
350 "
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.2
EMISSION FACTOR FILE
PROCEDURE EPEME20
Page 7
Release Date: 2/01/80
Update #: P-l
// l>l5>P=f Silk, MASS)
//*
//• 'IllUMM I'AIA «,i'Ays,iii i t H ) ,
// .Sf'Af.t =( IMK, (MMnVKSPC ) ,i 8YS"Ul=MllJl
//*
//SYSIIHT "D SYSnuf =K.IMM
//*
//SYSlM'IMH Dli SVadulsilillll
//*
//SYSl'Ttf-'1'-! I'O SYh'HiT=R,llll|
DO SYS'lljT=*till|
//
I "if-
F11.F.
//* MAINTAIN tlii/HS
//*
//SIFI-'I.JH DO OSi>)ANE=lC»'IJ|Mt(: I ..I I)A|),
l VAU ,l-.f U|M),
//*
//» T'Jl'lll DAI/l SF I - M
//*
Hi) lll).MA'!F=l)l'l (HNS,
tni-lTMOI. CAWD
//*
//* iriPHI DATA Sfc I - SnUH.h F !"ISSlll,vl (-A(.Ti)1' FILt 1 1- '
//*
I- It I
* AC T IINS
//*
//» lu^IlT M/ifA {iM - III I) I
//*
//i-HSiui-F no DSHiAf .FsKi'wn.itr i . .nm A .*iiui>t-«h r,
// VI H Hi--.Frlf'W| VA1|- , HF 1 A J' | ,
//*
//* 1
ii A I A :>i I - HI
r a( I n.
- sr* n I
MI I-
//FPSi.11 nS ltd nSliAi f =v.Hkn )Lf I . .DA I A. * i 'I. l>i>f SC ,
// wiai"'> = ri'i?1 Vn It ,K* I A|li) ,
ODO I »»'"n
Ol/O 1 7 ^00
I'll'' 1 ?.|'M)
(M)'i I /'•>"')
ii on i /'>nn
no" I 7 /'>o
OOP I 7MIIO
H 00 1 Mil (I 'I
OHO 1 ft 1 On
n i) 01 /' n o u
"IHI
'MiO I H / nil
no'1 IHMOO
nun I M IV n (>
01) Of"1 S'"l
(Mill
OOO/t 1 nil
000f'1 UIMI
O()0,' t SOU
1 <•>(>()
i«00,' 1 ''I'll
•MI'VVIi'lu
OO'V,1 | 'Ml
(Page 4 of 5)
Figure 4.4.2-a - continued. Cataloged Procedure EPEME20
351
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.2
EMISSION FACTOR FILE
PROCEDURE EPEME20
Page 8
Release Date: 2/U1/80
Update #: P-l
//*
//*
//I- t
//*
//*
//*
//*
//»
//*
//*
//*
//*
//r I
//*
//*
//*
//*
//*
//*
ii i :5i'=(SHn,
SH - MI-
Oil h
in)
^'^^;!ll^'
.iM' I . . I»A i ft. s"'e '.
V« \\ , nf I A I ii, SI i'
v'i|.ii!.,F =
U I SP=f K
IllMl T=P.I.I'I| I t ,
s''Arf =(«ai-i;ii
SM - HE« F-irs''-riJ
1 )
ntsr.K I »M Iin f- 1 1
1)1 1 DSN/lMt = HMWII.lt r I . . "<«Tft..*M|-.l'll>H>C,
VIM. M 'h = (('(• i VAT \ ,K^ i A |i.i,s> W = K;SH< MI
SPACI- =(»si'riiMic', (>
I.) A I A Se T - ()| AMJij.SI M.
DAM SM - f Ml SRI'IIi f I
r'D srsiiiii =h.ijii i
I»A|A Shi -
111.) sY.sniiT
DAIA SLI - HLf FMI..SIM.M
tin s>.snnT=Ruti|
fiurriM '/AM st i - ML*
-SI )
F 1 1- 1-
//*
//*
//*
//re
//•
//«
//*
//
l)A f A <%t | - Nt.V
S..il).Sl. IHI SY.Vl'lT=Kl|M|
I III) Pll I I) « M Se t :, - SY.SH
siJ"i 11 r»i) .lYsi'i' i =KIIII i
r>UH| I'M SY.S'Mll sX.iill I
Hi) :,YSilllT=XI|il|
KA i
Sir :-).l'lT=
Ii II Of 3 Slid
llllli^ /j / n o
0 ii (i ? (i h n 0
l>() IV 'WO
nno^si (in
» 0 1 V * I 0 ''
mi n^ / i on
//*
nun,.; /S'in
niin^i /i>i'o
On (V 7 /mi
flu IV /MM)
IIIHV /Will
(Page 5 of 5)
Figure 4.4.2-a - continued. Cataloged Procedure EPEME20
352
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION-4.4.2
EMISSION FACTOR FILE
PROCEDURE EPEME20
Page 9
Release Date: 2/01/80
Update #: P-l
Parameter
Name
PROJECT
PROG1
PROG2
Default
Value
'CN.EPALMH.A087.
CDHS.HQ.PNT'
PSRNEEF
PCVNEEF
PROGS
PROG4
REGION1
REGION2
REGIONS
REGION4
TIME1
TIME2
TIMES
TIME4
OLDEMFC
OLDDESC
NEWEMFC
NEWDESC
PSREFTR
PEMEFAC
150K
100K
150K
100K
'1,0'
'1,0'
'1,0'
'1,0'
EPOLDEMF
EPOLDDSC
EPNEWEMF
EPNEWDSC
UNIT1
3330
Description
Highest-level index of data set names (e.g.,
CN.EPALMH.A087.CDHS.HQ.PNR.DATA.EPNEWEMF would
be the full data set name of an emission factor
file)
NEDS emission factor file transaction sort
program
NEDS to EIS/PS emission factor file transaction
conversion program
Emission factor file transaction sort program
Emission factor file edit-maintenance program
Region size allocated for execution of PSRNEEF
Region size allocated for execution of PCVNEEF
Region size allocated for execution of PSREFTR
Region size allocated for execution of PEMEFAC
Time allocated for execution of PSRNEEF
Time allocated for execution of PCVNEEF
Time allocated for execution of PSREFTR
Time allocated for execution of PEMEFAC
Lowest-level index of old emission factor file
Lowest-level index of old emission factor
description file
Lowest-level index of new emission factor file
Lowest-level index of new emission factor
description file
Unit type to which new (or updated) emission
factor file is to be written
(Page 1 of 2)
Figure 4.4.2-b. Substitutable Parameters for EPEME20
353
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.2
EMISSION FACTOR FILE
PROCEDURE EPEME20
Page 10
Release Date: 2/01/80
Update #: P-l
Parameter
Name
UNIT2
SERIAL1
SERIAL2
SPCUNT1
SPCUNT2
Default
Value
TEMP
WORKSPC
OUT
3330
CDHSPK
CDHSPK
TRK
TRK
PRIMRY1
PRIMRY2
SECNDY1
SECNDY2
20
20
10
10
SYSDA
'20,10'
A
Description
Unit type to which new (or updated) emission
factor description file is to be written
Serial number of volume to which new (or
updated) emission factor file is to be written
Serial number of volume to which new (or
updated) emission factor description file is to
be written
Units -in which space for new (or updated)
emission factor file is to be allocated
Units in which space for new (or updated)
emission factor description file is to be
allocated
Primary space allocation for new (or updated)
emission factor file
Primary space allocation for new (or updated)
emission factor description file
Secondary space allocation for new (or updated)
emission factor file
Secondary space allocation for new (or updated)
emission factor description file
Unit type for temporary work spaces
Space allocation for sort work areas
SYSOUT class for all print files
(Page 2 of 2)
Figure 4.4.2-b - continued. Substitutable Parameters for EPEME20
354 ,
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.3
MASTER FILE MAINTENANCE
PROCEDURE EPEMM10
Page 1
Release Date: 2/01/80
Update #: P-l
4.4.3 MASTER FILE EDIT-MAINTENANCE - EPEMM10
4.4.3.1 Description
The cataloged procedure EPEMM10 allows the user to edit EIS/PS
transactions, insert emission factor information into those transactions, and
update (or create) the EIS/PS master file. This procedure executes the master
file transaction sort program, PSRMFTR (EP0070); the master file transaction
edit program, PEDMSTR (EP0080); the master file internal transaction
pre-insertion sort program, PSREFIN (EP0090); the master file internal
transaction emission factor insertion- program, PMSEFIN (EP0100); the master
file internal transaction sort program, PSRINTR (EP0110); and the master file
maintenance program, PFMMSTR (EP0120).
4.4.3.2 JCL Listing
See Figure 4.4.3-a for a listing of this procedure.
4.4.3.3 Cross-reference of DP Names and Files
Program Name: PSRMFTR (EP0070)
DD Name
File Description
Input/Output
EPSINPT
EPSOUTP
EPSDIAG
SORTWK01
Unsorted transactions
Sorted transactions
Diagnostic report
Sort work file
Input
Output
Output
Internal
355
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.3
MASTER FILE MAINTENANCE
PROCEDURE EPEMM10
Page 2
Release Date: 2/01/80
Update #: P-l
Program Name: PEDMSTR (EP0080)
DD Name
File Description
Input/Output
EPSTRAN
EPSOPTN
EPSINTR
EPSDIAG
EPSTRNL
EPSINTL
EIS/PS master file transactions
Option card
Edited internal transactions
Diagnostic report
Input transaction listing
Output internal transaction listing
Input
Input
Output
Output
Output
Output
Program Name: PSREFIN (EP0090)
DD Name
File Description
Input/Output
EPSINPT Unsorted internal transactions
EPSOUTP Sorted internal transactions
EPSDIAG Diagnostic report
SORTWK01 Sort work file
Input
Output
Output
Internal
Program Name: PMSEFIN (EP0100)
DD Name
File Description
Input/Output
EPSINPT
EPSEMFC
EPSOPTN
EPSOUTP
EPSDIAG
Sorted internal transactions Input
Emission factor file Input
Option card Input
Internal transactions with insertions Output
Diagnostic report Output
356
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.3
MASTER FILE MAINTENANCE
PROCEDURE EPEMM10
Page 3
Release Date: 2/01/80
Update #: P-l
Program Name: PSRINTR (EP0110)
DD Name
File Description
Input/Output
EPSINPT Unsorted internal transactions
EPSOUTP Sorted internal transactions
EPSDIAG Diagnostic report
SORTWK01 Sort work file
Input
Output
Output
Internal
Program Name: PFMMSTR (EP0120)
DD Name
File Description
Input/Output
EPSINTR
EPSOLMF
EPSOPTN
EPSNWMF
EPSDIAG
EPSINTL
EPSOLDL
EPSNEWL
Internal transactions with insertions Input
Old EIS/PS master file Input
Option Card Input
New or updated EIS/PS master file Output
Diagnostic report Output
Transaction listing Output
Old master file listing Output
New master file listing Output
4.4.3.4 User-supplied JCL
To execute the cataloged procedure EPEMM10, the user must supply job
accounting information, input transactions, the data set names of the old and
the updated (or new) EIS/PS master files and the emission factor file, and
option cards to specify any desired options. See Figure 4.4.3-b for a
description of the procedure's substitutable parameters.
357
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.3
MASTER FILE MAINTENANCE
PROCEDURE EPEMM10
Page 4
Release Date: 2/01/80
Update #: P-l
4.4.3.5 Sample Run Stream
The following run stream illustrates the use of EPEMM10 to create an
EIS/PS master file from input transactions stored in a disk data set named
'CN.EPALMH.A087.HQ.PNT.DATA.EPTRANS1. The new master file will be named
'CN.EPALMH.A087.HQ.PNT.DATA.EPMASTR11. The emission factor file name is
'CN.EPALMH.A087.HQ.PNT.DATA.EPEMFL1'. No LIST or FLAGW options are specified
for PEDMSTR (EP0080) or PFMMSTR (EP0120); an option year of 80 is used in both
programs. The options specified for PMSEFIN (EP0100) are NOFLAGW and
insertions for sulfur, ash, and emission factor data.
// EXEC EPEMM10,
// NEWMSTR=EPMASTR1,
// EMFCFIL=EPEMFL1
//SORT1.INPUT DD DSN=CN.EPALMH.A087.CDHS.HQ.PNT.DATA.EPTRANS,
// DISP=OLD
//EDIT.OPTIONS DD *
80
//INSERT.OPTIONS DD *
NOFLAGW SUL I ASH I EMISSION I
//UPDATE.EPSOLMF DD DUMMY
//UPDATE.OPTIONS DD *
80
/*
358
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.3
MASTER FILE MAINTENANCE
PROCEDURE EPEMM10
Page 5
Release Date: 2/01/80
Update #: P-l
//» F t'AI.MH/AOM? HH>I.F HF HI. UllYi.i 4. (919) S.'I|-S'4*J|
//*
//* Bt-VISION LFVf-'l. : 1-00
//• LAST llPl.)AtI: «5 I'-l
//* DMt. I \'(.III: M Mi'iiArfY i, i*)nn
//*
//* THIS Hwiir;t i>iiMi. AI i nu.s hif iist-i< IM IIMMATK inh MS/PS •'
//* Fll.f IIS 1 Ml, tIS/lJS Mft5!|F-l« FII.F Ti1M1 0 PHflC PKllJt C f = T'M.r PAI MH.AijM/.COHS.HW.PNI ' ,
rn.
//
//
i'i s=isiiK,
i/l- r,
Ml | = •
HI- J= '
"FM='
*<- S= '
.-•FOS'
,n'.
'n«[
, " ' »
,"' .
,0',
ill
;>Hvl Al sCl.'HSPh,
|F ' ,
PI»J'/AI'Yr«JO,
//*
//Sill* I 1
lr 1 (i ' .
«(• (. IDilrP !<*• l.Tll'i) ,
I I "if = f «. 11 '-"I 1 j
//*
//« Suk| it3/PS ."A3HK MLt"
//*
//SIFMLIU l'l> I.'S lA.iF SfcJ'l-'H.II C | ,.l.ll'-l'r
// VIM II -I- =(»'" I \/i. II ,1 t I A |» )
// !•!:,' = r si"«,pf t.:1.)
//r,iM-n in D,I D^I,A«.I- S'-SYR.I ,:>uh li lii,
// li I M'= ( .')"!• , I A,sS )
III' III' | 1 i* If •••!',
ijKi»r i i-i-'s i-i|n ^llt
u ^
nnnun Inn
nn nun vni
ouniin-inn
uii(iii') /on
onoo1nno
(i i) Ci i) I'M)
OIlOll
nnnii
nil nu
MIlOll
noiu)
on"n
SMU
.1 M n
SUM
Ml II
HOI)
•111!)
nn mi?nnn
>inn us} nn
'MI'Mi?,'""
oorm;1 41111
IHlOllr'S"'!
fin nn? 4 nil
nnno ^|no
mino^on
nn0(i < sun
(Mini; *ii"i)
(loon o
0(1 Oil'I 00'I
nuO'i'j I on
on nn /i jnn
.1(1 "O il MO (I
/"ii
l!'l I I'll
IllillllSr'OO
Mill) 0', sl'(|
in,ill. ',.|Hii
(Page 1 of 7)
Figure 4.4.3-a. Cataloged Procedure EPEMM10
359
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.3
MASTER FILE MAINTENANCE
PROCEDURE EPEMM10
Page 6
Release Date: 2/01/80
-Update #: ...P-l
//
ut'ArF = ( TKK , (K.viiHh str ) , , (Mini |i; i
01) II*' I T = ( K, I fc "IJ, ,SF H = .VIi>r. ) , ,rii'-i| n,
xx
//*
//SliR I"»KO i |)|) lll.'l T =
// jjl'Art- =( TiJK , (K»"i|lfi» StT ) , , Ol'l I I U)
//*
XX* li-Pllf DATft SM - MASIFh FHf- IHAmSAt I |l)l\i:>
XX*
XXFI'SIWT 1)1) Df'MA.'t = MMIJJ ,
// Uf.H = '»l,KS [7t = ^n
//•
//* miTHIU |,A|A SM - Hill'lfl) i-iA.sTt1^ Mlh IMA'-SAC I
//*
//fH^liMIP (M) HSMAX,F=IC)lSiitf |I>1 ,
// DM !=X IF '-t',
// hl!,l'=f 'jF.'.'.l'ASSflM I t Th ) ,
// .VAH =( 1 WH , f j; .•!!'•* SIM ) ,WI SF )
//*
//» IIUO'III DAIA S( T - »l AI,l"i|SI It
//*
' H»'Fi«Al IU,'l
//*
//SYSOHUHI r»|) SYSH'llrX.lMH
//*
//.SYS|.'U'<>1 Oi; .SYS'HJJ=X.|JI'|
//*
//SYSunu'n1 on ;>Y.s'iiH=miMi
//*
//*
//H)II FXFC. f'f;i: = «,PKIM-?,
// iVf I, |||f! = » «F UllJ'lt',
// 1 l'*F = (4l I'"!./*)
//*
//* ti)tl MS/I'.S i'A55|rw FH.F IWAliSAf: I HHj
//*
//sif>fiii« oi) nSi-jA'--.F = <.»""i it c i . .1 "AD,
// vnl.ll it' = (^'" IVA Ih ,uM A I •>) ,
//* lllin-UI DATA '-il-TS - iY.S
//*
//SYSIMMN1 Hi) Sr.SHin=MMM
//*
//*
//*
X/I»'S|WA'I 00 I''''|A if sKx
// ui :,i'=f :>'iK,PA.i^ )
//*
//* ! .ji'iii !>•. T A -M - HIM hi-i r ' '•'
//*
XXM'Si IP I W I'D IM-IJ A 'f siiij T I '"-i'i,
"> i»Slf-'< HI
H' I I' I ,
minus /no
»|>0||S(
n a iv ii s
II i|P I) /> 1 do
"00 0*i»'" II
» /mi
(i ii lit) A t.ii i)
no 'itt (i vii ii
'i 0 'in 7 ii no
•ni«ii7 i oo
•Ml 'I i) /'I Oil
oortu /^oo
(M) (HI 7».«l|
i) u no 7 /on
(1 00 I) /MOO
no on HII no
(iiinu)' l -in
no ()n><>> it n
II (I 'I II )\H fin
nono)< -/do
II 000 '4 1) »i)
p ii oo ri I ("i
n i) o o «» u n o
"II «»»<>/ 01!
'ino I 'i | in
'i.id I I'/"-
nun
•I'l'i
•1(1(1
n.i r.
un
nsnii
n / mi
•1 mm
I I""
(Page 2 of 7)
Figure 4.4.3-a - continued. Cataloged Procedure EPEMM10
360
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.3
MASTER FILE MAINTENANCE
PROCEDURE EPEMM10
Page 7
Release Date: 2/01/80
Update #: P-l
//*
//*
IjAlA S(- I - till IF n I'A.Stf-W f|lt |M|I-WWAI I WA-|S«r. I
//fPS|'J|W DO OSNA..iF-=V.K, ll-l
// HM| 1 = HAC I J'tuS
..re. si-'jiif'-ci
//
//
VOl lli-lF =(MI'| VAft ,I.F I t JMJ ,
l In,
//*
IWK n 1 on IINI Tsiiu -IP,
SF'Af F- =( ILK , f MV
//
On
//
//•
=(
rAtA :-M - -Asll-1
// •
III') | = f hll»'l',Sf Ir (."-ui'l .••«(> I ,.>.!• I .:,- DP ) 1 ,
SI'Af'h r ( IK* , f » •••li'K'SHC) , ,f in1 I li. I
ll |'I|>K''AI !•«•» iS'ii' I l.i '.i
'MM I 1 51111
»"
O'l'i I 1 /'»l
nun) l/irtn
niinjlgc.li
mi'1 I ,'llOn
ODD |
lion |
II II 'I 1
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.3
MASTER FILE MAINTENANCE
PROCEDURE EPEMM10
Page 8
Release Date: 2/01/80
Update #: P-l
XXFI'SINII nil 1-SlJAMF = K
// MSPrf SHK,I'ASS)
//*
//* 'UilPUl |>A1A 3t I - SllWIFl) HAMJW FII.I- IMimNAI I KAHS/iCI I HIJS'
XX*
xxFH^'iuir rtn nsfjr.riH sRnsnp i'v.
// UN II =11 F HP,
A,SS,ntlhlt) r
'KSIT) , KI.SF- )
XX*
xx* run PHI IIAIA :-F. i - i) i Ai,f'insi H KFPIIKI
xx«
XXFF'SuIAK PI) .sYSlUHsKHIII
//*
//* MiiTPHJ liAIA StlS - SYSU'1 III'F iM"in=K,iini
//*
//SYSUHI in) .sYvSuii?=K.(iii i
//*
X/SYSliM(ill| 1)1) :>YSIHIT=ICI|lll
//*
XX
(Hi SYSIHl f rV.
xx«
XX*
XX
XX*
XX*
XX*
FXFL
FAC1IIWS
nn i).siiA-jiF=KP«ii.M.r: i . .
vlH.H-iF = (P'-'l VttU ,Cf I AJM)
xx i)j.si'
xx«
XX* luPllT IIAIA bF I - lillKlM) "ASMw FIIF- IuIt''NAI I "'(H-'-jftC. I
XX*
X/FkSJM'T Dl) uSWAi-.FsRitSlll' I \>t> ,
^'.^.ll.l^^
XX*
xx* itii'UT DATA .st I - HIMIHN r i
xx*
XXff'Sdl'lii I'D DiMMril- =IIP
// l)C.l^rl^l.^SlX^ =
XX*
xx* UPul 'IAI/> Ml - HSXPS
xx*
f f\ PHI. Mf. c i)), 1 1. s hi A- f => t'Pu.it r i . .HA! A. '-F^ :-'M:r 1 1. ,
// VHL HI-' = (I'" I Vft It , i- 1 I h I h I i
// |> I ,si'= f SUM, \- A.S.S)
XX*
XX* litiIMM I'AIA 'HI - IfilM- lAi |..-4-:ii(. I I'luS -I If I ' I s.i I «:"- »Aflin.-s
XX*
^i'11!'1 "I1 i'f "• l='*lnti'i|',
OIK) I ll "Ml
7 ii 'in
/I M)
I) 00 I MHO
il 1)0 1 /'I'lU
DUO 1
0 u o 1 7 7 0 U
0110 I 780.0
oiio i 7^dO
(11)1 IP-iXH)
on 01 M 'HI
no n I H<;III)
OI/01HJOO
Oil I) 1 Mil Oil
ni)n| H',fi»
onn IH/.OII
on o I H /on
duo | KM oo
ooo |«>ijou
oooi«| on
000 iy?'.M)
'Mini 4 .400
oooir''toi)
oun r'/oo
ooOi?n I "o
«">ll
400
o o o a « v 0 ii
Ol)0/»1 00 ii
ouu«M loo
JOO
1)11 Or>1 UIMl
00 (I /? I 11 00
Olio,", /on
oti ox? I «o .
(Page 4 of 7)
Figure 4.4.3-a - continued. Cataloged Procedure EPEMM10
362
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.3
MASTER FILE MAINTENANCE
PROCEDURE EPEMM10
Page 9
Release Date: 2/01/80
Update #: P-l
// IIMJ !=>UI "i'=f .jfu,c
//*
//» IIIIU'MI HAIA S|. I - IH Ai.f-.llSI II.
X/FPSIllAf. Ill) .SYS'IOT=P,illl|
//*
//* 'uni'iii IIAIA sns - SYSTMI HIM I .SYa'Uil=Kllil|
//*
//*
//*
//SYSIJDUVP
//*
//*
//*
I . .1 l.lAl.1,
h ,KF IAIM
PASS)
^ IS/P.S r>Ar.iFK FILF
//•
//SIFPIIM HO liSl-JAMI s
//
//
//HllBILlH 01.1
Dl) JH| I = x.
//
//*
//Sui'li-Kn^ nn
// b"Ari =( IPK, f K'n'jOhSPrj, ,(:nr.| ri;)
//»
//Silfl Wh'li 1)1) 1)1 1 1 1 = (iU|-Mp,SI-H=(SijP IfiMU , SHW ln-jK(i?J ) ,
// SPAti- =1 iKt- . I.-. \!ii-*KSi*r ), ,r.,i"l H;)
//*
//* luPUl DATA .Sf I - MAbU'' FMt JU|fr<"ri| It. Ar'!< Af I 1 ll'
//*
1)1) |iS
//*
//*
//*
DAI A si-.r -
I'-'IFI.M«I
//
//
//
Dli liril t =A.H -ii',
Pl!«P=(nf t/.l-'SS, HH h U >»
! ' i nn
II !>()>'>>/'">
(lll(1,'^K II "I
Illlfl/^ /(III
n DO/ *ii')n
II II (If- < | III!
Dull/
nun/
W'D
DllO/
000 ^'111 01)
n ii (i f>. /j i o D
'MXV/J/ftD
D I) (I »>l\ 4f> D
II II II /M 'I Oil
noD/snoo
OllO/S
oon/S'iou
'MI
OD o,: A no D
71111
no iV 7 1) ii i)
lfi/7 *'"
HI,' /.mi
"i/ 7Mn
in,' 7n''>
l'V//"i
111 ,• 7 « n i
.11, 7-«-i.
H'c1'1 'I " I
(Page 5 of 7)
Figure 4.4.3-a - continued. Cataloged Procedure EPEMM10
363
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.3
MASTER FILE MAINTENANCE
PROCEDURE EPEMM10
Page 10
Release Date: 2/01/80
Update #: P-l
on :,Y:>nut=iujiii
//• MUIPIII DAIA :,M:. - bv;
//*
//SrSHWI'-H |)|> liYbMIM =MHI I
//*
//SYRum mi sYS(iiii=x,iini
//*
//SY-S|)HIHI| l)|) :iYSntlT=ftlHI|
//*
//SYSDlt I'M IH> SYSIIlM=XIIII|
//*
//SYRlJI>IJ*'f Pl>
//*
//*
FXFI:
nit 11,1 Ml mi
'U-r KA I I
// I Jl-if =UT|Ml»,J
//*
//« MAINTAIN tis/Ks MASJFW FtiF
//*
//STFPDH r>|i D.SniAMl-sKP'tll.lt r I . .I.IJAD,
,Ht- I A |N
//* l.JPIll DATA SF J - HPirilN
//.*
//F f'Si)P| M HI)
//*
//* IrtPliT
//*
//Ff'S|N|(v
//*
//*
//*
.SF F - S'lKTHi HASIfc F FLF !-ATA sf r - in i< w/
1)1) liSNflr I- =K,F'»I|, If f 1 . .DAI A.
VMU'r.FsfPPI VATt ,1'H A pj
//
//*
//* MlirP"! UMA SF I - Nl "• MASIFK FlL'
//»
//Ff SllhMF fill HSNA!v,F =ltt'F'II.Ilr; I . .lift I A.iCNh ir >1S II',
// IJH I 1=HUN1 1 ,
// V"l_ll|if =f PH I Vull ,KF I A | II, 3t Hr'.SF.
// (i r:>>'=( MI I 'i»') ,
//*
//* nil I pn i
nt I - 'i I Ai.'"is i ii i. fern.-!
I'!' .'iV.M'UT =Kr
// • HUT I'll | HA I A Sf I - <-'<».s |i- h i li « loll d I •'/*':.' i I in . i I ^l I1 i.
//*
f'S I '•! II DM lY.'MH I =Hi I I
nun iO| no
ooo
oonjn
oi)030>>nn
000
000 *iVyO<)
(lOn^l i) on
II II O < J 1 'MJ
M 1 r! f> (I
0 1> 4('0,«ll
1|)H % )<>!'
'Mil' 4 4Sf'l
Hill ^ \, Mil
(Page 6 of 7)
Figure 4.4.3-a - continued. Cataloged Procedure EPEMM10
364 „
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.3
MASTER FILE MAINTENANCE
PROCEDURE EPEMM10
Page 11
Release Date: 2/01/80
Update #: P-l
//*
//*
//*
1)1
HAIA sir -
nu .SY!>miI=milll
//*
//* DIM rn I I>AIA si- r - m.t
//*
X/FPSMFwl l»|i .SYblllJTsKiilll
//*
//* MllfPUl l)Al/\ ShlS - 8Y3Th-«
//*
//SYSHPIM1 DO oY5>Mlir=».i|M|
//*
//SYSlHM 111) .SYS'l'IT = >llMI|
//*
//sr.SDMiiin on .sv.snuTsKiini
//*
//r>tSl)TlH-l 01) bYS"l/T=R(|l|T
//*
X/SYSUDIJMM |i|) .SYSIHllsXlHIl
//*
U.SIIMI,
1 110 (I
i I MI)
n no
nun i
IP lift
n(i(i VI
min 5 /i a on
n ii o VJ "3 n o
linn Vijiin
"00
(11)0 iS II Oil
tuin ^si no
ruin
'M)
oo n 5 s / n '.i
(Page 7 of 7)
Figure 4.4.3-a - continued. Cataloged Procedure EPEMM10
365
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.3
MASTER FILE MAINTENANCE
PROCEDURE EPEMM10
Page 12
Release Date: 2/01/80
Update #: P-l
Parameter
Name
PROJECT
PROG4
PROG5
PROG6
REGION1
REGION2
REGIONS
REGION4
REGIONS
REGION6
TIME1
TIME2
TIMES
TIME4
TIME5
TIME6
OLDMSTR
Default
Value
'CN.EPALMH.A087.
CDHS.HQ.PNT1
PROG1
PROG2
PROG3
PSRMFTR
PEDMSTR
PSREFIN
PMSEFIN
PSRINTR
PFMMSTR
150K
100K
150K
100K
150K
150K
'1,0'
'1,0'
'1,0'
'1,0'
'1,0'
'1,0'
EPOLDMST
Description
Highest-level index of data set names (e.g.,
CN.EPALMH.A087.CDHS.HQ.PNT.DATA.EPNEWMST would
be the full data set name of an EIS/PS master
file)
Master file transaction sort program
Master file transaction edit program
Master file internal transaction pre-insertion
sort program
Master file internal transaction emission
factor insertion program
Master file internal transaction sort program
Master file maintenance program
Region size allocated for execution of PSRMFTR
Region size allocated for execution of PEDMSTR
Region size allocated for execution of PSREFIN
Region size allocated for execution of PMSEFIN
Region size allocated for execution of PSRINTR
Region size allocated for execution of PFMMSTR
Time allocated for execution of PSRMFTR
Time allocated for execution of PEDMSTR
Time allocated for execution of PSREFIN
Time allocated for execution of PMSEFIN
Time allocated for execution of PSRINTR
Time allocated for execution of PFMMSTR
Lowest-level index of old master file
Figure 4.4.3-b,
(Page 1 of 2)
Substitutable Parameters for EPEMM10
366 .
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.3
MASTER FILE MAINTENANCE
PROCEDURE EPEMM10
Page 13
Release Date: 2/01/80
Update #: P-l
Parameter Default
Name Value
NEWMSTR EPNEWMST
EMFCFIL EPEMFFIL
UNIT 3330
SERIAL CDHSPK
DISP
SECNDRY
TEMP
WORKSPC
OUT
'NEW.CATLG,
DELETE1
SPCUNIT TRK
PRIMARY 20
10
SYSDA
'20,10'
A
Description
Lowest-level index of new (or updated) master
file
Lowest-level index of emission factor file
Unit type to which new (or updated) master file
is to be written
Serial number of volume to which new (or updated)
master file is to be written
Disposition of new (or updated) master file
Units in which space for new (or updated) master
file is to be allocated
Primary space allocation for new (or updated)
master file
Secondary space allocation for new (or updated)
master file
Unit type for temporary work space
Space allocation for sort work areas
SYSOUT class for all print files
Figure 4.4.3-b - continued,
(Page 2 of 2)
Substitutable Parameters for EPEMM10
367
-------
E IS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.4
MASTER FILE MAINTENANCE
PROCEDURE EPFMM20
Page 1
Release Date: 2/01/80
Update #: P-l
4.4.4 MASTER FILE MAINTENANCE FROM NEDS TRANSACTIONS - EPFMM20
4.4.4.1 Description
The cataloged procedure EPFMM20 allows the user to edit and convert NEDS
transactions, insert emission factor information into the converted internal
transactions, and update (or create) the EIS/PS master file. This procedure
executes the NEDS transaction sort program, PSRNETR (EP0050); the NEDS to
EIS/PS master file transaction conversion-edit program, PCENETR (EP0060); the
master file internal transaction pre-insertion sort program, PSREFIN (EP0090);
the master file internal transaction 'emission factor insertion program,
PMSEFIN (EP0100); the master file internal transaction sort program, PSRINTR
(EP0110); and the master file maintenance program, PFMMSTR (EP0120).
4.4.4.2 JCL Listing
See Figure 4.4.4-a for a listing of this procedure.
4.4.4.3 Cross-reference of DD Names and Files
Program Name: PSRNETR (EP0050)
DD Name
File Description
Input/Output
EPSINPT
EPSOUTP
EPSDIAG
SORTWK01
Unsorted NEDS transactions
Sorted NEDS transactions
Diagnostic report
Sort work file
Input
Output
Output
Internal
368
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.4
MASTER FILE MAINTENANCE
PROCEDURE EPFMM20
Page 2
Release Date: 2/01/80
Update #: P-l
Program Name: PCENETR (EP0060)
DP Name
File Description
Input/Output
EPSTRAN
EPSOPTN
EPSINTR
EPSDIAG
EPSTRNL
EPSINTL
NEDS transactions
Option card
EIS/PS internal transactions
Diagnostic report
NEDS transaction listing
Internal transaction listing
Input
Input
Output
Output
Output
Output
Program Name: PSREFIM (EP0090)
DP Name
File Description
Input/Output
EPSINPT
EPSOUTP
EPSDIAG
SORTWK01
Unsorted internal transactions
Sorted internal transactions
Diagnostic report
Sort work files
Input
Output
Output
Internal
Program Name: PMSEFIN (EP0100)
DP Name
File Description
Input/Output
EPSINPT
EPSEMFC
EPSOPTN
EPSOUTP
EPSDIAG
Sorted internal transactions
Emission factor file
Option card
Internal transactions with
insertions
Diagnostic report
Input
Input
Input
Output
Output
369
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.4
MASTER FILE MAINTENANCE
PROCEDURE EPFMM20
Page 3
Release Date: 2/01/80
Update #: P-l
Program Name: PSRINTR (EP0110)
DD Name
File Description
Input/Output
EPSINPT Unsorted internal transactions
EPSOUTP Sorted internal transactions
EPSDIAG Diagnostic report
SORTWK01 Sort work file
Input
Output
Output
Internal
Program Name: PFMMSTR (EP0120) •
DD Name
File Description
Input/Output
EPSINTR
EPSOLMF
EPSOPTN
EPSNWMF
EPSDIAC
EPSINTL
EPSOLDL
EPSNEWL
Internal transactions with insertions Input
Old EIS/PS master file Input
Option card Input
New or updated EIS/PS master file Output
Diagnostic report Output
Transaction listing Output
Old master file listing Output
New master file listing Output
4.4.4.4 User-supplied JCL
To execute the cataloged procedure ECFMM20, the user must supply job
accounting information, input transactions, the data set names of the old and
the new (or updated) EIS/PS master file and the emission factor file, and
option cards to specify any desired options. See Figure 4.4.4-b for a
description of the procedure's substitutable parameters.
370
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.4
MASTER FILE MAINTENANCE
PROCEDURE EPFMM20
Page 4
Release Date: 2/01/80
Update #: P-l
4.4.4.5 Sample Run Stream
The following run stream illustrates the use of EPFMM20 to create an
EIS/PS master file from input transactions stored in a disk data set named
'CN.EPALMH.A087.HQ.PNT.DATA.NEDTRAN'. The new master file will be named
'CN.EPALMH.A087.HQ.PNT.DATA.EPMASTR1'. The emission factor file name is
'CN.EPALMH.A087.HQ.PNT.DATA.EPEMFL1'. No LIST or FLAGW options are specified
for PCENETR (EP0060) or PFMMSTR (EP0120); an option year of 80 is used in both
programs. The options specified in PMSEFIN (EP0100) are NOFLAGW and
insertions for sulfur, ash, and emission factor data.
// EXEC EPFMM20,
// NEWMSTR=EPMASTR1,
// EMFCFIL=EPEMFL1
//SORT1.INPUT DD DSN=CN.EPALMH.A087.CDHS.HQ.PNT.DATA.NEDTRAN,
// DISP=OLD
//CONVERT.OPTIONS DD *
80
//INSERT.OPTIONS DD *
NOFLAGW SUL I ASH I EMISSION I
//UPDATE.EPSOLDMF DD DUMMY
//UPDATE.OPTIONS DD *
80
/*
371
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.4
MASTER FILE MAINTENANCE
PROCEDURE EPFMM20
Page 5
Release Date: 2/01/80
Update #: P-l
//* FI'Al Mll/»(ln7 IIH>I.,F t'l |H, |.| HYI» M. f-t
//* I'lvMC.F l)UKr 'lA'M : ( I'F M->
//« "1-VlSliu LF vll. : I-no
/ / * I AS I IIIMlA IF I". I'-I
//» HATf I'•H.flNl'llWA It I*! FF
//»
//* IMS Hl'lirt I'l.l'l AILf'vS ll-F II.iH( (I) lll'liAll. IHI FIS/l'.'i I'ASIFr'
//* Flit US I'll, NFiiS MASFF.K F-ILF 1 iy A.gS Af! I I I .in 3
//*
//*
//F h»F MM^O PHIII. PWII.IF.r I = TU.J- f'AL'lH. AOH /.CHllS.l'U.Hl'IF * .
// fWIIKJ =I'SKMF 1 »,
// I'l'llK^rFTK'-'I: 11*,
// J'F-I.IU \ = f SHF F IN,
// i'Pn(;»,=F'i
F I, lil'l
mi 1 =
lHFt» =
IMF ,4 =
IMF Sr
IMF H-
1= I 0>)K,
>=lSOK ,
f 0 ' ,
,n'.
,0'.
,'«'.
,"'.
Ml.liM.S IK = FI''ll
UF>- 'j> TK=( i':-:I
II1"! Trf {to.
IF
SP(.I"IIF = I
vj«APy=<»o,
(.NllUf=10,
// Hll|=n
//*
//SnPII txFL l'ur =
// KF (, |liM = H,wF |, (II I) ,
// I IfF = (X.| 1 'I ! )
//»
//« SliI' I ,IFUS »'ASII it I-
//*
-Kl I** DO nSWAi-f =KK"II.U.C I . .1 llAtl,
i/l'| II F r f F"' I Urtl I ,hF- I <\ I •'•: )
l. IH
l«n;.|.SAr 1 IlIMb (Mill ^il^ aF
l>l) 'tS.jA iK =Sr S 1 .o"l.ll IM,
ii [ SI .= f J.l'K'.r/l.,". )
0 0II HO 1 in)
00000^0n
niiO'lil {"i)
'I (I '10 0 'I " t)
')OOilOSI>i|
oiioon /on
(HI On (HUH)
0II01) 1 0 0 0
oooo i l ni)
nuniii ^no
(i iid o1 id o
"000 1 (100
nunoit>n»
(i 00 ii?a n i)
noou?soo
0'JiH)?»iOn
(1()Ol)?h(HI
0«0i»?'*"i)
Illllll) tOIHI
Dijni)
<<;nii
OllOO/lr'Ol)
II Oil II (I {fill
0 (Ml II/I SIM;
0 0 ('!) 'J (»o "
on no'I /no
I) III'll'If,(HI
nnooSono
I "it
//SUP | fr ri| ni>
| 1 => |l •
n imp1-, jiln
iiiinuSiiiMi
lUI'MlSfi'i'l
(Page 1 of 7)
Figure 4.4. 4-a. Cataloged Procedure EPFMM20
372
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.4
MASTER FILE MAINTENANCE
PROCEDURE EPFMM20
Page 6
Release Date: 2/01/80
Update #: P-l
//
.'ji-An =( IKK, (\.nji>kSfr), ,rnigi ri;i
nun os /no
nil
//
//*
HI-1 AC I- =(1MK,
, ,r.i)i.|| IG)
no
1 1.)
//*
//*
//*
Iigf'UT DAfA SM - I'lFuS "USIFh I- tl F TK AiiSAC I I (INS
//*
//*
//
//
//
//*
//*
//*
urn=hi KSI 71 =«n
IMirHHI liAIA SI: r - SIlPIFli i-iF US MASIFW F1LI
III- DSNA.'f-rKllSllM I HI ,
UN I r = *; If MP,
//*
//•
//*
//*
//S
//*
//*
//P
//*
Sf'fltl =( ll<« , (is.irlM-'h.SMr.) ,IVI
(UlTHIII liAlfl St I - I'l Al.NliSI IL Kf PIIH1
SI'IAU Hl> SYS«HJl=KllUI
IllilPHf HAIA St F.S - SYSIK"
on srh(iin=x.iiiii
HL> .SYSII'lf=i(,illl|
nn sv.sniir=Kiiiii
'"! I'M' SYS'lllTsROIH
(Hi .SY.SllilTsfclHIl
HJA'-{iA«. T |Hi»s
// i icf =ui
//*
//* (..lli-'VFKT A.. I' F
//*
//MFt'l I'. IMI nSNAK sKHi-'H.IL^ I . .1 -JAl),
// ViiLi'nt =ri'i>| vaf [ ,!.(.,Siil.' I :ij ,
// I'l.-if rCii'l- ,1 ASH)
//*
//* 1i..|J|l'l tiAlA HF I - i.iPlIi'1 C.M'l
i-c. .=1.1 H s I
. M
sAi, i in.,s
Oil On Ml i|i.l
ounuM nn
IMI'MJ^r"1"
(I II (I II hS II II
0||0(I^'4IHI
II (I dc^S'i i'
O00')*.(inn
mi o ')
nn n ii /on ii
it ii no / I 'HI
no'") 7) II Oil / /(ill
11 0 " ') / rt 0 '.)
(i ii mi /'yin
(i u 0()f* o no
O.)0||H
oy o D>;.> on
OliOilM /IIIJ
n ii n ii Q | ,);>
Ol)0l|'l,'0!|
o i) no 'i s'-u
0 nil i|'v n
')') I I i) s'MI
ml >> t mi nn
Dili) ) n1, nil
n.|" I ")M')'I
nun | n / nn
.HiO 1 nr.H'i
m. n | ii
'ii;.i | | .inn
n no) 1 | -1,1
//
(Page 2 of 7)
Figure 4.4.4-a - continued. Cataloged Procedure EPFMM20
373
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.4
MASTER FILE MAINTENANCE
PROCEDURE EPFMM20
Page 7
Release Date: 2/01/80
Update #: P-l
//* CHIIPIII DAIA Sb I - FIHIFll FIS/HS HAS If W F'll.t IHH.HHH. I MAWSAf I
//*
//Ff'S]M|P nil nSuAlif =K*.T|J|KM| ,
// UNI 1=MFM>,
// UISMrf ^fri.f'ASS.ntl tU. ) ,
// ju'Are = ( IIY6niiT=MHii
//*
nu J>YSMUT=IIHM
//*
//*
//*
//* SUM!
//*
S WIVSIFW FIU
F PttMyAt t ] flii.S
MLt
//
//
//SOW|LJ'«
//
iiSlM«!-iF=KKPli,ILr. I . .1 !)«!>»
vlH.II"lf =f f'l'l VAlf ,i'F IAIN),
=Sir.si .S
I M,
//
//*
//
//*
//»
//*
SI'
in:) i = f> .1 F "c,, si r = &
si'/.rt =( i •"•,(». -i.-'ivSiT j , ,CM 'i MI)
:,i'i\( i =M '•' , i - ' •••>• ''F'( ) . f fir 'it i. )
.nil n/,Ti :-M - M».-TI " IIM IMI.,»AI I "-'.i ;,/•( i
'1001
0110 I
i) on i 3
(i »ni Vino
Olin 1 i'40()
"001 is oo
(mill
'1001
nonj a i) on
0001/1100
000) '1^
01)01 /I
000 pi 14 00
0001 US 00
iion i d»>oo
o o o | it i o o
000] U80II
no 'i i 'i von
on f» 1 SIMIU
nun 1^1 on
ii DO IS s"o
0001 't'l(ll)
non |
Ollll ] S /Ml
(I li I' JS'i'll)
nun | MI i> o
(Mill I *<1 '>ii
IMIII ) h(;oo
"in. 1 1, inn
non | Hii>} a
iidii i <>'i'in
'< (in i /.,,i)u
o u n !•,/'!•(
"•I" | •%.'.'•!>
(Page 3 of 7)
Figure 4.4.4-a - continued. Cataloged Procedure EPFMM20
374
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.4
MASTER FILE MAINTENANCE
PROCEDURE EPFMM20
Page 8
Release Date: 2/01/80
Update #: P-l
//FHS1NPT 01) |)S!fA'lF.sll*|hilKU| ,
// IM.SP=(SH«,PASS)
//*
//* lUn KM I I.IAIA fit 1 - SUl'Ifl) MA{,1 1*-' f Ilk
//*
J .wlSF )
llllO
1 K»-gS At II UUtt
//
//
// Sl'Afl =( tlt I - MS/PR f ... iaS|iii-i FK
//*
//FPRfc.-*! r nn HSiviA «l-=( |l*V''»nf I
MLF li4lf.'UJAL I H AMi&f; I [lluS
F n
(I
flllf
on"
noo
n n ii
nun
/iM'll
7100
/*?"•>
7 J'Mi
7 «in i)
7'ji-i
noi.i t /»')(/
OOOJ 7'Mi)
noo i no on
it U 0 | H 1 0 i|
it o o i >• ^ n 0
oiiOIR 400
OKI) I H/KIO
nun i
000 I AHOll
II 1)0 J 'J I III)
mini ^v no
00"
o o o l P / n ii
')001 9MIMI
00«r»01 00
000^0 ,4«o
OU IV II 'I 00
00 0^" SO II
(HI 0 f O f, (I u
no IV o <;iiti
')(> II (/I I.I "ll
40 (i
nun,? |
'MHV I '•• "ii
(Page 4 of 7)
Figure 4.4.4-a - continued. Cataloged Procedure EPFMM20
375
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.4
MASTER FILE MAINTENANCE
PROCEDURE EPFMM20
Page 9
Release Date: 2/01/80
Update #: P-l
//
Lf.Tk ) ,
,Kl SI
//* IIIMMIII IIAIA SI I - lit AU'KISI II. IJt I>H,< |
//*
Siit AI, ni)
//* Illlinil HAIfl StT.S - SY;ilt.M
//*
//SYSI'HJ'II l)l
Hi) SYUMIlTsAllUI
//*
//SYSDHIIIII 1)1) SYJ>HI)I=X.|)II|
//*
no sYsinir
//*
//*
//SUM 1 3 FXI-C Pi,M=R.|>wur,s,
// KM,ll|N = M|M!{
i) I: !*>••= (SHW, i' A as )
//
//*
//» iiliTPHI I,A|A SKT - SilWIFn i-A.SttW Mlt (MUrtMAI lkA.«S«r 1 III -IS
//•
ni' "i- 1 1 =>"• II '•'>',
l>lhl'=(NF .<,HA.sS,nM Kit > ,
SI'Al.f =( ll«K , (A. •'ill'o / | 'III
OUl'J?/«*'»i
000^7 J"l)
(Page 5 of 7)
Figure 4.4.4-a - continued. Cataloged Procedure EPFMM20
376
-------
E IS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.4
MASTER FILE MAINTENANCE
PROCEDURE EPFMM20
Page 10
Release Date: 2/01/80
Update #: P-l
//(•HSU T At; 00 HYSlMl! =C.IIHI
//*
//* flllTI'IH |)4 I A St. IS - .SY.'ill-'1
//*
//SYSPHIM l>l» .SYSI'UlrKIHJI
//*
//SYSuUl flu 3YS'liiT=fc')M|
//*
//SYSDHIMII 01) SYS'
//SYSllTIWM 110
//*
//SYSUnUMP "II
//*
//*
// IIMF=(\I l»th)
//*
//* MAINTAIN I: IS/I'M MAS IT k I 1 1. 1
//*
//S1FPI. JH I'D DSijaxFsM'KlIJtr.l .
I VAU. ,
| - IJPMDN TARll
//*
//* lill'HT DATA
//*
//f'HSlll'IM On OOlwA.-'fsllpI
//*
//*
//*
IIATA SE i - t»i IK it. (
00 l).SNAHF=x/(.SilP|fM.
FILI-
//*
//» iMf'UT DATA SF I - nii> HASltP F ILt
//*
//FHSMLHF 00 OSrjAMFsM'Nll.ltri . .OA I A . MIL "MS I P,
I VttU.,«F l» IN) >
//*
//* (IHIf'HI
//*
//FPSNWi-F
// Dl.S«'=
// SP.UM =
//*
//* IMllHMI DATA Sf.f - M| /\ UNI IS 1 II.
//*
//f-i'Sii I MI. ill) S»;slHll=Miil|
//*
AIA Sf I - NKw "ASIFh FJL»
1)0 OSWAHf =)L|>PI|J|-CI . .
SI
OllfV'M 'HI
?"0
ooo<»«>/fiu
000 i 00 C
01)0 t'M "
nun
"00
n no
00030600
000*0700
0 o o 3 o i» n o
o i) 0 s 1 n '• i)
0 o " 1 1 1 0 c)
•100 i) «>«ll)
00041 son
ooo 51 Ml! |
(Page 6 of 7)
Figure 4.4.4-a - continued. Cataloged Procedure EPFMM20
377
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.4
MASTER FILE MAINTENANCE
PROCEDURE EPFMM20
Page 11
Release Date: 2/01/80
Update #: P-l
//*
//* niiH"ii DAM si i - ni.ii MASIFK Lib! INI;
//*
//Fl'Snl |)|. I'D ;>YSMIlT=Ri|ll|
//»
//» MiitPUl DAI* Shi - MM MAS I EH LlSTJNl,
//»
:;rsiiui=x.iiii|
st. T!> - SYsrt'
no sY.soin =*imi
no svti(iiii=Kiiii|
i>u n •> $ i n i)
0005 <«'MI
(Mill SV/f)0
OIM>
nun
//*
//* fiuit'iii
//*
oon
oon
n o o 4 /M '• ii
//*
//*
//SYSlilMHII I'D SY.SIHJTsKIIUf
//*
(HJ ft
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.4
MASTER FILE MAINTENANCE
PROCEDURE EPFMM20
Page 12
Release Date: 2/01/80
Update #: P-l
Parameter Default
Name Value
PROJECT 'CN.EPALMH.A087.
CDHS.HQ.PNT1
PROG1 PSRNETR
PROG2 PCENETR
PROG3 PSREFIN
PROG4 PMSEFIN
PROG5 PSRINTR
PROG6 PFMMSTR
REGION1 150K
REGION2 100K
REGIONS 150K
REGION4 100K
REGIONS 150K
REGION6 150K
TIME1 '1,0'
TIME2 '1,0'
TIME3 '1,0'
TIME4 '1,0'
TIME5 '1,0'
TIME6 '1,0'
OLDMSTR ECOLDMST
Description
Highest-level index of data set names (e.g.,
CN.EPALMH.A087.CDHS.HQ.PNT.DATA.EPOLDMST would be
the full data set name of a master file)
NEDS transaction sort program
NEDS to EIS/PS master file transaction
conversion-edit program
Master file internal transaction pre-insertion
sort program
Master file internal transaction emission
factor insertion program
Master file internal transaction sort program
Master file maintenance program
Region size allocated for execution of PSRNETR
Region size allocated for execution of PCENETR
Region size allocated for execution of PSREFIN
Region size allocated for execution of PMSEFIN
Region size allocated for execution of PSRINTR
Region size allocated for execution of PFMMSTR
Time allocated for execution of PSRNETR
Time allocated for execution of PCENETR
Time allocated for execution of PSREFIN
Time allocated for execution of PMSEFIN
Time allocated for execution of PSRINTR
Time allocated for execution of PFMMSTR
Lowest-level index of old master file
(Page 1 of 2)
Figure 4.4.4-b. Substitutable Parameters for EPFMM20
379
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.4
MASTER FILE MAINTENANCE
PROCEDURE EPFMM20
Page 13
Release Date: 2/01/80
Update #: P-l
Parameter
Name
DISP
SECNDRY
TEMP
WORKSPC
OUT
Default
Value
NEWMSTR EPNEWMST
EMFCFIL EPEMFFIL
UNIT 3330
SERIAL CDHSPK
'NEW.CATLG,
DELETE'
SPCUNIT TRK
PRIMARY 20
10
SYSDA
'20,10'
A
Description
Lowest-level index of new (or updated) master
file
Lowest-level index of emission factor file
Unit type to which new (or updated) master file
is to be written
Serial number of volume to which new (or updated)
master file is to be written
Disposition of new (or updated) master file
Ul:i.
Units in which space for new (or updated) master
file is to be allocated
Primary space allocation 'for new (or updated)
master file
Secondary space allocation for new (or updated)
master file
Unit type for temporary work space
Space allocation for sort work areas
SYSOUT class for all print files
(Page 2 of 2)
Figure 4.4.4-b - continued. Substitutable Parameters for EPFMM20
380-
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.5
MASTER FILE MAINTENANCE
PROCEDURE EPFMM30
Page 1
Release Date: 2/01/80
Update #: P-l
4.4.5 MASTER FILE MAINTENANCE FROM EMISSION FACTOR TRANSACTIONS - EPFMM30
4.4.5.1 Description
The cataloged procedure PEFMM30 allows the user to generate internal
transactions, insert emission factor information into those transactions, and
update the EIS/PS master file. This procedure executes the master file
emission factor transaction generator program, PMSEFGN (EP0130); the master
file internal transaction pre-insertion sort program, PSREFIN (EP0090); the
master file internal transaction emission factor insertion program, PMSEFIN
(EP0100); the master file internal transaction sort program, PSRINTR (EP0110);
and the master file maintenance program, PFMMSTR (EP0120).
4.4.5.2 JCL Listing
See Figure 4.4.5-a for a listing of this procedure.
4.4.5.3 Cross-reference of DD Names and Files
Program Name: PMSEFGN (EP0130)
DD Name
EPSMSTR
EPSEMFC
EPSOPTN
EPSOUTP
EPSOPTO
EPSDIAG
File Description
EIS/PS master file
EIS/PS emission factor file
Option card
Internal transactions
Option card for PMSEFIN (EP0100)
Diagnostic report
Input/Output
Input
Input
Input
Output
Output
Output
381
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.5
MASTER FILE MAINTENANCE
PROCEDURE EPFMM30
Page 2
Release Date: 2/01/80
Update #: P-l
Program Name: PSREFIN (EP0090)
DD Name
EPSINPT
EPSOUTP
EPSDIAG
SORTWK01
Unsorted internal transactions
Sorted internal transactions
Diagnostic report
Sort work files
Program Name: PMSEFIN (EP0100)
DD Name
EPSINPT
EPSEMFC
EPSOPTN
EPSOUTP
EPSDIAG
Sorted internal transactions
Emission factor file
Option card
Internal transactions with
insertions
Diagnostic report
Program Name: PSRINTR (EP0110)
DD Name
EPSINPT
EPSOUTP
EPSDIAG
SORTWK01
Unsorted internal transactions
Sorted internal transactions
Diagnostic report
Sort work file
Input/Output
Input
Output
Output
Internal
Input/Output
Input
Input
Input
Output
Output
Input/Output
Input
Output
Output
Internal
382
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.5
MASTER FILE MAINTENANCE
PROCEDURE EPFMM30
Page 3
Release Date: 2/01/80
Update #: P-l
Program Name: PFMMSTR (EP0120)
DD Name
EPSINTR
EPSOLMF
EPSOPTN
EPSNWMF
EPSDIAG
EPSINTL
EPSOLDL
EPSNEWL
Internal transactions with
insertions
Old EIS/PS master file
Option card
New or update EIS/PS master file
Diagnostic report
Transaction listing
Old master file listing
New master file listing
Input/Output
Input
Input
Input
Output
Output
Output
Output
Output
4.4.5.4 User-supplied JCL
To execute the cataloged procedure ECFMM30, the user must supply job
accounting information, the data set names of the old and the new (or updated)
EIS/PS master file and the emission factor file, and option cards to specify
any desired options. See Figure 4.4.5-b for a description of the procedure's
substitutable parameters.
4.4.5.5 Sample Run Stream
The following run stream illustrates the use of EPFMM30 to update an
EIS/PS master file using generated transactions containing emission factor
information. The current EIS/PS master file is named 'CN.EPALMH.A087.HQ.PNT.
DATA.EPMASTR11. The new master file will be named 'CN.EPALMH.A087.HQ.PNT.
DATA.EPMASTR21. The emission factor file name is 'CN.EPALMH.A087.HQ.PNT.DATA.
383
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.5
MASTER FILE MAINTENANCE
PROCEDURE EPFMM30
Page 4
Release Date: 2/01/80
Update #: P-l
EPEMF11. No LIST or FLAGW option is specified for PFMMSTR (EP0120); an option
year of 80 is used for the program. The NOFLAGW option , local origin, source
1, and a date of 80034 are specified for PMSEFGN (EP0130).
// EXEC EPFMM30,
// OLDMSTR=EPMASTR1,
// EMFCFIL=EPEMF1,
// NEWMSTR=EPMASTR2,
//GENER.OPTIONS DD *
LI 80034 NOFLAGW
//UPDATE.OPTIONS DD *
80
/*
384 '
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.5
MASTER FILE MAINTENANCE
PROCEDURE EPFMM30
Page 5
Release Date: 2/01/80
Update #: P-l
fl
//*
//*
//*
//*
//*
//» FHAl.'1n/AOlt7 HF Hl.Fin Ml, LI'lYl) ••). (VI'M S'I1-S'»'»I
//*
//* W(; \l 1 S | II'J |.F VH ! l-ni|
//*• I rtSi IIPMAIF *; r-j
//* OATK iMKiiiiPiinftHn: FFM^IAKY t, I<»HO
//*
//* TH'lii PI'liri:i»l'CF Al l."v.S ln^ li;>|-k Mi IIPOAlF. I UK lJ.S/1'S
//* Fllb US INi; CF-IFK* FFli F'MSHIi^i FACIUK f I'A'i.SAt I MIMS
//*
//*
KF I. I UN I = | OOK ,
WF'I-ION Jr 100K ,
I Ml 1 =
IMF J =
ill
oisp='Ntw,r. A M I.,I»FLF:IF • .
l,if.
1,0',
IFMf rSYSOA,
nil 1 =/i
//*
//*
, 10'
KFMilNsK KH, ILII'
UfcNt-rtAIF F lS/M:j li»lFhr'b{ fi"loSlMN F«tTlH' iKAIi.'.ftr I Mn-i.S
•f'l in no nSijA'iF. =M'"M.IH;I ..I 0/-H,
Jtit I Ml =( |»W I V4 I t , hi- I /> I "I) ,
Hi S>'=(SHi«,lJ4HSJ
IMPIII IIAIA si I - r is/p;, i*-. i ssM'' Fi>riin< FIIF
DO I'Sufi.'l =\pu,i.lt ( I . .11A I -\.A.f -ifCf'll ,
V'llH-lF =O">| Vnlr ,i*F I A C'J ,
OOO I/0 I 00
•I (I 'I I) 0«' 'I I)
0 (i 0 0 0 •, O l)
n ooo (>, (III
Oil (I I) (I /III)
o o on fin (HI
OOOlll' 'II''I
01)00 1 00 II
OoOol | ni)
OOOld rMM)
ri o o u l
n o o i) I s o o
0(1(10 1 Mil)
fl O 001 /') 0
H(IOl) J MOO
0000 1 'Mi<)
"00O^U00
oo " 021 o'j
Oil I
OoOOPSOO
0000? /
0II 00? HO (J
000') A 1 Oil
0000 '
0 0 0 0 * /0 II
it 01) i| SO on
iioPoS I on
oortoS son
no'VtiS'iou
(Page 1 of 6)
Figure 4.4.5-a. Cataloged Procedure EPFMM30
385
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.5
MASTER FILE MAINTENANCE
PROCEDURE EPFMM30
Page 6
Release Date: 2/01/80
Update #: P-l
// l)I.SPs(SI'W,HA!»S)
//»
//* I III"! I DA I fi SM - MS/I'S '"A.'ill.t* Mil
(i n n OS /(i i)
01) HSw/Vr f sF.HI'll.lf.f I . .I1A1 A.
Vl>|.IMF = (P'f] VAlt ,KM AIM),
1)1 3I'=
DAI A SLT - iipTiiu I.AHH
I)D DONAMF =HPI KINS,
//*
//* iNi'iii
//*
//1-HSijPlN
//*
//* UlllPlir DATA HM - h.IS/1'S II
//*
//FHSlHIlP lit) DSNAi-iE=R.41rtft^Sl ,
//
//
//*
//*
//*
//FPSllf'TH
//
//
//* IIIIIPUT DATA SM - UTACnl'ISI 1C
//*
I)ISP=(,JEW, PASS, ntl hit) ,
fcMlSSlMN FAT. MM If AKSALT
,1'LSfc
I1ATA Sf I -
I>D llSNA-if s
Dir>P=(MHi",HASS,l)f LF IK ) ,
HPIl f =nTtMH,
SFI8 - SYSIfM
//*
//* NUIMllT
//*
//SYSI.HH 111) SYSIUJTsHiMH
DO S
//*
//SYSDHIIUI 01) ,SYHMUt=IH)ll|
//*
01) SYSIM.IT=K.'|H|
//*
//*
//* RHOI tfS/l'S
HL^ 1lllt'»•=(. inK, t'»: SS)
//<*nW|| If 1)1) |.iSn«' F=«5YS J .-.I'l' II. |.«,
//*
(I I) I)') Ml Oil
fill 'HI/, I III!
on on *>«<) i)
(I (M) (I h 'i(\ I)
nu ni)h4 no
01)01)70011
0 II (1 0 7 i 0 0
00 00 7 *>')'»
OuiM)7oOO
oo no 7 700
00007VHI)
oo
I 00
OOOOM
0 W P 0 » / 0 0
00 Oil HMD 0
(Ml 00410 1)
000(1 '-t'40 II
O I) Oil 9 /Oo
oilO II 9 H'l')
fiiio 1 On 00
01)01 0100
00010200
ounm suo
n 0 0 1 0 'I o i)
nijo i no
(ion] (),,•>,)
'10 ft 1 0 / Oil
n ii n l o MI u
Ml»p 1 OWltll
O|l>>1 | Oi'i)
'MID I 1 I (10
nno I 1 ,"i"
(Page 2 of 6)
Figure 4.4.5-a - continued. Cataloged Procedure EPFMM30
386
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.5
MASTER FILE MAINTENANCE
PROCEDURE EPFMM30
Page 7
Release Date: 2/01/80
Update #: P-l
SI' AT fc =
I'-)
//*
XXSlH'l IK DA HI)
//*
01) UNI l = (Ofr 4l'»l-rP=( Si I'M MM) I , SOW T f'K OP ) ) ,
//* '
//* INPUT OftTA St I - MASTM F|IF JfllH'feAl I I'ANSAC I l"» S
//*
MAiTtW Utt INItKNAI. ( K ANSAC I I HNS
,wu.st)
//*
//« MIJTKUI UA|A Stl - S
//*
//F.PSDUIP Hi)
//
//*
//* WJTPHI IJ41A StT - DIAiiNliSIIC
//*
K Ml) .SYSMijTsRIUM
//« niHfllf DATA RMS - HV8ltM
//*
Ml) S
.SYS"III=H.HIII
//*
//SYS()H|.H|
//*
I'D SYS
//*
LNIR6IHM FAf
XX*
XX*
xx
xx
XX*
XX*
XX*
XXSHHLIH 1)11 DSNAMt =kt'i 0 HSUfi •'!• =KicSlil. IH;,
XX nlSf'sf MIK,f ASS)
xx»
XX* Il>l*|il lint /i Ml - III') |IM< Ti.l'li
XX*
XXf P.Snl'p; U|i uSuft -f s:r.l M'|i,
XX i>|M'=(H| 0,|''i •<.-.)
501)
qill)
ti'lil
it on j
HIM) I
'I 'MM
nun i
OIMM
lit)') | I '''HI
i ('line
'ton |
"o'M
I ?0(I
oon i n (,oo
i' n
(i i, (i
•Mil'
'Ml M
(Page 3 of 6)
Figure 4.4.5-a - continued. Cataloged Procedure EPFMM30
387
-------
LiS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.5
MASTER FILE MAINTENANCE
PROCEDURE EPFMM30
Page 8
Release Date: 2/01/80
Update i: P-l
DATA SF I - t KS/f'S f-MlS<*in»i MCtilU f lit
//*
//*
//*
//M'SM-'l-r lui DSt^AMf =KI'WII II T | . .OA t ft.nF 4f CF II ,
// VMLIIl-F s(P«J VAN ,)<>• I A IM) ,
// 1)1 Sl'=
//*
//* flllff'lll uAIA StT -
//*
//*
//• niin'ii! UAIA str -
//*
//FpsuiMP no iisMAuf
// UN i r =
imn
P'ANSAC I HNS f • IT h t'-'l^SIl'N FACIIIh.S
IWUMSACI inns MIH I>'I.';;>JIIN FAC
//
//*
//* IIUJHHI OAlft. Kfc ! -
//»
DO .
= ( IKK, (K.*OHH SPC) , ULSF)
Al.NijSI It KFPIWl
//*
//* OUTl'in urtIA SfcTj, - SYSTfcM
//*
//*
//SYSllllI OK SY.SOOf SKllll J
//*
//stSDHiitir nn l.sYsiMii=n,iiiii
//*
//*
SYSIMII=XIIMI
//*
//*
//*
//* SllHT MS/MS MASIFw FTl.F lnlf-*r.AL 1 WANS AC !
C I . .l-MAU,
Tfe , H»- I A |l>'
//*
no D?U.A.'«F=SYSI .:>'•»*u IH,
|)| Sp= (SHH,
1)1) IIH J 1=R|F"Pf
. JH f>|) |)SWAMF =
I. [II
//*
//SiH« ItthOr' "Hi H»l |1 =( Hfh ''4',S
// 3i'«c i =( ». ii'i.iii, i^, (».'f h'Sl.'iUKI 'A (I I , ti
//
//*
1 1.)
I
SP/i( I =( v. SP(JI|.l^, (". .,'lWh Sl'f. 1 . ,( M jl I f. )
.-.f I - '-AMI'- FM iMM'i'M n «>n:;..r |
1 U SM-ilJI- nf.l:
(< ii (i
(Hill
0 (t 0
nun
000
"UP
000
nuo
(i (i "
h'/IM)
/woo
7 I'M'
7 .S (' 0
/ NUO
7SOO
7r.mi
7 /'in
7MIHI
» w P 1 « I (i (i
OUC 1 K
000101,0,1
DUO I P^di)
(»U
i no
onn
0 li 0 >> ) I'll)
<»
011
/no
on
o«
C*/ 5«)ir
(Page 4 of 6)
Figure 4.4.5-a - continued. Cataloged Procedure EPFMM30
388
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.5
MASTER FILE MAINTENANCE
PROCEDURE EPFMM30
Page 9
Release Date: 2/01/80
Update i; P-l
//FPS1NMT III) OSNAr Fr
//*
//» fll/lpllj i)A|A
//*
//ff'SdillP Mil HW1 I=K IF ,
//
// SPAf f =(lKf,
-ift;«ltK FILt JNIH<»>'Al 1 1< A jS*( I I l/li;,
),*l Sf J,
//*
//• HUH HI UAIA Sfc 1 - 01 Ai;»'|JRI !(..
//*
//KMSUTAf: D|) SYSi|i)T=*ini|
//*
//* unr^iir DAIA stT.s - .sv.sH1-1 HIMWAIIUW
//*
//*
no ,SVSI'UI=K,IIMI
on svs
//*
//*
// Mf ti
// I TMfsf HI
//*
//* MA i MI
//*
X/S»Ff»l. |H III) DKliAKtBKPWO.M C! ..
// VillllciFsfHWl V« Ih ,l«F I AIM) »
//*
//* I.JIMlT HAlA J>t I - ill'lll"1
//*
uPIN OH |)l>f>Ar-| sltpl (ili
//*
//* Inl'lir DrttA .SF I - bUHftO irt?«lf« Fill MTIWnAl I "Al.iS«f T I II IS
//*
//*
AH ^>^ I - n| it rf.A,sff(- f|^
Dlj l.iSI»A.>F rKi'I'ti.ll ( I . . Mrt I ft . '...'I " '.'> I W ,
V"|.ll-'-F =(I"M Vfllk ,1-f I A|M),
I' f :>M=(SHK, l'Aj,S )
i>AU 51 I - •••»•• «-«S|»N ^nl
n (i (i, 'P /'
rMHi^^M
on (•,»/'< '
n o n ^ /i o n o
(Mine1 'I I On
01) ') ("I 4 (I I)
un f>u
I o«i
001'r'SSriri
0011,'M Oi)
o uij" *••»'> n
Oll«Vi'«"()
iiu '>(»<, /do
T 7DIMI
00 IV /Mill
III) IV /r'Hi)
rtlHV/ SHU
i /.inn
7 Ml ii
Illlf",1 / /'111
II I) f f /.U'U
tllMV /'<"(!
OOl'r"* I "Hi
(Page 5 of 6)
Figure 4.4.5-a - continued. Cataloged Procedure EPFMM30
389
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.5
MASTER FILE MAINTENANCE
PROCEDURE EPFMM30
Page 10
Release Date: 2/01/80
Update #: P-l
J
//
//
//«
//*
//*
On l>SlMA.-.f =XHI>n.ltrt . .
IINI1=KIJMI,
vll(JI'"f =(HKI VAH ,Kt I A |.M,SK KrKS.
nlSIJ=( Mil SH) ,
M'ACt = (lc'.|MAKY,X.SI-r.Nl>HY ) . Hi
OAIA SM - i> i AUHIIS i K. iiiki
//*
//* HillPill DATA SF 1 - -4ASIFK Mil- tuTf'JAl. I PHHI3AC 1 MH L.IS11»»U
//*
//» Illllt'lll |,A|A SM - lit" 'ASII-U
//»
//Ft-'Sui Di no .-.vs'iiji =KUIII
//*
//* llllTHHI |)A|A SI 1 - We M fftSlhi'
//»
X/KrSNFivl 1)1) SY:j'MM=)MlU I
//*
//* Illllflll OA|A Shfo - SYST»'' IIJ'f
//*
SI'MJ'T Dl.'
D|i SY.Silill rHUIII
//*
X/SYSDHll'll Mil SY.S(HIT=Klllll
//*
//SYSlJT^Hl' Hi) SY.Sil!II=KillM
//*
//sysiiniivic nn sYSiun =Ru'H
//*
»n
no iv on ii n
I) IHI ' ') 0
it (i n 5 1 1) o ii
n 0" 3) I °l'
fit) o 4 1 1 " '.i
nun si 400
o« o i 1 'i o ii
(Page 6 of 6)
Figure 4.4.5-a - continued. Cataloged Procedure EPFMM30
390
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.5
MASTER FILE MAINTENANCE
PROCEDURE EPFMM30
Page 11
Release Date: 2/01/80
Update #: P-l
Parameter
Name
PROJECT
PROG1
PROG2
PROGS
PROG4
PROG5
REGION1
REGION2
REGIONS
REGION4
REGIONS
TIME1
TIME2
TIMES-
TIME4
TIME5
OLDMSTR
Default
Value
'CN.EPALMH.A087,
CDHS.HQ.PNT1
PMSEFGN
PSREFIN
PMSEFIN
PSRINTR
PFMMSTR
100K
150K
100K
150K.
150K
'1,0'
'1,0'
'1,0'
'1,0'
'1,0'
EPOLDMST
Description
Highest-level index of data set names (e.g.,
CN.EPALMH.A087.CDHS.HQ.PNT.DATA.EPNEWMST
would be the full data set name of an EIS/PS
master file
Master file emission factor transaction
generator program
Master file internal transaction pre-insertion
sort program
Master file internal transaction emission
factor insertion program
Master file internal transaction sort program
Master file maintenance program
Region size allocated for execution of PMSEFGN
Region size allocated for execution of PSREFIN
Region size allocated for execution of PMSEFIN
Region size allocated for execution of PSRINTR
Region size allocated for execution of PFMMSTR
Time allocated for execution of PMSEFGN
Time allocated for execution of PSREFIN
Time allocated for execution of PMSEFIN
Time allocated for execution of PSRINTR
Time allocated for execution of PFMMSTR
Lowest-level index of old master file
(Page 1 of 2)
Figure 4.4.5-b. Substitutable Parameters for EPFMM30
391
-------
EIS/PS
FILE CREATION AND
MAINTENANCE
SECTION 4.4.5
MASTER FILE MAINTENANCE
PROCEDURE EPFMM30
Page 12
Release Date: 2/01/80
Update #: P-l
Parameter
Name
SERIAL
DISP
SECNDRY
TEMP
WORKSPC
OUT
SPCUNT2
Default
Value
NEWMSTR EPNEWMST
EMFCFIL EPEMFFIL
UNIT 3330
CDHSPK
'NEW.CATLG,
DELETE1
SPCUNT1 TRK
PRIMARY 20
10
SYSDA
'20,10'
A
TRK
Description
Lowest-level index of new (or updated) master
file
Lowest-level index of emission factor file
Unit type to which new (or updated) master
file is to be written
Serial number of volume to which new (or
updated) master file is to be written
Disposition of new (or updated) master file
Units in which space for new (or updated)
master file is to be allocated
Primary space allocation for new (or updated)
master file
Secondary space allocation for new (or
updated) master file
Unit type for temporary work space
Space allocation for sort work areas
SYSOUT class for all print files
Units in which space for sort work areas is to
be allocated
(Page 2 of 2)
Figure 4.4.5-b - continued. Substitutable Parameters for EPFMM30
392
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.1
INTRODUCTION
Page 1
Release Date: 2/01/80
Update #: P-l
5.0
DATA ACCESSING AND MANIPULATION
5.1
INTRODUCTION
EIS/PS provides the user with various data accessing and manipulation
capabilities which are primarily designed to perform intermediate steps in the
production of EIS/PS reports. These are (1) the capability to extract or
retrieve specific data from the master file; (2) the capability to create a
sorted file; and (3) the capability to concatenate two internal transaction
files.
393
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2
RETRIEVAL
INTRODUCTION
Page 1
Release Date: 2/01/80
Update1 #: P-l
5.2. RETRIEVAL
5.2.1. INTRODUCTION
The retrieval function in EIS/PS is performed by executing two programs:
the retrieval language processor program, PRTLNGP (EP0140), and the generated
retrieval program, PRTGENR (EP0150). The retrieval language processor program
must be executed first. All retrieval specifications are processed by PRTLNGP
(EP0140); based upon those retrieval specifications, PRTLNGP (EP0140) produces
the generated retrieval program, PRTGENR (EP0150). This generated retrieval
program must be compiled and link edited before it can be executed. When
PRTGENR (EP0150) is executed, it processes master file records and selects
those records which satisfy the retrieval specifications that were entered
into PRTLNGP (EP0140). The selected records are written to an output file,
which is referred to as an answer file. The answer file has the same format
as the EIS/PS master file and may be used as input to any EIS/PS program that
uses the master file as input. Information on the specific records that can
be retrieved can be found in Section 5.2.2. Refer to Figure 5.2.1-a for a
flowchart of the EIS/PS retrieval function.
Detailed information on PRTLNGP (EP0140) and on the retrieval
specifications can be found in Section 5.2.2. Detailed information on PRTGENR
(EP0150) can be found in Section 5.2.3.
394
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2
RETRIEVAL
INTRODUCTION
Page 2
Release Date: 2/01/80
Update #: P-l
Three cataloged procedures are available for executing the retrieval
programs. They are EPRTM10, EPRTM20, and EPRTM30. EPRTM30 executes PRTLNGP
(EP0140) and compiles, link edits, and executes the generated retrieval
program, PRTGENR (EP0150). PRTGENR (EP0150) is not saved. See Section 5.5.2
for additional information on EPRTM30.
If the user frequently performs the same retrieval, he should save the
load module of the generated retrieval program created by PRTLNGP (EP0140) for
that retrieval. He can then perform the retrieval by executing this load
module directly, using the cataloged procedure EPRTM20 (see Section 5.2.3.5).
The load module can be created and saved by executing the cataloged procedure
EPRTM10 (see Section 5.2.2.5).
395
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2
RETRIEVAL
INTRODUCTION
Page 3
Release Date: 2/01/80
Update #: P-l
RETRIEVAL
SPECIFICATIONS
GENERATED RETRIEVAL
PROGRAM. SOURCE
MODULE
COBOL COMPILE AND
LINK EDIT
ANSWER FILE
PRTLNGP (EP0140)
RETRIEVAL LANGUAGE
PROCESSOR PROGRAM
EIS/PS MASTER FILE
PRTGENR (EP0150)
GENERATED RETRIEVAL
PROGRAM
'RETRIEVAL SKELETON/
PROGRAM (PRTSKEL)l
I
DIAGNOSTIC
REPORT
DIAGNOSTIC
REPORT
Figure 5.2.1-a. Retrieval Flowchart
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 1
Release Date: 2/01/80
Update #: P-l
5.2.2 RETRIEVAL LANGUAGE PROCESSOR PROGRAM - PRTLNGP (EP0140)
5.2.2.1 Description
PRTLNGP (EP0140) is the first of two EIS/PS programs used to retrieve
data from the EIS/PS master file. The generated retrieval program, PRTGENR
(EP0150), must be compiled, link edited, and executed after PRTLNGP (EP0140)
is run to complete the retrieval process.
The retrieval language processor program, PRTLNGP (EP0140), uses the
retrieval skeleton program, PRTSKEL, and user-supplied retrieval specification
cards to build a generated retrieval program, PRTGENR (EP0150). All options
and retrieval requirements are contained in the specification cards (see
Section 5.2.2.2).
The retrieval requests can be written in either the EIS/PS retrieval
language (see Section 5.2.2.2) or in COBOL. COBOL statements can be included
on cards with the execution JCL or stored as copy members in an external
source library.
A single retrieval may specify statements containing fields from
different record types. The language processor assigns a value to the
retrieval according to the record types specified (0 - plant, 1 - point,
2 - SCC, 3 - comment). This value is used to determine which records to
examine in the retrieval. For example, if only point or plant record fields
are specified for retrieval, no SCC or comment records will be examined to
determine if they satisfy the criteria for the retrieval.
If a record is retrieved, associated records will also be retrieved as
follows:
397
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 2
Release Date: 2/01/80
Update #: P-l
Plant record field specified: If a plant record meets the retrieval
criteria, it will be retrieved along with its associated point
and SCC records. No comment records will be retrieved.
Point record field specified: If a point record qualifies, it will be
retrieved with its associated plant and SCC records. Other points
for the plant will be retrieved only if they qualify individually.
No comment records will be retrieved.
SCC record field specified: If an SCC record qualifies, the associated
plant, point, and all SCC's for the point will be retrieved. Other
points for the plant will be retrieved only if they have associated
SCC's which meet the retrieval criteria. No comment records will be
retrieved.
Comment record field specified: If a comment record qualifies, the
associated plant, point, and all SCC records for the point will also
be retrieved. Other points for the plant will be retrieved only if
they have comment records and those comment records qualify.
5.2.2.2 File Formats
PRTLNGP (EP0140) uses two input files: the retrieval skeleton program,
PRTSKEL, which is stored in a cataloged source library, and the retrieval
specification card file. The retrieval specification cards consist of
retrieval control cards and retrieval request cards. The control cards
indicate the beginning and end of the retrieval specification file and the
language in which the requests are written. The control cards also contain
the member name if one is used for a COBOL retrieval. Figure 5.2.2-a
illustrates the format of the control cards and Figure 5.2.2-b contains the
field definitions.
398
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 3
Release Date: 2/01/80
Update #: P-l
The retrieval requests precisely identify the data to be retrieved from
the master file. The data names that can be used for these requests are
listed in Figure 5.2.2-c. Definition of master file fields can be found in
Figure 4.3.5-b. The EIS/PS retrieval language requirements are discussed in
Section 5.2.2.2.1; the COBOL requirements, in Section 5.2.2.2.2.
Two output files are produced: a temporary file containing the retrieval
source program, PRTGENR, and a diagnostic report (see Figure 5.2.2-d).
5.2.2.2.1 EIS/PS retrieval language -The EIS/PS retrieval language is
designed to allow the user to select records from the EIS/PS master file based
upon the value of specific fields. See Figure 5.2.2-c for a list of those
master file fields that can be used in the EIS/PS retrieval language. The
EIS/PS retrieval language specifications are written in the format described
in Figure 5.2.2-e. .See Figure 5.2.2-f for the definitions of the fields in
these statements.
There are two types of operators used in the EIS/PS retrieval language:
the relational and the Boolean. The relational operator indicates the
relationship between a subject name and an object name. That is to say, the
relational operator actually asks a question and assigns a truth value (true
or false) depending on the answer to that question. The valid relational
operators are '=' (equality), '>' (greater than), and '<' (less than), the
construction of a relationship is as follows:
'subject name1 'relational operator' 'object name'.
An easy way to determine the truth value of the relationship is to ask the
following question:
Is 'subject name1 'relational operator1 'object name'?
399
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 4
Release Date: 2/01/80
Update #: P-l
If the answer is 'yes1, the truth value of that relationship is true, if
the answer is 'no', the truth value is false. The following statements are
examples of relationships and their truth values:
Subject Name Relational Operator Object Name Truth Value
11
11
11
11
11
11
_
=
<
<
>
>
11
12
12
10
10
12
True
False
True
False
True
False
The Boolean operator determines a truth value for a relationship or a set
of relationships. The valid Boolean operators are NOT, AND, and OR. The
construction of a Boolean expression involving AND or OR is as follows:
'Relationship 1' 'Boolean operator1 'Relationship 2'.
An easy way to determine the truth value of an expression using AND is to
ask the question:
Is the truth value of both relationships true?
If the answer is 'yes', the truth value of the expression is true; if the
answer is 'no1, the truth value is false. An easy way to determine the truth
value of a Boolean expression using OR is to ask the question:
Is the truth value of either one of the relationships true?
If the answer is 'yes1, the truth value of the expression is true; if the
answer is 'no', the truth value is false.
400
-------
EIS/PS
DATA ACCESSING ANU
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 5
Release Date: 2/01/80
Update #: P-l
The basic construction of a Boolean expression using NOT is as follows:
'NOT1 'relationship1.
An easy method to determine the truth value of the NOT expression is to
reverse the truth value of the relationship; in other words, if the truth
value of the relationship is true, then the truth value of the NOT
relationship is false and vice-versa. A table of truth values for Boolean
expressions is shown in Figure 5.2.2-g.
The use of relationships and Boolean expressions in EIS/PS retrievals is
shown in the following set of examples. The examples will be structured as
follows: (1) an assumption concerning the specific data to be retrieved from
an existing master or answer file; (2) the EIS/PS retrieval statements needed
to accomplish the request; (3) a brief discussion of how the computer will
evaluate the retrieval specifications; (4) a brief discussion of the records
which qualify for retrieval. It will be extremely helpful to keep in mind
that during a retrieval, the computer is examining only one single record at a
time. After that record has been examined, and its qualification for
retrieval determined, the following record in the file is then examined.
Example 1
Assume you want to retrieve all of the data in the master file for county
0400. The retrieval control statements to accomplish that request are:
401
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 6
Release Date: 2/01/80
Update #: P-l
Col 1-31
Col 33
Col 35
Col 37-67
Col 69-71
Subject Negation Relational
Name Flag Operator
$$SELECT
COUNTY
$$END
Object
Name
'0400'
Boolean
Operator
Each plant record in the input master file will be individually and
sequentially examined, and the question 'is the county equal to 0040?' will
be asked of each individual record . Thus, in this retrieval, only those
plant records in the master file that have a 0040 in the COUNTY field (and
their associated point and SCC records) will be retrieved. No comment records
will be retrieved.
Example 2
Assume you want to retrieve the records for county 0040 and SCC 40100101.
The retrieval statements for this request are:
Col 1-31
Subject
Name
$$SELECT
COUNTY
SCC
$$END
Col 33
Negation
Flag
Col 35
Relational
Operator
=
=
Col 37-67
Object
Name
'0040'
'40100101'
Col 69-71
Boolean
Operator
AND
402
-------
EIS/PS
OATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 7
Release Date: 2/01/80
Update #: P-l
In this retrieval we have a Boolean expression containing two
relationships. For each individual SCC record in the master file, the
computer evaluates each relationship separately and then evaluates the Boolean
expression. Thus, it determines if the COUNTY field of the record is 0040 and
then if the SCC field is 40100101. After obtaining the truth value for each
relationship, it then evaluates the Boolean expression. If, and only if, the
truth value of both relationships is true, then the Boolean expression AND is
true and that SCC record will be retrieved. The plant and point record for
the SCC and all other SCC records associated with the point will also be
retrieved. No comment records will be retrieved.
Example 3
Assume you want to retrieve data from AQCR 112 for sulfur dioxide (42401)
and particulates (11101). The retrieval statements to accomplish the request
are:
Col 1-31 Col 33
Subject Negation
Name Flag
$$SELECT
AQCR
POLLUTANT- ID
AQCR
POLLUTANT- ID
$$END
Col 35
Relational
Operator
=
=
=
=
Col 37-67
Object
Name
'112'
•42401'
'112'
'11101'
Col 69-71
Boolean
Operator
AND
OR
AND
403
-------
LIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 8
Release Date: 2/01/80
Update #: P-l
In this retrieval we have four relationships and two different Boolean
operators. The lowest record to be examined for the retrieval is the point
record. The computer now has the problem of determining which operator to
evaluate first. That is, what is the hierarchy of the relational and Boolean
operators? If an expression does not contain parentheses, the computer
evaluates according to the following hierarchy:
1st (level 1) All relational operators
2nd (level 2) Boolean NOT
3rd (level 3) Boolean AND
4th (level 4) Boolean OR
If there are operators on the same level, the computer evaluates those
operators from left to right (top to bottom).
Therefore, using these rules for evaluating expressions, the computer
will determine a truth value for the entire expression for each individual
point record as follows:
Operation
1 AQCR = '112'
2 POLLUTANT-ID = '42401'
3 AQCR = '112'
4 POLLUTANT-ID = '11101'
5 Result of Step 1 AND result of St.ep 2
6 Result of Step 3 ANp result of Stfp 4
7 Result of Step 5 OR result of Step 6
404
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 9
Release Date: 2/01/80
Update #: P-l
Referring to Figure 5.2.2-g, for a point record with AQCR 112 containing
participates, Step 7 will be evaluated as 'False' OR 'True', which has a value
of 'True', and the record will be retrieved. For a point record with AQCR 112
containing sulfur dioxide, Step 7 will be evaluated as 'True1 OR 'False',
which is 'True1, and the record will be retrieved. For any other record not
meeting the specifications, Step 7 will be 'False'; thus, any record not
containing particulates for AQCR 112 or sulfur dioxide for AQCR 112 will not
be retrieved. The plant and SCC records associated with the retrieved point
records will also be retrieved.
NOTE: Step 7 can never be evaluated as 'True' OR 'True' since it is
impossible to have an individual record containing both a 42401
(sulfur dioxide) and 11101 (particulates) in the point pollutant ID
field.
In example 3, we used the expression AQCR = '112' twice because of the
order in which the Boolean operators are evaluated. This order can be altered
by the use of parentheses in the specifications. However, the use of
parentheses in EIS/PS retrievals is subject to the following restrictions:
The first reference to a repeating field from the point record (such as
POLLUTANT-ID) or to any field from the SCC record must occur before the
first set of parenthesis.
*
A repeating field or an SCC field must not be immediately followed by a
right parenthesis (e.g., POLLUTANT-ID) is not allowed).
A repeating field cannot be specified after an SCC field has been
specified.
405
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 10
Release Date: 2/01/80
Update #: P-l
Note that a dummy statement such as POLLUTANT-ID = POLLUTANT-ID can be
included in the specifications to satisfy the first restriction.
Example 4
This example is the same as Example 3, but this time parentheses will be
used. That is, retrieve sulfur dioxide (42401) and particulates (11101) for
AQCR 112. The retrieval statements to accomplish this request are:
Col 1-22 Col 24
Subject Negation
Name Flag
$$SELECT
AQCR
POLLUTANT-ID
(POLLUTANT- ID
POLLUTANT-ID
$$END
Col 26
Relational
Operator
=
=
=
=
Col 28-67
Object
Name
'112'
POLLUTANT- ID
1 42401 '
'11101')
Col 69-71
Boolean
Operator
AND
AND
OR
To evaluate parenthetical expressions, the computer will first find the
least most inclusive pair (i.e., the innermost pair) of parentheses (see
Figure 5.2.2-h) and derive a truth value for that parenthetical expression
using the normal method of evaluation. It then proceeds through all sets of
parentheses determining the truth value for each set of parentheses. After
having evaluated the parenthesized portion of the expression, the
nonparenthesized expression is evaluated as we have shown previously. Thus,
the computer evaluates this retrieval example as follows:
406
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 11
Release Date: 2/01/80
Update #: P-l
Step Operation
1 POLLUTANT-ID = '42401'
2 POLLUTANT-ID = '11101'
3 Result of Step 1 OR result of Step 2
4 AQCR = '112'
5 POLLUTANT-ID = POLLUTANT-ID
6 Result of Step 4 AND Result of Step 5
7 Result of Step 6 AND Result of Step 3
Note that the statement POLLUTANT-ID = POLLUTANT-ID is a dummy statement (that
is, it will always be evaluated as true) which was included to satisfy the
requirement that the first reference of a repeating data name from the point
record (such as POLLUTANT-ID) or any data name from the SCC record (such as
SCC) must occur before the first set of parentheses.
Example 4 will retrieve the same records as example three. Thus, every
point record which qualifies will be accompanied by its associated plant and
SCC records.
Example 5
As an example of the NOT Boolean operator, consider a retrieval for
comment records with line number not greater than 10 for county 0360. The
retrieval statements are:
407
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 12
Release Date: 2/01/80
Update #: P-l
Col 1-22
Col 24
Col 26
Col 28-67
Col 69-71
Subject
Name
$$SELECT
COUNTY
LINE-NUMBER
$$END
Negation Relational
Flag Operator
=
N >
Object
Name.
'0360'
'010'
Boolean
Operator
AND
The steps for evaluating this retrieval would be:
Operation
1
2
3
4
COUNTY = '0360'
LINE-NUMBER > '010'
NOT result of Step 2
Result of Step 1 AND result of Step 3
All comment records with line number not greater than 10 for county 0360 will
be retrieved. The associated plant record, point record, and all SCC records
for the point will also be included. Note that only those points which have a
qualifying comment record will be included.
5.2.2.2.2 COBOL retrievals - In-line COBOL language specifications are
entered immediately following the $$SELECT card, which must have USER coded as
the language keyword. These cards are punched according to COBOL rules for
syntax and punctuation. Any user-defined paragraph or section name should
begin with the prefix USER to avoid conflict with other names in the program.
408
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 13
Release Date: 2/01/80
Update #: P-l
Any valid PROCEDURE DIVISION statements, with the exception of DECLARATIVES,
can be entered. Since the retrieval language processor program does not
examine the COBOL statements, any errors could result in COBOL diagnostics or
unpredictable results. The data field named SEG-1-SUB (PIC 99 COMP SYNC) is
provided for use as a subscript for referencing repeating data names in the
point records. The field WORK-SUB can be used to reference the SCC records
stored for a point. The number of stored SCC records is SET-2-SUB.
The COBOL reserved data name TALLY can be used as an accumulator. All
valid data names shown in Figure 5.2.2-c can be used. The QUALIFICATION-
ACHIEVED-SW is used to indicate whether or not a record is written in the
answer file (QUALIFICATION-ACHIEVED-SW equal to TRUE). The data names TRUE
and FALSE can be used to set this switch.
NOTE: The user is reminded that the above rules are only valid for user-
supplied COBOL retrievals (either in-line or copy member).
Any retrieval that can be run using the EIS/PS retrieval language can
also be run using the USER option and COBOL statements, but nothing is gained
in these retrievals by using COBOL. However, some retrievals can only be
accomplished by using COBOL. An example follows to illustrate the advantages
of COBOL retrievals.
When running the EIS/PS language retrievals, each record in the answer
file is exactly the same as the corresponding record in the input master file;
i.e., no changes can be made to the records. In a COBOL retrieval, changes
can be made to the answer file records. Example 1 illustrates one use of this
capability.
409
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 14
Release Date: 2/01/80
Update #: P-l
The paragraph 'SET-QUAL-LEVEL' must be included any in-line COBOL
retrieval. This paragraph must contain a statement which assigns a value to
the data name QUALIFICATION-REQUIRED. For example, if REQUIRE-0-QUAL were
moved to QUALIFICATION-REQUIRED, only plant records would be examined to
determine if they satisfied the retrieval criteria.
Example 1
Master file fields with a length greater than 30 cannot be used in an EIS
retrieval. They can, however, be used in a COBOL retrieval. These fields
include ESTABLISHMENT and MAILING ADDRESS in the plant record, and COMMENTS in
the comment record. Assume a user wanted to know which plants had both
ESTABLISHMENT and MAILING ADDRESS blank. The following in-line COBOL
retrieval will produce an answer file containing those plants together with
their associated point and SCC records.
$$SELECT USER
QUALIFY-RECORDS.
IF ESTABLISHMENT IS EQUAL TO SPACES AND MAILING-ADDRESS IS EQUAL TO
SPACES MOVE TRUE TO QUALIFICATION-ACHIEVED-SW.
QUALIFY-RECORDS-END.
EXIT.
SET-QUALIFICATION-LEVEL SECTION.
SET-QUAL-LEVEL.
MOVE REQUIRE-3-QUAL TO QUALIFICATION-REQUIRED.
SET-QUAL-LEVEL-END.
EXIT.
$$END
410 *
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 15
Release Date: 2/01/80
Update #: P-l
5.2.2.3 Options and Control Cards
The options allowed for PRTLNGP (EP0140) are specified on the $$SELECT
retrieval control card. Information on this card can be found in Figures
5.2.2-a and 5.2.2-b.
5.2.2.4 Error Messages
PRTLNGP 001 CONDITIONAL - PREMATURE END OF FILE ON CONTROL CARD FILE -
ASSUMING $$END CARD
Meaning: The last card for the retrieval specifications must be a $$END
card. If this card is missing, this error message will be
printed, but program execution will continue.
Action: No action required unless other errors have been detected.
PRTLNGP 002 ABORT - FIRST CONTROL CARD NOT $$SELECT
Meaning: The first control card for specifying a retrieval must be a
$$SELECT card. If this card is not present, the run is
aborted.
Action: Include the $$SELECT card and resubmit the job.
PRTLNGP 003 ABORT - NO CONTROL CARDS IN INPUT STREAM
Meaning: There must be at least a $$SELECT and a $$END card in the input
run stream. The run was aborted.
Action: Include control cards as shown in 5.2.2.5.4 and resubmit the
job.
411
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 16
Release Date: 2/01/80
Update #: P-l
PRTLNGP 004 ABORT - INVALID NEGATION CHARACTER
Meaning: The character N should be used as the negation flag; otherwise,
the negation flag field should be blank. The run was aborted.
Action: Correct the error and resubmit the job.
PRLNGP 005 ABORT - INVALID RELATIONAL OPERATOR
Meaning: The only valid relational oeprators are = (denoting equal to),
> (denoting greater than), and < (denoting less than); any
other symbol will be rejected. The run was aborted.
Action: Correct the error and resubmit the job.
PRTLNGP 006 ABORT - INVALID BOOLEAN OPERATOR
Meaning: The valid Boolean operators are AND and OR. The run was
aborted.
Action: Correct the error and resubmit the job.
PRTLNGP 007 ABORT - $$END CARD EXPECTED BUT NOT FOUND
Meaning: An EIS/PS retrieval language card with no Boolean operator was
followed by another retrieval language card. Since only the
last card in a retrieval can have no Boolean operator, the run
was aborted.
Action: Correct the retrieval specifications and resubmit the job.
PRTLNGP 008 ABORT - UNMATCHED BOOLEAN OPERATOR
Meaning: The last EIS/PS retrieval language card in a retrieval had a
Boolean operator with no matching relationship. The last
retrieval language card in a retrieval must not contain a
Boolean operator; therefore, the run was aborted.
Action: Correct the retrieval specifications and resubmit the job.
412 *
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 17
Release Date: 2/01/80
Update #: P-l
PRTLNGP 009 ABORT - DATA NAME INVALID - 'identifier1
Meaning: The data name specified by 'identifier' is incorrect. Data
names must be spelled exactly, including hyphens, as shown in
Figure 5.2.2-c. The run was aborted.
Action: Correct the data name (indicated by the identifier in the error
message) and resubmit the job.
PRTLNGP 010 ABORT - UNBALANCED PARENTHESES AT FIRST OCCURENCE OF REPEATING
SEG-1 NAME
Meaning: Any repeating data name from segment 1 (point records) must be
referenced prior to a repeating segment 1 data name being
referenced inside parentheses.
Action: If a valid repeating segment 1 specification cannot be provided
prior to the parentheses, a dummy statement such as
ALLOWABLE = ALLOWABLE must be used. Correct the retrieval
specifications and resubmit the job.
PRTLNGP Oil ABORT - REPEATING SEG-1 NAME SPECIFIED AFTER SEG-2 NAME
Meaning: Segment 1 (point records) repeating data names cannot be
specified after segment 2 (SCC records) data names.
Action: Restructure the retrieval specifications to correct the order
and resubmit the job.
PRTLNGP 012 ABORT - UNBALANCED PARENTHESES AT FIRST OCCURRENCE OF SEG-2 NAME
Meaning: The first occurrence of any segment 2 (SCC record) data name
must not be inside parentheses.
413
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 18
Release Date: 2/01/80
Update #: P-l
Action: If a valid segment 2 specification cannot be provided prior to
the parentheses, a dummy statement such as SCC = SCC must be
used. Correct the retrieval specifications and resubmit the
job.
PRTLNGP 013 ABORT - REPEATING NAME PRECEDES RIGHT PAREN - 'identifier'
Meaning: A repeating data name cannot be immediately followed by a
right parenthesis.
Action: Correct the retrieval specifications and resubmit the job.
5.2.2.5 Cataloged JCL
The cataloged procedure EPRTM10, which is discussed below, executes the
retrieval language processor program, PRTLNGP (EP0140); compiles and link
edits the generated retrieval program, PRTGENR (EP0150); and stores the
resulting load module. The cataloged procedure EPRTM20 is used to execute the
stored load module and produce an answer file. See Section 5.2.3.5 for
information on EPRTM20.
The cataloged procedure EPRTM30 executes the retrieval language processor
program and compiles, link edits, and executes the generated retrieval
program. The corresponding load module is not saved. See-Section 5.5.2 for
information on EPRTM30.
5.2.2.5.1 JCL listing - Figure 5.2.2-i contains a listing of the cataloged
procedure EPRTM10.
414
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 19
Release Date: 2/01/80
Update #: P-l
5.2.2.5.2 Cross-reference of DP names and files
Program Name: PRTLNGP (EP0140)
DP Name
EPSSKEL
EPSINPT
EPSPROG
EPSDIAG
File Description
Retrieval skeleton program
Retrieval specification cards
Generated retrieval source program
Diagnostic report
Input/Output
Input
Input
Output
Output
5.2.2.5.3 User-supplied JCL - To execute the cataloged procedure EPRTM10, the
user must supply job accounting information and the name for the generated
retrieval program to be stored under. See Figure 5.2.2-j for a description of
the procedure's substitutable parameters.
5.2.2.5.4 Sample run stream - The following run stream uses EPRTM10 to create
the retrieval load module PRTGEN1. This load module can then be executed
using the procedure EPRTM20; see Section 5.2.3.5.4 for that run stream. The
EIS/PS retrieval specifications entered indicate that the retrieval will be
for state 12 and AQCR 001.
// EXEC EPRTM10,
// PGMSAVE=PRTGEN1
//GENER.INPUT DD *
$$SELECT
STATE = '12' AND
AQCR = '001'
$$END
/*
415
-------
LIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 20
Release Date: 2/01/80
Update #: P-l
5.2.2.6 Warninys and Special Instructions
The retrieval language processor program, PRTLNGP (EP0140), edits the
retrieval specification control cards and the EIS/PS retrieval language cards,
but does not edit user-written COBOL retrieval statements.
Both cataloged procedures EPRTM30 and EPRTM10 execute the COBOL compiler
to compile the retrieval source program generated by PRTLNGP (EP0140). During
the compilation of the generated retrieval source program, errors may be
encountered that were not detected by PRTLNGP (EP0140). Also, errors in the
user-written COBOL retrieval statements will be detected by the COBOL
compiler. Thus, when executing EPRTM30 or EPRTM10, error messages may be
generated by the COBOL compiler. When this occurs, the user should examine
the retrieval specification cards for errors. If no errors can be found, the
user should contact NADB for assistance.
General rules for retrieval specification control cards are presented
below:
Only the first $$SELECT card is edited for special option fields.
When coded, these optional fields must occur in exactly the columns
specified in Figure 5.2.2-a and must be spelled exactly as stated
in Figure 5.2.2-b. 1
A $$END card must be the last card in the specification. If any •
other cards follow the $$END card, they will be ignored.
416
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 21
Release Date: 2/01/80
Update #: P-l
For EIS/PS language specifications, the following rules apply:
Names must be spelled exactly as shown in Figure 5.2.2-c.
All literals should be enclosed in quotes and should be the same
length as that specified in Figure 5.2.2-c for the compared field.
If any repeating field satisfies the retrieval criteria, the entire
record qualifies for retrieval.
If any SCC record satisfies the retrieval criteria, all SCC records
for the associated plant will be retrieved.
Fields from the repeating portion of the point record or from the SCC
record cannot be first specified inside a set of parentheses.
No fields from the repeating portion of the point record can be specified
after fields from the SCC record.
A right parenthesis cannot immediately follow any repeating field.
COBOL statements should follow ANS COBOL specifications; they are not
edited by PRTLNGP (EP0140).
When PRTLNGP (EP0140) is run and encounters an abort error, the generated
retrieval source program, PRTGENR (EP0150), will contain statements that will
cause compilation errors. Thus, the generated retrieval load module will not
417
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EPOHO)
Page 22
Release Date: 2/01/80
Update #: P-l
be produced nor executed. When an abort occurs, correct the error encountered
by PRTLNGP (EP0140) and resubmit the job.
Comment records are not retrieved unless the retrieval specifications
include a field from the comment record. When a comment record field is
specified, no points will be retrieved unless they have qualifying comment
records associated with them. Note that this precludes retrieving all point
records for a county by including a comment record field in the
specifications.
The language processor program, PRTLNGP (EP0140), must always be run
prior to running the generated retrieval program, PRTGENR (EP0150). The two
programs can be run together using the cataloged procedure EPRTM30, or the
generated retrieval module can be stored using the cataloged procedure EPRTM10
and run later using the cataloged procedure EPRTM20.
When specifying a generated load module name during a run using the
cataloged procedure EPRTM10, specify the load module name as the value of the
substitutable parameter PGMSAVE in the user-suppplied JCL.
5.2.2.7 Cost Considerations
The following example provides an estimate of the cost of executing
PRTLNGP (EP0140) and compiling and link editing PRTGENR (EP0150) using the
cataloged procedure EPRTM10. EPRTM10 was executed on an IBM 370/168 for this
example.
418 .
-------
Page 23
Release Date: 2/01/80
Update #: P-l
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Size of skeleton program:
Number of retrieval specifications:
Size of generated program:
CPU time:
I/O time:
Total time:
997 records
15 records
1012 records
.45 seconds
1.59 seconds
2.04 seconds
Estimated cost:
$.29
5.2.2.8 Related Programs and Procedures
PRTLNGP (EP0140) must always be executed in conjunction with PRTGENR
(EP0150). The procedure EPRTM30 executes both of these programs, while
EPRTM10 executes PRTLNGP (EP0140) and EPRTM20 executes PRTGENR (EP0150).
419
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EPOHO)
Page 24
Release Date: 2/01/80
Update #: P-l
Record Position
Field Length
Description
1 -
10
14
16
24
8
9
13
15
23
80
8
1
4
2
8
57
Card Type
Unused
Language Keyword
Unused
COBOL Member Name
Unused
Figure 5.2.2-a. EIS/PS Retrieval Control Card
420 *
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP014U)
Page 25
Release Date: 2/01/80
Update #: P-l
Card Type: Identifies the type of control card.
Valid Codes;
Field Length:
$$SELECT - Specifies the beginning of a retrieval request,
$$END - Specifies the end of a retrieval request and must
appear alone on the card.
8 characters
Language Keyword:
Valid Codes:
Field Length:
Identifies the type of retrieval language to be used.
USER - Indicates that the retrieval specifications will be
COBOL language statements.
blank - Indicates that EIS/PS retrieval language
specifications will be used.
4 characters
COBOL Member Name: Indicates the name of a COBOL copy member residing in a
partitioned data set and containing COBOL language statements. A
copy meraber can be used for USER retrievals.
Valid Codes: blank - Specifies that the COBOL retrieval statements will
be placed after the $$SELECT card.
member name - Specifies the name of the member of an
external source library where the COBOL
retrieval statements reside. These COBOL
statements must have been stored in the
external source library under this member name
prior to the execution of the retrieval.
Field Length: 8 characters
Figure 5.2.2-b. Definition of EIS/PS Retrieval Control Card Fields
421
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 26
Release Date: 2/01/80
Update #: P-l
Valid Data Names for Retrieval (Plant Data)
The following list of names from the plant record can be referenced in either
EIS/PS retrieval language specifications or COBOL language specifications:
Data Name
AQCR
CITY
CONTACT
COUNTY
DATE-OF-0-RECORD
LOCAL-CONTROL
NUMBER-OF-EMPLOYEES
OWNER
PLANT-ID
PRINCIPAL-PRODUCT
PROPERTY-AREA
Field Length
3
4
15
4
5
2
4
1
4
10
6
Data Name
RECORD-0-DAY
RECORD-0-YEAR
SEG-O-ID
STATE
TELEPHONE
USER-CONTROL-REGION
USER-PLANT-ID
UTM-ZONE
Field Length
3
2
1
2
10
3
12
2
The following two names from the plant record can be referenced only in COBOL
language specifications:
ESTABLISHMENT
MAILING-ADDRESS
(Page 1 of 5)
Figure 5.2.2-c. Valid Retrieval Data Names
422
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 27
Release Date: 2/01/80
Update #: P-l
Valid Data Names for Retrieval (Point Data)
The following list of names from the point record can be referenced in either
EIS/PS retrieval language specification or COBOL language specifications:
Data Name
Field
Length
Data Name
Field
Length
Data Name
Field
Length
ANNUAL-THRUPUT 8
BOILER-DESIGN-CAPACITY 5
COMPLIANCE-SCHEDULE 4
COMPLIANCE-STATUS 1
COMPLIANCE-STATUS-UPDATE 6
CONTROL-REGULATIONS 12
DATE-OF-1-RECORD 5
DAY-WEEK 1
DEC-FEB 2
DIAMETER 3
ECAP 1
FLOW-RATE 7
HEIGHT 4
HORIZONTAL 4
HOURS-DAY 2
IPP 2
JUN-AUG 2
LATITUDE 6
LATITUDE-DEGREE 2
LATITUDE-MINUTE 2
LATITUDE-SECOND 2
LONGITUDE 7
LONGITUDE-DEGREE 2
LONGITUDE-MINUTE 2
LONGITUDE-SECOND 2
MAR-MAY 2
NBR-OF-POLLUTANTS 2
NEDS-POINT-ID 2
NORMAL-OPERATING 5
PLUME 4
POINTS-PER-STACK 4
RECORD-1-DAY 3
RECORD-1-YEAR 2
REG-1 4
REG-2 4
REG-3 4
SCHEDULE-MONTH 2
SCHEDULE-YEAR 2
SEG-l-ID 1
SEP-NOV 2
SIC 4
SPACE-HEAT 3
STATUS-DAY 2
STATUS-MONTH 2
STATUS-YEAR 2
TEMPERATURE 4
USER-POINT-ID 3
UTM-COORDINATES 9
VELOCITY 5
VERTICAL 5
WEEK-YEAR 2
(Page 2 of 5)
Figure 5.2.2-c - continued. Valid Retrieval Data Names
423
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 28
Release Date: 2/01/80
Update #: P-l
Valid Data Names for Retrieval (Repeating Data)
The following list of names from the repeating portion of the point record can
be referenced in either EIS/PS retrieval language specifications or COBOL
language specifications:
Data Name
ALLOWABLE
CNTL-EQUIP-COST
CONTROL-EQUIPMENT
EMISSION-UNITS
EST-CONTROL-EFF
ESTIMATES
Field Length
7
7
6
1
3
7
Data Name
ESTIMATION-METHOD
MEASURED
POLLUTANT-ID
POTENTIAL
PRIMARY-CNTL
SECONDARY-CNTL
TEST-METHOD
Field Length
1
7
5
7
3
3
1
(Page 3 of 5)
Figure 5.2.2-c - continued. Valid Retrieval Data Names
424
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 29
Release Date: 2/01/80
Update #: P-l
Valid Data Names for Retrieval (SCC Data)
The following list of names from the SCC record can be referenced in either
EIS/PS retrieval language specifications or COBOL language specifications:
Data Name
Field Length
Data Name
Field Length
ASH-CONTENT 3
BEC 5
BEC-ID 2
BEC-NUMBER 3
CONFIDENTIALITY 1
DATE-OF-2-RECORD 5
EMISSION-FACTOR-SOURCE 1
FUEL-PROCESS-RATE 7
FUEL-UNITS 1
HEAT-CONTENT 5
MAX-DESIGN-RATE 7
NUMBER-OF-EF 2
RECORD-2-YEAR 2
RECORD-2-DAY
SCC
SCC-1
SCC-II
SCC-III
SCC-IV
SCC-SEQ-NBR
SEG-2-ID
SEG-2-POINT-ID
SOURCE-CODE
SOURCE-DESCRIPTION
SULFUR-CONTENT
2
8
1
2
3
2
2
1
2
1
25
3
(Page 4 of 5)
Figure 5.2.2-c - continued. Valid Retrieval Data Names
425
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 31
Release Date: 2/01/80
Update #: P-l
Valid Data Names for Retrieval (Comment Data)
The following list of names from the comment record can be referenced in
either EIS/PS retrieval language specifications or COBOL language
specifications:
Data Name Field Length
DATE-OF-3-RECORD 5
LINE-NUMBER 3
RECORD-3-DAY 3
RECORD-3-YEAR 2
PNR-SEQ-NBR 2
SEG-3-ID 1
SEG-3-POINT-ID 2
The following three names from the comment record can be referenced only in
COBOL language specifications:
COMMENT-L COMMENTS
COMMENT-R
(Page 5 of 5)
Figure 5.2.2-c - continued. Valid Retrieval Data Names
426
-------
EIS/P3 RETRIEVAL LANGUAGE PROCESSOR - DIAGNOSTIC "E3SAGE3
ua
C
-S
tn
•
ro
•
ro
o.
Oi
era
n
o
CO
n
20
PRUGRA.'I NAME: MRTL-'ini1 (Ef>0|40)
aEvisioN LEVEL: i-oo
LAST UPDATE a: f'-l
OATE I'lCORPORATEn: TEQRUAHY 1, 1980
INPUT (COUTROL CARDS)
(fSELECT USER
QUALIFY-RF.COR03.
IF ESTADLISHMENT IS E'JUAL TO 'HANSON* OR
f'AILING-AOORESS IS t'JIJAL TO *REO OAKE* OH
(CU'WENT-L IS MOT E'l'ML TO ' ' A'll)
LINE-I'JMHER 13 EQUAL TO '001')
f'QVE TRUE TO (IUALIFK A r ION-ACHICVED-Srt.
Oi JAL IF Y-RtCUROS-ErlD .
EXIT.
! SET-'JUALIFICATIOM-LF.VEL 3tCTIO.'4.
SCT-QIJAL-LEVEL.
MOVE RE'IUIHE-VJ'IAL TO UUALiriCATIQN-KE'1'IIRE.n.
SET-')OAL-LE«EL-ENO.
EXIT.
1/UfDtU Ut- CONTROL CAU03 HEAD:
Mi/VHER OF ERRORS OCTECTEO:
3
3s
HH"
cr
i—
3*
»— i
O
PRTLNGP
o
H"*
-p.
o
G
•o
CL
D;
Q
i— i
0
^>
-H
.
5»
0
o
CO
CO
1— 1
o
o
RETRIEVA
i—
Release D
QJ
ro
o
CO
o
i
m
t— i
CO
-o
CO
SECTION
en
ro
•
ro
Ol
o>
CO
-------
E IS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 32
Release Date: 2/01/80
Update #: P-l
Record Position
Field Length
Description
1 -
37 -
69 -
72 -
31
32
33
34
35
36
67
68
71
80
31
1
1
1
1
1
31
1
3
9
Subject Name
Unused
Negation Flag
Unused
Relational Operator
Unused
Object Name
Unused
Boolean Operator
Unused
Figure 5.2.2-e. Format for EIS/PS Retrieval Language Specifications
428
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 33
Release Date: 2/01/80
Update #: P-l
Subject Name: Specifies the name of the field in the EIS/PS master file
record to be compared with the literal or the master file field name
specified by the object name.
Valid Codes: Only those fields listed in Figure 5.2.2-c can be used.
The spelling, including hyphen, must match exactly.
Field Length: 31 characters
Negation Flag: Indicates whether or not the Boolean NOT condition is in
effect.
Valid Codes: N - Boolean NOT is in effect.
blank - Boolean NOT is not in effect.
Field Length: 1 character
Relational Operator: Indicates the relationship to be tested between the
subject name and the object name.
Valid Codes: = - equal
< - less than
> - greater than
Field Length: 1 character
Object Name: A literal to be compared against the master file field specified
by the subject name, or the name of a master file field (not in
apostrophes) to be compared against the master file field specified
by the subject name (e.g., subject name = object name).
Valid Codes: If a literal is used, it must be enclosed in apostrophes. The
length of the literal must be exactly the same as the field length
of the data name being compared (see Figure 5.2.2-c). If the
(Page 1 of 2)
Figure 5.2.2-f. Definition of EIS/PS Retrieval Language Specification Fields
429
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 34
Release Date: 2/01/80
Update #: P-l
name of a field from the master file is used, it must match exactly
one of the names listed in Figure 5.2.2-c. However, it must not be
enclosed in apostrophes.
Field Length: 31 characters
Boolean Operator: Identifies the type of connector used between the relation-
ship specified on this control card and that specified on the next
card.
Valid Codes: AND - Indicates that both relationships must be true in
order for the entire relationship to be true.
OR - Indicates that if either relationship is true, the
entire relationship is true.
blank - Indicates that there is no connector, and there-
fore, that there is no further specification.
Field Length: 3 characters
(Page 2 of 2)
Figure 5.2.2-f - continued. Definition of EIS/PS Retrieval Language
Specification Fields
430
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 35
Release Date: 2/01/80
Update #: P-l
Truth Value of
Relationship #1
Truth Value of
Relationship #2
Truth Value of
Relationship #1 AND Relationship #2
False
False
True
True
False
True
False
True
False
False
False
True
Truth Value of
Relationship #1
False
False
True
True
Truth Value of
Relationship #2
False
True
False
True
Truth Value of
Relationship #1 OR Relationship #2
False
True
True
True
Truth Value
of Relationship
Truth Value of
NOT Relationship
True
False
False
True
Figure 5.2.2-g. Truth Values for Boolean Expressions
431
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 36
Release Date: 2/01/80
Update #: P-l
((( A ) B ) C )
The least inclusive pair of parentheses is the pair around the letter A,
the second least inclusive set includes the letters A and B, and the most
inclusive set in this example includes letters A, B, and C. Thus, the order
of evaluation is from A to B to C.
((( A ) B ) (( C ) D ) E )
In this set both A and C have the least most inclusive pair; therefore,
the order of operation is left to right on the same level of parentheses.
That is, the order of operation in the above example is from A to C to B to D
to E.
Figure 5.2.2-h. Examples of Parenthetical Expressions
432
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 37
Release Date: 2/01/80
Update #: P-l
//•
//*
//*
Mwui.LUIII'fc WAMJ ; tl'fl'-'lu
H»b|S|IJ>< l.k VH: l-llli
u«.'il n»'i»A|t: M-I
iiAlt I ix I III'HIIHA IH>: ftlM'UAI. f I, \)H()
//*
/ / *
//* till;. I'MUCfWWk AI.LMoS hit Uohi< Ml
//* hJIi/t'b HblHlMAI. L'lAI; MUt.MILtS
//*
|i1| 0 J'I'IIC fKllJtC ! = '(.". t fAl Mi. Alj*7.LlJi|S.
//
//
//
//
//
L A.M!) ;>
KM. 1 1 MM | =t,l)n, ,
I i-I,
hKl, |nN = K.K( li|ij
I I '-ihs (X. I I "II- 1 )
»'hM|iUCt
»HH 1 A
)
// Dl) Dol-iA 't=.SYt«l .tl'ML J rt,
//
//*
//•
//*
//M'SSKtL IM) l.'Sli
// VUI.I"'fcs(PKI VAlt ,Ht I A|N),
DAlh SKI - KhlKltV/AI l>kllliKA". 3^tL^lll^l
//*
//« IMPIII OAl/i ,SM -
//*
L IM CA I [I/M CAKU3
UO I^'
DM ilnl 1 =KlL-IH.
'>! :<»' = ( jf •»»(•/.:••;->) ,
//*
//tl
//
// Oo.-m -l-
//*
//* tlllH'UI l/niiv o». I
//«
//(• I'Jili I «i. !i(ii| =Mnll
//*
: i ii in I st.. in I
-il ..... Mil if ^^
nun no I »o
OuOOO/OI)
IJUOUO '0
UIMJIlllSOO
U ij 0 0 0 h 0 (I
iKHiOi) /ou
UOOOOMOO
DUDUUVOO
0 (I " Ol I) 0 U
OllOUllOIJ
UUOOM(M)
UOOdlUUli
(IUOOI70U
00001 0
OH004700
(MiOOiirlio
ii u On '1 4 oo
•M/ui'Simo
i> DUOS! tin
(i U (Mi Sr1 II n
|i mid "3 5 (i i)
//•'•if SKM I >i I
(Page 1 of 3)
Figure 5.2.2-i. Cataloged Procedure EPRTM10
433
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 38
Release Date: 2/01/80
Update #: P-l
//*
//*
//SYSD 1 1-
|.|l .S Y .il Ill I =MHl I
I I 1)1) S Y SUil I = Mlli 1
(••1 11,1 .'iTS'llll =MH'I
//8YSiii)iii'.»' nu SYSH'ii sKi
//*
//l.tlhUU txLC M,N= IM C
// ><(: 0 I |IN= 1 (10*,
// !)•*=(,?, II)
//*
//* CUMMILh HhFhll-VAL PK
//*
//*
//* lut'lll MntA St. I - ttlHlKCt HUNAMY
//*
//*
//*
= (HKI Vft I t ,Kt I A I
('lS^=(SHK,l'At.S)
IJAIA SM - CUHIIL Hhli,l>tLbU)
//*
//* llllll'Ul I/AIA .SI 1 - I) I AljNilb I 1L
//*
//SYSPKl-M DC .srS'HH=MII)l
//*
//* liillCUT I'AIA SM - tliHUL KtlKJtvAt P»UUKAM UHJtCI C".'0k.
//*
//HY.SL lu MO Ulll l=^ U MM,
//
//*
//* i.M II. I I Y DAI A 8Mb
//*
// SI'ALI- =1 I •** t C'li , I 00 ) )
//*
//SYSUl/ i'" " •> I' = i *• I t^'i', ;iH K = :> * si' 11 ) r
/ / o (' A I. f = ( I l< l\ , ( M) , I 0 II ) )
//*
//.Slhl.ls Hi' l"-l l = (Mtf-M,M l- = (SYMil I,!-
:;!' i,1) )
//*
//I
il pli I|:M I I = ( i. I f t' , >l h = ( ;• Y .'ill I I i S
:,K'I\| K = ( I I'K , t SI', I I'l') )
H Xt I. Hi,- = 11- I.,
l • i. ,< = ' I I •> I , I I I , » •• t f ' »
I'll.,!)=(',,I I .1 ii'. H I ,
, SYIili I <, ) } ,
ou u US 7 oo
in) no SHU 0
1)0006(100
I)001 110
UUOUMKM)
iKMIObSuO
11111106^(111
IMMMIb/(M)
UOOIldrtUO
000070 1? 0
OOOO/ 100
00007001 I I nO
liOdt 1/>00
(Page 2 of 3)
Figure 5.2.2-i - continued. Cataloged Procedure EPRTM10
434
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION b.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 39
Release Date: 2/01/80
Update #: P-l
// Ht U l'l"J = l Oi)l\,
// Tlflsllf0)
//*
//• I. INIV-HJJ I Kk IKIH.VAL
//*
//*
//* 1 ll'lll I) A I a M I - AIIIH-I.M.L LlrtHAKY
//SKbLli! Ol> i).SuA^L = Nl'Ki.le I
//*
//bYSIIl 1 DO UM| l=
//*
tC I ..(-llAO(M'fiHi,AVt )
0 0 U 1 1 i 0 1)
IJOOI 1
OOC1 1 Si")
00(11 IbOU
ODD 1 1 ;uu
(I I) 111
IMKJ I I
ODD 1 ^
OOd l^llMI
li 001 £i>tii}
0001 c'JI'O
00012'IUO
ODD l
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.2
RETRIEVAL
PRTLNGP (EP0140)
Page 40
Release Date: 2/01/80
Update #: P-l
Parameter
Name
PROJECT
PROGRAM
TEMP
PGMSAVE
MEMBER
OUT
REGION1
TIME1
PAR AM
Default
Value
'CN.EPALMH.A087
CDHS.HQ.PNT1
PRTLNGP
SYSDA
PRTDFLT
PRTSKEL
A
60K
'1,0'
'LIB,SIZE=94K,
BUF=10K, NOSEO,
SUPMAP, NOSOURCE1
Description
Highest-level index of data set names
(e.g., CN.EPALMH.A087.CDHS.HQ.PNT.DATA.
EPMASTR would be the full data set name of
an EIS/PS master file)
Retrieval language processor program
Unit type for temporary work space
Output load module member name
Retrieval program skeleton
SYSOUT class for all print files
Region size allocated for execution of
PRTLNGP
Time allocated for execution of PRTLNGP
Parameters for COBOL compiler
Figure 5.2.2-j. Substitutable Parameters for EPRTM10
436 *
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.3
GENERATED RETRIEVAL
PROGRAM PRTGENR (EP0150)
Page 1
Release Date: 2/01/80
Update #: P-l
5.2.3. GENERATED RETRIEVAL PROGRAM - PRTGENR (EP0150)
5.2.3.1. Description
PRTGENR (EP0150), the generated retrieval program, is the second of two
EIS/PS programs used to retrieve data from the EIS/PS master file. The
retrieval language processor program, PRTLNGP (EP0140), generates PRTGENR
(EP0150) and must, therefore, be executed first. All retrieval requests and
options are specified on control cards and retrieval specification cards
input to PRTLNGP (EP0140) (see Section 5.2.2.2).
The retrieval process can be performed two ways. The first is to execute
the cataloged procedure EPRTM30 (see Section 5.5.2). This procedure executes
PRTLNGP (EP0140) and compiles, link edits, and executes PRTGENR (EP0150);
PRTGENR (EP0150) is not saved. The second method allows the generated
retrieval program to be saved for future runs (on other EIS/PS master files).
Two cataloged procedures are used in this method; they may be run together in
one job stream or at different times. The first of these procedures, EPRTM10,
executes PRTLNGP (EP0140) and compiles, link edits, and saves the generated
retrieval load module (see Section 5.2.2.5). The second procedure, EPRTM20,
executes the stored retrieval load module (see Section 5.2.3.5). This load
module corresponds to PRTGENR (EP0150), but it should be given a different
name so that more than one retrieval can be stored.
For further discussion of the EIS/PS retrieval specifications, including
sample retrievals, see Section 5.2.2.2.
5.2.3.2. File Formats
PRTGENR (EP0150) uses one input file, the EIS/PS master file. See
Figure 4.3.9-a for the master file format.
437
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.3
GENERATED RETRIEVAL
PROGRAM CRTGENR (EC0100)
Page 2
Release Date: 2/01/80
Update #: P-l
There are two files which are output from PRTGENR (EP0150): a retrieved
answer file and a diagnostic report. The answer file has the same format as
the EIS/PS master file. See Figure 5.2.3-a for an example of the diagnostic
report.
5.2.3.3. Options and Control Cards
There is no option card input to PRTGENR (EP0150); however, the optional
features of the retrieval (such as is a user retrieval) can be specified on
the $$SELECT control card input to the retrieval language processor program,
PRTLNGP (EP0140). See Section 5.2.2.2 for a complete description of the
$$SELECT card.
.- ^'
5.2.3.4. Error Messages
PRTGENR 001 ERROR - UNKNOWN RECORD TYPE FOUND - RECORD IGNORED
Meaning: A record type other than 0, 1, 2, or 3 was encountered. This
message is accompanied by message 002, which gives key
information for the record in error.
Action: Verify that a correct EIS/PS master (or answer) file was used
as input. If not, enter the correct file and resubrnit;
otherwise, the file has a serious problem and NADB should be
contacted.
PRTGENR 002 KEY = XXXXXXXXXXXXX, DATE = XXXXX, SEG-ID = XXX
Meaning: This message accompanies message PRTGENR 001 and indicates the
record in error.
Action: See PRTGENR 001.
438
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.3
GENERATED RETRIEVAL
PROGRAM PRTGENR (EP0150)
Page 3
Release Date: 2/01/80
Update #: P-l
5.2.3.5. Cataloged JCL
The cataloged procedure EPRTM20 executes a stored generated retrieval
load module and produces an answer file. This load module must have first
been created and stored using the cataloged procedure EPRTM10. For
information on EPRTM10, see Section 5.2.2.5.
5.2.3.5.1 JCL listing - Figure 5.2.3-b contains a listing of the cataloged
procedure EPRTM20, which executes the program PRTGENR (EP0150).
5.2.3.5.2 Cross-reference of DP names and files
Program Name: PRTGENR (EP0150)
DD Name
File Description
Input/Output
EPSMSTR
EPSANSR
EPSDIAG
EIS/PS master file
Retrieved answer file
Diagnostic report
Input
Output
Output
5.2.3.5.3 User-supplied JCL -To execute the cataloged procedure EPRTM20, the
user must supply job accounting information and data set names of the EIS/PS
master file, the answer file, and the stored retrieval load module. See
Figure 5.2.3-c for a description of the procedure's substi-tutable
parameters.
5.2.3.5.4 Sample run stream -The following run stream uses the procedure
EPRTM20 to execute the retrieval load module PRTGEN1. PRTGEN1 was created and
stored by the procedure EPRTM10 (see Section 5.2.2.5.4 for the run stream).
This retrieval will select all records for §tate 12 and county 0010. The
439
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.3
GENERATED RETRIEVAL
PROGRAM PRTGENR (EP0150)
Page 4
Release Date: 2/01/80
Update #: P-l
master file is 'CN.EPALMH.AU87.CDHS.Hq.PNT.DATA.EPMMSTR', and the answer file is
'CN.EPALMH.A087.CDHS.HQ.PNT.DATA.EPANSWER'. See Figure 5.2.3-a for sample
output.
// EXEC EPRTM20,
// PROGRAM=PRTGEN1,
// MSTRFIL=EPMMSTR,
// ANSRFIL=EPANSWER
5.2.3.6 Warnings and Special Instructions
If PRTLNGP (EP0140) is run and encounters an ABORT error, PRTGENR (EP0150)
will be executed (if it follows in the run stream) but will not produce a
valid answer file. When this occurs, correct the error from PRTLNGP (EP0140)
and resubmit the job.
The retrieval language processor program, PRTLNGP (EP0140), must always be
run prior to running the generated retrieval program, PRTGENR (EP0150). The
two programs can be run together using the procedure EPRTM30; or the generated
retrieval module can be stored and run at a later date, using procedures EPRTM10
and EPRTM20.
The answer file is only a subset of the master file; any changes made to the
answer file during the retrieval process are not reflected in the master file.
See Section 5.2.2 for a discussion of the types of records that can be selected
by a retrieval.
5.2.3.7. Cost Considerations
The following estimates are for the execution, on an IBM 370/168, of the
sample run stream shown in Section 5.2.3.5.4 and illustrate the cost of executing
EPRTM20.
440
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.3
GENERATED RETRIEVAL
PROGRAM PRTGENR (EP0150)
Page 5
Release Date: 2/01/80
Update #: P-l
Size of EIS/AS master file:
Size of answer file:
CPU time:
I/O time:
Total time:
175 records
9 records
.23 seconds
.59 seconds
.82 seconds
Estimated cost:
$.11
5.2.3.8. Related Programs and Procedures
The cataloged procedure EPRTM30 should be used to perform one-time
retrievals. It executes the retrieval language processor program, PRTLNGP
(EP0140), and compiles, link edits, and executes the generated retrieval
program, PRTGENR (EP0150). After the retrieval has been completed, the
generated retrieval program is deleted. For additional information on
EPRTM30, see Section 5.5.2.
441
-------
S Gt'ltKATCII RtTKIL'VAL I'HCGHA" - UIAG'dlSTIC
-o
c.
o
o
m
co
CO
m
I—H
co
-u
CO
r\j
c
a>
tn
•
ro
•
CO
CU
'iA'1t; PHTGE'H? (EfOlSO)
Revision LtVLL: i-ou
L&ST UPDATE K: H-l
OA-TC I'lCUHPUUATLD: FbUl'UARV 1, 1900
Or MA3TEH riLt HECOROS HFAO: 17b
DF A'ISrtER FILE HECO'WS URITTE'J: 9
Uf CNHORS DErtCTEl): 0
-O CD CO
•72 m m
o z o
CD m —\
pa TO t-1
> 3» o
: —i z
m
no o en
3 •
1 ?o ro
CD m •
m —i co
m
(O
o
«•*•
_i.
o
m
o
en
o
a>
T3
o
rt-
a.
Cu
a?
=«=
n>
cu
(B
Cu
ro
o
T3
Cu
a>
CD
oo
o
-------
EIS/PS SECTION 5.2.
DATA ACCESSING AND GENERATED RE
MANIPULATION PROGRAM PRTG
//*
XX* PKllLt lltl"Vt NA-«f • tPt'l '••,")
//* ktvisio i I i_vt L: l-oo
XX* LASI iif'iiiiU. «: i'-l
//* DA If- 1 M.llhl-'lIHA 1 kD: HUWiJAHr |, IVMO
//•
//* Inlb KKiiCM.'lIKe AU.l'"i< !Ht DSt « HI
//* LXtU'H SUirttl1 1 l.S/»'S "LII'IfcVAlS
//*
XXf-f'l 1 :>tj= MJKiifCA II. i;,l)HLI; 1 L ' .
// .sf'Lllill 1 = !KK,
// !$!•' UJOM^'o!
// (IH|=A
//*
//*
//Hi- It'll VI- 1: Al ( I'l,. . = M)KII1-,I
0 0 0017 0 0
00001H00
0000 1 VOO
0000?! 0 0
oooo^t'og
0 l) (Midi 0 0
oooo/uoo
OOOO/bOO
ooot»o
U000?700
OOOO«?HOO
//• HHwUVt AMI^M K ULl f-Kllm MS/fS MASIKK fILt OOOO^VOO
//*
//SIHPl.l" l>|) DS'iAMl- =n,H!b'-iAi'iK=.SYSI .LilKL In,
// l.i 1 SP=(SHI<,t''i>-iS 1
//*
//* lliHUl PrtlA SM - MJj/HS MASU.K Mil
//*
//» (•'S'-.b! h Up iit»nAr«l=KpHi.iJl:C 1 . .DA 1 1> . iC»3 1 Wl
// i/HLiMtr (I'Kl VAll. ,Kt 1 A |irf ill' ii". 1 l=Kliur 1 r
/I Vl'l U''fc =(HK 1 «/• Ib. »I<1 1 A 1 N,Hl l< =
// n| SPslNUlSP) ,
/x .S^'ACt = ( ^SPCll^l 11,1 «.Kh INAKY , «.
// Pii.-AilfcsiCPki.lJf t 1 . .MA 1 A . A, A :'•• b >•
x/ •
/X* HI' f fill liAIA M 1 - U| Ali.'lllSI K -ithKAIibS
//F.MSI.IAI. i»n :.V.s.iUl=MHM
XX «
00003000
00003100
00003<'00
00003'! 00
OOU03SOO
OdOOibOO
00003700
00003tUM>
• (L, iiooo3
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.3
GENERATED RETRIEVAL
PROGRAM PRTGENR (EP0150)
Page 8
Release Date: 2/01/80.
Update #: P-l
l till Sf Still|=Klllir
III! .-.Y-SIHI I =KIJU I
/V*
x/ >Y.si>i«tjiM i>D si sun i =MIII I
xx*
0 0 U M b 7 Oil
(III 00 'j (I u 'I
II III) (I "3 9 01)
01) I) Mil II 01)
iJIM'Ottl 00
//*
X/ci
// *
0 It 0 1) h (1 00
(Page 2 of 2)
Figure 5.2.3-b - continued. Cataloged Procedure EPRTM20
444.
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.2.3
GENERATED RETRIEVAL
PROGRAM PRTGENR (EP0150)
Page 9
Release Date: 2/01/80
Update #: P-l
Parameter
Name
PROJECT
PROGRAM
TIME1
MSTRFIL
ANSRFIL
UNIT
SERIAL
DISP
SPCUNIT
PRIMARY
SECNDRY
OUT
REGIONI
Default
Value
'CN.EPALMH.A087,
CDHS.HQ.PNT1
PRTDFLT
'3,0'
EPMASTER
EPANSWER
3330
CDHSPK
'NEW.CATLG,DELETE'
TRK
20
10
A
100K
Description
Highest-level index of data set name
(e.g., CM.EPALMH.A087.CDHS.HQ.PNT.
DATA.ECMASTER would be the full data
set name of an EIS/PS master file)
Stored retrieval load module (created
by EPRTM10)
Time allocated for execution of
retrieval
Lowest-level index of master file
Lowest-level index of answer file
Unit type upon which the answer file
is to reside
Volume serial number of volume to
which answer file is to be written
Disposition of answer file
Units in which space for answer
file is to be allocated
Primary space allocation for answer
file
Secondary space allocation for answer
file
SYSOUT class for all print files
Region size allocated for execution
of retrieval
Figure 5.2.3-c. Substitutable Parameters for EPRTM20,
445
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3
SORT GENERATION
INTRODUCTION
Page 1
Release Date: 2/01/80
Update #: P-l
5.3. SORT GENERATION
5.3.1. INTRODUCTION
EIS/PS provides the user with the capability to generate a master file
sort program. This sort program can then be used to generate a sorted file.
The sort generation function is performed by executing two programs: the
sort language processor program, PSRLNGP (EP0160), and the generated sort
program, PSRGENR (EP0170). The sort language processor program must be
executed first. All sort specifications are processed by PSRLNGP (EP0160);
based upon the sort specifications, PSRLNGP (EP0160) produces the second sort
program, PSRGENR (EP0170), which is referred to as the generated sort program.
This generated sort program must then be compiled and link edited before it
can be executed. When it is executed, it processes master file records and
produces a file of sorted records. The records in the output file will depend
upon the sort specifications entered into PSRLNGP (EP0160). This output file
has the same format as the EIS/PS master file, but it may contain duplicate
records. See Figure 5.3.1-a for a flowchart of the EIS/PS sort generation
function.
Detailed information on PSRLNGP (EP0160) and on the sort specifications
can be found in Section 5.3.2. Detailed information on PSRGENR (EP0170) can
be found in Section 5.3.3.
Three cataloged procedures are available for executing the sort programs.
They are EPSRM10, EPSRM20, and EPSRM30. EPSRM30 executes PSRLNGP (EP0160) and
compiles, link edits, and executes the generated sort program PSRGENR
446
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3
SORT GENERATION
INTRODUCTION
Page 2
Release Date: 2/01/80
Update #: P-l
(EP0170). PSRGENR (EP0170) is not saved. See Section 5.5.3 for additional
information on EPSRM30.
If the user frequently performs the same sort, he should save the
load module of the generated sort program created by PSRLNGP (EP0160) for that
sort. He can then perform the sort by executing this load module directly,
using the cataloged procedure EPSRM20 (see Section 5.3.3.5). The load module
can be created and saved by executing the cataloged procedure EPSRM10 (see
Section 5.3.2.5).
447
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.1
SORT GENERATION
INTRODUCTION
Page 3
Release Date: 2/01/80
Update #: P-l
SORT
SPECIFICATIONS
ENERATED SORT
PROGRAM SOURCE
MODULE
COBOL COMPILE AND
LINK EDIT
PSRLNGP (EP0160)
SORT LANGUAGE
PROCESSOR PROGRAM
EIS/PS MASTER FILE
PSRGENR (EP0170)
GENERATED SORT PROGRAM
SORT SKELETON /
^PROGRAM (PSRSKEL)I
DIAGNOSTIC
REPORT
ANSWER FILE
DIAGNOSTIC
REPORT
Figure 5.3.1-a. Sort Generation Flowchart
448
-------
E IS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.2
MASTER FILE SORT
PSRLNGP (EP0160)
Page 1
Release Date: 2/01/80
Update #: P-l
5.3.2 SORT LANGUAGE PROCESSOR PROGRAM - PSRLNGP (EP0160)
5.3.2.1 Description
PSRLNGP (EP0160) is the first of two EIS/PS programs used to sort data
from the EIS/PS master file. The generated sort program, PSRGENR (EP0170),
must be compiled, link edited, and executed after PSRLNGP (EP0160) is run to
complete the sort process.
The sort language processor program, PSRLNGP (EP0160), uses the sort
skeleton program, PSRSKEL, and user-supplied sort specification cards to build
a generated sort program, PSRGENR (EP0170). All sort field requirements are
contained in the specification cards. No more than 11 sort specification
cards can be used, and the sum of the lengths of all the fields in these
specifications must not exceed 234 characters. Only data names of fields from
the plant, point, and fixed portion of the SCC records can be selected in the
sort specifications. Figure 5.3.2-a lists the valid data names and the
lengths of the fields.
The contents of the sorted answer file generated by the sort program
depends on which type record the sort fields are taken from. All records in
the sorted answer file will be in master file format, but the number of
records will vary as follows:
Plant record sort fields: Each plant record will be accompanied by its
associated point and SCC records. No new records are created.
Point record (fixed portion) sort fields: Each point record will be preceded
by a copy of its associated plant record and followed by its associated
SCC records. Thus, a new plant record is created for every point record.
449
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.2
MASTER FILE SORT
PSRLNGP (EP0160)
Page 2
Release Date: 2/01/80
Update #: P-l
Point record (repeating section) sort fields: A point record will be created
for each pollutant in the repeating section of the original point record.
Each of these new records will contain all of the information (i.e., all
repeating sections) that was present in the original record. In
addition, there will be one plant record and all the associated SCC
records for each of the new point records. Thus, plant, point, and SCC
records are created.
SCC record (fixed portion) sort fields: For each SCC record, a copy of the
associated plant and point records accompany it. That is, both plant and
point records are created.
Sort fields from both the repeating section of the point and the fixed portion
of the SCC record: Records will be created to allow sets of one plant
record, one point record, and one SCC record. There will be a set for
each repeating section or pollutant in the point record. Thus, all three
types of records can be created.
Two things should be noted about the sorted answer file. First, the
sorted answer file contains no comment records. Second, as records are
created, the size of the sorted answer file may be much greater than the
original file. As an example, consider one plant with two points, each having
5 pollutants, and with 4 SCC records for each point. In the original file,
there would be 11 records. The sorted answer file would then contain 11-120
records as outlined below:
11 records if only plant record fields are used for sorting.
450
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.2
MASTER FILE SORT
PSRLNGP (EP0160)
Page 3
Release Date: 2/01/80
Update #: P-l
12 records if the sort fields come from the fixed portion of the point
record. An additional plant record is created so that each point record
has its own plant record.
60 records if the sort fields come from the repeating section of the
point record. Each of the 5 pollutants for a point will now have one
point, one plant1 and 4 SCC records (a total of 6 records), and there are
10 pollutants in all.
24 records if the sort fields come from the fixed portion of the SCC
record. Each of the 8 SCC records will have its own associated plant and
point records, giving 3 records per SCC.
120 records if the sort fields come from both the repeating section of
the record and the fixed section of the SCC record; that is, 10
pollutants with 3 records each for each of the 4 SCC records per point.
If the sort fields come from more than one type of record, the highest
possible number of records will be generated.
5.3.2.2 File Formats
PSRLNGP (EP0160) uses two input files: the sort skeleton program,
PSRSKEL, which is stored in a cataloged source library, and the sort
specification card file. The sort specification cards consist of sort control
cards and sort request cards. The control cards indicate the beginning and
end of the sort specification file. Figure 5.3.2-b illustrates the format of
the control cards.
451
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.2
MASTER FILE SORT
PSRLNGP (EP0160)
Pa yo 4
Release Date: 2/01/80
Update I: P-l
The sort request cards precisely identify the sort fields from the master
file and their sort order. The data names that can be u'sed for these requests
are listed in Figure 5.3.2-a. Only fields from the plant, point, and fixed
section of the SCC records can be used.
Two output files are produced: a diagnostic report (see Figure 5.3.2-c)
and a temporary file containing the sort source program, PSRGENR.
5.3.2.3 Options and Control Cards
The program PSRLNGP (EP0160) has no options. The sort field requests are
handled by sort specification cards which are discussed in Section 5.3.2.2.
5.3.2.4 Error Messages
PSRLNGP 001 CONDITIONAL - PREMATURE END OF FILE ON CONTROL CARD FILE, $$END
CARD ASSUMED
Meaning: The last card for the sort specification must be a $$END card.
If this card is missing, the error message will be printed, but
program execution will continue.
Action: No action is required unless other errors have been detected.
PSRLNGP 002 CONDITIONAL - FIRST CONTROL CARD NOT $$SORT, ASSUMED PRESENT
Meaning: The first card for the sort specification must be a $$SORT
card. If this card is missing, the error message will be
printed, but program execution will continue.
Action: No action is required unless other errors have been detected.
PSRLNGP 003 ABORT - NO CONTROL CARDS IN INPUT STREAM
Meaning: There must be sort specifications in the input run stream. The
run was aborted.
452
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.2
MASTER FILE SORT
PSRLNGP (EP0160)
Page 5
Release Date: 2/01/80
Update #: P-l
Action: Include the control cards as shown in 5.3.2.5.4 and resubmit
the job.
PSRLNGP 004 ABORT - identifier - DATA NAME INVALID
Meaning: The data name specified by 'identifier1 is incorrect. Data
names must be spelled exactly, including hyphens, as shown in
Figure 5.3.2-a. The run was aborted.
Action: Correct the data name (indicated by the identifier in the error
message) and resubmit the job.
PSRLNGP 005 ABORT - ONLY $$END CARD FOUND IN INPUT STREAM
Meaning: A $$END card was the first card in the control card file.
Action: Correct the control card file and resubmit the job.
PSRLNGP 006 ABORT - NO VALID SORT REQUESTS
Meaning: No sort specifications were included in the control card file.
Action: Include sort specifications with the control cards and resubmit
the job.
PSRLNGP 007 ABORT - UNEXPECTED END OF FILE ON INPUT PROGRAM
Meaning: The sort skeleton program is not complete.
Action: Verify that the correct name was specified in the JCL for the
skeleton program. If an incorrect name was specified, correct
it and resubmit the job. If the correct name was specified and
the skeleton program is incomplete, contact NADB.
PSRLNGP 008 ABORT - MORE THAN 233 CHARACTERS IN DATA-NAME (TOTAL CHARACTER
COUNT)
Meaning: The total field length of all the requested sort fields must
not be greater than 233. The field lengths are given with the
valid data names in Figure 5.3.2-a.
453
-------
EIS/PS
DATA ACCESSING AMD
MANIPULATION
SECTION 5.3.2
MASTER FILE SORT
PSRLNGP (EP0160)
Page 6
Release Date: 2/01/80
Update #: P-l
Action: Correct the sort specifications so that not more than 233
characters are requested and resubmit the job.
PSRLNGP 009 ABORT - MORE THAN 11 SORT REQUEST CARDS
Meaning: A maximum of 11 data names, each on an individual card, can be
specified.
Action: Correct the sort specifications so that not more than 11
request cards are included and resubmit the job.
PSRLNGP 010 ABORT - REQUESTED SORT SEQUENCE NOT VALID
Meaning: Valid sort sequence codes are A (ascending) and D (descending).
Action: Correct the sort specifications and resubmit the job.
5.3.2.5 Cataloged JCL
The cataloged procedure EPSRM10 which is discussed below, executes the
sort language processor program, PSRLNGP (EP0160); compiles and link edits the
yenerated sort program, PSRGENR (EP0170); and stores the resulting load
hiodule. The cataloged procedure EPSRM20 is used to execute the stored load
module and produce a sorted answer file. See Section 5.3.3.5 for information
on EPSRM20. *
The cataloged procedure EPSRM30 executes the sort language processor
program and compiles, link edits, and executes the generated sort program.
The corresponding load module is not saved. See Section 5.5.2 for information
on EPSRM30.
5.3.2.5.1 JCL listing - Figure 5.3.2-d contains a listing of the cataloged
procedure EPSRM10.
454
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.2
MASTER FILE SORT
PSRLNGP (EP0160)
Page 7
Release Date: 2/01/80
Update #: P-l
5.3.2.5.2 Cross-reference of DD names and files
Program Name: PSRLNGP (EP0140)
DD Name
File Description
Input/Output
EPSSKEL
EPSINPT
EPSPROG
EPSDIAG
Sort skeleton program
Sort specification cards
Generated sort source program
Diagnostic report
Input
Input
Output
Output
5.3.2.5.3 User-supplied JCL -To execute the cataloged procedure EPSRM10, the
user must supply job accounting information and the name for the generated
sort program to be stored. See Figure 5.2.2-e for a description of the
procedure's substitutable parameters.
5.3.2.5.4 Sample run stream -The following run stream uses the cataloged
procedure EPSRM10 to create the sort load module PSRGEN1. This sort module
can then be executed using the cataloged procedure EPSRM20; see Section
5.3.3.5.4 for that run stream. The EIS/PS sort specifications entered
indicate that the file will be sorted on pollutant ID.
// EXEC EPSRM10,
// PGMSAVE=PSRGEN1
//GENER.INPUT DD *
$$SORT
POLLUTANT-ID A
$$END
/*
455
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.2
MASTER FILE SORT
PSRLNGP (EP0160)
Page 8
Release Date: 2/01/80
Update #: P-l
5.3.2.6 Warnings and Special Instructions
Both cataloged procedures EPSRM30 and EPSRM10 execute the COBOL compiler
after PSRLNGP (EP0160) to compile the generated sort source program. During
the compilation of the generated sort source program, errors may be
encountered that were not detected by PSRLNGP (EP0160). Thus, when executing
EPSRM30 or EPSRM10, error messages may be generated by the COBOL compiler.
When this occurs, the user should examine the sort specification cards for
errors. If no errors can be found, the user should contact NADB for
assistance.
A $$SORT card must be the first card in the specifications.
A $$END card must be the last card in the specifications. If any other
cards follow the $$END card, they will be ignored.
Names must be spelled exactly as shown in Figure 5.3.2-a.
When PSRLNGP (EP0160) is run and encounters an abort error, the generated
sort source program, PSRGENR (EP0170), will contain statements that will cause
compilation errors. Thus, the generated sort load module will not be produced
nor executed. When an abort occurs, correct the error encountered by PSRLNGP
(EP0160) and resubmit the job.
No comment records are output in the sorted answer file.
The resulting sorted answer file may be very large. The size depends
upon which record the sort fields are from. Thus, care must be taken in
choosing the sort fields. Also, enough space must be allocated for the sorted
answer file.
456
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.2
MASTER FILE SORT
PSRLNGP (EP0160)
Page 9
Release Date: 2/01/80
Update #: P-l
The language processor program, PSRLNGP (EP0160) must always be run prior
to running the generated sort program, PSRGENR (EP0170). The two programs can
be run together using the cataloged procedure EPSRM30, or the generated sort
module can be stored using the cataloged procedure EPSRM10 and run later using
the cataloged procedure EPSRM20.
When specifying a generated load module name during a run using the
cataloged procedure EPSRM10, the load module name must be specified as the
value of the substitutable parameter PGMSAVE in the user-supplied JCL.
5.3.2.7 Cost Considerations
The following example provides an estimate of the cost of executing
PSRLNGP (EP0160) and compiling and link editing PSRGENR (EP0170) using the
cataloged procedure EPSRM10. EPSRM10 was executed on an IBM 370/168 for this
example.
Size of skeleton program:
Number of sort specifications:
Size of generated program:
CPU time:
I/O time:
Total time:
Estimated cost:
1209 records
5 records
1217 records
.57 seconds
1.89 seconds
2.46 seconds
$.34
5.3.2.8 Related Programs and Procedures
PSRLNGP (EP0160) must always be executed in conjunction with PSRGENR
(EP0170). Th'e procedure EPSRM30 executes both of these programs, while
EPSRM10 executes PSRLNGP (EP0160) and EPSRM20 executes PSRGENR (EP0170).
457
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.2
MASTER FILE SORT
PSRLNGP (EP0160)
Page 10
Release Date: 2/01/80
Update #: P-l
Valid Data Names for Sort (Plant Data)
Field
Data Name Length
AQCR 3
CITY 4
CONTACT 15
COUNTY 4
DATE-OF-0-RECORD 5
ESTABLISHMENT 48
LOCAL-CONTROL 2
MAILING-ADDRESS 48
NUMBER-OF-EMPLOYEES 4
OWNER 1
PLANT-ID 8
PRINCIPAL - PRODUCT 10
PROPERTY-AREA 6
Field
Data Name Length
RECORD-jtf-DAY 3
RECORDS-YEAR 2
SEG-Jif-ID 1
STATE 2
TELEPHONE 10
USER-CONTROL-REGION 3
USER-PLANT-ID 12
UTM-ZONE 2
(Page 1 of 4)
Figure 5.3.2-a. Valid Sort Data Names
458
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.2
MASTER FILE SORT
PSRLNGP (EP0160)
Page 11
Release Date: 2/01/80
Update #: P-l
Valid Data Names for Sort (Point Data)
Data Name
Field
Length Data Name
ANNUAL-THRUPUT
BOILER-DESIGN-CAPACITY
COMPLIANCE-SCHEDULE
COMPLIANCE-STATUS
COMPLIANCE-STATUS-UPDATE
CONTROL-REGULATIONS
DATE-OF-1-RECORD
DAY-WEEK
DEC-FEB
DIAMETER
ECAP
FLOW-RATE
HEIGHT
HORIZONTAL
HOURS-DAY
IPP
JUN-AUG
LATITUDE
8
5
4
1
I 6
12
5
1
2
3
1
7
4
4
2
2
2
6
LATITUDE.-DEGREE
LATITUDE-MINUTE
LATITUDE-SECOND
LONGITUDE
LONGITUDE-DEGREE
LONGITUDE-MINUTE
LONGITUDE-SECOND
MAR -MAY
NBR-OF-POLLUTANTS
NEDS-POINT-ID
NORMAL-OPERATING
PLUME
POINTS-PER-STACK
RECORD-1-DAY
RECORD-1-YEAR
REG-1
REG-2
REG-3
2
2
2
7
3
2
2
2
2
4
5
4
4
3
2
4
4
4
Field Field
Length Data Name Length
SCHEDULE-MONTH 2
SCHEDULE-YEAR 2
SEG-l-ID 1
SEP-NOV 2
SIC 4
SPACE-HEAT 3
STATUS-DAY 2
STATUS-MONTH 2
STATUS-YEAR 2
TEMPERATURE 4
USER-POINT-ID 3
UTM-COORDINATES 9
VELOCITY 5
VERTICAL 5
WEEK-YEAR 2
(Page 2 of 4)
Figure 5.3.2-a - continued. Valid Sort Data Names
459
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.2
MASTER FILE SORT
PSRLNGP (EP0160)
Page 12
Release Date: 2/01/80
Update #: P-l
Valid Data Names for Sort (Repeating Point Data)
Field
Data Name Length
ALLOWABLE 7
CNTL-EQUIP-COST 7
CONTROL-EQUIPMENT 6
EMISSION-UNITS 1
EST-CONTROL-EFF 3
ESTIMATES 7
Data Name
ESTIMATION-METHOD
MEASURED
POLLUTANT-ID
PRIMARY-CNTL
SECONDARY-CNTL
TEST-METHOD
Field
Length
1
7
5
3
3
1
(Page 3 of 4)
Figure 5.3.2-a - continued. Valid Sort Data Names
460
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.2
SORT
PSRLNGP (EP0160)
Page 13
Release Date: 2/01/80
Update #: P-l
Valid Data Names for Sort (SCC Data)
Field
Data Name Length
ASH-CONTENT 3
BEC 5
BEC-ID 2
BEC-NUMBER 3
CONFIDENTIALITY 1
DATE-OF-2-RECORD 5
EMISSION-FACTOR-SOURCE 1
FUEL-PROCESS-RATE 7
FUEL-UNITS 1
HEAT-CONTENT 5
MAX-DESIGN-RATE 7
NUMBER-OF-EF 2
RECORD-2-YEAR 2
Data Name
RECORD-2-DAY
SCC
SCC-1
SCC-II
SCC-III
SCC-IV
SCC-SEQ-NBR
SEG-2-ID
SEG-2-POINT-ID
SOURCE-CODE
SOURCE-DESCRIPTION
SULFUR-CONTENT
Field
Length
2
8
1
2
3
2
2
1
2
1
25
3
(Page 4 of 4)
Figure 5.3.2-a - continued. Valid Sort Data Names
461
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.2
MASTER FILE SORT
PSRLNGP (EP0160)
Page 14
Release Date: 2/01/80
Update #: P-l
Column
1
Column
41
/»
Field One
Field Two
Note:
1. The first card in the sort specifications must contain $$SORT in field
one.
2. The last card in the sort specifications must contain $$END in field
one.
3. The sort request cards must contain a valid data name in field one and a
sort sequence code in field two (A for ascending and D for descending).
Figure 5.3.2-b. Sort Specification Cards
462
-------
CO
70
n
•a
o
CIS/AS SIJIM LANGUAKt I'HIICESSOH PROGRAM - DIAGNOSTIC REPORT
PAKt
PROGRAM NAME: PSRLUGP (EPOlOO)
REVISION LEVEL: 1-00
LAST iJI'OATfc «: P-l
OATC INCORPORATED: FEBRUARY 1, 19HO
INPUT (CONTROL CARflS):
SSSCRT
DATE-OF-0-RECORO
STATE
-5
CD
tn
CO
ro
i
o
•
o
—*•
Ot
to
POLLUTA1IT
SSEKO
NUfHER OF
NUMBER OF
tlUVHF.R OF
'WRER OF
NUHBER OF
NUPRER OF
INPUT CO'ITROL CARDS:
ERROR MESSAGES:
CONDITIONAL MESSAGES:
MANNING MESSAGES:
ABORT MESSAGES:
DISASTER MESSAGES:
2S ^3 n
== ^ s?
t-t 3> ^.
™fj m^y
C J» CO
i— o
:> o
—I m
t—< CO
O CO
Z H"
CT5
co
3 CO
3» m
co o
CD 50 O
m co
x-x 1-1 en
m
~a
o
H- co ro
cr> o
o so
c 50 -o
•a n> a
a. — • to
o> n> n>
«-f o>
ro >
en
n>
(D
• •
PO
o
co
o
-------
CIS/PS SECTION 5.3.
DATA ACCESSING AND MASTER FILE
MANIPULATION PSRLNGP (EPO
//* M'ALfii/»On / llHii.l-Ht- In, LLilYll '•'. CMV) 'j
//*
//* PI-'I iLLi'iiin uA*ih : LI'.SKHIO
//* in is i H;I IF. vu.: l -no
//* LA6I IllMiAll: «: I'-l
//* 1)6 If I ''I 1 Ihf'l.it'A 1 1- U : 1- KMKUAi; 1 lt I9HO
// »
2 Page 16
SORT Release Date: 2/01/80
160) Update #: P-l
,
no on o^uo
0000 0.4 ii(l
0 •) 0 0 0 '1 0 0
IJ'J 00 OS 00
no i; no 1,00
ooooo/ni'
//* iMii> rmic.f mint AILII-.S IML HSI* rn CI/L/XIL 00000*110
//* SIllKfc 11 UL'JI ^'A H.I' III./I'S IHlKl 'll|0'lt_fc
//*
000009 0 U
0 0 0 0 1 0 0 0
//LHSK'-MU PWUt HKlUl-Ct = 'i:U.HJAlrlli.AO»»/.t'.()HS.IIIJ.f'Hl ' . DOOOliOO
// V'MIUKAI'sl'yKl \l>l',
0 0 0 0 1 1> 0 0
// I'AKAlir 'Sl^h =1 ^(||v ,IUIF = lUK,NI)8tW»SllHMAKrMll.SllUKCf ' • UOOOliOf)
// KH 1, lllN 1 = 1 OOK ,
// 1 l'"il 1 = ' 1 ,0' .
// 1 (• MP = SY!il)A>
// HI- ihKKsl'SiVSM- 1. ,
// l'(»i> :>ftVt =«ywli|- L T ,
// HLi|=«
//«
//C'lMMUh L^Kt 1 IjrirKHKIItiiVAM,
// m t; 1 IINSKfl.li I II ••> 1 ,
// 1 |.1L=(H 1 IMF I )
//*
//« PiOJiaiCt F1!>/PS l-A:-il|K FILF SI)i MMiAMt =f.MKi)Jtt t . .1 UAH,
// VI II IML = ( ^M I V A 1 t , in 1 A M ) ,
// 1)1 SKr ( ,'illt'p CAS'.S )
// OH D.ShlANLsSY«Sl .Cl'Kl. IH,
// l> 1 .-if sCailHfKASS)
//*
//* lilPlil OAlA bt 1 - SUKIfK HlI.NrtnL=l«l'iH,
//*
//*
//Ll'iJI'lVill. II.) llhj 1 =K. 1 1 'II-',
// HI S> =( Ht •.-, r- ASS) ,
. ''i-'Ari — i I^K (sx) ''isi)
// I'ii.JA. t =HM-'I< IM,|- rt -I
//*
//* i.urmi i-Aii- .'ti - !•! ai.misi M -I iv'-.n-t- :i
//*
//*
//• liilll'.H |,.»|A -I- 1 » - .".iT.ilf f. I'l'l^Alln:
OOODl '100
0 0 00 1 Slill
I) 1) 0 0 I 6 U 0
0 0 0 0 1 / 0 0
(Mill 1)1 MOO
00001 VOO
0000^000
OOOOrM Oil
•HIOu^rMIO
II (100^ illl)
iiuoi^aui)
0 0
0 0 G 0 7 0 0
0000?flOO
0000*900
0001)3000
00003100
00003^00
Ifj DOOOiiOO
00003400
iHhH), DOOOi^UO
00003*300
on 00 WOO
0000 SNOO
S I.' 0
(Page 1 of 3)
Figure 5.3.2-d. Cataloged Procedure EPSRM10
•j-
464
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.2
MASTER FILE SORT
PSRLNGP (EP0160)
Page 17
Release Date: 2/01/80
Update #: P-l
//*
I = MIUI
//.'ivsiiui ui) srsmi i =MIII i
;,r,suu I =MHI i
SYSHI;I=KUIH
//*
//*
//.SY3IIIH.iMt> 1)1) S
//*
//UMtiL Mt(.
// MAI-f-l='k> ttf. A"-'1
// kl i,Jlii«i=J DDK,
// I l"f =(«?,<»)
//*
//*
//* |iv,Pi>| lift I A SM - SllllKU
//*
//SYSLlb IJI) USNAr.hsX.PKilJKl I . .M
// Will. |IMl = lPM| VAIt ,«t I /if II) ,
//*
//*
//SYS I 14 1)1) DS
// UlSI'=li.'l.l),l.>hLt Ih )
//*
//* IMjU'lll IMI I A 31 1 - Ol AUMMSf 1C i"b.Si>Abtt>
//•
//aiSPKINI l.)l) SlSlllllsKIIIJT
//*
//* I)OT('U) I'/llA rfH I - tllhi'L SU»lt'< HKiHjKA-l illl.JtCI
//*
L)t>
// DoMA M = KKilrtJril.liJ
//*
//* III [I 1 If l>nl A Jit 16
//*
//SYSiili i)i> O'jj i =K. 11 fp,
// .'iCAt't =( ll<* i I SO, 1 Oil) )
//*
//.Sf.Sljl^ I>D UN 1 I = 0 I I. '••>•',.SI- P = SYS'.I I I ) t
// SHALt =( TWK , Caur \ i)il ) )
//*
//Srsuls (in Hi.l l = (n. 111-'\', SH'=(:>Yiilll I , SYSlMi') j ,
// Si- AC t =( I ^Kr ( SO, 1 Oil) )
//*
// .SI'Al.r =1 1 I^K, (-jll, 1 00) )
»'i,i-r |t ..I ,
i-.in i= 'l 1.11,1.1 I ,
//I M l)
IHHHjS / "II
no IMI SHOD
ii no os vii u
Oi; 0(1 Ml I) i)
« 0 o y *» 1 0 o
0 O'l On /no
000 Ub Ml (I
o o y o 7 o mi
(1 0 0 (I / 1 II U
no on 7^ni)
0 0 00/3 0 0
U 0 0 0 7 « 0 0
!>000/b"0
0000 /*>'JO
(l 01) Of 7 00
0000 /MOO
UOOO/'JOU
II 00 Of) 000
00 000 100
OOOOHf'OO
00001300
UUOOR4UO
DIMHIK'iOO
o n o o o / 0 o
l) 01.10 WOO
oouovooo
0 0 0 0 V ) I) I)
0 O 0 0 V .*> 0 0
0 0 0 0 V 00
'M»0l O»>IM)
0 0 0 t 0 / 0 0
0 on
nun
0II 0
000
I'UU
o >•• o o
n'(o 0
I ooo
linn
I <• o o
(Page 2 of 3)
Figure 5.3.2-d - continued. Cataloged Procedure EPSRM10
465
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.2
MASTER FILE SORT
PSRLNGP (EP0160)
Page 18
Release Date: 2/01/80
Update #: P-l
// ( .ilNlJ=('jfL I f Hi il" II. ) »
// Kl- i. 11 IN si Ol)K ,
// I l"t =1 If <")
//*
//* Lluc -U>J I S.IK II I-
//*
//*
//» liilJIU UAJ»> M: I - «U|li-l.rtLL I I irfAXY
//.SYSl If UU IISKM •I.S'U'K.IJI-.C I . .l-'IAl),
// VHLU 'K = (I'K I V A I I , '-'t I n I J) ,
//*
//• 1 '»
// bf Al.t =( 1 WH , ( | il, ',) )
//*
(I IJ 0 1 1 i 0 «'
(I Ij 1)1 I 'I U (I
1)1)01
(HI II I
uuo) i
U I) 0 1 1 H I) (.'
II III) I 1VO<»
DOOlt'KOO
OOOl^VUU
oo oi Jio»
001)1 Sf't'O
unol iind
0»015« 1(0
ouoli^oo
IHIQ I 3M) (I
00 01 A
UOOIS
uooiuooo
00014300
00014400
OOOl <4bOO
000 14600
00014700
I i
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.2
MASTER FILE SORT
PSRLNGP (EP0160)
Page 19
Release Date: 2/01/80
Update #: P-l
Parameter
Name
PROJECT
PROGRAM
TEMP
PGMSAVE
MEMBER
OUT
REGIONI
TIME1
PARAM
Default
Value
'CN.EPALMH.A087.
CDHS.HQ.PNT'
PSRLNGP
SYSDA
PSRDFLT
PSRSKEL
A
100K
'1,0'
'SIZE=94K,
BUF=10K, NOSEO,
SUPMAP, NOSOURCE1
Description
Highest-level index of data set names
(e.g., CN.EPALMH.A087.CDHS.HQ.PNT.DATA.
EPMASTR would be the full data set name of
an EIS/PS master file)
Sort language processor program
Unit type for temporary work space
Output load module member name
Retrieval program skeleton
SYSOUT class for all print files
Region size allocated for execution of
PSRLNGP
Time allocated for execution of PSRLNGP
Parameters used for compiler
Figure 5.3.2-e. Substitutable Parameters for EPSRM10
467
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.3
GENERATED SORT
PROGRAM PSRGENR (EP0170)
Page 1
Release Date: 2/01/80
Update #: P-l
5.3.3. GENERATED SORT PROGRAM - PSRGENR (EP0170)
5.3.3.1. Description
PSRGENR (EP0170), the generated sort program, is the second of two EIS/PS
programs used to sort data from the EIS/PS master file. The sort language
processor program, PSRLNGP (EP0160), generates PSRGENR (EP0170) and must,.
therefore, be executed first. All sort requests are specified on sort
specification cards input to PSRLNGP (EP0160) (see Section 5.3.2.2).
The sort process can be performed two ways. The first is to execute the
cataloged procedure EPSRM30 (see Section 5.5.3). This procedure executes
PSRLNGP (EP0160) and compiles, link edits, and executes PSRGENR (EP0170);
PSRGENR (EP0170) is not saved. The second method allows the generated sort
program to be saved for future runs (on other EIS/PS master files). Two
cataloged procedures are used in this method; they can be run together in one
job stream or at different times. The first of these procedures, EPSRM10,
executes PSRLNGP (EP0160) and compiles, link edits, and saves the generated
sort load module (see Section 5.3.2.5). The second procedure, EPSRM20,
executes the stored sort load module (see Section 5.3.3.5). This load module
corresponds to PSRGENR (EP0170), but a different name should be used so that
more than one sort can be stored.
For further discussion of the EIS/PS sort specifications, see Section
5.3.2.2.
468
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.3
GENERATED SORT
PROGRAM PSRGENR (EP0170)
Page 2
Release Date: 2/01/80
Update #: P-l
5.3.3.2. File Formats
PSRGENR (EP0170) uses one input file, the EIS/PS master file (or an
answer file). See Figure 4.3.9-a for the master file format.
There are two files which are output from PSRGENR (EP0170): a sorted
answer file and a diagnostic report. The answer file has the same format as
the EIS/PS master file; however, there may be duplicate records. See Figure
5.3.3-a for an example of the diagnostic report.
5.3.3.3. Options and Control Cards
There is no option card input to PSRGENR (EP0170).
5.3.3.4. Error Messages
PSRGENR 001 ERROR - MASTER FILE CONTAINS NO RECORDS
Meaning: The input master file was empty. This may have been caused by
using an answer file from retrieval in which the specifications
were in error or specified criteria which no records could
meet.
Action: If a previous retrieval was in error, correct the
specifications and resubmit both jobs. Otherwise, verify that
the correct EIS/PS master file was used.
PSRGENR 002 ERROR - SORTED FILE CONTAINS NO RECORDS
Meaning: This error message should be accompanied by message PSRGENR
001. See the explanation above.
Action: See PSRGENR 001 if that message is also present; if not,
contact NADB.
469
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.3
GENERATED SORT
PROGRAM PSRGENR (EP0170)
Page 3
Release Date: 2/01/80
Update #: P-l
PSRGENR 003 ERROR - UNKNOWN RECORD FOUND, RECORD IGNORED
Meaning: A record type other than 0, 1, 2, or 3 was encountered. This
message is accompanied by message PSRGENR 004, which gives key
information for the record in error.
Action: Verify that a correct EIS/PS master (or answer) file was used
as input. If not, enter the correct file and resubmit;
otherwise, the file has a serious problem and NADB should be
contacted.
PSRGENR 004 KEY = XXXXXXXXXXXXX, DATE = XXXXX, SEG-ID = XXX
Meaning: This message accompanies message PSRGENR 003 and indicates the
record in error.
Action: See PSRGENR 003.
5.3.3.5. Cataloged JCL
The cataloged procedure EPSRM20 executes a stored generated sort load
module and produces a sorted answer file. This load module must have first
been created and stored using the cataloged procedure EPSRM10. For
information on EPSRM10, see Section 5.3.2.5.
5.3.3.5.1 JCL listing - Figure 5.3.3-b contains a listing of the cataloged
procedure EPSRM20, which executes the program PSRGENR (EP0170).
5.3.3.5.2 Cross-reference of DP names and files
Program Name: PSRGENR (EP0170)
DD Name
File Description
Input/Output
EPSMSTR
EPSANSR
EIS/PS master file
Sorted answer file
Input
Output
470
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.3
GENERATED SORT
PROGRAM PSRGENR (EP0170)
Page 4
Release Date: 2/01/80
Update #: P-l
EPSDIAG Diagnostic report Output
SORTWK01 Sort work file Internal
5.3.3.5.3 User-supplied JCL - To execute the cataloged procedure EPSRM20, the
user must supply job accounting information, data set names of the EIS/PS
master file, the sorted answer file, and the stored sort load module. See
Figure 5.3.3-c for a description of the procedure's substitutable parameters.
5.3.3.5.4 Sample run stream - The following run stream uses the procedure
EPSRM20 to execute the sort load module PSRGEN1. PSRGEN1 was created and
stored by the procedure EPSRM10 (see Section 5.3.2.5.4 for the run stream) and
will sort by POLLUTANT-ID. The master file is 'CN.EPALMH.A087.CDHS.HQ.PNT.
DATA.EPMMSTR1, and the answer file is 'CN.EPALMH.A087.CDHS.HQ.PNT.DATA.
EPSORT11.
// EXEC EPSRM20,
// PROGRAM=PSRGEN1,
// MSTRFIL=EPMMSTR,
// ANSRFIL=EPSORT1
5.3.3.6 Warnings and Special Instructions
If PSRLNGP (EP0160) is run and encounters an ABORT error, PSRGENR
(EP0170) will be executed (if it follows in the run stream) but will not
produce a valid answer file. When this occurs, correct the error from PSRLNGP
(EP0160) and resubmit the job.
The sort language processor program, PSRLNGP (EP0160), must always be run
prior to running the generated sort program,-PSRGENR (EP0170). The two
471
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.3
GENERATED SORT
PROGRAM PSRGENR (EP0170)
Page 5
Release Date: 2/01/80
Update #: P-l
programs can be run together using the procedure EPSRM30; or the generated
sort module can be stored and run at a later date, using procedures EPSRM10
and EPSRM20.
The sorted answer file is only a subset of the master file; no comment
records are included. There may also be a large number of duplicate records.
See Section 5.3.2 for a discussion of the records in the sorted answer file.
The sorted file should only be used for the master file summary report
program, PRPMSUM (EP0240).
5.3.3.7. Cost Considerations
The following estimates are for the execution, on an IBM 370/168, of the
sample run stream shown in Section 5.3.3.5.4 and illustrate the cost of
executing EPSRM20.
Size of EIS/PS master file:
Size of answer file:
CPU time:
I/O time:
Total time:
Estimated cost:
162 records
779 records
4.09 second
29.14 seconds
33.23 seconds
$4.65
5.3.3.8. Related Programs and Procedures
The cataloged procedure EPSRM30 should be used to perform one-time sorts,
It executes the sort language processor program, PSRLNGP (EP0160), and
compiles, link edits, and executes the generated sort program, PSRGENR
(EP0170). After the sort has been completed, the generated sort program is
deleted. For additional information on EPSRM30, see Section 5.5.3.
472*
-------
m
FI3/PS OENLHATtD SURT I'HtJGKAH
1)1 AGNUS 11C REPORT
PROGRAM riAME; PSRGE'IR (t('0170)
REVISIUU LEVtU: 1-00
LAST UPDATE «: P-l
DATE inCOHPORATEP: FEHRUAHY 1, J<>au
CO
oa
ro
en
•
00
•
to
I
D)
O»
(£3
=3
o
ro
T3
o
OF MASTER FILE RECORDS READ:
NIJMOF.R OF SEG"ENT < RECORDS SKIPPED:
NIJMIJER OF SORTED FILE RECORDS WRITTEN:
NUHRF.R OF ERRORS DETECTED:
r- o
3> O
—« m
•—i CO
O CO
CD
CO
-o en co
;o m m
o z o
m
t» o in
CO •
33 CO CO
O O •
m 33 co
o
i—>
-•j
o
c:
•o
o.
D<
ro
ro
QJ
ro
cu
H-
ro
• •
TNi
O
cc
o
o>
(Q
ro
en
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.3
GENERATED SORT
PROGRAM PSRGENR (EP1070)
Page 7
Release Date: 2/01/80
Update #: P-l
//* fl'A( hil/AIItt / HI-IM.KPM Hr LLntl) .4. I'M'*) S'l I -*
//•
//*
//*
//*
//*
I'l.iILl liUKl i.Alll : I I'hl. ir'O
Kl VI S1H.. L*r VM I 1 -00
LAST llPunll n : k-)
l»Alh I'-.'( IIKHIJKA I tl>: f t\,m>hH\ I, 19HII
IHJS PKlK M/IIKK ALLIK'^ lilt (JSH< III
LXfCllll- A 3IHKH) fIS/P.S SUKI
//
//
//
//
//
//
//SUM
//*
//* SUIVI
//*
PHI It KKI.IJKLl = 'tN.LPALHH./iOM/.tUH3.mJ.I Hi ' .
A 1 = l'blil)H I ,
I ,
SIKH I-
rih
N
oh K I « I. =U>M.SPK ,
I)ISP= 'Nhf »L* ILC..l)tLL I
si IK i y
IIUI=A
t-Xt.C
MASIkK F TLt
//*
//* II-PMI |)AI A :U I
//*
X/KI'S'- SI •< I>H USN
l. IK.
I IS/I'S .IASUK ULL
, I ..OAI A.
ILr
//*
//» IHIlPIII DAlA >Sb I - .i:iKIM; hill
//*
//(•(••SA JSh !'«' On I I =<-,'i'i I I ,
// viil ii- h =O'h I VA It ,lvf. I A |ii,.S
// Dj.ii'ri-.nlMr ) ,
// sf .i( ^ =1 S..IM JM| i , ( ^Ph i Au
// |i.iNA<4|- =>.i'KMjt ( i . .HA i « . <..s
//«
//« unii'iii i ,i i A sM - i; I <". j".-> i 1 1 •'» :•>•'!•
//*
/ /r >-;;ii I AI. i/i' .SYi.iiu I =*,iu I
//*
I- c .M
u.
0 0 0 0 U 1 1) 0
0 0 0 <) 0 $ u U
II III) (I (J '4 HI)
U (I Oil QS (HI
(1(1000 700
0 0 P 0 0 h o 0
oo on I (i no
000011 CO
ii o 00 I / n n
(H)OOlUOO
0000 IhdO
ooooi /no
ooooiHuo
(1 000 IV 00
ooon<> /no
00002000
00002900
00(1031100
n oooi I 00
(10003200
000 05*00
OU 00 34 UO
00004SOO
000036(10
no 00 3 /no
II (1 00 iH !M>
U0003900
0 0 0 0 '1 0 0 0
n 0 o o 1 1 o 0
OOOOK $0(1
o o n o u a u i)
on on 'i '.» 00
no On 'i*i oo
0000'4 /OO
odOOSnoti
(KM") SI I.'O
(•il oo'j i ii ii
H i) II OS 'I IMI
OUlH»HS(iO
(Page 1 of 2)
Figure 5.3.3-b. Cataloged Procedure EPSRM20
474
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.3
GENERATED SORT
PROGRAM PSRGENR (EP0170)
Page 8
Release Date: 2/01/80
Update #: P-l
//* SUM /i-'f- KI.> DA FA sus
//*
//ai.l|ilklrtM>1 rSUKlN|M)2) J f
// SHAtK = (C»L.,'viiiiW|;jHC, ,UJUI JO)
//*
//* IIUH'UI UAtA bll.S - SrSltM IIHtHAlUIN
//*
//SrbPHI'll 01) ht.SHUl SKIIIII
//*
//SYHUU1 DO <>YiiMII|=K(llll
//*
//SYHD'fUU! 1)1) ;i»Slnl| =MIII[
//*
//SI SDltHrl IJI) SYSIMJl =MHII
//*
//SYSUOIIMC ini SYSUU1=X.I.IUI
OOOOSVOO
(I '10060(10
(HHMJftl IK)
(I () 0 II t> 'In il
(10(1 till /(Ml
OOOOhHOd
UOUObVDD
01)00 /Ol)0
(i o oo/loo
0000/500
UOllO/'JUO
oooo /boo
0000/600
0000/700
OOOOMOO
UOOO/VDO
OOOOHOOO
oooobloo
00001* 800
(Page 2 of 2)
Figure 5.3.3-b - continued. Cataloged Procedure EPSRM20
475
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.3.3
GENERATED SORT
PROGRAM PSRGENR (EP0170)
Page 9
Release Date: 2/01/80
Update #: P-l
Parameter
Name
PROJECT
PROGRAM
TIME2
MSTRFIL
ANSRFIL
UNIT
SERIAL
DISP
SPCUNIT
PRIMARY
SECNDRY
OUT
SORTSPC
Default
Value
'CN.EPALMH.A087.
CDHS.HQ.PNT1
PSRDFLT
'1,0'
EPMASTR
EPSRTFL
3330
CDHSPK
1 NEW,CATLG,DELETE1
TRK
20
10
A
50
Description
Highest-level index of data set
names (e.g., CN.EPALMH.A087.CDHS.
HQ.PNT.DATA.EPMASTER would be
the full data set name of an
EIS/PS master file)
Stored sort load module (created
by EPSRM10)
Time allocated for execution of sort
Lowest-level index of master file
Lowest-level index of sorted
answer file
Unit type upon which the sorted
answer file is to reside
Volume serial number of volume to
which sorted answer file is to
be written
Disposition of sorted answer file
Units in which space for sorted
answer file is to be allocated
Primary space allocation for
sorted answer file
Secondary space allocation for
sorted answer file
SYSOUT class for all print files
Work space used for sort work files
Figure 5.3.3-c. Substitutable Parameters for EPSRM20
476
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.4
MISCLLLANLOUS
INTRODUCTION
Page 1
Release Date: 2/01/80
Update #: P-l
5.4.
MISCELLANEOUS
5.4.1. INTRODUCTION
The internal transaction file concatenation program, PMSTCON (EP0190),
allows the user to concatenate two internal transaction files. The resulting
output file must be sorted prior to its use in other EIS/PS programs. See
Figure 5.4..1-a for a flowchart of PMSTCON (EP0190).
Detailed information on PMSTCON (EP0190) can be found in Section 5.4.2.
The cataloged procedure EPMST20 executes PMSTCON (EP0190). See Section
5.4.2.5 for further information on EPMST20.
477
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.4
MISCELLANEOUS
INTRODUCTION
Pa ye 2
Release Date: 2/01/80
Update #: P-l
f INTERNAL
( TRANSACTION
V FILE 1
PMSTCON (EP0190)
INTERNAL TRANSACTION
FILE CONCATENATION
PROGRAM
f INTERNAL
| TRANSACTION
V FILE 2
_J
/ CONCATENATED /
(INTERNAL TRANSACTION/
V FILE V
DIAGNOSTIC
REPORT
Figure 5.4.1-a. Internal Transaction File Concatenation Flowchart
478
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.4.2
FILE CONCATENATION
PROGRAM PMSTCON (EP0190)
Pa ye 1
Release Date: 2/01/80
Update #: P-l
5.4.2 INTERNAL TRANSACTION FILE CONCATENATION PROGRAM - PMSTCON (EP0190)
5.4.2.1 Description
PMSTCON (EP0190) concatenates two distinct EIS/PS internal transaction
files into a single EIS/PS internal transaction file. See Section 4.3.5 for
additional information on the internal transactions.
5.4.2.2 File Formats
The input to PMSTCON (EP0190) consists of two separate internal transac-
tion files. See Figure 4.3.5-c for the internal transaction format.
PMSTCON (EP0190) produces a single internal transaction file and a diag-
nostic report. The diagnostic report consists of the update messages and the
input and output file record counts. A sample of the diagnostic report is
shown in Figure 5.4.2-a.
5.4.2.3 Options and Control Cards
There are no options.
5.4.2.4 Error Messages
There are no error messages.
5.4.2.5 Cataloged JCL
5.4.2.5.1 JCL listing - PMSTCON (EP0190) can be run by executing the cata-
loged procedure EPMST20. See Figure 5.4.2-b for a listing of this procedure.
479
-------
LIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.4.2
FILE CONCATENATION
PROGRAM PMSTCON (EP0190)
Page 2
Release Date: 2/01/80
Update #: P-l
5.4.2.5.2 Cross-reference of DP names arid files
Program Name: PMSTCON (EP0190)
DP Name File Description
EPSTRNA
EPSTRNB
EPSCONC
EPSDIAG
Input internal transaction file #1
Input internal transaction file #2
Concatenated internal transaction
file
Diagnostic report
Input/Output
Input
Input
Output
Output
5.4.2.5.3 User-supplied JCL - The user must specify the data set names of the
input and output internal transaction files. See Figure 5.4.2-c for a
description of the procedure's substitutable parameters.
5.4.2.5.4 Sample run stream - The following run stream would produce the
internal transaction file 'CN.EPALMH.A087.CDHS.HQ.PNT.DATA.EPINTERN1 from the
input internal transaction files 'CN.EPALMH.A087.CDHS.HQ.PNT.DATA.EPINTRN1'
and 'CN.EPALMH.A087.CDHS.HQ.PNT.DATA.EPINTRN2':
// EXEC EPMST20,
// INTRN1=EPINTRN1,
// INTRN2=EPINTRN2,
// CONCAT=EPINTERN
5.4.2.6 Warnings and Special Instructions
There are no warnings or special instructions.
480
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.4.2
FILE CONCATENATION
PROGRAM PMSTCON (EP0190)
Page 3
Release Date: 2/01/80
Update #: P-l
5.4.2.7 Cost Considerations
The following estimates are for the execution of PMSTCON (EP0190) on an
IBM 370/168:
Input internal transaction file #1: 46 transactions
Input internal transaction file #2: 27 transactions
Concatenated internal transaction file: 75 transactions
CPU time: .25 second
I/O time: .45 seconds
Total time: .70 seconds
Estimated Cost: $.10
5.4.2.8 Related Programs arid Procedures
The internal transaction file produced by executing the cataloged pro-
cedure EPMST20 can be used as input to PSREFIN (EP0090), the master file in-
ternal transaction pre-insertion sort program, or to PSRINTR (EP0110), the
master file internal transaction sort program. Refer to Section 4.3.6 for a
description of PSREFIN (EP0090) and to Section 4.3.8 for PSRINTR (EP0110).
481
-------
tIS/PS IwHKnAL THANSACTIHN FHF CiJMC A IF (JA I |UN PKHliMAM - {) I Ai;H|,S I IU il|-P'IHT
NA»'f! PMSICON
LFVFL! l-nfl
I AS I IJPOAU »: P-l
DATL INCOHPflHATtH: FFaHllAKY
00
r\:
ID
c
-s
n>
en
ro
i
Oi
Qi
IQ
o
TO
m
o
a.
llh INPUT IWANSAT [ THUS FRII" Fll.t
NU"hFH IIF INPUT T WANSAC T lU'JS FHMM
TOTAL NUMHFH UF TMPUT THANSACI
OF HUTHUI IHAMStCTlllNS:
?7
7',
75
oo
c: > co
r~ o
> o
O CO
O I—
c; m
~n co
i—H rn
o
CO
o
o
IO
o
C.
O)
fD
=fe
O O
O Z
=2
o m
IVJ
fD OJ
—i IQ
O 05
QJ
(/) -£=>
fD
O
O>
c+
fD
ro
—
o
I—»
co
o
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.4.2
FILE CONCATENATION
PROGRAM PMSTCON (EP0190)
Page 5
Release Date: 2/01/80
Update #: P-l
//*
//*
//*
//*
//*
//*
//*
//*
FPALMH/AO«7
PKIM.F.OHKI-
IH, LUIYH M. ( P='Hr*,C'*IH
SPtHMI IsIKH,
F.XFt
IM nil
//
FAIN)
//*
//* F'viPUF DATA SHI - 1UFFKNAI I (• ANRAC I IMN FIU I
//*
//FPSM'UA Oil DRuAfiF-silKi'ii.Jt-ri ..r>ATA.ifi4lif I - n I AUUIIS I 11 It«" pill. I
SHI ,,t. (HI :>*.', mil =K,M'I|
mi Oil 0 | nu
0 0 0 II 0 r> II 0
0 II (I I) 'I .'I 'I 0
(i 1 1 (ui n /nil
(HI n no von
nnnij I 'i or)
o i> o o I I n o
OlIOO JiiOO
nnoul *'ii/
on no) '4 n i)
0 0 0 0 1 S 0 (i
(Hi Ol) ) f»O()
nil HO I 7«'ii
) I MHO
OU(i(l?l "I)
nooo ?<>()()
'* 'HI
o o n u ? f n n
OllOO?MOi)
0000^000
noon <|(in
o i) o u 3 d o o
o n p n ? f, o o
01)00
111)00 II 00
nun i) *hi>o
o n o i) /i n n n
n n o o n 1 1) n
() i) ') u u o o
onnn/j ton
" uo u iac u
OilOlJ'lSOl)
o o P n n i o n
n n n u u H o n
no no >iv 'MI
i i)
onons sou
Oli'Mi'MM1"
OlMHIS-idn
•I u il ,i'i(,nf|
(Page 1 of 2)
Figure 5.4.2-b. Cataloged Procedure EPMST20
483
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.4.2
FILE CONCATENATION
PROGRAM PMSTCON (EP0190)
Page 6
Release Date: 2/01/80
Update #: P-l
//*
//*
//*
DAIA sti:. -
//*
//sy.snui no t.ysnnr=)iijiil
//*
//SYSDMiilll 1)1) .SVS'i(j|=KiHM
//*
fMlOllSVI'li
ni)"i)*
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.4.2
FILE CONCATENATION
PROGRAM PMSTCON (EP019U)
Page 7
Release Date: 2/01/80
Update #: P-l
Parameter
Name
PROJECT
Default
Value
'CN.EPALMH.A087.
CDHS.HQ.PNT'
PROGRAM
REGION1
TIME1
INTRN1
INTRN2
CONCAT
UNIT
SERIAL
DISP
PMSTCON
64K
'1.0'
EPINTRN1
EPINTRN2
EPINTERN
3330
CDHSPK
'NEW, CAT
Description
Highest-level index of data set names
(e.g., CN.EPALMH.A087.CDHS.HQ.PNT.DATA.
EPINTERN would be the full data set name
of an EIS/PS internal transaction file)
Internal transaction file concatenation
program
Region size allocated for execution of
PMSTCON (EP0190)
Time allocated for execution of PMSTCON
(EP0190)
Lowest-level index of input internal
transaction file #1
Lowest-level index of input internal
transaction file #2
Lowest level index of concatenated
internal transaction file
Unit type to which concatenated internal
transaction file is to be written
Volume ID to which concatenated internal
transaction file is to be written
Disposition of concatenated internal
transaction file
(Page 1 of 2)
Figure 5.4.2-c. Substitutable Parameters for EPMST20
485
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.4.2
FILE CONCATENATION
PROGRAM PMSTCON (EP0190)
Page 8
Release Date: 2/01/80
Update #: P-l
Parameter
Name
Default
Value
Description
SPCUNIT
PRIMARY
SECNDRY
OUT
TRK
20
10
A
Units in which space for concatenated
internal transaction file is to be allocated
Primary space allocation for concatenated
internal transaction file
Secondary space allocation for concatenated
internal transaction file
SYSOUT class for all print files
(Page 2 of 2)
Figure 5.4.2-c - continued. Substitutable Parameters for EPMST20
486
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.5
MULTI-PROGRAM PROCEDURES
INTRODUCTION
Page 1
Release Date: 2/01/80
Update #: P-l
5.5. MULTI-PROGRAM PROCEDURES
5.5.1. INTRODUCTION
The cataloged procedures EPRTM30 and EPSRM30 allow the user to execute
the retrieval and sort generation functions without saving the generated
programs. i
The cataloged procedure EPRTM30 executes the retrieval language processor
program, PRTLNGP (EP0140), and the generated retrieval program, PRTGENR
(EP0150).
The sort language processor program, PSRLNGP (EP0160), and the generated
sort program, PSRGENR (EP0170), are executed by EPSRM30.
Refer to Sections 5.5.2 and 5.5.3 for information on EPRTM30 and EPSRM30,
respectively.
487
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.5.2
RETRIEVAL PROCEDURE
EPRTM30
Page 1
Release Date: 2/01/80
Update #: P-l
5.5.2 RETRIEVAL - EPRTM30
5.5.2.1 Description
The cataloged procedure EPRTM30 executes the retrieval language processor
program, PRTLNGP ,(EP0140), and compiles, link edits, and executes the
generated retrieval program, PRTGENR (EP0150). The load module for the
generated retrieval program is not saved. For information on the cataloged
procedure EPRTM10, which executes the retrieval language processor program and
compiles, link edits, and saves the generated retrieval load module, see
Section 5.2.2.5. Information on the cataloged procedure EPRTM20, which
executes the retrieval load module stored by EPRTM10, can be found in Section
5.2.3.5. Information on PRTLNGP (EP0140) and PRTGENR (EP0150) can be found in
Section 5.2.
5.5.2.2 JCL Listing
Figure 5.5.2-a contains a listing of the cataloged procedure EPRTM30.
5.5.2.3 Cross-reference of DD Names and Files
Program Name: PRTLNGP (EP0090)
DD Name
File Description
Input/Output
EPSSKEL
EPSINPT
EPSPROG
EPSDIAG
Retrieval skeleton program
Retrieval specification cards
Retrieval source program
Diagnostic report
Input
Input
Output
Output
488
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.5.2
RETRIEVAL PROCEDURE
EPRTM30
Page 2
Release Date: 2/01/80
Update #: P-l
Program Name: PRTGENR (EP0150)
DD Name
File Description
Input/Output
EPSMSTR
EPSANSR
EPSDIAG
EIS/PS master file
Retrieved answer file
Diagnostic report
Input
Output
Output
5.5.2.4 User-supplied JCL
To execute the cataloged procedure EPRTM30, the user must supply job
accounting information and the data set names of the EIS/PS master file and
the answer file. See Figure 5.5.2-b for a description of the procedure's
substitutable parameters. The retrieval specification cards must also be
supplied.
5.5.2.5 Sample Run Stream
The following run stream uses the cataloged procedure EPRTM30. The input
EIS/PS master file is 'CN.EPALMH.A087.CDHS.HQ.PNT.DATA.EPMASTR1' and the
output answer file is 'CN.EPALMH.A087.CDHS.HQ.PNT.DATA.ANSWR11. The answer
file is to be cataloged so that it can be used in later runs. All records for
county '0218' will be retrieved.
// EXEC EPRTM30,
// MSTRFIL=EPMASTR1,
// ANSWRFL=ANSWR1,
// DISP='NEW,CATLG,DELETE'
//COMPILE.INPUT DD *
$$SELECT
COUNTY = '0218'
$$END
/*
489
-------
LIS/PS
DATA ACCESSING ANU
MANIPULATION
SECTION 5.5.2
RETRIEVAL PROCEDURE
EPRTM30
Page 3
Release Date: 2/01/80
Update #: P-l
OOUUII 101)
//*
//*
//*
//t n
//*
//*
>U V I h| in-' l_H Vf I : I -(Ml
Li.ol uf'iiftU <•• : (J-1
M/.lt INC.UKI'IIHAI I I): M hHUHWY 1,
llllb PKMCM'l'in AlUlf'K 'Hi- USt U III tl
1.1 = ' 11.1. K I'M fiH. Aim / ,CI'HS.II(4
Ht(;] lint =<>UK ,
^=| DDK ,
!>='$,()',
SI Kl Al
1)1 S(-'='
=(.|)M.S»'K,
r = 1 0,
C I . .LlJAOf
U rl'»
/ / ill :tfs I Nl -i , !•' H i.i ) >
// .-1'Al.t •=( I Kf , I 'i, /' J , 'L-''l ' f
UOOQl)
II (1(10 1) It 'II'
UOOIIUIj'X)
II 00 Oil /"»
1100009011
0000 1000
0000 I I 00
0000l*>0()
00001400
0 0 001400
il 0(10 ISO!)
I) 0 0 i) 1 h 0 0
ODU01 /l.'O
0 0 U 0 1 *» 0 0
0000 1400
OOi)i»
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.5.2
RETRIEVAL PROCEDURE
EPRTM30
Page 4
Release Date: 2/01/80
Update #: P-l
//*
//« IllllPUf DATA KM - I)J AUKIJSI It; MtSSftUKS
//*
//LPSOlAt, Dl) STbllUI=MlUI
//*
//* MUlt'UT UAIA bElb - SYliltH lift rfn I i UN
//*
//RYSPHJNI DO
//*
//*
//SYSIihlllM HI) SYSUUIsHllUI
//*
//SYsimkM DU srsutnsMjiji
//*
//iiYiiUDllriP 1)1) SvStllll=KiJlH
//*
//CllHUL LXtC Pl»K=IRFCHLOU,
//*
//* CUMf'JLF. HtlkltVAL
//* IrtPUl UAIA SI 1 - .'JIIUKCt L1DHAKY
//*
//i.YSLH« HI) H.SNAMK = itPKLiJF.CT..SilUKf.tf
// Vi.ll.UMt = I P^ I V A I h , Kt 1 A I N ) ,
// UlSJ'sCSHW.KftSSJ
//*
//* IriflH UAIA St I - CUUIJL KLlKIhVAL PK'lUKAii SMUKLt CHOt
//*
//UYblN Ol> OSiJAMLrUKPHIHiHAI':,
// Ul.SH=(IILI)fl)t.LLIhi
//*
//* IKI1PUI UAIA »L1 - UlAUNII.Sl 1C MK.SSAOh.S
//*
//.SYSPHIl'JT 1)1) :-iYSUUl=MIUI
//*
//* Ulllf'Ul DATA 3h I - CUUHL WhIKltvAl HKuKKAM UHJEC I C»H>I
//*
1)1) MiJl l=*.!t>H',
//*
//« UML If V OAlrt Sfc IS
//*
//HYHIItl i)i) ilNl Is
//*
//SYSOI«>
//
ISO, 1(10) J
on nu| I =(ivfhi'iPrSLr=.sY:,ii| 1 ).
M'At I =( IKK, (SO, I OH) )
UllOUSHUO
onuos^ou
0000 b 000
OUQ0640U
UUUObbUO
OOOOb/OO
IIOU06HUO
OOOD/OUO
00007100
00007^00
UOO'17300
oooo/aoo
0000 7SOO
00007'iUO
OIIOU7700
OOOD /tlOO
00007VOO
OOOUBOOO
00008100
00000300
OOOOH4UO
00000SOO
OOOOUoOO
UOOOH7UO
OOUOP800
VOOODVOO
00009000
OOOOVlOO
OOOH9<>00
00009500
00009UOO
00009SOO
00009f>00
OOOOV700
oooov«ioo
U0009VUO
u o o i o o o o
0 0 0 1 0 1 0 0
oooioaoo
00010500
OOOIO'IOO
ODOlObOO
0'IOt 0(>00
0001 il 7 (HI
O')01 UWCII
001) 1 OU|)0
'I
-------
EIS/PS
DATA ACCLSSING AND
MANIPULATION
SECTION 5.5.2
RETRIEVAL PROCEDURE
EPRTM30
Page 5
Release Date: 2/01/80
Update //: P-l
//
//*
I»D UNI l = (hltMt>,si.»'
srACt=(IKK, (SO, l(M)l)
l>0 iJUllrUlkMKr.St i'= I o f ;>iM I , Sf 3OT e- , .SYSOM ) ) ,
SI'rtCK=l I«K, (SO, 100) )
XX
XX*
XXLM-H F.XtC H»M=lh.*L»
XX I'AKMr'L 181 ,1.1. I , XI.H- '
XX l>'tl,lHN=100K,
/X HUK=(1,0)
XX*
XX* LIiJK-t.Hl 1 Kh IKlLtfAL
XX*
XX*
XX* JNPIM HA IA SI-. 1 - ADIU-CALL L
K 01) liSNA^fcsilf'KilJfcCI . .
IA I
//
t»i) i>Si4Ai-it.=sv.si .C
//*
//* dil'Ul OAI6 Shi - CUiJUl KtlHltVAL
//*
//Sf.SI. Itl DO i>.SlJAi-.t=«.MIHJI-lUO,
UHJtC I
//*
//* HIM I'll! ijAIA .Sfc T - U\ AliWIIal 1C
//*
//SYSCKlNl Ol) SYSilUl=MJUI
//*
//* I.IUIPUI OMA Sfc I - COmiL Khft = ( IHn ,
//*
//*
//*
//*
//S
//
//
//
tXU' iM,i'.= *.
A 1-1 .<:-.(• ^ hill H^i','1 US/PS "A.SILH h ILt
I'*
VUI.U ILslP^l VA I b. ,Kb I '
|i I :»!••=( SHrtfPASM
in) |i.t>«A -'t =J> f .'' I . l.i'HI li>,
0001
UOOI I '
OOUl I1) I) 0
IMIO I Id 'Ml
illlOl 1 /Ull
001)1 1HUII
OUII1 1900
00012^0(1
(JDOUSOO
OOOl?bOU
0001^700
00013000
0 0 0 1 i Hi U
o 00 132110
00013500
OOUl 34110
OOOJ3SOO
0001 3t>ou
00013700
1)0013600
00013VOO
000l
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.5.2
RETRIEVAL PROCEDURE
EPRTM30
Page 6
Release Date: 2/01/80
Update #: P-l
//*
//* INPUI IMIA St I - tIS/KS MASItK FILE
//*
//tPSMjjIH III) USUA-U.3ICHKIIJLCI ..I'M A.itl'
// VIILUMt = (PHl VAlL'Wt I A I") >
1L»
//*
//* IHHKI1 1)4 I A lit T - AlMSKtK FlLt
//*
. .OAI
//*
//* DUlPlll OAIA 8|.| - 1)1 Ai.NIJbl 1C MfcS.SAl,H.S
//*
//tf'SlHAC-. 00 SY.SllUr=Kij01
//*
//* IIIJIHUI DA I A StlS - KVjII-M |l»>kKAIli)N
//*
//3YSPK1NI Ul> SY.SUUlsKLMH
//*
//SYSllDl IM) SYSIKHsM.IUI
//*
//.svbutiuul oij srsui»r=Miui
//*
//SYSI.'IfeKM »U SYSlKIFafcUUl
//*
//SYSIIUUMP 01)
//*
//UtLfclt hXtC
//LIIADHIIU
//
//*
IIMt=(0,S)
(jtjNAMk=&h.L
l>lSH=(IH.D»l)fc».trt)
0001 7000
U it (I 1 7 1 (I 0
0001 700
0 0 o 1 / a (i o
U001 /SIMl
0001 7/iiiU
0001 7 7»0
0001 7HOO
0 (I () I / '» IJ u
ODD lit On 0
OU01H JOO
000184110
U001MSOO
000 10600
00018700
0001 K8UO
OOU 1 (WOO
0001 VOOO
0001V100
000192UO
00019400
00019100
00019500
000196'H)
0001 V7UO
OOOIV80U
00019900
000^0100
HOOoaoo
000^0600
(Page 4 of 4)
Figure 5.5.2-a - continued. Cataloged Procedure EPRTM30
493
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.5.2
RETRIEVAL PROCEDURE
EPRTM30
Page 7
Release Date: 2/01/80
Update #: P-l
Parameter
Name
PROJECT
PROGRAM
REGION1
TEMP
MSTRFIL
ANSWRFL
UNIT
SERIAL
Default
Value
'CN.EPALMH.A087.
CDHS.HQ.PNT1
PRTLNGP
60K
REGION2
TIME1
TIME2
100K
'1,0'
'2,0'
SVSDA
EPMASTER
EPANSRFL
3330
CDHSPK
Description
Highest-level index of data set names
(e.g., CN.EPALMH.A087.CDHS.HQ.PNT.DATA.
EPMASTER would be the full data set name
of an EIS/PS master file)
Retrieval language processor program
Region size allocated for execution of
language processor program
Region size allocated for execution of
generated retrieval program
Time allocated for execution of language
processor program
Time allocated for execution of generated
retrieval program
Unit type for temporary work space
Lowest-level index of master file
Lowest-level index of answer file
Unit type to which the answer file is to
be written
Volume serial number of volume to which
answer file is to be written
(Page 1 of 2)
Figure 5.5.2-b. Substitutable Parameters for EPRTM30
494
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.5.2
RETRIEVAL PROCEDURE
EPRTM30
Page 8
Release Date: 2/01/80
Update #: P-l
Parameter
Name
DISP
SPCUNIT
PRIMARY
SECNDRY
MEMBER
OUT
PARAM
Default
Value
1 NEW,CATLG,DELETE1
TRK
20
10
PRTSKEL
A
'SIZE=94K,BUF=10K,
NOSEO.SUPMAP,
NOSOURCE'
Description
Disposition of answer file
Units in which space for answer file is to
be allocated
Primary space allocation for answer file
Secondary space allocation for answer file
Retrieval skeleton program
SYSOUT class for all print files
Parameters for COBOL compiler
(Page 2 of 2)
Figure 5.5.2-b - continued. Substitutable Parameters for EPRTM30
495
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.5.3
SORT PROCEDURE
EPSRM30
Page 1
Release Date: 2/01/80
Update #: P-l
5.5.3 SORT GENERATION - EPSRM30
5.5.3.1 Description
The cataloged procedure EPSRM30 executes the sort language processor
program, PSRLNGP (EP0160), and compiles, link edits, and executes the
generated sort program PSRGENR (EP0170). The load module for the generated
sort program is not saved. For information on the cataloged procedure
EPSRM10, which executes the.sort language processor program and compiles, link
edits, and saves the generated sort load module, see Section 5.3.2.5.
Information on the cataloged procedure EPSRM20, which executes the sort load
module stored by EPSRM10, can be found in Section 5.3.3.5. Information on
PSRLNGP (EP0160) and PRTGENR (EP0170) can be found in Section 5.3.
5.5.3.2 JCL Listing
Figure 5.5.3-a contains a listing of the cataloged procedure EPSRM30.
5.5.3.3 Cross-reference of DP Names and Files
Program Name: PSRLNGP (EP0160)
DD Name
File Description
Input/Output
EPSSKEL
EPSINPT
EPSPROG
EPSDIAG
SORTWK01
Sort skeleton program
Sort specification cards
Sort source program
Diagnostic report
Sort work area
Input
Input
Output
Output
Internal
496,
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.5.3
SORT PROCEDURE
EPSRM30
Page 2
Release Date: 2/01/80
Update #: P-l
Program Name: PSRGENR (EP0170)
DP Name
EPSMSTR
EPSANSR
EPSDIAG
File Description
EIS/PS master file
Sorted answer file
Diagnostic report
Input/Output
Input
Output
Output
5.5.3.4 User-supplied JCL
To execute the cataloged procedure EPSRM30, the user must supply job
accounting information and the data set names of the EIS/PS master file and
the sorted answer file. See Figure 5.5.3-b for a description of the
procedure's substitutable parameters. The sort specification cards must also
be supplied.
5.5.3.5 Sample Run Stream
The following run stream uses the cataloged procedure EPSRM30. The input
EIS/PS master file is 'CN.EPALMH.A087.CDHS.HQ.PNT.DATA.EPMASTR11 and the
output sorted answer file is 'CN.EPALMH.A087.CDHS.HQ.PNT.DATA.ANSWR1'.
The answer file is to be cataloged so that it can be used in later runs.
The records are sorted in ascending order by city.
// EXEC EPSRM30,
// MSTRFIL=EPMASTR1,
// ANSWRFL=ANSWR1,
// DISP='NEW,CATLG,DELETE1
//COMPILE.INPUT DD *
$$SORT
CITY A
$$END
/*
497
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
//*
//*
//*
//*
//*
//»
//*
//*
//*
//*
/m
//
tl'AI.HI/AO»«7 MH'UtPklM,
PKdCt DUt00
00000300
o y o o o 'i o o
OOOOObOO
DAIf. l>4C(ihMljKA IKI>: HiHIUiAIvy 1, IVttO OdOOOOOO
fnlS I'HULKl'liKI- ALLH.iS
tXFCUIt A (.0
XX
XX
XX
XX
XX
XX
XX
//
//
XX
XX
XX
xx
xx
xx
xx
//*
II; N'iPrSYSOA,
MS 1 KF H. = KH'xiA
Sl.iK IF !L=tPyt'
'< L U I ' MM 1 = h 0 K r
we t, inm^=i SIIK
1 IMt lr'1,01.
1 | Mt (>=• 3, 0 ' i
'H,i 1 = 4330.
3 1 1. K ,
KTH ,
,
00001/4011
00001SOO
OOOOIfeUO
00001 700
noooiaoo
00001900
00002000
0000? 100
St.h I AL=l.l)Mi»PK r '>000<>«?00
II 1 SP= • Nt >'/,t A
SPCUNI f = |IVK f
I'K iMowr=2i),
SI CMDkY=10r
MKMHt K = HSHiiK
bdK ispc=5o,
UlH=A
ifiRlLE t Utr. Hl,M = X,HKIJl.;HAM
1 ''rOt-Lk II-'.
EL,
,
/x nut rUTtMbi)
//*
//*
//*
//si
//
xx
xx
//
//*
xx*
//*
//hf^
PKlJDl/Ct MS/PS MAUltW F
tPLl't UO IKiNAMfc=n,H=( SHU, PASS)
llit'lll 1)41 A ,S( 1 - Slll< TM-
SSKH. ,"i) D:.^A'IL=».PKII.I
I
l-»Vlil.K4i'i iiNLLtHlN
1- C 1 . .JjHUfCI (H>'^:HHN)f
XX Oli»i'=(SHK,H>ASi>)
//*
//*
// *
//I- *
//
//*
//*
//*
INI'lll (liil't iih f - SI'WI Sf'tt. II IC<> Mil.' OAitn.-.
SlNPI I'h DDluArlf- = |lOU
00003700
OOOOAMOO
OOOOiVOO
00004000
00004100
0000'»«;00
00004300
U0004400
oooo«soo
00004/00
ooooxttoo
H0004VOO
OOOuSOOO
oOOOblOO
0'JOOS?00
HOOOS300
0000^400
OOOO^biiO
ul) I)PM|1=^^|1H,
(Page 1 of 4)
Figure 5.5.3-a. Cataloged Procedure EPSRM30
498
-------
EIS/PS SECTION 5.5.
DATA ACCESSING AND SORT PROCEDU
MANIPULATION EPSRM30
,),:,PS(,^,,ASS,,
// St-' ACI ~ ( 1 UK (S ?) HLSt)
ft UofgAI'f:=«.4l>hl!(;iM.M
//*
//* Illjri'UI DATA Ml - UlAUMiSMC i'lh Sb AfcK «
//*
//LI'ttl'IA(4 l>» SY3HO 1 sfcllUf
//*
//* IIUIHUI In'. IA SKIS - SY.S1L'-' lll'l KA I I IIM
//*
//STSHhlM 1 U|) SYSUI' 1 =*IIIJI
//*
//SYsnui ou .SYS(iui3*iiij|
//*
//SYSIHIUUI HU S Yoll'll =MJU 1
//•»
//5» ISO ft KM Ul( b»SIMl 1 =M)HI
//*
//SYSUHIJMP DO SYSUl)l=MIUI
//*
//Ci'HIlL b*LC PbMsl K^ CHLOOr
// >'AKM= ' iStl-'AMfl"' ' .
// Htlj j >IM= 1 Otlh,
// 11 rtf = (,())
//*
//* CilMPILt SlIKftK MKUGKAM
//*
//*
//* lNl>ll| UAlA St ! - SUUKCL IJbRANY
//*
//SYSLlh H|i D.SiJA>lt = nPl'1IJtC I . . S'lJiJKtfc*
' // Vl)LH.*lfL=(f' Wl V All , KK I A |M> ,
// l>l3l-'=(SHW,t'A.S!>)
//*
//* IHHHI DAI A Stl - CtJHllL iillKlLH HlnU.KAh S
//*
//6YS I (' I)M l>3rJAML = AX.I-M4tl(ilIHI|=KIIII|
//•
//* IHIU'MI IJAIA 311 - OIHill {jnHHK I'w-U,",^^
//*
//SYSLl'-J Dl.) Il-Mj l=Alt'-'H,
// Sl-'Al-H-(M^h(s;i)) ILSL)
//*
//* HI 1L1 1 Y Hu 1 A M- IS
//*
//SYSUll l)|? (MI 1=^11 .•«',
// SI'ALt =( 1 1'Kf (^df 1 On ) )
//*
//SYJjI'lf' til) II il 1 =1*. 1 1 .'iH1, SM' = M b'.i I 1 ) r
3 Page 4
RE Release Date: 2/01/80
Update #: P-l
iMM/OS/OO
uo voSioo
ouoosvoo
00006000
000061 Oil
00006?0'l
00006500
OOOOb'lOO
OOOU6SOO
00006(>00
Oiioob/oo
OOOObttOO
00006900
0000/000
00007100
OU007200
0000/300
00007400
0000 7SOO
0000/600
00007/00
0000 7«00
00007900
OOOOHOOO
(10008100
OOOOHOOO
OOOOH300
OOOOH/IOO
OOOOHSOO
OOOOHbOO
OOOOP700
oooobfoo
OOOOH900
1)0009000
i.lUHCt dint 00009100
(>ooo9«;oo
0000940(1
OOOU'XIOO
OOOOVbOO
00009601)
00009/00
ooooveoo
00009900
urfJLr i cinn oool oooo
•J0010IOO
00010<>00
00010300
00010400
000 1 O'jOO
•UKUO /OO
0001 Otto i.i
000 1 0
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.5.3
SORT PROCEDURE
EPSRM30
Page 5
Release Date: 2/01/80
Update #: P-l
Jon))
300
//*
//StSUI 3
= UltM',8t h'=(SYSlil ) ,SVSIII?) ) ,
t =( Irtivr (50, 1 00) )
//*
//SYSUI« in) u.>ji ! = («. reMp,sKr=i.sYSin i ,SYsui^,bvsm i)),
// Sf'ACt = ( IrtK, 15", I 00) )
//*
//Lhhl) tXfcC t'Urfsiht-l. f
// l'«M!-ia'i.l.sr,Ltl ,XKM '.
// UMOs (S,Ll ,CllHnl.) ,
// h'fc (,H'N=lOOft ,
// 1 U'l- = t 1 i 0)
//*
//* LJUK-HH i si IK u K
//*
//*
//* iH»>ul ii/iiA :>e I - AUHI-CALI LIUKANY
//HYSI lh l)|l li.'ii-jAKE.sktPKHJt'.C 1 . .LIIAH,
// VlH.UN'tsCPHlVAIf ,Kk fAJN),
// DO IISUA •)( =SYSI .CUHL U*,
// lJjUSK'slSHN,f ASSJ
//*
//* INPUT DATA St r - CMH'H MlHIht- finiltlfAh tlHJECl CllDfc
//*
XASYSHfJ ill) OSNAMfcsMlOMJMIH;,
Ifc)
//*
//* lllllPlll DATA StT - 01AL,HUSIJL MhSi»4Gf;S
//*
//3Yi5HKlNr 1)1) {iYyiJUI=MlUI
//*
//* HIM HtH nrtlft -ShF - CUiMll SnKIti* l'Hi|(,i*AM LL>AU
//*
//.SVSl MUD 111) UN J T = K.ltMH,
.'j, D) ,
,Si)K ILK)
. , I 1 0 , '
K Ml i I..I-.MI>,
Will ii-'I =i»»i. | v <. II ,'Vi. I •• I • I
• 1(101 I'jO'l
I) (1 01 140(1
II II 0 1 1 7 0 1)
UOOl IhOO
oooi i VIM)
i>UUl00
0001'4/lMI
U0014HOO
00011900
0001SOOO
00015100
00015POO
0001S300
0001b«00
OOOIS'jOO
OOOlSbOl)
00015700
00 01581) I)
00015900
00016000
000)6100
IIOOlO'lOO
00016/Ull
(Page 3 of 4)
Figure 5.5.3-a - continued. Cataloged Procedure EPSRM30
500
-------
EIS/PS SECTION 5.5.3
DATA ACCESSING AND SORT PROCEDURE
MANIPULATION EPSRM30
// DO
//
//*
//* INPUT OAIA
//*
//(•HSMSli< 1)0
f j
j 1
//*
//* UllFPUl DATA
//*
//F.PSANbH 1)1)
//
//
//
//
//*
//• IJUlPUl DAI A
//*
//F.PSIUAG IH)
//*
//* b'UKl/MLH&t
//*
//Sill' 1 LI H DP
//
//*
//SllHIWKOl OD
//
//*
//3DK1 »K02 IH)
//
//»
// JUHIHINOS OD
//
//*
//* HIM PUT DAIA
//*
//bfSPHiul OD
//*
//srsnui oi>
//»
//SYSDUllUI 01)
//*
//SrsoltkM in)
//*
//*
//oELl Ifc t *l.t
//
//Ll('tl)i-Ul) i'l>
//
//*
U8MAMt = 3YSl.ClJMLIH,
l)I3P=(8HK,PASS)
SH - t IS/PS HAS TEW ULL
L>bNAMt = K.PHllJt.CI ..UArA.*Mb'IKF IL,
tfllH)Mt = (HK]VAlh,lPA(F = (CrL»X,SHWI SPCf , l.UfJl 1UJ
'INI I = (M tfPr SfcP=(.SOK |. f CUU I 1U)
StIS - SYSUrt IIPF.«
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.5.3
SORT PROCEDURE
EPSRM30
Page 7
Release Date: 2/01/80
Update #: 28
Parameter
Name
PROJECT
PROGRAM
REGION1
SERIAL
DISP
Default
Value
'CN.EPALMH.A087.
•CDHS.HQ.PNT'
PSRLNGP
60K
REGION2
TIME1
TIME2
SORTSPC
TEMP
MSTRFIL
SORTFIL
UNIT
150K
'1,0'
'3,0'
50
SYSDA
EPMASTER
EPSORTFL
3330
CDHSPK
1 NEW,CATLG,DELETE1
Description
Highest-level index of data set names
(e.g., CN.EPALMH.A087.CDHS.HQ.PNT.DATA.
EPMASTER would be the full data set name
of an EIS/PS master file)
Sort language processor program
Region size allocated for execution of
language processor program
Region size allocated for execution
of generated sort program
Time allocated for execution of language
processor program
Time allocated for execution of generated
sort program
Work space allocated for sort work files
Unit type for temporary work space
Lowest-level index of master file
Lowest-level index of sorted answer file
Unit type to which the sorted answer file
is to be written
Volume serial number of volume to which
sorted answer file is to be written
Disposition of sorted answer file
(Page 1 of 2)
Figure 5.5.3-b. Substitutable Parameters for EPSRM30
502
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 5.5.3
SORT PROCEDURE
EPSRM30
Page 8
Release Date: 2/01/80
Update #: P-l
Parameter Default
Name Value Description
SPCUNIT TRK Units in which space for sorted answer
file is to be allocated
PRIMARY 20 Primary space allocation for sorted answer
SECNDRY
MEMBER
OUT
10
PSRSKEL
A
file
Secondary space allocation for sorted
answer file
Sort skeleton program
SYSOUT class for all print files
(Page 2 of 2)
Figure 5.5.3-b - continued. Substitutable Parameters for EPSRM30
503
-------
LIS/PS
REPORTS
SECTION 6.1
INTRODUCTION
Page 1
Release Date: 2/01/80
Update #: P-l
6.0
REPORTS
6.1.
INTRODUCTION
EIS/PS provides the user with the capability to produce many reports.
These reports can be categorized as (1) file listings, which present the
contents of files with little or no accompanying analysis; (2) EPA-required
reports; (3) summary reports, which present the results of various analyses of
files; and (4) quick-look reports, which combine retrieval and report
characteristics.
504
-------
EIS/PS
REPORTS
SECTION 6.2
ERA-REQUIRED REPORTS
INTRODUCTION
Page 1
Release Date: 2/01/80
Update #: P-l
6.2 EPA-REQUIRED REPORTS
6.2.1 INTRODUCTION
Federal law requires the submission of point source emission data to EPA
for inclusion in the NEDS data base. The annual report program, PRPENTR
(EP0200) allows the user to generate the annual report from the EIS/PS master
file. See Figure 6.2.1-a for a flowchart of the annual report generation
process.
The option card for PRPENTR (EP0200) determines whether NEDS or EIS/PS
transactions are generated. If the user is a local air pollution control
agency, he may desire to submit EIS/PS transactions to the state agency if the
state agency is also an EIS/PS user. Only information that has been added,
changed, or deleted since the last execution of PRPENTR (EP0200) will be used
for the output transactions. A new master file (indicating the new submission
status of all the records) is created.
See Section 6.2.2 for a detailed discussion of PRPENTR (EP0200).
PRPENTR (EP0200) can be executed using the cataloged procedure EPRPM10,
which is discussed in Section 6.2.2.5. A sample run stream for generating
NEDS data from the master file is shown in Section 6.2.2.5.4.
505
-------
EIS/PS
REPORTS
SECTION 6.2
ERA-REQUIRED REPORTS
INTRODUCTION
Page 2
Release Date: 2/01/80
Update #: P-l
rOLD EIS/PS MASTER
FILE
OPTION CARD
JL
PRPENTR (EP0200)
SEMIANNUAL REPORT
PROGRAM
:EW EIS/PS
STER FILE
[AGNOSTIC
REPORT
EIS/PS INTERNAL
TRANSACTIONS
(Optional)
OLD MASTER FILE
LISTING (Optional
NEDS
/TRANSACTIONS\
{(Optional)
NEW MASTER FILE
.ISTING (Opti<
TRANSACTION
FILE LISTING
Figure 6.2.1-a. Annual Report Flowchart
506
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.2.2
ANNUAL REPORT
PROGRAM PRPENTR (EP0200)
Page 1
Release Date: 2/01/80
Update #: P-l
6.2.2. ANNUAL REPORT PROGRAM - PRPENTR (EP0200)
6.2.2.1 Description
The annual report program allows the user to submit EIS/PS master file
data to NEDS by generating either NEDS point source transactions or EIS/PS
internal transactions. The type of transactions that are generated is
dependent upon the option specified by the user.
When EIS/PS internal transactions are being generated, the EIS/PS data
flags for every master file record are scanned to see if they are 'on'. A
data flag is on if it contains an 'A', 'C', or 'D1. These codes indicate add,
change, and delete, respectively. A fourth code, 'E', indicates that the
record (or the repeating section of the record) was added after the last
annual report and is to be deleted from the master file (or record). No
transaction is generated for data flagged with an 'E1. The data flays are set
to these codes by the master file maintenance program, PFMMSTR (EP0120) (see
Section 4.3.9 for a discussion of PFMMSTR (EP0120)). If the data associated
with a flag has previously been submitted to NEDS, the flag will contain an
'S'. All data flags are set to 'S1 by PRPENTR (EP0200).
When NEDS point source transactions are being generated, the NEDS data
flags are handled in the same manner as the EIS/PS data flags; however, since
the master file comment (type-3) records do not contain any NEDS data flags,
no transactions are generated for these records. Although data is selected
only from type-0, type-1, and type-2 records, the type-3 comment records are
scanned to see if they are to be deleted from the master file.
The EIS/PS data flags are set independently of the NEDS data flags,
except when records are flagged for deletion from the EIS/PS master file. In
this case, all data flags for the records are set to 'D' or 'E1 by PFMMSTR
507
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.2.2
ANNUAL REPORT
PROGRAM PRPENTR (EP0200)
Page 2
Release Date: 2/01/80
Update #: P-l
(EP0120). Note that PRPENTR (EP0200) is the only program which physically
deletes records from the EIS/PS master file.
New data in the EIS/PS master file (i.e., data added since the last
annual report) will generate an add transaction. Data is recognized as new if
its associated data flag contains an :A'.
Data that has been changed since it was last submitted to NEDS will
generate a change transaction. Data is recognized as being changed if its
associated data flag contains a 'C'.
There are two types of deletions: deleting specific records or groups of
records and deleting specific data fields. When a record or group of records
is being deleted, the appropriate delete transaction is generated, and the
records are not written to the output master file. An exception occurs when
the associated data flag contains an 'E'. In that case, no transactions are
generated, and the records are not written to the output master file. When a
specific data field is being deleted, a change transaction is generated with
an asterisk in the first position of the corresponding transaction field. As
stated previously, PRPENTR (EP0200) is the only EIS/PS program that actually
deletes records from the master file.
Refer to Figure 6.2.2-a for a cross-reference of EIS/PS data flags,
transactions, and valid action codes. See Figure 6.2.2-b for a cross-
reference of NEDS data flags, transactions, and valid action codes.
6.2.2.2 File Formats
Input to PRPENTR (EP0200) consists of the EIS/PS master file and an
option card. See Figure 4.3.9-a for a description of the master file and
Section 6.2.2.3 for a discussion of the options.
508 '"
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.2.2
ANNUAL REPORT
PROGRAM PRPENTR (EP0200)
Page 3
Release Date: 2/01/80
Update #: P-l
Output from the program consists of an updated EIS/PS master file; either
NEDS transactions or EIS/PS internal transactions; a diagnostic report; and,
optionally, listings of the input and output master files and the
transactions.
The updated EIS/PS master file records have been flagged to indicate that
any new or changed data has been submitted to NEDS. The updated master file
will not contain any records that had been flagged for deletion.
The diagnostic report contains counts of the input and output master
files. It also contains a count of the output transactions and of any errors
that were detected, as well as a list of these errors. See Figure 6.2.2-c for
a sample diagnostic report.
The input and output master file listings and the transaction listing are
optional. The master file listings contain only partial records since one
print line cannot accommodate an entire record. If the user wishes to see
entire records, the master file formatted dump program, PRPDUMP (EP0220), can
be run using either the input or output master file or a retrieved answer
file in master file format. Entire transaction records will be printed in the
transaction listing since neither type of transaction (NEDS or EIS/PS) exceeds
the length of a standard print line. See Figures 6.2.2-d and 6.2.2-e for
sample listings of the input and output master files, respectively. See
Figure 6.2.2-f for a sample listing of the NEDS point source transactions and
Figure 6.2.2-g for a sample listing of the EIS/PS internal transactions.
6.2.2.3 Options and Control Cards
The option card for PRPENTR (EP0200) provides the user with three
options: a transaction option, a warning option, and a list option. The
transaction option allows the user to choose which type of transactions are to
509
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.2.2
ANNUAL REPORT
PROGRAM PRPENTR (EP0200)
Page 4
Release Date: 2/01/80
Update #: P-l
be generated (NEDS point source or EIS/PS internal transactions). If 'NEDS'
is specified in columns 1 through 4 of the option card, the program will
generate NEDS point source transactions. To generate EIS/PS internal
transactions, the user must specify 'POINT' in columns 1 through 5 of the
option card. If this field is left blank or if the option is specified
incorrectly, program execution will be terminated, and an abort message will
be printed to indicate this action.
The warning option allows the user to suppress the printing of warning
messages. If the user does not want to suppress warning messages, he must
code 'FLAGW in columns 7 through 11 and leave column 12 and 13 blank. To
suppress warning messages, the user must code 'NOFLAGW in columns 7 through
13 of the option card. If this field is left blank or if the option is
specified incorrectly, the program will assume a default of 'NOFLAGW1, and a
conditional message will be printed to indicate this action.
*
The list option allows the user to obtain listings of the input master
file, the output master file, and the generated transactions. These listings
are useful for confirming that the appropriate data has been submitted to NEDS
and for diagnosing potential errors. To obtain listings, the user must code
'LIST' in columns 15 through 18 of the option card and leave columns 19 and 20
blank. To suppress the listings, the user must code 'NOLIST' in columns 15
through 20 of the option card. If this field is left blank or if the option
is specified incorrectly, the program will assume a default of 'NOLIST1, and a
conditional message will be printed to indicate this action.
See Figure 6.2.2-h for the option card format.
510
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.2.2
ANNUAL REPORT
PROGRAM PRPENTR (EP0200)
Page 5
Release Date: 2/01/80
Update j: P-l
6.2.2.4 Error Messages
PRPENTR 001 ABORT - NO OPTION CARD, NEDS OR POINT MUST BE SPECIFIED
Meaning: No option card is present in the run stream. Since the
transaction option must be specified, program execution was
terminated.
Action: Insert an option card in the run stream and resubmit the job.
PRPENTR 002 ABORT - INVALID TRANSACTION OPTION SPECIFIED, MUST BE NEDS OR
POINT
Meaning: The transaction option is not specified correctly, or the field
is blank.
Action: Insure that the appropriate option is coded in the proper card
columns and resubmit the job.
PRPENTR 003 CONDITIONAL - INVALID FLAGW OPTION, DEFAULT (NOFLAGW) USED
Meaning: The warning option is specified incorrectly, or the field is
blank.
Action: If the warning messages are required, code 'FLAGW in the
proper columns of the option card and resubmit the job.
PRPENTR 004 CONDITIONAL - INVALID LIST OPTION, DEFAULT (NOLIST) USED
Meaning: The list option is specified incorrectly, or the field is
blank.
Action: If listings are desired, the user must code 'LIST' in the
proper columns of the option card and resubmit the job.
PRPENTR 005 WARNING - INVALID OPTION SPECIFIED IN COLUMNS 20 THRU 80 - IGNORED
Meaning: Columns 20 through 80 of the ^option card are reserved for
future use and must be blank on the user's option card.
511
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.2.2
ANNUAL REPORT
PROGRAM PRPENTR (EP0200)
Page 6
Release Date: 2/01/80
Update #: P-l
Action: No action need be taken.
PRPENTR 006 ABORT - INPUT MASTER FILE OUT OF SEQUENCE, SEE KEYS ABOVE - CALL
NADB
Meaning: The input master file is not in proper master file sequence, or
duplicate keys are present in the master file. The keys of the
two previously read records are printed prior to this message
in the order in which they were read. Program execution is
terminated. The EIS/PS master file should never be out of
sequence; therefore, this error indicates a possible
programming error at some point in the EIS/PS system.
Action: Insure that the proper EIS/PS master file is being used. An
answer file from the generated sort program, PSRGENR (EP0170),
should not be used since the records might not be in the proper
sequence and records with duplicate keys might be present.
Supply the proper file and resubmit the job. If the
proper file is being used, contact personnel at the National
Air Data Branch for further assistance.
PRPENTR 007 ABORT - INVALID RECORD TYPE ON INPUT MASTER FILE
Meaning: An input master file record contains a record type other than
0, 1, or 2. The record is listed prior to the error message,
and program execution is terminated.
Action: Insure that the proper master file is being used as input, and
resubmit the job. If the proper file is being used, contact
personnel at the National Air Data Branch for further
assistance.
512 *
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.2.2
ANNUAL REPORT
PROGRAM PRPENTR (EP0200)
Page 7
Release Date: 2/01/80
Update,!: P-l
PRPENTR 008 ABORT - NO INPUT MASTER FILE RECORDS AVAILABLE
Meaning: This message occurs when the input master file contains no
records.
Action: Insure that the proper file is being used as input, and
resubmit the job.
PRPENTR 009 DISASTER - OUTPUT MASTER FILE OUT OF SEQUENCE, SEE KEYS ABOVE -
CALL NADB
Meaning: The output master file is not being written in proper master
file sequence. The keys of the two previously written master
file records are listed prior to this message in the order in
which they were written to the output master file. Program"
execution is terminated.
Action: Contact personnel at the National Air Data Branch for further
assistance.
6.2.2.5 Cataloged JCL - EPRPM10
6.2.2.5.1 JCL listing - PRPENTR (EP0200) can be executed by the cataloged
procedure EPRPM10. See Figure .6.2.2-i for a listing of EPRPM10.
6.2.2.5.2 Cross-reference of DP names and files
Program Name: PRPENTR (EP0200)
DP Name File Description Input/Output
EPSOLMF EIS/PS master file Input
EPSOPTN Option card Input
513
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.2.2
ANNUAL REPORT
PROGRAM PRPENTR (EP0200)
Page 8
Release Date: 2/01/80
Update #: P-l
EPSNWMF
EPSPSTR
EPSNDTR
EPSDIAG
EPSOLDL
EPSTRNL
EPSNEWL
New or updated EIS/PS master Output
file
EIS/PS transaction file Output
NEDS transaction file Output
Diagnostic report Output
Input master file listing Output
Transaction listing Output
Output transaction listing Output
6.2.2.5.3 User-supplied JCL - To execute the cataloged procedure EPRPM10, the
user must specify the data set names of the input and output EIS/PS master
files and of the transaction file. An option card must also be supplied. See
Figure 6.2.2-j for a description of the procedure's substitutable parameters.
6.2.2.5.4 Sample run stream - The following run stream would generate NEDS
point source transactions. The data set names of the input master file, the
output master file, and the NEDS transaction file are their respective default
values. These files will be listed, and any warning messages will be printed
in the diagnostic report. Also, a dummy file has been substituted for the
EIS/PS transaction file.
// EXEC EPRPM10
//REPORT.EPSPSTR DD DUMMY
//REPORT.OPTIONS DD *
NEDS FLAGW LIST
/*
The following run stream would generate EIS/PS internal transactions. The
data set names of the input master file, the output master file, and the
514
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.2.2
ANNUAL REPORT
PROGRAM PRPENTR (EP0200)
Page 9
Release Date: 2/01/80
Update #: P-l
EIS/PS transaction file are their respective default values. These files
will be listed, and any warning messages will be printed in the diagnostic
report. Also, a dummy file has been substituted for the NEDS transaction
file.
// EXEC ECRPM10
//REPORT.EPSNDTR DO DUMMY
//REPORT.OPTIONS DD *
POINT FLAGW LIST
/*
6.2.2.6 Warnings and Special Instructions
PRPENTR (EP0200) submits new, changed, and deleted data to NEDS by
generating appropriate transactions; therefore, the user should insure that
the most current EIS/PS master file is supplied as input to this program. The
user is further warned not to use an answer file from the generated sort
program, PSRGENR (EP0170), since the file may not be in proper master file
sequence and since duplicate keys may exist in such a file. An
out-of-sequence file, or one containing duplicate keys, will cause program
execution to be terminated.
If transactions are generated for purposes other than submitting data to
NEDS, these transactions should be sorted before further processing is begun.
515
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.2.2
ANNUAL REPORT
PROGRAM PRPENTR (EP0200)
Page 10
Release Date: 2/01/80
Update #: P-l
6.2.2.7 Cost Considerations
To reduce the cost of executing PRPENTR (EP0200), the user should specify
the NOFLAGW and NOLIST options.
The estimates listed below are based on the execution, on an IBM 370/168,
of the first run stream in Section 6.2.2.5.4.
Number of input master file records:
Number of NEDS transactions generated:
Number of EIS/PS internal transactions generated:
Number of output master file records:
Number of errors detected:
CPU time:
I/O time:
Total time:
172 records
334 transactions
0 transactions
172 records
0 errors
.84 seconds
1.69 seconds
2.53 seconds
Estimated cost:
$.35
6.2.2.8 Related Programs and Procedures
There are no related programs or procedures.
516 '
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.2.2
ANNUAL REPORT
PROGRAM PRPENTR (EP0200)
Page 11
Release Date: 2/01/80
Update #: P-l
Record Type
Data Flag
Transaction Type
Valid Transaction Codes
Plant
(type-0)
Point
(type-1)
EIS-01
EIS-02
EIS-03
EIS-04
EIS-11
EIS-12
EIS-13
EIS-14
Plant-01
Plant-02
Plant-03
Plant-04
A, C, D
A, C
.A, C
A, C
Point-11 A, C, D
Point-12 A, C
Point-13 A, C, D
i
(1 or more 13 transactions)
Point-14 A, C
SCC
(type-2)
EIS-21
EIS-22
EIS-23
EIS-24
EIS-25
SCC-21 A, C, D
SCC-22 A, C
SCC-23 A, C, D
(1 or more 23 transactions)
SCC-24 A, C
SCC-25 A, C
Comment
(type-3)
EIS-30
Comment-30 A, C, D
(1 or 2 transactions)
Figure 6.2.2-a. Cross-reference of EIS/PS Data Flags
517
-------
E IS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.2.2
ANNUAL REPORT
PROGRAM PRPENTR (EP0200)
Page 12
Release Date: 2/01/80
Update #: P-l
Record Type
Data Flag
Transaction Type
Valid Transaction Codes
Plant
(type-0)
Point
(type-1)
NEDS-PI
NEDS-P7-PLANT
NEDS-P2
NEDS-P3
NEDS-P4
NEDS-P5
NEDS-P7-POINT
PI
P7
P2
P3
P4
P5
P7
A, C, D
A, C
A, C, D
A, C
A, C
A, C
A, C
SCC
(type-2)
NEDS-P6
NEDS-P6-SCC
P6
P7
A, C, D
A, C
Comment
(type-3)
N/A
N/A
N/A
Figure 6.2.2-b. Cross-reference of NEDS Data Flags
518
-------
FIS/PS ANNUAL REPURI PRUCHAM - UI AGNOSTIC
PAlit
O1
I—»
VO
PROGRAM NAMES PKPLNIK (£Po?on)
REVISION LI-VF.LS i-oo
LASI UPOATF «: P-l
OATE IMCftKPURATbD: FEBRUARY I, 1980
CARD: NEDS FLAGh LIST
INPUT FIS/MS MASTER FH-t COUNTS
nulPUl fcTS/PS *ASir« ULE COUNTl
RtCURUS DEl.ETtn FROM CASTER FILES
OUTPUT IRANS»CTIONS COUNTS
TRANSACTIONS COUNTj
CHANGF THANSACTIIINS COUNTS
UELFTF TRANSACT tU'JS cnU"l!
UF I.NHIIR MESSAGES!
UF WAPNlNG MtS3AGES:
NUMHFR UF CUNDITIUNAL MtSSAGFSt
NU-BCU UF ABORT J»ESSAC£3l
NUMBER UF 01SASIEK MESSAGES:
172
m
I)
Figure 6.2.2-c. Diagnostic Report
-o
c. >
C °
3> O
-H m
»-t 01
O OO
CO
CO
O
CTJ
50
CO
m
o
r— o
T3
50 -o
•o o
m 50
o
ro
o
o
m C5>
-o •
ro
•
ro
: TO
•o ro
ex —»
o» n>
c+ o>
fD (O
a
o>
c*
re
TN3
O
00
O
.
Cu
-------
o m
3> — •
06 1 960053000QOOO ioooooouooooooooQooooo?92
Pbl96005300oooooiofloi inooooooooooooooo346
Ob 196005300000001 oooi 2<>u 3oOi 01 00000000794
06) 9600530000000 1000 124 1) 300 1020200 0000791
Obi 9A005300000P010001 300000000000202101 1?
06t 9600530000oOo 1 01 271 OOOOOOOOOOOOQOP0346
oc>t 960fl530oonoooio<2724o30Ploioooooooo794
061 9600 V30QOOOOOI 01 27240 300 10202000000294
flbt 96on5Sonooooo lit 1273000000000002021 oi 72
Obi 96ons3ooo"04o 1000000000000000000000292
Ob 1960 0530000 04 01 0001 10000000000000000546
06 196005300000001 000 121 0?0? 30202000 00 0294
Ob t 9600530000010 IOOOI24030010J 00000000294
C71
ro
o
06 196005 300001) 4 0 1 0002 1 oo oo oo ooooooo 00034*'
P61 960053000004Q 100022 1 020?3020 1 OOP000246
06 1 96005300QP0401 0002270600 19B050000 00722
Obl960053oOOoo4otOOo22301o32030ioooooo?.2?
Ob 19b005300000401 000223020020 101 00000031 B
Ob 1 96005 30000040100022302002010500000034?
Obt96Qi)5Sooono4olUOO?230?.00201 IOQOOQ00790
Ob i 960fl53oooflo4o i ooo26?004053 II 2704010001 10000000000000000346
062004053 1127010 1000 1 2302Q0501 00000000?<>1
Ob?.004053| 12 70401 000 123070P502020UOOOQ294
Ob200a053l 1270401 000 13000000000002021 01 72
462004953 II 270101 0002 1 OOOOOOOOOQOOOOOO VI6
0670040531 1270001 ooo?.23o?oo50i Oooooooo?9q
Ob2004053l 1 27040 too 02230200502020001100746
Ob2004053112.7040 100023000000000002021 01 7?
0620040531 1 27330 I 000 000 000 0000 00000 00079?
0620040531 1273301012710000000000000000346
Ob?004P53 11 27330 10 t27c!30?UOSOt 00000000794
06?00«nS311 273301 OI273n0000000000202IOl 72
li2loonooooooooooonojafc
It
INPUT t IS/PS MAStFH HLF.
06196005300016004701 1 2304PL-.il 75 00 12J?J'F HANnt SHYInF b91<>b/4'43 /69F NGINI S SYMTHF In
06l9bnn5300fl|non0053004]nola7|0|ni I I l/(1«>l205q(l9SSS7l?l?lOSlSIS2o2030 Jflt (05«7«01 3709 70 1)9001001 00021 APL»U1 NOT FDLLUlIriG CU10EL1NE3 AS Sfcl DUni-i |?/t'l/79 '•(ILL >*t Cl
06 1 96005 4004 1 «014H 10201 | | 1 ill 2l2«S4o955b7l ?12I Obl51S20?030^0 1 10547001 570970090010010000001
06 1460053004 16014920? I 0202 3020 I 12401 003960009P.S0001 6*058009 7fl?r PL AN I
06|9bOO*t3004 | Rot 4920220600 1970520001 005000000030 Oil?00 0079O2HPLAMI
06 19b00530041ROfl?320220600l9t>05 12302300040000002000 003701 PL AN I
06l9b0053004lflul49202JOU»3Z030n230?iOOO<»00000030ftn 00370 1 PI.AN1
061 9600510041 BO 1492023020020 I 0| I 2401 0039b000925000034«l 20009782PPLA'/ 1
06 1960053000 1 flll I U9202302002010S2000100SOOO 00 0030000 3««l?000?V01HPl ANT
<)6|9b0053004inon2320230?00701101240? 0030000Q004000 00?90|MPl AN1
06 1 960053004 I B00232023070050 100 I 230 12000300000040009 1220 1001 50 1MPL AN I
0619600530041H00232023020050202I230120U030000004000912201001501BHLANT
0619600530041001492024030010101 12301 3003<>000004000057»02300250 IMPLANT
0619600530041 H0 14920240300 101 02 1 230? 50i)0onopOo00n03 70 IMPLANT
O61960053000t80149<>02'-I030010a0112403 00020000010000 003701 PLAN!
0619600530041 "01 49202902020200 11 2301 00300000040000 002502PPLANI
0619bOo5300'M«Ol«l9<»029o2020200212aol 00040000009000 001502CPLA'J I
06 1 960053004 1*002320290 30020 102 1 230? 3000q 0000 003000 003701 PLAN)
06196005300419002330202021APLANT NUT FlULOrtlNG GUIDELINES AS SI- F DIIMN 12/14/79
062004053A04iaol4701 12304PL-3175 001212PGfcnHBt SHYTnF 7919S443769IUL SI H»UStlH O!
062004053*»41H0147|Ol01t I 1 « 1 2 1 «i109S5b7 1 2 1 ?1 051 5 1 520203030 I I OS4700I 3709700900 1 00 I oOoOOni
062001053AQ41H0023201 3020050 100 I 23o I 2POO 1 00000o400o9|?20 100 150 1POIL 3T
06200405 J»U41«002320 13020050202 12301 2000300000040009 1?20 1001 SO 1CU1L 31
062004053AU41ROI471010202IAPLANT NOT FOLLOWING GUIDELINES AS SET !>!)*, J 17/1M/79 HILL HF Cl
062004053A041P014H1020I I 1 1 '4 1 2 1 24S4095557 1 212 1 051 5 1520203030 1 10547001 3709 7 00900 1001 0000001
06200Q053AU41R00232023020050 100 1230 1 2000 300000040009 122»1 00 1 SO IMPLANT
062004 053 AU4 1 H 0023202 3020050202 1 2 3o I 2O 0030000004 00091 220 100 1 501MPL AN I
062004053AU4180MB30202021APLANT NUT FiHLOxlNf: RUlDFLtivF.S AS SLl OUW.
>
o
o
m
CO
00
00
3>
—I
»—«
O
062001053»UWlflu1 1331U02021APLANT NUT FillLn«|NG GUIOFLINFS AS St T DOWN 12/14/79 MILL HF Cl
06200*OSi*UNl"u34S|AHO| 1 1 141 21 2454095SS7I ?|2I 05151 5207030301 1054/00137097009001001000000 1
0620040S3*HM|A00232AH30200bO I 001 230 120003000000400091 2201 00 150 1 HfNUTNF.
062004053AUN | Au0232Ari3070nsn2ll2l 23)1 1 2000300000040009 1 7.20100 ISO I ME NGII
c: — I
m
-o
o
ro
•
ro
m
-v
o
ro
o
o
•o
Q.
Ql
n>
=te
n>
ft)
a
en
(D
Ol
m
• •
ro
o
O)
10
n>
Figure 6.2.2-d. Input Master File Listing
co
o
-------
ro
06196005300Q0000100000000000000000000029?
Obi 9600530000000loooiinuooooounooooooojob
o«>i96oos30ooooooloooi20030010100000000294
0*i9*0053000000010001240300i0202nooooo29o
0619600530000000100013000000000002021017?
06i9600b30oooooGt'>t27iooopoooooooooooo346
061960055000000010127240 30010IOOOU000029/1
ob 196005 300000001 oi?.72ai)3oo 10202000000294
0619600530000000101273000000000002021 (i 1/2
Obi 96U05300000401 OOQOO0000000000000UO029?
06196005300000401000110000000000000000346
06196005300000401000121020230202000000290
i»6i 9fco053o<>u oooui oooi 24 0300101000 00000294
Ob I9b0053000001010001300000000000202 I 111 7?
Obl96005"30oooo'io 10002 ioooooooooooooi)oo346
Obi 96U053U000040100022 IU?0?. 30201 QOOOOO?'I6
nbl9600S500000401000?2.2060Q19/OS0000003h6
Obi 9b00530000fl05000000222
061V600530000040!000223010320 SO I0000no2<>2
OM96(ir»5300«004011)00??3020020 I 01 OOOOOH31H
061960Q5300000401 df>0?230?00201 050000011)4?
06196005300UOU4010002230200201 111000000290
06196005500000401000223020050100000000290
Obi 960053000004010fra?2302U050202000000?90
06196005300000401 00022003U010|010000005'8?
06196005300Q0040100022403001010200000031"
Obl96uOS300uO (1401000224113001040 100 0000???
Obl96GO<>30000(;4010no229o?0202001000000?'l6
Obi 960053000004010002290?020?002000000?46
Ob 1960053000004010002290300201020000l)fl?22
06196005300000101000230000000000020210172
06200405311270401000000000000000000000292
Ob?0040S311270101000110000000000000000346
06?004053I 1270001 0001230?OOS0100000000?V'I
06?l)04053l127U401000ld30?00502020000QO?94
06?004053l127u401000l500noOOflu00020<>1 01 72
Oft?00ailb51 127010100021000000000000000(1516
0620040531 I 27040 I000?23U?OOSO1000000002^0
06?004053ll27u4ulOOO?<»30?0050202flOOOOO?46
Ob?«04053|127oaol0002i000000000002021(M 72
062»n4053ll27330IOOoooOooooooooooooooo?.v2
Ob?0n«0531127>3i)lo12/10000000000000i>0o346
0«>200<»053ll27S301u1«>72Jii?00«>0|OuOOOiiOti?V4
06200(1 OS31 1«?7i30|Uli?7«!30?0050202000IIOO?94
Ob?004P53lIi:7i3010l27i000000000002021(>l 72
Ob200lOS3l127J30111I2100000y0000000000306
Ob200«IOS311273301llI?230?00b0100000000?9a
Ob?00<|OSM li-7330111 l?230200?)02020000002t»a
06200«40S<1 1273301 11 1PJ00000000000202I01 J?
UllTPUT EI3/P3 MASftW FILf.
PHGI-.
0619bOOSi0001fl00070l 1 2 30'IPL -31 75 00 1212PFRANKK SMYTHf S9195qo 3/69FNGlNt S SYvlHF FN
06 1 960051000 1BOOO 71 010111 1 «121 2ab«0<»SSb71?l?l OS1S1 S202030 301 I 050700 1 37097009001 not 1)000001
06196005 S0001 ^004720 110300 10 1 00 I 230 1 2000 iOOOOnoHOOO'57BO?300 ISO IHLNbINF
OM9600S3AOO I 8004720 10 0300 10202 12 30 12000 3000000400002 30 1 2001 SO lrtCNGI<^
06|9600S30001fl000750102021SPLANI NlIT FlItLflrtlNG KtJIOELlNFS AS St T OO««W l?/M//«> WILL HF Cl
06.19bOOSJ0001fl01 1 3 11 'JO 11 I 1 1 1 2 I 21S009SS57 1 2 1 2 1 OS1 51 S20203030 1 10<>a7001 370"70u900 I 001 0000001
06 I 960 uS 3000 1801 ) 321 il«0300 101 00 1 2 301 ?0 00 ill 00 00 00 00 OS 7102400 1SO| HtNGI '*
06|9bOOS30QO|RO! I 321 ^403001 0202 1 230 1 20003000000400002 301 ?00 150 IHtNG INF
0619600S3000JR01 1331'J020?tSPL»^r NllT FULLdNING GIJluFLINES AS SLI HUMM 12/14/79 HII.L HI Cl
061<>bOo530041«01470l 1 230«HI.-3l 75 00 1 2 1 2PGKHHt;t SMYIHI: 69 1 950U3769PI.AN f S SYMlnf. £M
0619600SJOO«lfl01 0710101 1 1 1 4 I 2 1 20S0»IN 12/1'4/7'» ftlLL 1h Cl
Obl960iiSJ004l«(ll4H1020| 1 11 4 | 21 24S/l09bS5 7 1 2 1 ? 1 0-jl si 5?"203030 1 10547001 3 709 / 00900 | oil 1 UOOOOfl 1
0619o005400202206001970b200(lt OoSOOOOOOQ30liO?00 0 0290 2PPI. AMI
06 19bOoSi004l«00232022060019KO'j 12 30230004000000POOO 003701 PLANT
0619o005S004l'2a23tilo320jO| 123i»230U040000003«OH 001701 PI.AH1
06 19600Si0041«l)1 (19202 3020 02010) 1 240 1 00 396000925000034" 1 20009 7 B2PPL AN I
0619600530041H01492fl2302002010S?ll'>010'l1>00000»OJOuO(i3'*«1200i)?901HPLAM|
06 1 9bO 051004 I «00 23202 3112002 01 1012*102 00300000000000 Oil?40|l«PL AMI
06 19bO(l53nO'l 1 B002 32023o200'jO 10 1|1 230 120003000000(10009 1220 I 00 IbOlHPL Art I
06 19600S J004 1000232023020050202 1230 120 00300000040009 1?20 1 00 1 50 1HPL AN I
1I6IQ600530011 HOI U9202'I03001 010 1 1230 130030000004000057102 3002SO I DPI AMI
06 I960 115 SOO'M WO I «V202103001 0| 02 | 2 ?O? 30004 0000 00 30000 OOOOOOO 3 70 1BPI AMI
06l9<>Ou5.S004ino|f|9202403i>oi04nt 12"D3 OuO^OOOOOlOOOQ OU3/01 PLANT
0619«>no53004lH(U4920290?02U200l 12301 0()J00000040000 00?'i02PPL ANf
0619600S3004l"Otl92029l)20?0?0021240l 0004000 00 09000 00 1 502CPL AH1
Ob 19bOO!>30041H00232029u-30 020 1 02 1230? 30004000 000 3000 003/01 PLANT
06l9bOOS30041fl00233020202l3PL«NT NllT FljLLI'HlNR GUlDFLINfb AS St F OlIWIJ l?/la//9
0620050 700 137 09 700900 100 | 0000001
062004ltS3*ua 1H0023201 3020050 10() 1250 120003000 00040009 1220 I 00 1501 PUT L ST
0620uqo53AiJ4iao02320130?OOS02"2 1 250 12000 5000000400091 ?2"1001 50 U.U I L ST
062004053AU41HDI4730102021SPLANT NUT FULLUHJNr. GUI I* L INF S AS St T IHIrtn. I2/M//9 WILL HE Cl
0620040S5AU4IH014A1020111 I 4 1 2 1 2154095SS7 1 ? 1 ?1 OS I S 1 520203030 1 105" 7001 <70<»700Q00100 1 dOOOOO I
0620ii4o53Au41H0023202 302"0501 no I 23(i 12"oo3000unooi)0ii«*i?«»0 1001 SO 1HPLAM I
06,»004t.53Au4 1« 002 S20«MO?OOS02P2 1230 12000 100000040000 I ?20 100 ISO I Hi>l. AN!
Ob20|i4oStAi<'l|«Ol'l«302fli02ISPLAi<.20090S3A|JH1R002 *3AnO«»02 1 SPI.AN I NUT F|IILH«IUG GtllllELINES At St T Oi.MN 12/14/79 MILL Ml- Cl
7500001 1HPH S"1IH S«INI ,\(.N
Figure 6.2.2-e. Output Master File Listing
o m
-o
CO
:> o
—I rn
i—I GO
o oo
73
o
sr>
73
m
-a
o
ro
o
o
CO
m
o
m en
TJ •
o ro
73 •
— I IN3
a.
o>
=**=
n>
Ol
to
n>
a
O)
c+
a>
ro
•—
o
00
o
O)
to
n>
cn
-------
NFUS UUIPIJT IHANSAT I IHMS
PAuh
Ob19600b30fl01001212HOSYMTHt FNG1NE CO FBANKF SMYIHP
Obl9bOOS3000l HO PLANT Nil I IN PRODUCTION 12/79 TMHII /4/80
Ob19f>OOS30001(ll«Ol 1«1 21 24S'«09SS5009001 001 000000 1?30900
06l9f.OOS300010l8000|V/022001 0220419W5 9«S
OM9fcOOS3000lb1H0020303Ut10S470000IOO OOOOIUOi 3097
06I9AOOS3000101800000300 OOOOiOO?ei1079|?|SI 'It IS
Obl9600S3UOOIOlaO POINT ADDED 12/14/79
Obt9ft00S3000101B040 3001 01 00030000004000S7802 500 ISllf iMRlMfc HI
Obl9bOOSSOOOtOia0403001UlSCC LEFT COMMENT PI SCC NIGHT P7 CIIMMf-Nl
Ob19600S300Qlu1 804030010200070000004000(123012001SOF.NG1 M HI
Obi9f>oos3oooioiao<40300io2scc L?FT CUHMF.NT P7 —
1 /
onon3no?Ht1070121^1
is i /
I IOS470000100
I maooooojou
0619600550001 KJHO P01N1 ADDED
C71 Obi960053000110H040300101 UOIM0000004000S7H02300 lSOF.Nr,[Mfc HI
j^i Obl9(isoPLANTs PI
06t9bOOS3UOKluIaO
AP/
AP6
AP7
«P»
AP/
AP«f
AP3
AP4
AP5
AP7
APh
AP/
APlj
AP/
AP2
APJ
AP4
APS
Figure 6.2.2-f. NEDS Point Source Transaction Listing
2 ^C
T3
> CO
O
O
m
CO
CO
O Z
CD C.
73 >
CO
m
73
70
m
ro
•
r\3
o
ro
o
o
T3 fD O>
f\ __i ir*>
D) fD fD
ft) CTl
.. O
Qi
•o n>
ro
o
co
o
-------
co
en
ro
co
to
c
(D
ro
•
ro
OOOOo0030noOOOOOOOOOOOOOOOOO(lfl?lMOOft022'IOO(>3tl006SAI)nkfS8 * PH'INf NllMriFw ADUFO 03/?l/hO
1H0060?,2'10nOOon03u003100000000nOPOOOO|221«OOhO?2fl00038006S05 lA001ftl)OS21 1
I«00022flOOOOOOa3000321030020900000002311S00602210003800650 51 030020900 ?23OZ2<10000000300033000onoflOOOOOOUl 50|1«00»>022aoOO»80061>030000|KHEYCINi) (MIS PllTNT ttJ 1H£ FILF JOA
O
o
m
co
co
o
13
CO
o
o
33
T3
70
-a o
m 70
m
o
ro
o
o
CO
m
o
TO
m cr>
ro
ro
•a
a.
o>
n>
33 T3
fl> O)
—• U3
fl> fD
o>
in i—«
O *vl
a
cu
n>
oo
o
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.2.2
ANNUAL REPORT
PROGRAM PRPENTR (EP0200)
Page 18
Release Date: 2/01/80
Update #: P-l
COLUMN
# 1
COLUMN
# 7
COLUMN
# 15
V
NEDS
POINT
FLAGW
NOFLAGW
LIST
NOLIST
Note: NEDS or POINT must be specified.
Figure 6.2.2-h. Option Card Format
524 '
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.2.2
ANNUAL REPORT
PROGRAM PRPENTR (EP0200)
Page 19
Release Date: 2/01/80
Update #: 9-1
//*
ML M<,
XX*
XX*
XX*
XX*
XX*
XX*
XX*
XX*
XX*
rn, LI UYD M.
PunrFuiiKF MAMI • IPKP-MID
i'l v i s i »<4 i.^\^^Ll I-no
LAS i ijt'OAir «: c-i
DAfh INCMHMIIPATH): FFltKliAuY 1, JOMO
it DO on | on
THIS HWncUMiPf 41 utw.S IMF H:>FI< in
IMTH'UAL TWA"'SACI IM'n.S FIJI* lllc AWWI/AL
"U»R "•* » IS/PS
MM.
Nlh,
Nf
UNI r i=<^
,SF Kl AL l=i'IFIUI'F. ,
SF «lAl ^ = HM|TPF,
SI't" •
//
//
//
XX
XX
XX Hl.sP|a'NLw,h| FP1 .
XX IMStMs'Nl W,rArLR,l)hl.t1fc'»
XX
XX
XX
XX
XX
/X
XX
XX*
xx"H'ii»i FXFC
XX
XX
XX*
Xx* (WI-6IF IK*
XX*
XX^IFHl I" «it
XX
XX
XX*
XX* 1HHMI nA|A StT - HL'» FlfiXPS >1*STM< f 11 f.
/X*
XXFHSHL .»(• Mil h'i.jA f =K.»»P..l.li>.f I . .114 I A. MM. IV,SI,',
XX V'H
XX •'!;>
XX*
XX* |"irni •!« I ft ".I 1 - net i
xx»
x/rcniiiM'i I>H ni.•:/>•.i slier,
I|U|=A
1
= f tl i*1!- 1)
IITu^.S I-MM IHt
»H»HP. i
• =R,pi*ll.llC( ..
Vdl.iltiF = (U<>1 va l» ,l
(Page 1 of 3)
Figure 6.2.2-i. Cataloged Procedure EPRPM10
525
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.2.2
ANNUAL REPORT
PROGRAM PRPENTR (EP0200)
Page 20
Release Date: 2/01/80
Update #: P-l
//*
hSI/t=MO
//* HUH'lll DAIA >M - riFDS TKAuSAC I MNb
//F I'S-l'M |> Do DS'JA if = *l'l'll.lt C I . ,1'A 1 rt. <, livAurt. I ,
// IIMI I = MIM I T I .
//* KlHt;=|fi, CHAMI.F TM iiSb" SPFCIFICAI
1 ,k.i c.iirK i )
SAT: i II.IN.S
n do ii s /no
//* lilt) PUT I>A l« ,ST I -
//*
//*
v(it.nMF=SF.i'=«.:>F wr
HlN<;=TiM,
f TL = I ?UrMl KSI /E=.'
HF III UStM SHI GIF K« II'JM.S
I AHCK?)
//*
//» IIIMPl)! ftATA J-iF I - Mir ll.i/l'S Mn.SIFH Fill
//*
DO l'SMAi-iF±K|M.'ii.JK | . .OAT A,A!A SI I - I'-ll'lll «
//*
//RfSUI.OI. HI) ;iYS'iUI = MIII|
//*
//* iiiiH'uT HATA art - iiiiii'ii!
//*
FJIK
f ILF i. isn-<(;
//» (MiiPUT riAiA si i - uiUPDi Ti>'A'-j.sa( f Tuna ii.niM(,
//*
//FPSII-'NI Ml) SYjjfml siillHI
//*
//* III11 I'D I MA I A bfl.S - S»S IF" i.il'l kit I |IM
|i i
//svsiHH 'in sr;-.
//*
Ml) J.YM'liI =>.l»ll|
//SYSIill I'l- DM SYSiuils
//*
0(1 00hi 01)
0II0 I)tit'I) I)
OllOOfihOit
OilO'U, /Oil
I)IIIHU,VOC)
') I) Oi)7l)01)
OOOi)/ I Oil
0000/300
oooo /«oo
0000 7SOI)
') o n n 7 •> (' o
00007/00
o o o o / a o i)
OOO07VCII
ononKono
I) 00 l)fl I 00
0 u o i) n 4 o o
OOOOHhOO
0 (101)» / 0 0
III) Ot) HMO II
0 0 0 (I X V 0 0
OOOO'MlOO
0000'/I Ml)
OOOO'M'Mi
OOOU'OOO
oooow/no
'MUM (toon
n o o j o)o n
(I ll ll t (I (f (I I)
Oitoto son
Mil 01 0/1 0)1
•I'JO I OS'Ml
n 0 o I n / /i u
000 I ()/<00
ODD) iWM)
on (i I I 0 no
001)111 Oil
'Mid I 1 ^Oil
(Page 2 of 3)
Figure 6.2.2-i - continued. Cataloged Procedure EPRPM10
526 *
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.2.2
ANNUAL REPORT
PROGRAM PRPENTR (EP0200)
Page 21
Release Date: 2/01/80
Update #: P-l
DO
//*
//*
Ol)0| 1
000 I t
nunii
(Page 3 of 3)
Figure 6.2.2-i - continued. Cataloged Procedure EPRPM10
527
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.2.2
ANNUAL REPORT
PROGRAM PRPENTR (EP0200)
Page 22
Release Date: 2/01/80
Update #: P-l
Parameter
Name
PROJECT
PROGRAM
REGION1
TIME1
OLDMSTR
NEWMSTR
UNIT3
SERIALS
DISP3
SPCUNIT
PRIMARY
SECNDRY
Default
Value
'CN.EPALMH.A087,
CDHS.HQ.PNT1
PRPENTR
150K
'2,0'
EPOLDMST
EPNEWMST
3330
CDHSPK
'NEW,CATLG,DELETE1
TRK
20
10
Description
Highest-level index of data set
names (e.g., CN.EPALMH.A087.CDHS.
HQ.PNT.DATA.EPOLDMST would be the
full data set name of the EIS/PS
input master file)
Annual report program
Region size allocated for
execution of PRPENTR
Maximum time limit allocated for
execution of PRPENTR
Lowest-level index of input
master file
Lowest-level index of output
master file
Device type to which output
master file is to be written
Volume serial number of volume to
which output master file is to be
written
Disposition of output master file
Units in which space for output
master file is to be allocated
Primary space allocation for
output master file
Secondary space allocation for
output master file
(Page 1 of 2)
Figure 6.2.2-j. Substitutable Parameters for EPRPM10
528
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.2.2
ANNUAL REPORT
PROGRAM PRPENTR (EP0200)
Page 23
Release Date: 2/01/80
Update #: P-l
Parameter
Name
OUT
TRANFL1
TRANFL2
UNIT1
UNIT2
SERIAL1
SERIAL2
DISP1
DISP2
LABEL1
LABEL2
LABCK1
LABCK2
Default
Value
A
EPNEDS
EPPOINT
2400
2400
NEDTPE
PNTTPE
•'NEW,KEEP'
'NEW,KEEP1
1
1
NL
NL
Description
SYSOUT class for all print files
Lowest-level index of output NEDS
transaction file
Lowest-level index of output EIS/PS
transaction file
Device type to which output NEDS
transaction file is to be written
Device type to which output EIS/PS
transaction file is to be written
Volume serial number of volume to
which output NEDS transaction file
is to be written
Volume serial number of volume to
which output EIS/PS transaction file
is to be written
Disposition of output NEDS
transaction file
Disposition of output EIS/PS
transaction file
Tape label number for NEDS
transaction file.
Tape label number for EIS/PS
transaction file
Type of tape labeling for NEDS
transaction file
Type of tapelabeling for EIS/PS
transaction file
(Page 2 of 2)
Figure 6.2.2-j - continued. Substitutable Parameters for EPRPM10
529
-------
EIS/PS
REPORTS
SECTION 6.3
FILE LISTINGS
INTRODUCTION
Page 1
Release Date: 2/01/80
Update #: P-l
6.3. FILE LISTINGS
6.3.1. INTRODUCTION
The master file or any answer file may be listed using the master file
detailed report program, PRPMSTR (EP0210), or master fiel formatted dump
program, PRPDUMP (EP0220).
PRPMSTR (EP0210) lists the master or answer file in a format suitable for
a management report. See Figure 6.3.1-a for a flowchart of the master file
detailed report.
PRPDUMP (EP0220) lists the master or answer file, record by record, with
appropriate identifying headers. It is primarily used to verify the contents
of the master file, especially when investigating a suspected EIS/PS
malfunction. See Figure 6.3.1-b for a flowchart of the master file formatted
dump.
PRPEFAC (EP0230) lists the information from the emission factor file.
The emissions factor description file is used to provide narrative information
for the report. See Figure 6.3.1-c for a flowchart of the emission file
detailed report.
Detailed information on PRPMSTR (EP0210), PRPDUMP (EP0220), and PRPEFAC
(EP0230) can be found in Sections 6.3.2, 6.3.3, and 6.3.4, respectively.
530
-------
EIS/PS
REPORTS
SECTION 6.3
FILE LISTINGS
INTRODUCTION
Page 2
Release Date: 2/01/80
Update t: P-.1
PRPMSTR (EPQ210) can be executed using the cataloged procedure EPRPM20,
which is discussed in Section 6.3.2.5; PRPDUMP (EP0220) by EPRPM30, discussed
in Section 6.3.3.5; and PRPEFAC (EP0230) by EPRPE10, discussed in Section
6.3.4.5.
531
-------
EIS/PS
REPORTS
SECTION 6.3
FILE LISTINGS
INTRODUCTION
Page 3
Release Date: 2/01/80
Update #: P-l
EIS/PS MASTER FILE
PRPMSTR (EP0210)
MASTER FILE
DETAILED REPORT
DETAILED
REPORT
Figure 6.3.1-a. Master File Detailed Report Flowchart
532 «
-------
EIS./PS,
REPORTS
SECTION 6.3
FILE LISTINGS
INTRODUCTION
Page 4
Release Date: 2/01/80
Update #: P-l
EIS/PS MASTER FILE
PRPDUMP (EP0220)
MASTER FILE
FORMATTED DUMP
PROGRAM
DIAGNOSTIC
REPORT
FORMATTED DUMP
Figure 6.3.1-b. Master File Formatted Dump Flowchart
533
-------
EIS/PS
REPORTS
SECTION 6.3
FILE LISTINGS
INTRODUCTION
Page 5
Release Date: 2/01/80
Update #: P-l
[EMISSION FACTOR
FILE
[EMISSION FACTOR
\pESCRIPTION FILE
PRPEFAC (EP0230),
EMISSION FACTOR
FILE DETAILED
REPORT PROGRAM
DETAILED REPORT
Figure 6.3.1-c. Emission Factor File Detailed Report Flowchart
534
-------
EIS/PS
REPORTS
SECTION 6.3.2
DETAILED REPORT
PROGRAM PRPMSTR (EP0210)
Page 1
Release Date: 2/01/80
Update t: P-l
6.3.2 MASTER FILE DETAILED REPORT PROGRAM - PRPMSTR (EP0210)
6.3.2.1 Description
PRPMSTR (EP0210) produces a detailed report of the EIS/PS master (or
answer) file. The master (or answer) file is listed with one point source
record and its corresponding machine process records per page. Following each
point source page, the corresponding permits and registration records are
listed with one set of records per page. If a single plant has more than one
point source or more than one set of permits and registration records, the
plant/location information is repeated for each point source page and each
permits and registration page. This program can be used to produce a
detailed report of any file in EIS/PS master file format. For additional
information about the EIS/PS master file refer to Section 4.3.9.
6.3.2.2 File Formats
Input to PRPMSTR (EP0210) consists of an EIS/PS master file or any file
in EIS/PS master file format. See Figure 4.3.9-a for the EIS/PS master file
format.
Two print files are output by PRPMSTR (EP0210): a diagnostic report
(shown in Figure 6.3.2-a) and the master file detailed report (shown in Figure
6.3.2-b).
6.3.2.3 Options and Control Cards
There are no options.
535
-------
EIS/PS
REPORTS
SECTION 6.3.2
DETAILED REPORT
PROGRAM PRPMSTR (EP0210)
Page 2
Release Date: 2/01/80
Update #: P-l
6.3.2.4 Error Messages
There are no error messages.
6.3.2.5 Cataloged JCL
6.3.2.5.1 JCL listing - PRPMSTR (EP0210) can be run by executing the
cataloged procedure EPRPM20. See Figure 6.3.2-c for a listing of this
procedure.
6.3.2.5.2 Cross-reference of DP names and files
Program Name: PRPMSTR (EP0210)
DP Name
EPSMSTR
EPSPRNT
EPSDIAG
File Description
EIS/PS master (or answer) file
Master file detailed report
Diagnostic report
Input/Output
Input
Output
Output
6.3.2.5.3 User-supplied JCL - To execute the cataloged procedure EPRPM20, the
user must supply a job card and specify the data set name of the input EIS/PS
master (or answer) file. See Figure 6.3.2-d for a description of the
procedure's substitutable parameters.
6.3.2.5.4 Sample run stream - The following run stream would produce an
EIS/PS master file detailed report using the input EIS/PS master file
'CN.EPALMH.A087.CDHS.HQ.PNT.DATA.EPMASTER1.
536 *
-------
EIS/PS
REPORTS
SECTION 6.3.2
DETAILED REPORT
PROGRAM PRPMSTR (EP0210)
Page 3
Release Date: 2/01/80
Update #: P-l
// EXEC EPRPM20,
// MSTRFIL=EPMASTER
/*
6.3.2.6 Warnings and Special Instructions
The report produced by PRPMSTR (EP0210) can be very lengthy and expensive
to generate. If one expects a very large report, it is recommended that the
substitutable parameter for execution time be increased, and the time and page
limits set appropriately on the job card. At many computer installations,
there is a limit set for the maximum number of pages which cannot be exceeded,
even by a page limit on the job card, v/ithout special approval. See your
computer systems people for information on this limit at your installation.
To reduce the size of the report (and thus the cost), it is recommended
that a retrieval be run to select only those records which need to be printed.
Information on retrievals can be found in Section 5.2.
6.3.2.7 Cost Considerations
The following estimates are for the execution of PRPMSTR (EP0210) on an
IBM 370/168:
Number of master file records:
Number of detailed report pages printed:
CPU time:
I/O time:
Total time:
.88 seconds
1.22 seconds
2.10 seconds
Estimated cost:
$.29
537
-------
EIS/PS
REPORTS
SECTION 6.3.2
DETAILED REPORT
PROGRAM PRPMSTR (EP0210)
Page 4
Release Date: 2/01/80
Update #: P-l
The report generated by PRPMSTR (EP0210) can be very lengthy, making the
program expensive to run. To keep costs at a minimum, it is recommended that
a retrieval be run to select only those records which need to be printed. See
Section 5.2 for information on retrievals.
6.3.2.8 Related Programs and Procedures
There are no related program or procedures.
538
-------
E1S/PS MASTER Flit OF.IMlEn PEPU»I PHuRRAM - 1)1 AGNIIST 1C PKPMWI
UF SEHMUJI n RECORDS
OF str,MF^i i RtcoROS
1IF SEGMENT ? PtCliPOS PHIIwTE"!
OF StCMFNt < PtCIJPOS
Ol
CO
VO
NA'«E:
LFVFL: i-nu
~n LAST IIPDAIF »: p-i
i° nXifc INCORPORATED: FEBRUARY 1> l«>ao
(u
c
CD
9»
CO
ro
I
Ol
Ol
(O
50
0)
T3
O
55
bh
7S
It
"O
o
SO
— I
CO
CO
^
-O
CO
-a o co
50 m m
o —i o
o > -•
3D i—i i—i
r~ o
^ CT»
5O 5O •
-o m co
2 -o •
co o ro
—I 50
50 —J
m
T3
o
ro
C 50 -O
a n> o»
d. —i (O
Q> (D (D
C* O)
(D (/) CJ1
a
CD
• •
ro
o
oo
o
-------
Ol
-n
"^
CO
*^
CO
O>
en
f+
ro
-5
-n
—*•
to
o
(i>
rt-
Ql
«4»
CO *"^>
Ql
73 (Q
ro n
"O
O t-»
3 0
-*
ro
STATE COUNT r
18 OU40
DAIt SEGMEnl C
E1S/PS MASTEK FILE DEIA1LEU REPOHI PAGt. /
AUCK PLANT It)
?« ooos
U*lKUL LUCAL PKlNClPAL
TEAM UAY IYPE KtUlUN CUnlKUL ft AN I ID CITY Ul» /U*E O«N£R C'inlACT TELEPHONE r>KUI)UCT
00 OOU 0
ESTABLISHMENT NAME AND
dENNER AIR PUKT
P7 PLANT COMMENT
DATE SEGMENT POINT
YEAR DAT TTPE ID
/S 000 1 02
BOILER SPACE S T
CAPACITY MEAT HEIGHT
99.9 0049
P7 POINT COMMENT
17 ^ * * T£NAS
NUMritrt UF PRuPtKIY
ADDRESS Hf tMKLOYttS ArttA MAlLltb ADDMES* 2IP
NEOS FLAG PLANT FLAG EIS F L A t S
PI P7 1214
A * A A
USER UTM COORDINATES LATITUDE LONGITUDE ANNUAL IHMUPUT NOKMAL OPERATING
POlrtI 1U SIC 1PP HUHI^UNTAL VtWTlCAL DEC Mlrt SEC UE6 M1N SEC DEC MAX JUn SEP MK/U D/KK itK/TR
9bbl 458.8 4199.1 30 30 20 20 24 7 13
A C K 0 A 1 A COMP SCHEU CUKP SlATUa CUNlNOL REGULATIUM
DIArt TEMP FLUB KATE VELOCITY PLUME PNTS COMP TEAR MONTH YEAK MONTH DAT E~CAP KEG 1 REb 2 «
-------
-a
o
CO
co
TO
CO
to
sr
T
n>
CO
ro
i
tIS/PS MASTER FILE DETAILED REPORT
PAGt
O
O
CD
a.
cr> •-•
CO
Qi
to
c*
CD
-S
n>
o
n>
c+
G0
n>
o.
STATE COUNTY AOCR PLANI ID
06 I960 053 0001
SEGMENT POINT
TYPE ID
3 01
SEO
0?
DATE LINE EIS COMMENT
YR DAY NBR FL 39
BO 06S *01 A THIS COMMENT ADDED 03/21/90
HO 06s 021 c PLANT NOW FOLLOWING GUIDELINES AS SET DUNN 12/10/79
MO 065 022 A THIS IS THE END OF THIS
•ILL NOT HE CITFD FOR VIOLATIONS
Of
to
ro
ro
2 O CO
30 m n
S—I c->
3> —J
yo •—• i—•
t— o
m z
o
o>
so yo •
m co
£ -o -
co o ro
-I 73
50 -H
o
t—«
o
•a o QI
o. — • «Q
01 a> ro
fr Q>
ID in --a
CD
•a
o
ro
Oi
c*
CD
ro
o
oo
o
-------
EIS/PS
REPORTS
SECTION 6.3.2
DETAILED REPORT
PROGRAM PRPMSTR (EP0210)
Page 8
Release Date: 2/01/80
Update #: P-l
//* I PAl MH/Ant>7 HHi|»Ft>F|H, LUlVD A.
//*
//« PKncFi;iMf fcAi't : I
S'll-S'WI
//* I />.*= I llPOAIF « : P-l
//• I'/iU IMCf.'M'HKA Tt 0: M-DI'IJAXV \, |OHO
//*
//* THKS Htvnrtoui't AI uiv.'S IMF USE* in (.E'JiwATt A •
//• IMF F IS/f'b IAS IK "? Ml t
//*
//*
//K'l>pM^O PitllC PHllJkC l = Tw.tPAl MM. AoR7.CnHS.tlU.JMJl '
UK, HIM) =(,UK ,
riMF1='t,H«,
1 I.'U =(
VHI.HMF rO'i<| VAlt ,MF' \ AJNJ,
//*
DATA 8M - t IS/PS
//*
//* nunMM I/A] A se r -
ijsitir; in
l ..UAI A.KMSIKF II.,
,KF I A]".') ,
IL
//*
//* HtlTPHI DA I A Stl - OK T«ILFi; LI Sll 'Mi; 'IF f-IS/t'S MAS!M<
//*
//^^'SHlvlJI UP SYSIJIII =K,IIUI
//*
//* IUI1PIII OAIA Rhlb
//«
l 1)0 RYSilll|=n,(tlH
DO rysiiiii =«.(iut
l<)
n i) it o o ••) (i 0 '!«")«)
ftl)Oi»'J
00 Oil 'IS 00
on no 'in n u
II II Oil'l /0(l
V'MI
ilOii
I IH'
Figure 6.3.2-c. Cataloged Procedure EPRPM20
542 '
-------
EIS/PS
REPORTS
SECTION 6.3.2
DETAILED REPORT
PROGRAM PRPMSTR (EP0210)
Page 9
Release Date: 2/01/80
Update #: P-l
Parameter
Name
PROJECT
PROGRAM
MSTRFIL
Default
Value
'CN.EPALMH.A087.
CDHS.HQ.PNT1
PRPMSTR
EPMASTER
REGION1
TIME1
OUT
64K
•i.o1
A
Description
Highest-level index of data set names
(e.g., CN.EPALMH.A087.CDHS.HQ.PNT.DATA.
EPMASTER would be the full data set name
of an EIS/PS master file)
Master file detailed report program
Lowest-level index of input EIS/PS
master file
Region size allocated for execution of
PRPMSTR (EP0210)
Time allocated for execution of PRPMSTR
(EP0210)
SYSOUT class for all print files
Figure 6.3.2-d. Substitutable Parameters for EPRPM20
543
-------
EIS/PS
REPORTS
SECTION 6.3.3
FORMATTED DUMP
PROGRAM PRPDUMP (EP0220)
Page 1
Release Date: 2/01/80
Update #: P-l
6.3.3 MASTER FILE FORMATTED DUMP PROGRAM - PRPDUMP (EP0220)
6.3.3.1 Description
PRPDUMP (EP0220) produces a formatted dump of the EIS/PS master file;
i.e., a listing with identifying headings of all the fields in each master
fil.e record, as the record appears in the file. PRPDUMP (EP0220) may also be
used to produce a formatted dump of any EIS/PS answer file. This formatted
dump provides the user a means of verifying information contained in a master
(or answer) file and isolating invalid data.
6,3.3.2 File Formats
Input to PRPDUMP (EP0220) consists of an EIS/PS master (or answer) file.
See Figure 4.3.9-a for the EIS/PS master file format.
Output consists of a printed report containing the EIS/PS master file
dump and the diagnostic report. Sample output from both reports are shown in
Figures 6.3.3-a and 6.3.3-b, respectively.
6.3.3.3 Options and Control Cards
There are no options.
6.3.3.4 Error Messages
There are no error messages.
544
-------
EIS/PS
REPORTS
SECTION 6.3.3
FORMATTED DUMP
PROGRAM PRPDUMP (EP0220)
Page 2
Release Date: 2/01/80
Update *: P-l
6.3.3.5 Cataloged JCL
6.3.3.5.1 JCL listing - PRPDUMP (EP0220) can be run by executing the
cataloged procedure EPRPM30. See Figure 6.3.3-c for a listing of this pro-
cedure.
6.3.3.5.2 Cross-reference of DP names and files
Program name: PRPDUMP (EP0220)
DP Name
EPSMSTR
EPSPRNT
EPSDIAG
File Description
EIS/PS master (or answer) file
EIS/PS master file dump
Diagnostic report
Input/Output
Input
Output
Output
6.3.3.5.3 User-supplied JCL - To execute the cataloged procedure EPRPM30, the
user must supply a job card and specify the data set name of the input EIS/PS
master (or answer) file. See Figure 6.3.3-d for a description of the
procedure's substitutable parameters.
6.3.3.5.4 Sample run stream - The following run stream would produce an
EIS/PS master file dump using the input EIS/PS master file
'CN.EPALMH.A087.CDHS.HQ.PNT.DATA.EPMASTER1.
// EXEC EPRPM30,
// MSTRFIL=EPMASTER
/*
545
-------
EIS/PS
REPORTS
SECTION 6.3.3
FORMATTED DUMP
PROGRAM PRPDUMP (EP0220)
Page 3
Release Date: 2/01/80
Update #: P-l
6.3.3.6 Warnings and Special Instructions
The dump produced by PRPDUMP (EP0220) can be very lengthy; therefore, it
is recommended that the substitutable parameter for execution time be
increased and that the time and page limits be set appropriately on the job
card. At many computer installations, there is a limit set for the maximum
number of pages which cannot be exceeded, even by a page limit on the job
card, without special approval. See your computer systems personnel for
information on this limit at your installation.
To reduce the size of the report, it is recommended that a retrieval be
run to select only those records which need to be printed. Information on
retrievals can be found in Section 5.2.
6.3.3.7 Cost Considerations
The following estimates are for the execution of PRPDUMP (EP0220) on an
IBM 370/168:
Number of master file records: 172 records
CPU time: .76 seconds
I/O time: 1.06 seconds
Total time: 1.82 seconds
Estimated cost: $.25
The dump which is generated by this program can be very lengthy, making
the program expensive to run. To keep costs at a minimum, it is recommended
546
-------
EIS/PS
REPORTS
SECTION 6.3.3
FORMATTED DUMP
PROGRAM PRPDUMP (EP0220)
Page 4
Release Date: 2/01/80
Update #: P-l
that a retrieval be run to select only those records which need to be printed.
See Section 5.2 for information on retrievals.
6.3.3.8 Related Programs and Procedures
There are no related programs or procedures.
547
-------
E1S/P3 MASUR FILE DUMP
PLANT » 1 KF Y=o6l9bOOH30ooooooi<>oonoooooooooooooi>oooi
SI/CD=Ob CY/CU=1960 AUCH/»=OS3 Pl./Il) = OOOI D|=»0007 U3R/CN II /Pf,= 123 LCL/CNU=04 USH/PL/JU=PL-3I75 DY = Oul2 U1M//N=12 ii*rtSriP=P
CN.TCTsFhANKt SMYTH* PHN=5919S4437b MM/ADDH = SYMl HF FNRIht CO PKD=9ENGTNFS hMP=0014 AKFA=OOOfll9
"LC/A(}t)K=Keu HAKE, COLORADO P1/I-L=A P7/CMTS=PL«Nt NUT IN PRODUCTION |<>/79 THRU /4/HO
P//FL=A FIS FLAGS: I = A ?=A J=A «=/i
POINf SOURCE 01 KEY=06|9600S30000000100011DOOOOOOOOOOOOOOO346
StG/01=80(|4/ USR/PT/lUsQI 1 SIC/tL>=1141 |PP/CD = ?1 UTH/HnrtZ=24S4 UTM/VFHT=095SS LAT = 7121?1 LNG=0^|5152 IHKPf = 0?030301
NrtML/UPtP = 10547 HiJL«/CAPC = OOI37 SHC/M1=097 STCK/Hi;HI=009l) 8 FCK/Ol AH=0 I 0 SICK/IMP=0 1 00 FLrt/R I =0000 1 23 VLilC 1 YrOOlSO PLM/HGHI =09»fl
P|S/CH/3Th= rijMPLeE/SlAT=2 CflMPLCL/SCH=»1 10 ri)MPLCF/UPn = 79l2l'i LrA"=l CNThL/REGUI.= 4'4 1 b 17 P2-P5/KLGS=AAAA P«CS/FI_ =
P7/C*H3=PUINT AUOtD I2/J4/79 P7/FL=A tIS FI.AGSI 11=A 12=A 14=A «/PULL=U2
** PULL/10 bOP/CSI PRT/EUP SF.C/bUP CNTL/fF E^IS/ESr F:MI3/"EAS ALLUW/EHJ3 UNCN1L/EM1S EM/HIS FST/MT IS/MI EIS/FL/13 •
** 42101 OOQ0100 022 041 9BS 000010U 0000200 OOU030U 433 A •
** 11101 0000100 022 041 985 0000100 0000200 0000300 433 A •
cn
Co
<
SEQ NBK Ou
HIEl/IITS=?
t/r/sc=n P6/FL=» p//cMis=scr
SCC injoOIOI
Str./[)|=«00'J7
sc/osc=tNi;iNE
F IS/FLAGS: ?l=A 22=A ?q=A 2S=A
** PULL/11) EMIS/FCIK A/S/Cl) t/F/IJTS APPRT/EMlS FIS/FL/23
** 12602 000000000 g A
•* ?*ioa oooooo?3ft ? A
MAX/DE8GN=OOoaOOO
POLL/II)
42101
Jiioi
KEY=061960053000000010001?40300101000000002<»4
A3H/CI=0?3 HFA1/CT=OOISO CNH)/I)I = 1 3C/CU=(»
P7 sec RIGHT p? criMMtui P?/FL=A
«/E/F=04
EMI3/FCIR A/3/CO t/F/UTS APPRI/bMIS tIS/FL/2< *•
000000000 1 0000000 A •*
000000-000 t 0000000 A •*
SCC
(I030U102
SFU NCR 02
i?ioi niEL/urs=? FUFL/PRC=OOOJOOO
SC/DSC=tNbll>iF t/F/SC=B Pb/FI=A P7/CMI3=SCC LtFI
E IS/FLAGS: i»l = A 22=A ?«=A 25=
»* PHLL/JD EMIS/FCIR A/S/Cl) t/F/UTS APPPI/tMIS FIS/FL/3
OOOOOOOSO A 1 00(10000 A
S t OOOOuOO A
*• II tot
** 02lul
000000080
KF Y=OM9600SiOOOOOOOinoO 121030U1 0202000000^90
si>L/cT=023 ASH/CT=oi2 HF.AT/CT=OOII>O CNKVDF = I sc/co=n
COMMtNl P7 C7/FL=A
»/J/F=0«
PULL/10 FMIS/FCIR A/3/CD t/H/UTS APPRI/fcM|S EIS/FL/23 *•
12602 000000000 2 • *«
?2t01 OOOOOQIOO 2 » «»
**
**
** 80047
8 KKJI3TKAITUN 02
LINE
PLANT N01 FOLLOWING G0| 1>EI. INfcS AS SF T l)0*N 12/14/79 nTLL Hb CITFU 3/1/KO
RET = 06 1960 OS 30000000 I 000 130000000000020210 |72
EIS «*
50
A
SOURCE tu KEY=06l960oS300oooonioi27lonooononofloouaons46
St'C/D1=80|13 USR/PT/ID=01 I SIC/U>=I 141 |PP/CO=?t lll^ KLAG3: 11=A 12rA 14 = A «/PULL=02
** PULL/10 tOP/CSI PHI/EUP SEC/tMP TMTL/bF E1US/F.ST E'^IS/MEAS ALIUW/EM1S UNCNTL/tMJS tM/UIS EST/Mf fS/MT tIS/FL/t3 *•
*» 42101 0000100 0£2 Oil 9flS uOOhlOll OOOOPOO 0000300 413 » «*
** II101 OOQ0100 02? 041 9HS IIOHOIOO OOOOPOO 0000300 M 3 3 A •»
Figure 6.3.3-a. EIS/PS Master File Formatted Dump
TJ
o
73
-\
00
n
i— c
CO
00
•a ~n
33 o
o w
O 3
co
m
o
— I O
-a c?
?o
T3 O
o c:
~
m
-o
o
f\3
ro
o
CO
•
CO
: 30 -o
•a m a>
o. —' 10
O> CD
c* Oi
n> (/> cn
fD
=»=
CU
ro
o
00
o
-------
tIS/PS HASIFK HLf FOHMATTH) DUMP PROGRAM - (HAGNMSTIC REPURI
PAGE
to
PROGRAM NAMfc: PHPOUMP (tPo?20)
REVISION LEVEL: l-no
LAST UPUATF #: P-l
HATE INCORPORATED: FEbRUAHY \, i9»o
PLANT (SEGMENI o) ueciiRO COUMT: 35
POINT SUIIHCE (SLRMfNT I) RECORD COUNT: 56
PUINT SUUrttL POLLUTAMI COUNI: ?60
«ACHINF PHUCESS fsFGMfcNi ^^ RECIIRD COUNT: 7s
MACHlttF PHUCESS PULLUIAfjT COUrtT: 3«1
PERMITS t wtoisjwAuriN (SLGMENT 3) HFCOKO COUNTi a
AVFRAGE NUHHEK UF PUIHT SUUKCES Ptc PLANTi . 1.7
AVERAGE NUMBFK UF PULLUTANTS PEK POINT SOURCE: I.A
AVKWAliF NUMbEK (IF MACHINE PrtOCESSES PtR POINT SIlUKCE: 1.3
AVEHAbE NUM8EH OF PULLUIANTS PER MACHINE PROCESS: fl.O
AVEKA6F NUM0FK UF PERMITS K RtGISTHATION SEGHENtS PtR POINT SIlUHCE: O.I
TOTAL NUMHFK OF RECORDS RtftU: i/?
of ERRORS oerECTtD: o
OF PAGES IN REPORT: si
Figure 6.3.3-b. Diagnostic Report
o
•ya
—l
oo
co
~>*
-o
co
• -n co
i o m
o ?o o
£3-1
yo 3> i—i
• —• o
: —i z
-o o
50
TJ O
p cr
; -a
-a
o
ro
ro
o
CO
•
CO
o.
Q)
ro
=«*
ro o>
—• ua
fo n>
o>
o>
CU
ro
• •
ro
o
00
o
-------
EIS/PS
REPORTS
SECTION 6.3.3
FORMATTED DUMP
PROGRAM PRPDUMP (EP0220)
Page 7
Release Date: 2/01/80
Update #: P-l
//* fPA|.MH/AO*7 HfM,F.PE tH, LLOYD M. ( V 1'*) M1-1
//*
//* PHriCFlHIHF. NA^t ! FPIJPMO
//* KtVISlMiM LFVFL! 1-'IO
//* I AS I IJPllAlh «• P-l
//*
//* TdlS HWilCtniiwh ALL(MS THF UoFK TM CFNhKATfc A F(NM'tTIHi Dlli"l>
//* THF FIS/PS MASTH' FILt
//*
//*
//F.PWPM30 PKMt P' 0 0
OOOIll /Oi)
0 0 0 (1 1 H 0 u
oooul voo
0(|00?(I(MI
000(1?
0000?<|0()
(MIOII7/00
000(1? HOD
00001100
0000 VOO
0000 < 300
000031400
ODOD34IUI
0000 WOO
OOOIllttOO
0000 'I (1 0 (I
it 0 0 i| U 1 0 0
10 "0/1 ')()
onoo'Jinu
it o (n
Oil ^0 'I /('il
ii i) no 'i HO ii
n ii fi o u v n o
OOOOM (Ml
Figure 6.3.3-c. Cataloged Procedure EPRPM30
550
-------
EIS/PS
REPORTS
SECTION 6.3.3
FORMATTED DUMP
PROGRAM PRPDUMP (EP0220)
Page 8
Release Date: 2/01/80
Update #: P-l
Parameter
Name
PROJECT
PROGRAM
REGIONI
TIME1
MSTRFIL
OUT
Default
Value
'CN.EPALMH.A087,
CDHS.HQ.PNT1
PRPDUMP
60K
'1,0'
EPMASTER
A
Description
Highest-level index of data set names
(e.g., CN.EPALMH.A087.CDHS.HQ.PNT.DATA.
EPMASTER would be the full data set name
of an EIS/PS master file)
Master file formatted dump program
Region size allocated for execution of
PRPDUMP (EP0220)
Time allocated for execution of PRPDUMP
(EP0220)
Lowest-level index of input EIS/PS master
file
SYSOUT class for all print files
Figure 6.3.3-d. Substitutable Parameters for EPRPM30
551
-------
EIS/PS
REPORTS
SECTION 6.3.4
EMF DETAILED REPORT
PROGRAM PRPEFAC (EP0230)
Page 1
Release Date: 2/01/80
Update #: P-l
6.3.4 EMISSION FACTOR FILE DETAILED REPORT PROGRAM - PRPEFAC (EP0230)
6.3.4.1 Description
PRPEFAC (EP0230) produces a detailed report of the EIS/PS emission factor
file and the EIS/PS emission factor description file. The report is printed
in ascending order by SCC number. The emission factor description record for
each SCC is printed first, followed by all of the emission factor file records
that contain a matching SCC number.
Each SCC group is further subdivided by ORIGIN/SOURCE combinations as
they appear in the emission factor file. Each group of emission factor file
records that contains the same ORIGIN/SOURCE combination is preceded by a
record containing a pollutant ID of zero. This record contains the ash. and
sulfur contents for the ORIGIN/SOURCE combination. Each record that is
subordinate to the zero pollutant record contains an ash/sulfur flag to
indicate which value, ash content or sulfur content, is used in computations,
an 'A' indicates ash, an 'S' indicates sulfur, and a blank indicates that
neither value is used.
Each ORIGIN/SOURCE combination can contain a maximum of seventeen
records; one record with a zero pollutant ID, followed by sixteen pollutant
records.
552
-------
E IS/PS
REPORTS
SECTION 6.3.4
EMF DETAILED REPORT
PROGRAM PRPEFAC (EP0230)
Page 2
Release Date: 2/01/80
Update #: P-l
6.3.4.2 File Formats
Input to the program consists of the EIS/PS emission factor file and the
EIS/PS emission factor description file. The control dates and generation
numbers from the file header records must match, or program execution will be
terminated. See Figure 4.2.5-a for a description of the emission factor file
and Figure 4.2.5-b for a description of the emission factor description file.
Output from the program is the detailed report containing emission factor
information in a formatted listing and diagnostic messages indicating input
record counts, pollutant counts by origin, and the number of pages in the
report. See Figure 6.3.4-a for a sample detailed report.
6.3.4.3 Options and Control Cards
There are no options or control cards.
6.3.4.4 Error Messages
PRPEFAC 001 ABORT - DESCRIPTION FILE NOT PRESENT
Meaning: There are no records in the emission factor description file.
Program execution was terminated.
Action: Insure that the proper file is being used and resubmit the job.
553
-------
EIS/PS
REPORTS
SECTION 6.3.4
EMF DETAILED REPORT
PROGRAM PRPEFAC (EP0230)
Page 3
Release Date: 2/01/80
Update #: P-l
PRPEFAC 002 ABORT - EMISSION FACTOR FILE NOT PRESENT
Meaning: There are no records in the emission factor file. Program
execution was terminated.
Action: Insure that the proper file is being used and resubmit the job.
PRPEFAC 003 ABORT - DESCRIPTION FILE HEADER RECORD NOT PRESENT
Meaning: The emission factor description file does not contain a header
record. Program execution was terminated.
Action: Insure that the proper file is being used and resubmit the job.
PRPEFAC 004 - EMISSION FACTOR FILE HEADER RECORD NOT PRESENT
Meaning: The emission factor file does not contain a header record.
Program execution was terminated.
Action: Insure that the proper file is being used and resubmit the job.
PRPEFAC 005 ABORT - CONTROL FIELDS ON HEADER RECORDS OF THE INPUT FILES DO NOT
MATCH
Meaning: The header records from the input files do not match;
therefore, it is possible that the files do not coincide.
Program execution was terminated.
Action: Supply the appropriate file names and resubmit the job.
6.3.4.5 Cataloged JCL - EPRPE10
6.3.4.5.1 JCL listing - PRPEFAC (EP0230) is executed by the cataloged
procedure EPRPE10. See Figure 6.3.4-b for a listing of this procedure.
554
-------
EIS/PS
REPORTS
SECTION 6.3.4
EMF DETAILED REPORT
PROGRAM PRPEFAC (EP0230)
Page 4
Release Date: 2/01/80
Update #: P-l
6.3.4.5.2 Cross-reference of DD names and files
Program Name:
DD Name
EPSDESC
EPSEMFC
EPSPRNT
PRPEFAC (EP0230)
File Description
EIS/PS emission factor
description file
EIS/PS emission factor file
Detailed report
Input/Output
Input
Input
Output
6.3.4.5.3 User-supplied JCL - The user must supply job accounting information
and the data set names of the emission factor description file and the
emission factor file. See Figure 6.3.4-c for a description of the procedure's
substitutable parameters.
6.3.4.5.4 Sample run stream -The following run stream would produce a
detailed report of an emission factor file and an emission factor description
file. The names of the input files are their respective default values.
// EXEC EPRPE10
6.3.4.6 Warnings and Special Instructions
The user must insure that the emission factor file and the emission
factor description file being used as input to PRPEFAC (EP0230) were created
by the same file maintenance run. The files must coincide, or program
execution will be terminated.
555
-------
EIS/PS
REPORT
SECTION 6.3.4
EMF DETAILED REPORT
PROGRAM PRPEFAC (EP0230)
Page 5
Release Date: 2/01/80
Update #: P-l
6.3.4.7 Cost Considerations
The estimates listed below are based on the execution of the run stream
in Section 6.3.4.5.4 on an IBM 370/168:
Emission factor file records read:
Emission factor description file records read:
CPU time:
I/O time:
Total time:
Estimated cost:
638 records
101 records
.66 seconds
1.18 seconds
1.84 seconds
$.26
6.3.4.8 Related Programs and Procedures
There are no related programs or procedures.
556 ,
-------
EIS/PS EMISSION F AC KIN FILF
LIST TUG PARE fi
ONUS 1000 GALLONS TRANSFERRED
FEHEHAL PULL in ooooo
PULL in moi
POLL in 112101
PULL in ogaoi
PULL in 12*0?
PAHTICULATE FACTOR
co F AC row
SO? FACT OR
NOX FA(. TUR
SCC aotiOQlOn DA IE BOOST CATl PE1ROLEON HAKKING LAI?
nATE 80057 CNIL BOOST
OATF ftOOST £«!•' 0.
OAlt 80057 tMF 0.
UA1E BOOST t^F 0,
OAIF BOOST F»*F 0.
CONIFNFS: ASHs , SULFURs
non
000
nun
000
1ANK CARS/ MUCKS CAT) NOT
CLASSU i£n CAIO SLf CUHMENI ••
ONUS IOUO GALLONS IRANSFF.KRE" 1
FtnERAL PULL in ooooo
PULL in mot
POLL 10 02101
PULL in 12*01
PULL 10 Q2f>o?
in
in
"^
HtADFR RECOHn CON1RUL FlF.Lng
PART 1CUI ATE FACTUR
CO FACTON
SO2 FACTUR
MIX FACTOR
EIS/PS
OAIF BOOST CNTL BOOST
OATF 00057 E*F 0.
DATE BOOST EMF 0.
IIAIE 80057 EMF 0.
OAIE 80057 l*f 0,
-._ I, HI\ lip Clli. 1 1 «* T tMl1
•m Cr*U »lr r ItC V.131 I r«l» •
CONTENIS: ASHa , SULFURs
000
ooo
000
non
j
1
i
I
F.NlSSlOM FACTUR FILE LISTINC. SUMMARY PAGE (
CONTROL (IATF IS H00f>2. PREVIOUS UAIF. IS BOOST. GENERATION
ntSCRIPTION FILE KFCORD RUUNTi
101
I
'i
NUMBER IS S
'
EMISSION FACTUR FILE RECORD COUNTS MB
Wl(M|jFK- UF SCf**> IN L.JST2
NuMbEN UF POLLUTANT FNTHIES IN
FEDERAL POLLUTANT ENTRIES:
STATE POLLUTANI ENTRIES:
LOtAL POLIUTANI £N|R|FS:
NU*dE* UF ErtRuRS OFTECtEOt
NUM»FR UF PAGES IN KFPORTI
IV**
LIST! 6J7
S5S
57
67
n
it
Figure 6.3.4-a.
Emission Factor Fil
e
Detailed Report
•yo
70
1
-o
70
-o
m
•n
o
^^
m
o
T\i
OJ
o
"*
f
Q>
^f
CO
=«fe
* »
•o
1
70 m
"o to
0 **v
— » co
Cn
m o>
-j to
n> n>
M cr\
rt
o
0)
ct-
ro
* •
o
•— »
00
o
-------
EIS/PS
REPORTS
SECTION 6.3.4
EMF DETAILED REPORT
PROGRAM PRPEFAC (EP0230)
Page 7
Release Date: 2/01/80
Update #: P-l
//* M'ALMH/rtF visiriM i F\/H. • i-oo
//* I ASI IJI>DA IF- »: IJ-I
//* DATk I'lCUWFMIHnltl': F-F/Ml'IIAWY 1,
//*
//* THIS PWlirhl'tJPF ALL'1.(
//* THF F IS/PS I- MSliluw FAi I OH MLF-
//*
//*
//FPPF'F 1 0 P«HC I'M I.IF C I = T.ri.tP«l Mil. AI1H / .t»HS.HIJ.PM F ' ,
i i!UF"H} ni-
f )=' t,D' ,
R=t pf VSF AC
:if'F !L = I-I>()F SCKI'
//*
//*
//HI
//
">- 1; id'!=it>n oni'ii ,
i ti->f = un>>. t )
DO i/SNAM-lsKt'F'it.ltCI ..I
VMi HMFs(PWI V»tt ,KF I AJM,
//
//*
//* IiMMilI OATA SF I - hlb/PS F-'(SS1(IN FAtl'IH
//*
//r^l?:^.•u!^^ DO i)SijA-">h:=R,p«i.i.JtCT..i>AiA.'4F"iFCF
// VULIIHI ' stP»l VAffc ,HF I A IN) ,
// I)1SP=(SHH,PASS)
//*
//* if«iF'iiT DATA :;F i - MS/PS F^IS^IDU KACTHW
//*
//l-PSDFSf I'D DSNAKFsKPPII.rLr I ..'Ml A.iDfcSCF II ,
VATH ,»f I A r"i) ,
IHM
//*
//* Hllll'lll DAI A SI I - rtFAlLFl' LI.iFINi; 1)1 FIS/P;i F-VJSSIliM
//• AMfl HI AI.'JIIS I 1C HFPMKl
//*
//I l'Sl'Ui','1 I'D
//*
//* UllFPIM DATA SKF:j - :SY.S1|..'
//*
^1 I'D ;;Y;>I
//SYSiili) in; :,YViul =. I'll .•jYjjililf soillll
//*
//•; fi'inirn-1 i>i> ,Y.ii'iil = \ii'i I
//*
F ILF-
000(11) Kill
0 00 00^0 'I
000 00 JO ')
i) i) 0 o 0 u " ij
0 oi.i
(ii)0u?'inn
oo»o?/oo
o o o o ? b o o
on no? von
<> o o ') * o o o
(I i) (III i 100
nonotjno
OOPO JHOl)
00005600
«ono won
ooo u
HOOD 'Mi oo
oooo/n oo
oooou
OI)Ol)/t/jOO
0000/1^00
IMlOO'KtOO
DOOl) 'I /"O
00 00 '1 ,1(10
n ii oil SHOO
(HI I' II1' I (Mi
Mil" n'tntl 'I
oonosroo
Figure 6.3.4-b. Cataloged Procedure EPRPE10
558 ,
-------
EIS/PS
REPORTS
SECTION 6.3.4
EMF DETAILED REPORT
PROGRAM PRPEFAC (EP0230)
Page 8
Release Date: 2/01/80
.Update #: P-l
Parameter
Name
PROJECT
PROGRAM
REGION1
TIME1
EMFCFIL
DESCFIL
OUT
Default
Value
'CN.EPALMH.A087.
CDHS.HQ.PNT1
PRPEFAC
100K
'1,0'
EPEMSFAC
EPDESCRP
A
Description
Highest-level index of data set names
(e.g., CN.EPALMH.A087.CDHS.HQ.PNT.DATA.
EPEMSFAC would be the full data set
name of the input emission factor file)
Emission factor file detailed report
program
Region size allocated for execution of
PRPEFAC
Time (minutes, seconds) allocated for
execution of PRPEFAC
Lowest-level index of input emission
factor file
Lowest-level index of input emission
factor description file
SYSOUT class for all print files
Figure 6.3.4-c. Substitutable Parameters for EPRPE10
559
-------
EIS/PS
REPORTS
SECTION 6.4
SUMMARY REPORTS
INTRODUCTION
Page 1
Release Date: 2/01/80
Update #: P-l
6.4. SUMMARY REPORT
6.4.1. INTRODUCTION
One summary report programs is available for the EIS/PS master file: the
master file emissions projection program, PRPEPRJ (EP0250).
PRPEPRJ (EP0250) calculates emissions-related information and produces a
projected master file containing that information. The calculations are based
on the projection information entered by control cards. Projections may be
made by SCC, by plant-point key, or to all records (for a fixed amount). In
addition to the master file, a report showing the emissions is produced. See
Figure 6.4.1-a for a flowchart of the master file emissions projection.
Sections 6.4.2 contain a detailed discussion of PRPEPRJ (EP0250).
The cataloged procedure EPRPM50, which is discussed in Section 6.4.2.5,
executes PRPEPRJ (EP0250).
560.
-------
EIS/PS
REPORTS
SECTION 6.4
SUMMARY REPORTS
INTRODUCTION
Page 2
Release Date: 2/01/80
Update #: P-l
EIS/PS MASTER FILE
PRPEPRJ (EP0250)-
MASTER FILE
EMISSIONS PROJECTION
PROGRAM
OPTION CARDS
I
DIAGNOSTIC
REPORT
/PROJECTED MASTER
I FILE
PROJECTION
REPORT
Figure 6.4.1-a. Master File Emissions Projection Flowchart
561
-------
EIS/PS
REPORTS
SECTION 6.4.2
PROJECTION PROGRAM
PRPEPRJ (EP0250)
Page 1
Release Date: 2/01/80
Update #: P-l
6.4.2 MASTER FILE EMISSIONS PROJECTION PROGRAM - PRPEPRJ (EP0250)
6.4.2.1 Description
The master file emissions projection program uses data from the EIS/PS
master file to calculate projected emissions for the current five criteria
pollutants: TSP, S02f NOX, HC, and CO. These projected emissions are output
in a projected emissions file, which has the same format as the EIS/PS master
file. The projected file can also be used as input to the program for further
projections.
The type of projection is dependent upon the control cards supplied by
the user. These control cards provide the user with three options. Option 1
enables the user to modify all the criteria pollutant emissions in the master
file by a fixed percentage increase or decrease. Option 2 enables the user to
modify the fuel process rate, ash and sulfur content, and control device
efficiency for specific SCC's. Option 3 enables the user to modify the
criteria pollutant emissions by a fixed percentage increase or decrease for
selected plant/point combinations.
When PRPEPRJ (EP0250) is executed, all segment 0, segment 1, and segment
2 records from the input master file are output to the projection file. The
segment 0 records are output unchanged. The projected value of the emissions
estimate is changed in any segment 1 record which meets the specifications set
forth in the control cards; otherwise, the emission is the same as that in the
input file. If the SCC option (option 2) has been specified, information from
the SCC control cards will replace the incoming information from the input
master file in the segment 1 and segment 2 records for the selected SCC's.
562
-------
EIS/PS
REPORTS
SECTION 6.4.2
PROJECTION PROGRAM
PRPEPRJ (EP0250)
Page 2
Release Date: 2/01/80
Update #: P-l
Whenever projected values are calculated for emissions, the uncontrolled
emissions (those emissions that would occur if their associated control device
efficiencies were zero) are calculated. The values for the uncontrolled
emissions are stored in the corresponding 'EMISSIONS-POTENTIAL' fields of the
output segment 1 records.
A segment 3 record is generated for each plant (segment 0) in which
emissions have been projected. If no emissions were changed for a plant, a
check is made on the segment 3 records. If a segment 3 record was produced by
an earlier run of the emissions projection program, it will be output;
otherwise, no segment 3 record will be written to the projection file for that
plant. The generated segment 3 record indicates which type of projection was
run. In addition, header records with keys containing all zeroes are output
to indicate that the file was created by the emissions projection program.
When the first option is specified, emissions for all points in all
plants in the input file are changed by the percentage specified on the type-1
control card. This percentage acts as an additive percentage change. For
example, an emissions change of 020 (20%) would increase an emission from 10
to 12, and an emissions change of -020 (-20%) would decrease an emission from
10 to 8.
The second option is SCC specific and, therefore, is more selective.
Actual values or percentage changes of the fuel process rate, ash and sulfur
content, and control device efficiency can be specified for selected SCC's.
Coding an actual value for a field excludes the possibility of coding a change
for that field. Also, to use a change field on the control card, one must not
code an actual value for that same element.
563
-------
EIS/PS
REPORTS
SECTION 6.4.2
PROJECTION PROGRAM
PRPEPRJ (EP0250)
Page 3
Release Date: 2/01/80
Update #: P-l
The SCC's from the master file associated with each point are checked
against those SCC's input on the control cards. If a match of SCC's occurs,
the point is selected for projection and the emissions will be calculated for
all criteria pollutants associated with that point. This procedure is then
repeated for all points subordinate to the plant and for all plants in the
input master file.
Once the point has been selected for projection, calculations are
performed on all specified SCC's related to that point regardless of the
estimation method. Therefore, it is possible that the calculated values may
differ greatly from the present values if the present estimation method is not
3. If any SCC/pollutant combination lacks all information needed to perform
the calculation, or if the final estimate is calculated to be zero, an error
message will be printed and the present emission will be output to the
projection file. If the control device efficiency is missing from the input
file record, a value of zero will be used and the calculation will be
performed.
Actual values coded for the fuel process rate, ash and sulfur content,
and control device efficiency replace the incoming values for the
corresponding segment 1 and segment 2 records. A change value coded for the
fuel process rate acts as an additive percentage change; thus, a fuel process
change of 010 (10%) would increase a fuel process rate from 20 to 22, and a
fuel process change of -010 (-10%) would decrease a fuel process rate from 20
to 18. The change values coded for ash content, sulfur content, and control
device efficiency are percentage values which are directly additive to the
existing percentage values for these fields; that is, if a 020 (2%) CDEF
increase was entered on the control card, it would increase a CDEF of 95% to
564 .
-------
EIS/PS
REPORTS
SECTION 6.4.3
PROJECTION PROGRAM
PRPEPRJ (EP0250)
Page 4
Release Date: 2/01/80
Update #: P-l
97%, and it would decrease the CDEF to 93% if a -020 was coded on the control
card. In no case is the resultant percentage allowed to be less than 0 for
these fields. The calculated values for ash content, sulfur content, and
control device efficiency must not be greater than 99.9, 9.99, and .999,
respectively. If any one of these values exceeds its maximum, that field will
be left unchanged and no calculations will be performed.
The third option allows fixed percentage changes to be calculated for
selected plant/point combinations. The criteria pollutant emissions for a
given plant can be modified without performing the calculations involving
emission factor, fuel process rate, ash content, sulfur content, and control
device efficiency. This can be useful for cleaning up points which had
problems in a previous emissions projection run where the SCC option was used.
The problems could have occurred due to insufficient data in the input file
record or to a size error problem (the estimated emission was too large or too
small to be contained in the field). The fixed percentage coded on the
control card is a percentage change ranging from -99% (decrease) to 999%
(increase). This value acts as an additive percentage change identical to
that for option 1. The point can also be shut down completely, in which case
the emissions estimates are changed to zero and no projected emissions are
calculated.
All three types of options allow for negative percentages to be used in
the calculations. A minus sign is punched immediately preceding the affected
field on the control card.
Only one type of control card can be entered in a single run. One type-1
(fixed change - all plants) control card can be entered. A maximum of 50
type-2 (SCC specific) control cards, each with a different SCC number, can be
entered. A maximum of 50 type-3 (plant/point) control cards, each with a
565
-------
EIS/PS
REPORTS
SECTION 6.4.2
PROJECTION PROGRAM
PRPEPRJ (EP0250)
Page 5
Release Date: 2/01/80
Update #: P-l
different plant/point combination, can be entered. The first card read
determines the type used; any cards of different types, or any cards in excess
of the maximum number allowed, will be ignored. Any duplicate SCC cards or
plant/point cards will be rejected.
A summary report is printed showing emissions by point for the current
five criteria pollutants. Both controlled and potential amounts are listed
for the present and projected emissions. The summary report has breaks on
plant, county, state, and AQCR. At each of these breaks totals are printed,
unless only one entry has occurred since the last break. If only one state
and AQCR occur in the master file, the totals printed at the end of the report
will be for the last county and then the entire file, since the emissions
totals will be the same for the state and AQCR. Total emissions for the
entire file are also printed.
6.4.2.2 File Formats
Input to PRPEPRJ (EP0250) consists of an EIS/PS master file (or a
projection file) and one or more control cards. The input master file must be
in proper master file sequence for the summary report to reflect the precise
present and projected emissions totals. See Figure 4.3.9-a for a description
of the EIS/PS master file format and Section 6.4.2.3 for a discussion of the
control cards and options.
Output from the program consists of an emissions projection file in
master file format, a diagnostic report, and a projected emissions summary
report. See Figure 4.3.9-a for the description of the EIS/PS master file
format since this is also the format of the emissions projection file.
566
-------
EIS/PS
REPORTS
SECTION 6.4.2
PROJECTION PROGRAM
PRPEPRJ (EP0250)
Page 6
Release Date: 2/01/80
Update #: P-l
The diagnostic report contains a listing of the option that was in effect
and of the control cards that were submitted. It also contains a list of any
errors that were detected during program execution, input and output record
counts by segment type, and a count of pollutant ID's relative to emission
estimation methods. See Figure 6.4.2-a for a sample diagnostic report.
The summary report shows present and projected emissions by point for the
current five criteria pollutants. See Figure 6.4.2-b for a sample summary
report.
6.4.2.3 Options and Control Cards
There are three types of control cards currently available for use with
the emissions projection program. A type-1 control card will cause projected
emissions to be calculated for the five criteria pollutants associated with
each point in every plant in the master file. These projected emissions are a
fixed percentage increase or decrease of the emissions presently in the input
master file. The user must cpde 'ALL1 in columns 1 through 3 of the control
card. If the projection is to be a fixed percentage decrease, a minus sign
must be coded in column 5; otherwise, the projection will be a fixed
percentage increase. The percentage of change is coded in columns 6 through 8
and can be any value from '000' to '899'; however, the value must not be
greater than '099' if the sign is negative. Finally, a '!' must be coded in
column 80 to indicate the card type. The type-1 control card is shown on page
1 of Figure 6,4.2-c.
Type-,2 control cards allow the user to modify the fuel process rate, ash
and sulfur content, and control device efficiency for selected SCC's.
Modifications can be made to these data fields by coding actual values or by
567
-------
EIS/PS
REPORTS
SECTION 6.4.2
PROJECTION PROGRAM
PRPEPRJ (EP0250)
Page 7
Release Date: 2/01/80
Update #: P-l
specifying change percentages on the control card. The SCC number must be
coded in columns 1 through 8 of the card. To replace the fuel process rate in
the corresponding input segment 2 record with a new value, code the value in
columns 10 through 16. To change the fuel process rate by a percentage, code
the percentage in columns 19 through 21. The format for this field contains
an implied decimal point with one digit to the left and two digits to the
right. Therefore, the user should include any necessary leading or trailing
zeroes, but should not code a decimal point. If the change is a decrease, a
minus sign must be coded in column 18.
To replace the ash content in the corresponding input segment 2 record
with a new value, code the value in columns 23 through 25 of the control card.
To change the ash content by adding a value, code the value in columns 28
through 30. If the change is a decrease, a minus sign must be coded in column
27. The formats for both the actual value field and the change field have
implied decimal points with two digits to the left and one digit to the right.
Therefore, the user should include any necessary leading or trailing zeroes,
but should not code a decimal point.
>.
To replace the sulfur content in the corresponding input segment 2 record
with a new value, code the value in columns 32 through 34 of the control card.-
To change the sulfur content by adding a value, code the value in columns 37
through 39. If the change is a decrease, code a minus sign in column 36. The
formats for both the actual value field and the change field have implied
decimal points with one digit to the left and two digits to the right.
Therefore, the user should include any necessary leading or trailing zeroes,
but should not code a decimal point.
568
-------
EIS/PS
REPORTS
SECTION 6.4.2
PROJECTION PROGRAM
PRPEPRJ (EP0250)
Page 8
Release Date: 2/01/80
Update #: P-l
To replace the control device efficiency in the corresponding input
segment 1 record with a new value, code the value in columns 41 through 43 of
the control card. To change the control device efficiency by adding a value,
code the value in columns 46 through 48. If the change is a decrease, code a
minus sign in column 45. The formats for both the actual value field and the
change field contain implied decimal points with all three digits to the
right. Therefore the user should include any necessary leading or trailing
zeroes, but should not code a decimal point. Since there is a control device
efficiency for each pollutant in a segment 1 record, the control device
efficiencies for all criteria pollutants in that record will be replaced by
the value on the control card. In the case where a change is indicated on the
control card, the control device efficiencies will be modified by that value.
Finally, a '2' must be coded in column 80 to indicate the card type. The
type-2 control card is shown on page 2 of Figure 6.4.2-c.
Type-3 control cards allow the user to change the emissions by a fixed
percentage increase or decrease for selected plant/point combinations. To
specify a selected plant/point combination, the user must code the state code
in columns 1 and 2, the county code in columns 3 through 6, the AQCR code in
columns 7 through 9, the plant code in columns 10 through 13, and the point
code in columns 14 and 15. The point identification used on the control card
is the NEDS point identification. The fixed percentage change is coded in
columns 18 through 20 and has the same value limits as the fixed percentage on
a type-1 control card. If the change is a decrease, a minus sign must be
coded in column 17. The user can shut down a point completely by coding 'OFF'
in columns 18 through 20. When this action is taken, the emissions estimates
for that point are changed to zero and no projected emissions are calculated.
A '3' must be coded in column 80 to indicate the card type.
569
-------
EIS/PS
REPORTS
SECTION 6.4.2
PROJECTION PROGRAM
PRPEPRJ (EP0250)
Page 9
Release Date: 2/01/80
Update*: P-l
See Figure 6.4.2-c for a description of the control card formats.
6.4.2.4 Error Messages
PRPEPRJ 001 ERROR - OPTION CARD INVALID, NOT USED IN PROJECTION
Meaning: The card is a type-2 card with a duplicate SCC number; the card
is a type-3 card, with a duplicate plant/point combination; or
an invalid field exists on the card.
Action: No action is necessary if the card is a duplicate control card.
If an invalid field exists on the card, correct the error and
resubmit the job. If the invalid field exists on a type-2 or
type-3 control card, the user may wish to resubmit the job
using the previous output projection file as the input file and
including only the corrected control card.
PRPEPRJ 002 ERROR - MORE THAN 50 OPTION CARDS, FIRST 50 USED
Meaning: More than 50 type-2 or type-3 cards were submitted in the run.
Since the maximum for either type is 50, all excess cards were
ignored.
Action: The user can submit the job again using the projected file as
input and including the control cards that were ignored in the
previous run.
PRPEPRJ 003 ABORT - NO OPTION CARD(S)
Meaning: No control cards were submitted with the run. Since the
program requires one type-1 card or at least one type-2 or
type-3 card, program execution was terminated.
Action: Resubmit the job including the appropriate control card(s).
570
-------
EIS/PS
REPORTS
SECTION 6.4.2
PROJECTION PROGRAM
PRPEPRJ (EP0250)
Page 10
Release Date: 2/01/80
Update #: P-l
PRPEPRJ 004 ABORT - INVALID TYPE FOR OPTION CARD
Meaning: The first control card is not a type-1, type-2, or type-3
control card. Program execution was terminated.
Action: Correct the error and resubmit the job.
PRPEPRJ 005 ABORT - INVALID FIXED INCREASE
Meaning: The fixed percentage specified on the type*! control card is
not numeric, or the fixed percentage is specified as a decrease
and the percentage value is greater than '100'.
Action: Correct the error and resubmit the job.
PRPEPRJ 006 ERROR - PROJECTION TOO LARGE, VALUE OF ZERO USED
Meaning: A projected emission value is too large to be contained in the
emission field of the output projection file.
Action: Correct the problem by using the projected file as input to a
second run and submitting a type-3 control record for the
plant/point combination in error. A second alternative is to
modify the original control card(s) and resubmit the job.
PRPEPRJ 007 CONDITIONAL - NOT ALL EMISSIONS CAN BE CALCULATED FOR THIS POINT,
PRESENT EMISSION USED
Meaning: Data necessary for calculating all the projected emissions was
not available, or a size error was detected.
Action: Insure that all data necessary for calculating the emissions
for that point is present. Also, check for error message 006,
which would indicate a size error problem. Correct the problem
and resubmit the job.
571
-------
EIS/PS
REPORTS
SECTION 6.4.2
PROJECTION PROGRAM
PRPEPRJ (EP0250)
Page 11
Release Date: 2/01/80
Update #: P-l
PRPEPRJ 008 ERROR - INVALID CHARACTER IN PLANT/POINT FIELDS, ZERO SUBSTITUTED
Meaning: An invalid character was detected during conversion of the
plant and point fields on a type-3 control card. Zero was
substituted for the invalid character in the converted fields.
Action: Insure that the proper plant and point codes are coded on the
control card and resubmit the job.
PRPEPRJ 009 CONDITIONAL - PROJECTED EMISSION FOR THIS POINT WAS ZERO, PRESENT
EMISSION USED
Meaning: A projected emission for the point was calculated to be zero.
The emission was not changed.
Action: Modify the control card associated with this point and resubmit
the job if necessary.
PRPEPRJ 010 ERROR - OPTION TYPE DOES NOT AGREE WITH TYPE USED FOR PROJECTION,
CARD REJECTED
Meaning: A card other than a type-2 control card was detected while
processing in the type-2 control card mode, or a card other
than a type-3 control card was detected while processing in the
type-3 control card mode.
Action: Insure that only one type of control card is used and resubmit
the job.
PRPEPRJ Oil ABORT - NO VALID OPTION CARDS
Meaning: All type-2 or type-3 control cards submitted in the run were
invalid.
Action: Correct the errors on each control card and resubmit the job.
572.
-------
EIS/PS
REPORTS
SECTION 6.4.2
PROJECTION PROGRAM
PRPEPRJ (EP0250)
Page 12
Release Date: 2/01/80
Update #: P-l
PRPEPRJ 012 CONDITIONAL - PROJECTED POTENTIAL TOO LARGE, ZERO SUBSTITUTED IN
OUTPUT FILE
Meaning: A projected potential emission is too large to be contained
in the potential emissions field of the output projection file.
Action: Correct the problem by using the projected file as input to a
second run and submitting a type-3 control record for the
pi ant/point combination in error. A second alternative is to
modify the original control card(s) and resubmit the job.
6.4.2.5 Cataloged JCL - EPRPM50
6.4.2.5.1 JCL listing - PRPEPRJ (EP0250) can be run by executing the
cataloged procedure EPRPM50. See Figure 6.4.2-d for a listing of this
procedure.
6.4.2.5.2 Cross-reference of DP names and files
Program Name: PRPEPRJ (EP0250)
DP Name
EPSMSTR
EPSOPTN
EPSPROJ
EPSDIAG
EPSPRNT
File Description
EIS/PS master file
Control card file
Emissions projection file
Diagnostic report
Summary report
Input/Output
Input
Input
Output
Output
Output
6.4.2.5.3 User-supplied JCL - To execute the-cataloged procedure EPRPM50, the
user must supply the data set names of the input master file and the output
projection file. Control cards must also be supplied. See Figure 6.4.2-e for
a description of the procedure's substitutable parameters.
573
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.4.2
PROJECTION PROGRAM
PRPEPRJ (EP0250)
Page 13
Release Date: 2/01/80
Update #: P-l
6.4.2.5.4 Sample run stream - The following run stream creates an emissions
projection file using a fixed percentage increase for all plants. The data
set names of the input master file and the projection file are their
respective default values.
// EXEC EPRPM50
//PROJCT.OPTION DD *
ALL 010 1
/*
The following run stream calculates emissions projections for specific
SCC's. It uses the emissions projection file from the first run stream as
input. The data set name of this file is 'CN.EPALMH.A087.CDHS.HQ.PNT.DATA.
EPPRJFIL1. The data set name of the output projection file is 'CN.EPALMH.
A087.CDHS.HQ.PNT.DATA.PROJFIL2'. The selected SCC's and the'ir changes ar$
as follows:
40300104 - a fuel process value of 8,800,150; an ash value of 01.0; a sulfur
value of 0.20; and a CDEF value of .950
40300202 - a fuel process change of -010%; an ash change of 02.0; a sulfur
change of -0.10; and a CDEF change of -03.0
40300203 - a fuel process change of 015%
10200602 - a fuel process value of 0,000,400
30600102 - a fuel process change of 050%
40300201 - a fuel process value of 9,800,000; an ash change of 01.0; a sulfur
change of 0.04; and a CDEF change of -05.0
574
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.4.2
PROJECTION PROGRAM
PRPEPRJ (EP0250)
Page 14
Release Date: 2/01/80
Update #: P-l
// EXEC EPRPM50,
// MSTRFIL=EPPRJFIL,
// PROJFIL=PROJFIL2
//PROJCT.OPTION DD *
40300104 8800150 010 020 950 2
40300202 -010 +020 -010 -030 2
4030203 015 2
10200602 0000400 2
30600102 +050 2
40300201 9800000 010 004 -050 2
/*
The user should note that a plus sign and a blank achieve the same
purpose.
The following run stream calculates emissions projections for selected
plant/point combinations. It uses the output projection file from the second
run stream as input. The data set name for the projection file output from
this run stream is 'CN.EPALMH.A087.CDHS.HQ.PNT.DATA.PROJFIL31. The selected
plant/point combinations are as follows:
Plant 3/Point 2 - increase of 015%
Plant 3/Point 25 - increase of 100%
Plant 4/Point 7 - decrease of 005%
Plant 4/Point 8 - increase of 050%
Plant 5/Point 1 - shut down completely
Plant 5/Point 5 - decrease of 010%
// EXEC EPRPM50,
// MSTRFIL=PROJFIL2,
575
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.4.2
PROJECTION PROGRAM
PRPEPRJ (EP0250)
Page 15
Release Date: 2/01/80
Update #: P-l
// PROJFIL=PROJFIL3
//PROJCT.OPTION DD *
054200024000302 +015 3
054200024000325 100 3
054200024000407 -005 3
054200024000408 050 3
054200024000501 OFF 3
054200024000505 -010 3
6.4.2.6 Warnings and Special Instructions
The user is warned that projected emissions are calculated regardless of
the type of estimation method. This may cause a considerable difference
between present and projected emissions if the type of estimation method is
not '3'.
6.4.2.7 Cost Considerations
The estimates listed below are based on the execution on an IBM 370/168
of the first run stream discussed in Section 6.4.2.5.4.
Input master file records: 162 records
Output projection file records: 186 records
Number of errors detected: 0 errors
CPU time: .85 seconds
I/O time: 1-63 seconds
Total time: 2.48 seconds
Estimated cost: $.35
576
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.4.2
PROJECTION PROGRAM
PRPEPRJ (EP0250)
Page 16
Release Date: 2/01/80
Update #: P-l
6.4.2.8 Related Programs and Procedures
The user may find it helpful to use a retrieval answer file as input to
the emissions projection program if projected emissions for the entire master
file are not needed. See Section 5.2, Retrieval for information on executing
a retrieval.
577
-------
01
»«J
00
o>
(£>
3
O
(A
to
TJ
O
"J
tIS/l'S MA3TER KILL
PROGRAM NAME: PRPEPRJ (EP035'))
REVISION LEVEL: 1-00
LAST UPDATE «! P-l
DATE INCORPORATED: FEBRUARY 1, 1980
I'HO.H.CflDN I'KUGHAM - DIAGNOSTIC KLI'OKF
PAf.t
-T, OPTION CARD
«j.
U3
C
1
5 IMC
ALL »oio
J7> OPTIO'I COUNT
•Ch
•
ro
i
o>
FIXED OPTION USED - ALL PLANTS
VALID opriuns
163
MPUT RCCOHI) COUNT:
SEGMENT 0: 38
SEGMENT l: SJ
SEGMENT a: 69
SEGMENT M H
O'JTPIIT HECtjnD COUNT: 186
SEGMENT OS 33
SEGMENT l: 54
SEGMENT as b1
SEGMENT S: 30
NUf'HER OF CONDITIONAL MESSAGES:
OF ERROR MESSAGES:
OF AQOH! ME33AGE3:
COUNT OF POLLUTANT IDS BY EST METHOD
METHOD
OPTIO'I TYPE
1
NUHUEH iJF POLLUTANT IDS
0
1
2
I
'1
5
6
7
OTHEH
36
9
6
143
ft
5
0
I'J
33
3:
>
1— <
T3
C
f—
>
— ^
1— 1
O
T3
X3
-o
m
-o
77
c_
m
-o
o
ro
en
o
c
•o
CL
Q)
<-!•
n>
=«=
• «
-a
H~*
o
D>
^
>
O
O
rn
CO
CO
1— 1
o
>
0
PROJECTION
•o
?0
o
£D
33
Release D
Ol
«— *•
CT
tt>
••
ro
o
i— '
CO
o
m
1—4
CO
-o
CO
SECTION 6.4
•
ro
"O
01
en
fD
t— '
~*4
-------
EIS/PS MA3TLH fILE LKISSIO'43 PROJECTION REPORT
FAtt
STATE COUIITV AOCK PL»NI POINT POLL-ID
Ob 1100 053 0001
06 1960 053 0001
TOTAL 00 I960 053 0001
06 1960 053 OO'Jl
CJ1
->J
VO
TOTAL 06
1960
19oO
053
053
0041
0041
TOTAL 06 196<1 053
TOTAL Oh 1960
Ob 20002
HC -43101
T3P-11101
CO -42101
302-42401
NOX-42«>02
HC -43101
T3P-11101
CO -42101
302-42401
NOX— 12602
IIC -13101
TSP-11101
CO -42101
302-42-101
rj(J<-42d02
MC -431')!
T3P-1U01
CO -I2ini
302-42401
UOX-I2&02
MC -43101
CUMHOLLF.U P
100
100
0
0
1/050
100
100
0
0
0
200
200
0
0
1,050
0
0
0
0
230
51
230
0
0
0
51
230
0
0
230
251
430
0
0
1,2HO
251
430
0
0
1,200
10Q
100
0
0
0
EMISSIONS
ILE
POTENTIAL
6,667
6,'»67
0
0
It,200
6,667
bthhl
0
0
0
13,$53
13,354
0
0
11,290
0
0
0
0
15,353
3,400
15,333
0
0
0
3,'100
15,353
0
0
15,333
16,734
28,667
0
0
26.623
16,734
2H.667
0
0
26,623
6,667
»i,667
II
0
0
- TONS PEN YEAH
'«
f
IL
1
1
I
1
r Tt n
I* • C.IJ
LID
110
110
0
0
,155
110
110
0
0
0
220
220
0
0
,155
0
0
0
0
253
56
253
0
0
0
56
253
0
0
253
276
473
0
0
,4oe
276
173
0
0
,406
110
110
i)
0
0
POTENTIAL
7,333
7,333
0
0
12,419
7,333
7,333
0
0
0
14,666
14,666
0
0
12,419
0
0
0
0
16,067
3,733
16,R67
0
0
0
3,733
16,H67
0
0
16,A67
18,399
31,533
0
0
29.2H6
18,399
31,533
0
0
29,286
7,333
7,333
0
0
0
Figure 6.4.2-b. Summary Report
o
o
m
CO
co
o
CO
CO
•o ~o co
yo 73 m
•ooo
rn c_i — i
•o m HH
» o o
O T3 •
r\s 30 ro
en o
o tn
C 73 T3
"o (D a>
O. —"• (O
o> ro ro
f+ Q>
(D to i—>
(0 CO
Cu
-o ro
i—"
ro
o
co
o
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.4.2
PROJECTION PROGRAM
PRPEPRJ (EP0250)
Page 19
Release Date: 2/01/80
Update #: P-l
Option 1 Control Card
CARD
COLUMN
_V
ALL +XXX
80
% Change
Constant - ALL
Option
Type
(Page 1 of 3)
Figure 6.4.2-c. Control Card Formats
580
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.4. 2
PROJECTION PROGRAM
PRPEPRJ (EP0250)
Page 20
Release Date: 2/01/80
Update #: P-l
Option 2 Control Card
CARD
COLUMN :
N
(
f XXXX)
\
0
t
OCXX XXX)
\
CXXX H
8
f
:X)
/
>
CX X)
SCC Thruput Thruput
"L
Change
Al
•
f3 :
f \
(X H
>7
i
:X)
Add1
Ash
*•
\
\
J2 '
f \
6
ex xxx +x>
tive
Change
h
Content
Su
Addi
V
CX X
tive
Sulfur %
Change
fur
1 -
15
XX 1XXX
Additive
...80
2
1
Option
Type
Control Device
Efficiency
Control
Content
Device
Efficiency
(Page 2 of 3)
Figure 6.4.2-c - continued. Control Card Formats
581
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.4.2
PROJECTION PROGRAM
PRPEPRJ (EP0250)
Page 21
Release Date: 2/01/80
Update #: P-l
Option 3 Control Card
CARD
COLUMN
13 7 10 14 17
vv v v y v
...80
V
SSCCCCAAAXXXXYY +XXX
% Change
— Point Id
-Plant Id
1 AQCR
— County
-State
Option
Type
(Page 3 of 3)
Figure 6.4.2-c - continued* Control Card Formats
582
-------
PS SECTION 6.4.2
ACCESSING AND PROJECTION PR
PULATION PRPEPRJ (EP02
XX* M1 AL^'IXAOM 7 Hf li|»f I'F I H, LI-'IYI) M. ( '/ I V ) '
//*
XX* PKIICHMll'f- NAMh j FPOI'Hsn
//* VlrVIHIfini LfyH. ; |-0(»
//* 1 AS) 'IPI'A IF H : P-l
//* PA ft IMCOKl'lU'Alt ": M.HMHAMY t, l'»l|0
XX*
XX* THIS PBiirFHuKF Al LflwS IMF IISFM Ml Rk"
XX* I-MIS.SIHMS I'HliJFcM'lu MASIfcK Fllh
//*
//*
Page 22
OGRAM Release Date: 2/01/80
50) Update #: P-l
i'H-Su^l ounooioii
oiinoo/fiMi
no OOP sou
OOOWO'HMI
on mi os oo
0 1) 0 '1 0 n 0 il
(1 u 0 II 0 / (i M
ItKAIH AN FIS/P.S OilOOOlOO
ililOllOVOO
OOO') 1 "00
00001 1 00
//CPCF-MSO Phiic. HWu.itr ir'CN.hi'ALMH. AOH;.CDMS.HU.PNT ' , mjooi^oo
// PWIin^AwirMMfJK'RJ,
// MSIKI- II =(• »'M«8TH*,
// HWyJf ll=tPHPJf il ,
// Ml- (.Ti|Nl = ) SOK ,
// II*iM = ' 1 , o ' .
// UNI 1 = t.iSP,
// .SHnY=lP,
// HUI=A
//*
//*
//f'ln) 1 MM)
on no t /i> 0
ODOU 1 H'>()
O»ni)l VIII)
O||OO?1 OU
(IIIOO?/1!)!)
0000? SOU
II 1.1 1) II ?>IMI
oooo Wnd
(lOO>)'4rtO(l
X/fPSMSIW Dll IJSNAMf'ruf'Hil.ltC 1 . .'lATa.^MS r«F 11 , ilOillHS'io
// VMI.Hi-lF SOJ'M VA ItrNF- 1 A 1 14 ) ,
// 1)1 ;>!'=( 3HM,f'A.sS)
//*
X/* I.JPllT DATA SM - IIPITMM CA''I)
//*
XXFPSilPI.il 1)1) DiiinA'^l-slll'l Till',
•x/ urn='iLhSi/i-=rtn
XX* rillTI'IH DAI A St I - 1 ill ; ;iSl UiuS Pi»'M,lt (. T l"-l
XX*
XXF.PSP'JU.I 1)0 It.illA «l snl'rfilJH.T. .DA 1 A.RMI'il.lh
XX ll'-"| IsKH-l T,
0 ,) 0 0 -1 0 0 I)
oii'iou I no
0000/1*' 00
oiioou 400
n u n 0 n a o o
Ou n II 'IS Ol)
on no 'io DO
viAHlK./ Fll t nJSUnHoi!
ounii'i-*oo
IL, ooiius.iiio
I'U'ldS 1 Oil
XX l/H|.ll*'t =fP MVAll ,1-F I « i I,.SM' =
-------
CIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.4.2
PROJECTION PROGRAM
PRPEPRJ (EP0250)
Page 23
Release Date: 2/01/80
Update #: P-l
//*
//r.
//*
//•
//*
minus/id
//*
//•HUIPIIT
//*
UM SYStilll =K,DUT
n/>TA SM - pHii.ihr i TU'I
DO sYsnni nun)!
OATfl SMS - sy.SlF> Ht'
r 1)1) .SYS'HJT=K,.IU|
//*
//s
//*
//S
//*
//S
//*
1HNS
nil .SY.SIIIII=XIMII
01) iiVSllllf=Kllllf
//*
//*
s1* no
0 I) (In/-, (I I) II
i) n mi A i no
Him of.
n o n n / (i n t>
OOIMI 7 1 mi
HOOD /.<
n o n o 7 u i) ii
noon 7sni>
Oil On /'ill i)
(Page 2 of 2)
Figure 6.4.2-d - continued. Cataloged Procedure LPRPM50
584
-------
EIS/PS
DATA ACCESSING AND
MANIPULATION
SECTION 6.4.2
PROJECTION PROGRAM
PRPEPRJ (EP0250)
Page 24
Release Date: 2/01/80
Update #: P-l
Parameter
Name
PROJECT
DISP
SPCUNIT
PRIMARY
SECNDRY
OUT
Default
Value
'CN.EPALMH.A087.
CDHS.HQ.PNT'
PROGRAM
MSTRFIL
PROJFIL
REGION1
TIME1
UNIT
SERIAL
PRPEPRJ
EPMASTER
EPPRJFIL
150K
'1,0'
3330
CDHSPK
1 NEW,CATLG,DELETE1
TRK
20
10
A
Description
Highest-level index of data set names (e.g.,
CN.EPALMH.A087.CDHS.HQ.PNT.DATA.EPMASTER
would be the full data set name of the
EIS/PS input master file)
Master file emissions projection program
Lowest-level index of input master file
Lowest-level index of output projection file
Region size allocated for execution of
PRPEPRJ
Maximum time limit allocated for execution
of PRPEPRJ
Device type to which output projection file
is to be written
Volume serial number of volume to which
output projection file is to be written
Disposition of output projection file
Units in which space for output projection
file is to be allocated
Primary space allocation for output
projection file
Secondary space allocation for output
projection file
SYSOUT class for all print files
Figure 6.4.2-e. Substitutable Parameters for EPRPM50
585
-------
EIS/PS
SECTION 6.5.1
INTRODUCTION
Page 1
Release Date: 2/01/80
Update #: P-l
6.5 QUICK LOOK REPORT
6.5.1 INTRODUCTION
The quick look programs enable the user to extract data and to format and
print reports from the EIS/PS master file. The programs are designed for
flexibility, easy submission, and quick turnaround of retrieval requests.
Three types of output are available:
Quick look report. In the quick look report, master file data elements
specified by the user are printed in user-specified format, The user may
specify the accumulation of totals for certain fields, the order of the
data in the report, and the generation of a page break upon a change in
certain fields. Up to three quick look report formats may be specified
in one execution of the quick look programs.
Turnaround document. In the turnaround document, data from selected
records are printed in EIS/PS transaction format with spaces separating
individual data fields. Space is also provided below the data for coding
changes to the data. Coded changes may then be keyed from the turnaround
document. Each master file record selected for inclusion in the
turnaround document will be printed on a separate page; thus it is
advisable to select a small number of records when a turnaround document
is being produced. Also, all data in each record selected is included in
the turnaround documents, even if the selection criteria includes
repeating (pollutant-dependent) fields.
If the turnaround document is distributed to sources for verification and
updating, include a detailed set of coding instructions and a sample set
of EIS/PS load sheets so that the headings and field content of the
586
-------
EIS/PS
SECTION 6.5.1
INTRODUCTION
Page 2
Release Date: 2/01/80
Update #: P-l
turnaround document are clear. Also, provide a clear set of keypunch
instructions for the person performing that task.
Answer file. The answer file has the same format as the EIS/PS master
file and can be used as input to any program that accepts the master file
for processing. The quick look programs are not designed to replace the
EIS/PS retrieval programs (the retrieval language processor and the
retrieval program); they do not have the extensive capabilities of the
n
retrieval programs. However, for simple retrievals, the quick look
programs can be used instead of the retrieval programs.
The contents of the answer file produced by the quick look programs will
depend upon which type of records are selected. If a plant segment (type
0 record) qualifies for selection, it will be included in the answer
file; but no subordinate records will be included (unless they
independently qualify for selection). If a point source segment (type 1
record) qualifies for selection, it will be accompanied by the plant
segment to which it is subordinate; but no subordinate records will be
included (unless they independently qualify for selection). If an SCC
segment (type 2 record) or a comment segment (type 3 record) qualifies
for selection, it will be accompanied by the plant segment and the point
source segment to which it is subordinate. If the selection criteria
for a point source segment or an SCC segment includes repeating
(pollutant-dependent) fields, the point source segment or SCCsegment in
the answer file will contain only the requested repeating section of the
master file records; that is, the repeating section that satisfies the
selection criteria. However, if the selection criteria for a point
source segment or SCC segment includes no repeating (pollutant-dependent)
fields, the entire point segment or-SGC segment will be included in the
answer file.
587
-------
EIS/PS
SECTION 6.5.1
INTRODUCTION
Page 3
Release Date: 2/01/80
Update #: P-l
This retreival technique differs from that employed by the EIS/PS
retrieval programs (refer to Section 5.2 of the EIS/PS Users Guide).
There are four quick look programs. Each of these is summarized below. A
flow diagram is shown in Figure 6.5.1-a.
Quick look edit program. PRTQLED (EP0260). The quick look edit program
reads retrieval specification cards prepared by the user., A diagnostic
report is generated that includes the retrieval specifications and
appropriate messages for any errors encountered. Two temporary files are
created that are subsequently read by the other quick look programs: an
extract control file and a report control file.
Quick look extract program, PRTQLEX (EP0270). The quick look extract
program processes the extract control file produced by the edit program.
Records are selected from the master file for processing based upon the
information in the extract control file. If an answer file is requested
by the user, the selected records are written to the output answer file.
If a turnaround document is requested by the user, the selected records
are included in a temporary file (the turnaround document file) that is
passed to the quick look turnaround document program. If a quick look
report is requested by the.user, the data to be printed in the report are
extracted from the selected records and included in a temporary file (the
quick look report file) that is passed to the quick look report program.
The quick look extract program also produces a diagnostic report
containing input/output statistics.
Quick look report program, PRPQUIK (EP0280). The quick look report
program is executed only if a quick look report is desired. It processes
588
-------
EIS/PS
SECTION 6.5.1
INTRODUCTION
Page 4
Release Date: 2/01/80
Update #: P-l
the report control file produced by the edit program and the quick look
report file produced by the extract program. It then prints the quick
look report(s).
Quick look turnaround document program, PRPTURN (EP0290). The quick look
turnaround document program is executed only if a turnaround document is
desired. It processes the report control file produced by the edit
program and the turnaround document file produced by the extract program.
It then prints the turnaround document.
589
-------
EIS/PS
REPORTS
SECTION 6.5.1
NTRODUCTION
Page 5
Release Date: 2/01/80
Update #: P-l
QUICK LOOK
RETRIEVAL SPECIFICATIONS
i
QUICK LOOK
EDIT PROGRAM
/REPORT CONTROL
( FILE
V (Temporary)
/ EXTRACT f
I CONTROL FILE)
V (Temporary) V
_L
DIAGNOSTIC
REPORT
/ EIS/PS
I MASTER FILE
QUICK LOOK
EXTRACT PROGRAM
:ISWER FILE
Iptional)
QUICK LOOK
FILE
(Temporary, Optional)'
f TURNAROUND
| DOCUMENT FILE
V (Temporary, Optional
©
©
(Page 1 of 2)
Figure 6.5.1-a. Flow Diagram of Quick Look Programs
590
-------
EIS/PS
REPORTS
SECTION 6.5.1
INTRODUCTION
Page 6
Release Date: 2/01/80
Update #: P-l
©
QUICK
LOOK REPORT PROGRAM
QUICK LOOK
REPORT
Optional step,
executed only if quick
look report is desired
©
QUICK
LOOK TURNAROUND
DOCUMENT PROGRAM
TURNAROUND
DOCUMENT
Optional step,
executed only if
turnaround document
is desired
(Page 2 of 2)
Figure 6.5.1-a - continued. Flow Diagram of Quick Look Programs
591
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 1
Release Date: 2/01/80
Update #: P-l
6.5.2 QUICK LOOK EDIT PROGRAM - PRTQLED (EP0260)
6.5.2.1 Introduction
PRTQLED (EP0260) processes user-supplied quick look retrieval
specification cards. Information from these cards determines the master file
record selection criteria which is passed to PRTQLEX (EP0270) in a temporary
file. The information also determines the type and format of the report
requested by the user. The report format information is passed in a temporary
file to PRPQUIK (EP0280) or PRPTURN (EP0290) depending upon the type of report
requested.
6.5.2.2 File Formats
Input to PRTQLED (EP0260) consists of user-supplied quick look retrieval
specification cards. See Section 6.5.2.3 for further discussion of these
cards.
Output form the program consists of an extract control file, a report
control file, and a diagnostic report. The extract control file is a
temporary file that is passed to the quick look extract program, PRTQLEX
(EP0270). It contains the information necessary for selecting records from
the master file.
The report control file is a temporary file that is passed to the quick
look report program PRPQUIK (EP0280) or to the quick look turnaround document
program, PRPTURN (EP0290), depending on the cataloged procedure that is
executed. This file contains information for the format of the quick look
report if a quick look report is requested, it also contains information for
the format of the turnaround document if a turnaround document is requested.
592
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 2
Release Date: 2/01/80
Update #: P-l
The diagnostic report contains information about selection criteria,
report format, sort sequence, and data elements included in the quick look
report. Also, error messages will be listed for any errors that are detected.
Refer to the quick look examples in Section 6.5.2.3 for figures that show
sample diagnostic reports.
6.5.2.3 Options and Control Cards
Quick look retrieval specification cards are prepared by the user to
specify the data to be selected from the master file and the type of output to
be produced. The format of the cards is shown in Figure 6.5.2-a. A
description of each field on the cards is provided in Figure 6.5.2-b. A quick
look coding form is provided in Figure 6.5.2-c. The coding form can be
reproduced locally and used in preparing quick look retrieval specification
cards.
Each set of retrieval specification cards must begin with a $$SELECT card
and end with a $$END card. The $$SELECT card signals the beginning of a quick
look retrieval and can contain a report heading for the quick look report or
the turnaround document. The $$END card signals the end of a quick look
retrieval.
Between the $$SELECT card and the $$END card, the following cards are
entered in order: from one to twenty 10 cards, a 20 card, a 30 card
(optional), a 40 card (optional, unless QL is specified on the 20 card), a 41
card (optional if a 40 card is entered, not allowed otherwise), and a 42 card
(optional if a 40 and a 41 card are entered, not allowed otherwise). The 10
card(s) specifies which records are to be selected from the EIS/PS master file
for processing. The 20 card specifies the desired report type and/or output
answer file. The 30 card specifies the order of the quick look report or
turnaround document and can be used to specify page break/subtotal!ing for
specific data elements. The 40, 41, and 42 cards specify the data fields to
593
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 3
Release Date: 2/01/80
Update #: P-l
be included in the quick look report, the suppression of detail lines, and the
totalling for specific data elements. A quick look report is generated for
each card. See Figure 6.5.2-b for a complete description of the data fields
for these cards.
The user must be especially careful in the preparation of 10 cards; not
only because the 10 cards determine which records from the master file will be
selected for processing, but also because they may affect the efficiency of
the quick look retrieval. Figure 6.4.2-d lists all the valid abbreviations
for data elements in the master file. Each 10 card consists of a relational
expression containing one of these data element abbreviations. For example,
10 CNTY E 0325
specifies that all segments (plant, point, SCC, and comment with county equal
to 0325 are to be selected for processing. The abbreviation CNTY is listed
under the heading 'Data Elements Common to All Segments' in Figure 6.5.2-d.
However, the abbreviation OCNT is listed for county under 'Plant Segment Data
Elements'. For example,
10 OCNT E 0325
specifies that all plant segment records with county equal to 0325 are to be
selected for processing; all other records are bypassed. If only plant
information is desired in the output(s) from the quick look retrieval, the
second 10 card would cause a more efficient retrieval than the first.
(Example 1 in this section demonstrates a retrievel where only plant
information is to appear in the output.)
594
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 4
Release Date: 2/01/80
Update #: P-l
Type 10 cards can be combined using the boolean operators AND and OR,
For example,
10 CNTY E 0325
10 PINT G 0009
10 PINT L 0021
AND
AND
specifies that all records with county equal to 0325 and plant ID greater than
0009 and less than 0021 (i.e., 0010 to 0020 inclusive) are to be selected for
processing.
If AND's and OR's are used in the same quick look retrieval, the AND's
are evaluated before the OR's. For example,
10 CNTY E 0325
10 PLNT E 0010
10 PLNT E 0015
AND
OR
specifies that all records with county equal to 0325 and plant ID equal to
0010 plus all records with plant ID equal to 0015 (regardless of county
number) are to be selected for processing.
Parentheses can be used to override the normal hierarchy of AND's and
OR's. For example,
10 CNTY E 0325
10 ( PLNT E 0010
10 PLNT E 0015
AND
OR
595
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 5
Release Date: 2/01/80
Update #: P-l
specifies that all records with county equal to 0325 and plant ID equal to
either 0010 or 0015 are to be selected for processing. When parentheses are
used in quick look retrievals, they cannot be nested. Also each left
parenthesis must have a paired right parenthesis.
The user must be careful not to code meaningless 10 cards (cards which
select no records for processing). The following 10 cards;
10 UTMZ P AND
10 UTMC P
would select no records from the master file since the selection process
incorporated into the quick look programs examines each record of the master
file independently. (Only one record at a time is evaluated against the
selection criteria. After it is evaluated, the next record is read and
evaluated, etc.) Since UTM zone (UMTZ) is a field in the plant segment record
and UTM coordinates (UTMC) is a field in the point source segment, no record
in the master file can contain both a UTM zone and UTM coordinates; therefore
no record is selected for processing.
When repeating (pollutant-dependent) data elements are included in the
selection criteria, the following restrictions apply: (1) the data
abbreviation for pollutant ID (POLL or MPID) must be specified on a 10 card
prior to any 10 card having the data abbreviation of a repeating field, (2)
the relational operator must be E on any 10 card with the data abbreviation
POLL or MPID, (3) the data abbreviations POLL and MPID can be used only once
on the set of 10 cards of any quick look retrieval. Thus, repeating
(pollutant-dependent) data can be selected from point source segments or SCC
segments for only one pollutant in a given quick look retrieval.
596
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 6
Release Date: 2/01/80
Update #: P-l
If repeating data elements are to appear in a quick look report, the 10
cards must specify the desired pollutant ID; only repeating data for the
specified pollutant will appear in the report. However, if a turnaround
document is being produced, all data from each selected record appear in the
turnaround document regardless of whether or not repeating fields are included
in the selection criteria. If an answer file is being produced and repeating
data elements are included in the selection criteria, the point source
segments or SCC segments will contain one repeating section: the one
satisfying the selection criteria. But if repeating data elements are not
included in the selection criteria, the point source or SCC segments in the
answer file will contain the same data as those in the corresponding segment
of the input master file.
The following examples demonstrate the use of all quick look retrieval
specification cards. Sample output is shown. All data used in these examples
are ficticious test data and do not reflect actual emissions data.
The examples include the JCL to run the quick look programs. The JCL in
each example invokes one of the three quick look cataloged procedures:
EPRTM40 executes the edit program and the extract program and can be used when
an answer file is being produced; EPRPM60 executes the edit program, the
extract program, and the report program and can be used when a quick look
report is being produced or when a quick look report and an answer file are
being produced; EPRPM70 executes the edit program, the extract program, and
the turnaround document program and can be used when a turnaround document is
being produced or when a turnaround document and an answer file are being
produced.
597
-------
E IS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 7
Release Date: 2/01/80
Update #: P-l
Example 1. A quick look report is generated listing the plant, name and
address, mailing address, contact, and telephone number of all plants in state
06. A title is to be placed on the report: 'TEST 1 - PLANTS IN STATE 06 AS
OF 4/1/80'. The master file from which the data is to be retrieved is
EPMSTR2.
The JCL to run this quick look retrieval and report is as follows:
// EXEC EPRPM60,
// MSTRFIL=EPMSTR2
//EDIT. INPUT DD *
$$SELECT TEST 1 - PLANTS IN STATE 06 AS OF 4/1/80
10 0STT E 06
20 QL
40 PLNT NAAD MAIL CONT TELE
$$END
/*
Notice that only plant information is being requested; therefore, 0(STT is
used on the 10 card instead of ,STTE in order to increase the efficiency of the
retrieval (i.e., only plant segment records are tested against the selection
criteria). The 20 card specifies a that quick look report is to be generated.
The 40 card lists abbreviations for data elements to be printed. The
abbreviations are entered left to right in the order that they are to be
printed in the report.
Figure 6.5.2-e shows the output from this quick look retrieval. It shows
the diagnostic report from the edit program, the diagnostic report from the
598
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 8
Release Date: 2/01/80
Update #: P-l
extract program, the update messages generated by the report program, and the
quick look report. The total number of quick look lines is also printed at
the end of the quick look report.
In Figure 6.5.2-e and following figures, a dashed line across the figure
denotes a page break in the computer printout.
Example 2. An answer file is to be produced that contains repeating
(pollutant-dependent) data for sulfur dioxide only (pollutant code of 42401).
Also, the answer file is to contain no comment segments. The data are
retrieved from master file EPMSTR2. The answer file is named QLANSR1.
The JCL to'run this quick look retrieval and produce the answer file is as
follows:
// EXEC-EPRTM40,
// MSTRFIL=EPMSTR2,
// ANSRFIL=QLANSR1
//EDIT.INPUT DD *
$$SELECT TEST 2 - PRODUCE AN ANSWER FILE WITH S02 DATA 4/1/80
10 POLL E 42401 OR
10 MPID E 42401
20 AF
$$END
/*
599
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 9
Release Date: 2/01/80
Update #: P-l
The title 'TEST 2 - PRODUCE AN ANSWER FILE WITH S02 DATA 4/1/80' on the
$$SELECT card will appear on the diagnostic report from the edit program. The
10 cards specify that a record will be selected for processing if it is a
point source record with a pollutant ID equal to 42401 or if it is an SCC
record with a pollutant ID equal to 42401. Since POLL is a repeating point
source data element abbreviation, each point source segment selected for
processing will be altered to contain repeating (pollutant-dependent) data for
only the appropriate pollutant ID, in this case only for sulfur dioxide.
Likewise, since MPID is a repeating SCC data element abbreviation, each SCC
segment selected for processing will be altered to contain repeating data for
only sulfur dioxide. When an answer file is produced by the quick look
programs, each selected segment is accompanied by the segment(s) to which it
is subordinate. Thus, the answer file produced will contain plant segments
for point segments and SCC segments containing sulfur dioxide data. No
comment segments will be in the answer file because comment segments are
subordinate to point source segments.
The answer file will be in the same order as the master file. This would
be the case even if a 30 card were entered because the 30 card only affects
the order of quick look reports and turnaround documents.
Figure 6.5.2-f shows the diagnostic reports produced by the edit and
extract programs and sample output from a list (produced by the master file
detailed report program, PRPMSTR (EP0210), of the answer file.
Example 3. A turnaround document is to be produced for all records for plant
0041, county 1960, state 06. The master file used is EPMSTR2.
The JCL to run this quick look retrieval and report is as follows:
600
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 10
Release Date: 2/01/80
Update #: P-l
// EXEC EPRPM70,
// MSTRFIL=EPMSTR2
$$SELECT TEST 3 - TURNAROUND DOCUMENT 4/1/80
10 STTE E 06 AND
10 CNTY E 1960 AND
10 PINT E 0041
20 TA
$$END
/*
Since STTE, CNTY, and PINT are data abbreviations associated with all
segments of the file (refer to Figure 6.5.2-d), all records with state equal
to 06, county equal to 1960, and plant equal to 0041 will be selected for
processing. The 20 card specifies that a turnaround document is to be
produced. In this example no 30 card is supplied to specify a user-defined
sort order in the report. Therefore, the sort sequence defaults to the sort
order of the master file. Figure 6.5.2-g shows the diagnostic reports
produced by the edit and extract programs and sample printout from the
turnaround document.
The turnaround document displays the data from the selected records in
card transaction format. Each field of data is printed below a listing of an
abbreviation for the data field and the card column numbers in which the data
would appear in a transaction. The card column numbers are printed
vertically; therefore,
ST CNTY
00 0000
12 3456
06 1960
601
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 11
Release Date: 2/01/80
Update #: P-l
indicates that the state code is 06 and is coded in card columns 01 and 02
while the county code is 1960 and is coded in card columns 03 through 06.
Note that the number of periods (...) indicates the allowable field width for
each data field. Space is left between the data and the periods below the
data so that handwritten changes can be entered. These changes should be
written carefully above each period.
The first 18 columns of each card (transaction) in a set is printed only
once at the upper left of the page. This information must be punched on all
transactions.
Example 4. A quick look report is to be generated listing estimated and
allowable emissions for hydrocarbons (pollutant code 43101) for all points of
all plants in county 0040. Only those points for which an estimated or
allowable emission is recorded in the master file are to be retrieved and
printed. In addition to the estimated and allowable emissions, the state
code, county code, plant ID, and NEDS point ID are to be printed. The report
is to be ordered by estimated emissions and allowable emissions. These two
fields are to be totalled. A title is to appear on the report: 'TEST 4
HYDROCARBON EMISSIONS FOR COUNTY 0040 AS OF 4/1/80'. The data are retrieved
from master file EPMSTR2.
The JCL to run this quick look retrieval and report is as follows:
// EXEC EPRPM60,
// MSTRFIL=EPMSTR2
//EDIT.INPUT DD *
$$SELECT TEST 4 - HYDROCARBON EMISSIONS FOR COUNTY 0040 AS OF 4/1/80
602
-------
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 12
Release Date: 2/01/80
Update #: P-l
10 1CNT E 0040 AND
10 POLL E 43101 AND
10 ( ESTI P OR
10 ALLO P )
20 QL
30 ESTI ALLO
40 STTE CNTY PLNT NPID ESTIX ALLOX
$$END
//
/*
The 10 cards specify the records to be selected for processing: all
point source records with county equal to 0040, pollutant code equal to 43101
and a value present for either estimated emissions or allowable emissions.
Only point source records will be tested against the selection criteria since
all data element abbreviations on the 10 cards are associated with point
source records (refer to Figure 6.5.2-d). POLL, ESTI, and ALLO are repeating
data element abbreviations, thus, POLL (pollutant ID) must be specified first
and must appear with a relational operator of E. Parentheses are used to
group the last two 10 cards together.
The 20 card specifies that a quick look report is to be produced;
therefore, the 40 card must be present. (41 and 42 cards may also be
present.) The 30 card specifies the order of data in the quick look report:
the primary sort order is by estimated emissions, the secondary sort order is
by allowable emissions, the tertiary sort order is the order of the master
file. (Note: Whenever a 30 card specifies a sort order for a quick look
report or turnaround document, the sort order subordinate to that sort order
will be the order of the master file). The 40 card lists the data elements to
be printed in the quick look report. The data element abbreviations STTE,
CNTY, and PLNT may be used instead of 1STT, 1CNT, and 1PLN without affecting
the efficiency of the quick look retrieval; only 10 card data element
603
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 13
Release Date: 2/01/80
Update #: P-l
abbreviations can affect the efficiency of quick look retrievals. Notice that
an X is coded after the abbreviations ESTI and ALLO on the 40 card. This
generates totals for estimated emissions and allowable emissions.
Figure 6.5.2-h shows the diagnostic report from the edit and extract
programs and a sample page from the quick look report.
Example 5. This example demonstrates the use of page break/subtotalling in
producing a quick look report. A quick look report is generated listing stack
data for all points of all plants in county 0040 of state 34. A page break is
desired when the plant changes. The report is ordered by plant ID and NEDS
point ID. A second quick look report is generated listing the boiler design
capacity for each point selected, along with the stack data and totalling the
boiler design capacity. The data are retrieved from master file EPMSTR2.
The JCL to run this quick look retrieval and report is as follows:
// EXEC EPRPM60,
// MSTRFIL=EPMSTR2
//EDIT.INPUT DD *
$$SELECT TEST 5 - STACK DATA FOR COUNTY 0040 IN STATE 34 AS OF 4/1/80
10 1STT E 34 AND
10 1CNT E 0040 [
20 QL
30 PLNTX NPID
40 PINT NPID HGHT DIAM TEMP FLOW VELO PLUM PWCS
41 PLNT NPID HGHT DIAM TEMP FLOW VELO PLUM PWCS BOILX
$$END
/*
604
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 14
Release Date: 2/01/80
Update #: P-l
The 10 cards specify that all point source segments with state equal to
34 and county equal to 0040 are to be selected for processing. The 20 card
specifies that a quick look report is to be generated. The 30 card specifies
the sort order of the quick look reports: the primary sort field is plant ID,
the secondary sort field is NEDS point ID, the tertiary sort field is the
master file key (i.e., within plant ID and NEDS point ID, the data will appear
in the order it occurs in the master file). The X following PLNT on the 30
card specifies that a page break is to be generated when plant ID changes.
The total number of records for the data field designated for page
break/subtotal ling is printed when the value of that designated field changes.
The 40 and 41 cards specifiy the data elements to be listed in the quick look
reports. The X following BOIL on the 41 card specifies that boiler design
capacity is to be totalled.
Figure 6.5.2-i shows the diagnostic report generated by the edit and
extract programs and sample pages from both quick look reports. Note that in
the second quick look report where totalling was requested, a subtotal appears
when a page break occurs. A grand total also appears at the end of the
report.
Example 6. This example shows how detailed lines can be suppressed when
totals are being generated. A quick look report is generated which contains
totals of estimated emissions for particulates for all plants in county 0040.
The detailed lines are suppressed in the report, therefore only total lines
are shown. For illustrative purposes, a second report is produced in which
the detailed lines are not suppressed.
When suppression of detailed lines is requested on a 40, 41, or 42 card,
a 30 card must be entered containing a page break/subtotal!ing request for at
least one data element. Moreover, the data elements for which page
break/subtotal!ing is requested on the 30 card must appear in the 40, 41, or
605
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 15
Release Date: 2/01/80
Update #: P-l
42 card in the order that they appear on the 30 card. Totalling must be
requested for at least one data element on the 40. 41. or 42 card. It is
recommended that each data element on the 40, 41, or 42 card be listed on the
30 card with a page break/subtotal ling request or be accompanied by a
totalling request on the 40, 41, or 42 card.
The JCL to run this quick look retrieval and report is as follows:
// EXEC EPRPM60,
// MSTRFIL=EPMSTR2
//EDIT. INPUT DD *
$$SELECT TEST 6 - TSP EMISSIONS FOR COUNTY 0040 AS OF 4/1/80
10 1CNT E 0040 AND
10 POLL E 11101
20 QL
30 STTE CNTYX PLNTX
40 X STTE CNTY PLNT ESTIX
41 STTE CNTY PLNT NPID ESTIX
$$END
/*
The $$SELECT card contains a title to appear on the quick look report:
'TEST 6-TSP EMISSIONS FOR COUNTY 0040 AS OF 4/1/80'. The 10 cards specify
that all point source records with particulate data be selected for
processing. Since all data to be included in the report is contained in the
point source segment, 1CNT is used instead of CNTY on the 10 card. This is
done so that only point source segments are tested against the selection
criteria; all other segments will be bypassed. The 20 card specifies that a
606
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 16
Release Date: 2/01/80
Update #: P-l
quick look report is to be generated. The 30 card specifies the sort order
and page break for the quick look report; the report is to be ordered by
state, county, and plant ID. Since data are selected for only one county,
specifying a sort by county appears unneeded. It is included only to generate
a total of estimated emissions for the entire county. (Totals are only
generated when a data element for which page break/subtotal!ing is requested
changes in value; the end of the master file is considered to represent a
change in all fields. Thus, when the end of the master file is encountered, a
total of estimated emissions will be generated for the county). The X
following 40 on the 40 card specifies that detail lines are to be suppressed.
The 40 card includes the data elements for which page break/subtotal ling was
requested on the 30 card, in the same order as they appeared on the 30 card.
The 40 card also specifies that estimated emissions are to be totalled. A 41
card is also included (for illustrative purposes) to produce a second report
showing the suppressed lines.
Figure 6.5.2-j shows the diagnostic report generated by the edit and
extract programs, the first quick look report, and a sample page from the
second quick look report. Note that when suppression is requested, a blank
line is generated (instead of a page break) when one of the data elements on
the 30 card changes in value.
Example 7. This example demonstrates how erroneous totals may be generated in
a quick look report. Erroneous totals are generated when data elements are
printed from a segment subordinate to the segment containing the totalled data
elements. (Point segments are subordinate to plant segments; SCC segments and
comment segments are subordinate to point segments.) In this example, property
area (from the plant segment) and boiler design capacity (from the point
source segment) are totalled while space heat (from the point source segment)
is printed.
607
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 17
Release Date: 2/01/80
Update #: P-l
The JCL to run this quick look retrieval and report is as follows
// EXEC EPRPM60,
// MSTRFIL=EPMSTR2,
// ANSRFIL=QLANSR2
//EDIT. INPUT DD *
$$SELECT TEST 7 - EXAMPLE OF TOTALS OPTION 4/1/80
10 STTE E 06
20 QL AF
40 STTE CNTY PLNT SI ID PROPX BOILX SPAC
41 STTE CNTY PLNT SI ID PROP BOILX SPAC
$$END
/*
The 10 card selects all records with state equal to 06. The 20 card
specifies that a quick Took report and an answer file are to be produced. The
40 card lists the data elements to be printed (state, county, plant, segment 1
ID, property area, boiler design capacity, and space heat percentage) and the
data elements to be totalled (property area and boiler design capacity) 'in the
first quick look report. The totals generated for property area in this
report will be erroneous since data elements from a subordinate segment
(boiler design capacity and space heat percentage) are printed. The 41 card
specifies data elements to be printed and data elements to be totalled in the
second quick look report. The second report is identical to the first except
that the property area is not totalled. The second quick look report will
contain only valid totals.
608
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 18
Release Date: 2/01/80
Update #: P-l
Figure 6.5.2-k shows the diagnostic reports from the edit and extract
programs, the two quick look reports, and sample output from a list (produced
by the master file detailed report program, PRPMSTR (EP0210), of the answer
file. Note that the property area for each plant is added once for each point
of the plant in the first quick look report.
6.5.2.4 Error Messages
QLE001 ERROR: NO $$SELECT CARD, RETRIEVAL REJECTED
Action: Enter the $$SELECT card as the first card of the quick look
retrieval specifications. Resubmit the job.
QLE002 ERROR:
Meaning:
Action:
QLE003 ERROR:
Meaning:
Action:
INVALID DATA ELEMENT ON 10 CARD, RETRIEVAL REJECTED
Columns six through nine of the 10 card contain an invalid data
element abbreviation.
Enter a valid data element abbreviation from Figure 6.5.2-d.
Resubmit the job.
REPEATING FIELD - DATA ELEMENT POLL REQUIRED ON PREVIOUS 10
CARD, RETRIEVAL REJECTED
A point source repeating data element abbreviation is entered
on a 10 card but POLL was not used as the data element
abbreviation on a preceding 10 card.
Restructure the 10 cards so that POLL occurs on a 10 card
before any use of a point source repeating data element on a 10
card. Resubmit the job.
609
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 19
Release Date: 2/01/80
Update #: P-l
QLE004 ERROR:
Meaning:
Action:
REPEATING FIELD - DATA ELEMENT MPID REQUIRED ON PREVIOUS 10
CARD, RETRIEVAL REJECTED
An SCC repeating data element abbreviation is entered on a 10
card, but MPID was not used as the data abbreviation on a
preceding 10 card.
Restructure the 10 cards so that MPID occurs on a 10 card
before any use of an SCC repeating data element on a 10 card.
Resubmit the job.
QLE005 ERROR:
Meaning:
Action:
MORE THAN TWENTY 10 CARDS, RETRIEVAL REJECTED
The retrieval specification cards contain over twenty 10 cards.
Restructure the 10 cards so that no more than twenty 10 cards
are entered. Resubmit the job.
QLE006 ERROR:
Meaning:
Action:
INVALID RELATIONAL OPERATOR, RETRIEVAL REJECTED
Column 10 of the 10 card contains an entry other than 'E1, 'U',
'G1, V, 'P1, or 'B'.
Correct the 10 card. Resubmit the job.
QLE007 ERROR:
Meaning:
Action:
RELATIONAL OPERATOR MUST BE E, RETRIEVAL REJECTED
When the data element abbreviation is 'POLL1 or 'MPID1, the
relational operator in column 10 must be 'E1.
Correct the 10 card. Resubmit the job.
QLE008 WARNING: VALUE SUPPLIED WITH P OR B, VALUE IGNORED
Meaning: When 'P1 or 'B' is used for the relational operator in column
10 of a 10 card, the value in columns 13 through 24 should be
blank. The value in columns 13 through 24 is ignored.
Action: No action is necessary if the retrieval generated by ignoring
the value is the desired retrieval. Otherwise, correct the
10 card and resubmit the job.
610
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 20
Release Date: 2/01/80
Update #: P-l
QLE009 ERROR:
Meaning;
Action;
VALUE TOO LONG, RETRIEVAL REJECTED
The value starting in column 13 of the 10 card is longer than
the data element represented by the data element abbreviation
in columns six through nine. The value should be equal in
length to the length of the data element in the master file
(refer to Figure 6.5.2-d).
Correct the 10 card. Resubmit the job.
QLE010 WARNING: VALUE SHORTER THAN FIELD
Meaning: The value starting in column 13 of the 10 card is shorter than
the data element represented by the data element abbreviation
in columns six through nine. The value should be equal in
length to the length of the data element in the master file
(refer to Figure 6.5.2-d) unless the length of the data element
in the master file exceeds 12. For data elements longer than
12 characters, the 12 characters provided on the 10 card in
columns 13 through 24 are compared to the first 12 characters
of the field in the master file.
Action: If the data element in the master file is longer than 12
characters, no action is necessary. Otherwise, correct the
10 card and resubmit the job.
QLE011 ERROR:
Meaning:
Action:
QLE012 ERROR:
Meaning:
Action:
UNMATCHED PARENTHESES, RETRIEVAL REJECTED
In the 10 cards, each left parenthesis is not paired with a
right parenthesis or vice versa.
Correct the 10 cards. Resubmit the job.
NESTED PARENTHESES, RETRIEVAL REJECTED
Nested parentheses were encountered in the 10 cards,
• :* A
parentheses are not allowed.
Correct the 10 cards. Resubmit the job.
Nested
611
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 21
Release Date: 2/01/80
Update #: P-l
QLE013 ERROR: INVALID LEFT PARENTHESIS, RETRIEVAL REJECTED
Meaning: Column four of the 10 card contains a character other than '('
Action: Correct the 10 card. Resubmit the job.
QLE014 ERROR: INVALID RIGHT PARENTHESIS, RETRIEVAL REJECTED
Meaning: Column 26 of the 10 card contains a character other than ')'.
Action: Correct the 10 card. Resubmit the job.
QLE015 ERROR:
Meaning:
Action:
INVALID AND/OR CODE RETRIEVAL REJECTED
Columns 28 through 30 of the 10 card contains an entry other
than 'AND1 or 'OR '.
Correct the 10 card. Resubmit the job.
QLE016 ERROR: AND/OR.ON LAST 10 CARD, RETRIEVAL REJECTED
Meaning: Columns 28 through 30 of the last 10 card should be blank.
Action: Correct the 10 card. Resubmit the job.
QLE017 WARNING: AND/OR MISSING, AND ASSUMED
Meaning: A 10 card other than the last 10 card has no entry in columns
28 through 30. It is assumed that columns 28 through 30 of
this card contain 'AND1.
Action: No action is required if the retrieval generated is the
desired retrieval. Otherwise, correct the 10 card and
resubmit the job.
QLE018 WARNING: INVALID REPORT CODE ON 20 CARD
Meaning: Columns four through five or columns seven through eight of
the 20 card contain an entry other than 'QL', 'TA1, or 'AF'.
The invalid code is ignored.
Action: No action is required if the desired output is produced.
Otherwise, correct the 20 card and resubmit the job.
612
-------
EIS/PS
REPORTS
QLE019 ERROR:
Meaning:
Action:
QLE020 ERROR:
Meaning:
Action:
QLE021 ERROR:
Meaning:
Action:
QLE022 ERROR:
Meaning:
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 22
Release Date: 2/01/80
Update #: P-l
Action:
QUICK LOOK REPORT AND TURN-AROUND DOCUMENT REQUESTED,
TURN-AROUND DOCUMENT DELETED
The 20 card requests both a quick look report and a turnaround
document. The turnaround document request is ignored.
No action is required if the desired output is produced.
Otherwise, correct the 20 card and resubmit the job.
DATA ELEMENT XXXX INVALID ON 30 CARD, RETRIEVAL REJECTED
The invalid data element abbreviation XXXX was encountered on
the 30 card.
Enter only valid data element abbreviations from Figure 6.5.2-d
on the 30 card. Resubmit the job.
SORT DATA ELEMENTS TOTAL MORE THAN 40 CHARACTERS, MASTER
FILE ORDER USED
The sum of the lengths (in the master file) of the data
elements entered on the 30 -card exceeds 40.
No action is required if the quick look report or turnaround
document produced is acceptable. Otherwise, alter the 30 card
so that the sum of the lengths of the data elements does not
exceed 40, and resubmit the job.
DATA ELEMENT XXXX INVALID ON 40, 41, OR 42 CARD; REPORT DELETED
The invalid data element abbreviation XXXX was encountered on
the 40, 41, or 42 card. The quick look report requested by
this card was deleted but other quick look reports (if
correctly requested) were produced.
Enter only valid data element abbreviations from Figure 6.5.2-d
on the 40, 41, or 42 card. Resubmit the job.
613
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 23
Release Date: 2/01/80
Update #: P-l
QLE023 WARNING: DATA ELEMENT XXXX UNSUITABLE FOR SUMMATION
Meaning: A totalling request was entered on the 40, 41, or 42 card for
data element XXXX. Summation of XXXX is inappropriate and is
not allowed. The quick look report was generated without
totals for XXXX.
Action: No action is required.
QLE024 ERROR;
Meaning:
Action:
QLE025 ERROR;
Meaning:
Action:
QLE026 ERROR:
Meaning:
Action:
QUICK LOOK LINE LONGER THAN 132, REPORT DELETED
The total of the lengths of the data elements specified on the
40, 41, or 42 card for the quick look report exceeds 132. The
quick look report requested by this card was deleted but other
quick look reports (if correctly requested) were produced.
Request fewer data elements in the quick look report. One
possible solution is to break the requested quick look report
into two quick look reports.
REQUEST FOR QUICK LOOK REPORT BUT NO 40 CARD,.REPORT DELETED
The 20 card contains 'QL', which requests a quick look report;
however, no 40 card was found. Thus, no quick look report was
generated. When a quick look report is requested, a 40 card
must be entered (41 and 42 cards may also be entered). This
message may also be generated if cards are not entered in the
correct order.
No action is necessary if no quick look report is desired.
Otherwise, enter a 40 card and resubmit the job.
40 CARD BUT NO REQUEST FOR QUICK LOOK REPORT, 40 CARD IGNORED
A 40 card was encountered but the 20 card did not contain 'QL'
to request a quick look report. The 40 card is ignored.
No action is required if no quick look report is desired.
Otherwise, correct the 20 card and resubmit the job.
614
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 24
Release Date: 2/01/80
Update #: P-l
QLE027 WARNING: NO $$END CARD
Meaning: No $$END card was encountered. The quick look retrieval was
executed.
Action: No action is required. However, this error message may be
avoided by entering a $$END card at the end of the quick look
retrieval specifications.
QLE028 ERROR:
Meaning:
Action:
QLE029 ERROR:
Meaning:
QLE030 ERROR:
Meaning:
REPEATING FIELD - DATA ELEMENT POLL REQUIRED ON 10 CARD, REPORT
DELETED
A point source repeating data element abbreviation was entered
on a 40, 41, or 42 card. When this is done, POLL must be
specified on a 10 card to specify which repeating section of
the point source segment is desired.
Correct the 10 cards or delete the repeating data element
abbreviation(s) from the 40, 41, or 42 card.
REPEATING FIELD - DATA ELEMENT MPID REQUIRED ON 10 CARD, REPORT
DELETED
An SCC repeating data element abbreviation was entered on a 40,
41, or 42 card. When this is done, MPID must be specified on a
10 card to specify which repeating section of the SCC segment
is desired.
Action: Correct the 10 cards or delete the repeating data element
abbreviation(s) from the 40, 41, or 42 card.
PAGE BREAK/SUBTOTALLING MUST BE SPECIFIED WHEN SUPPRESSION IS
REQUESTED, REPORT DELETED
A 40, 41, or 42 card requests suppression. When this is done,
page break/subtotal ling must be requested for at least one data
element on the 30 card. The quick look report requested by
615
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 25
Release Date: 2/01/80
Update #: P-l
this 40, 41, or 42 card was deleted, but other quick look
reports (if correctly requested) were produced.
Action: Remove the suppression request from the 40, 41, or 42 card or
enter page break/subtotal ling requests on the 30 card.
Resubmit the job.
QLE031 ERROR:
Meaning:
Action:
QLE032 ERROR:
Meaning:
TOTALLING MUST BE SPECIFIED WHEN SUPPRESSION IS REQUESTED,
REPORT DELETED
A 40, 41, or 42 card requests suppression but does not request
totalling. When suppression is requested, totalling must be
requested for at least one data element. The quick look report
requested by this 40, 41, or 42 card was deleted, but other
quick look reports (if correctly requested) were produced.
Correct the 40, 41, or 42 card. Resubmit the job.
REPORT REQUEST INCOMPATIBLE WITH PAGE BREAK REQUEST, REPORT
DELETED
A 40, 41, or 42 card is not compatible with the 30 card. Two
situations could cause this: the data elements for which page
break/subtotal ling is requested on the 30 card do not appear on
the 40, 41, or 42 card in the same order as they appear on the
30 card; or a totalling request is entered on the 40, 41, or 42
card for a data element which is entered on the 30 card with a
page break/subtotal ling request. The quick look report
requested by this 40, 41, or 42 card was deleted, but other
quick look reports (if correctly requested) were produced.
Action: Correct the 30 card or the 40, 41, or 42 card. Resubmit the
job.
616
-------
EIS/PS
REPORTS
QLE033 ERROR:
Meaning:
Action:
QLE034 ERROR:
Meaning:
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 26
Release Date: 2/01/80
Update #: P-l
Action:
QLE035 ERROR:
Meaning:
Action:
QLE036 ERROR:
Meaning:
Action:
QLE037 ERROR:
Meaning:
INVALID CARD TYPE, RETRIEVAL REJECTED
An invalid card type was encountered, or the quick look
retrieval specification cards were entered in the wrong order.
Correct the card or reorder the cards. Resubmit the job.
NO QUICK LOOK CONTROL CARDS, RETRIEVAL REJECTED
No quick look specification cards ($$SELECT through $$END) were
found in the job stream. If quick look specification cards
were in the job stream, they were probably entered in such a
way that they were not associated with the data set for quick
look specification cards.
Enter quick look specification cards or correct the
job stream. Resubmit the job.
NO 10 CARD, RETRIEVAL REJECTED
No 10 card(s) were entered, or the 10 card(s) do not
immediately follow the $$SELECT card.
Enter 10 card(s) or reorder the cards. Resubmit the job.
NO 20 CARD, RETRIEVAL REJECTED
No 20 card was entered, or the 20 card does not immediately
follow the 10 card(s).
Enter a 20 card or reorder the cards. Resubmit the job.
DATA ELEMENTS NOT ENTERED LEFT TO RIGHT ON 30 CARD, RETRIEVAL
REJECTED
The data element abbreviations on the 30 card were not entered
left to right (starting in columns 4, 10, 16, 22, 28, and 34).
617
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 27
Release Date: 2/01/80
Update #: P-l
Action: Correct the 30 card. Resubmit the job.
QLE038 ERROR:
Meaning:
Action:
DATA ELEMENTS NOT ENTERED LEFT TO RIGHT ON 40, 41, OR 42 CARD;
REPORT DELETED
The data element abbreviations on the 40, 41, or 42 card were
not entered left to right (starting in columns 6, 12, 18, 24,
30, 36, 42, 48, 54, and 60). The quick look report requested
by this 40, 41, or 42 card was deleted, but other quick look
reports (if correctly requested) were produced.
Correct the 40, 41, or 42 card. Resubmit the job.
6.5.2.5 Cataloged JCL
PRTQLED (EP0260) can be executed by any one of the cataloged procedures
EPRTM40, EPRPM60, or EPRPM70. Each of these procedures is a multi-program
procedure; therefore, the user should be careful to select the procedure which
will produce the desired results. The procedure EPRTM40 should be used when
an answer file is the only desired result. See Section 6.5.3.5 for a further
discussion of this procedure.
The procedure EPRPM60 must be used when a quick look report is desired.
An answer file is optional in this procedure. See Section 6.5.4.5 for a
further discussion of EPRPM60.
The procedure EPRPM70 must be used when a turnaround document is desired.
An answer file is optional in this procedure. See Section 6.5.5.5 for a
further discussion of EPRPM70.
618
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 28
Release Date: 2/01/80
Update #: P-l
6.5.2.6 Warnings and Special Instructions
The user should exercise extreme care in coding quick look retrieval
specification cards. A meaningless report or answer file can be generated by
inappropriate specification cards. Also, report titles should be carefully
chosen so that reports will be clearly identified. It is also recommended
that these report titles contain a date for future reference.
6.5.2.7 Cost Considerations
The following estimates are for the execution of PRTQLED (EP0260) on an
IBM 370/168:
Number of quick look control cards:
CPU time:
I/O time:
Total time:
7 cards
0.25 seconds
0.49 seconds
0.74 seconds
Estimated cost:
$0.14
6.5.2.8 Related Programs and Procedures
The procedure EPRTM40 executes PRTQLED (EP0260) and PRTQLEX (EP0270).
The procedure EPRPM60 executes PRTQLED (EP0260), PRTQLEX (EP0270), and PRPQUIK
(EP0280). The procedure EPRPM70 executes PRTQLED (EP0260), PRTQLEX (EP0270),
and PRPTURN (EP0290). The user should select the procedure that will produce
the desired results.
619
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 29
Release Date: 2/01/80
Update #: P-l
$$SELECT Card
Columns
1 -
10
73
8
9
72
80
Format
X - X
X - X
10 Card (Selection Criteria)
Columns
Format
1
6
13
28
31
- 2
3
4
5
- 9
10
11
12
- 24
25
26
27
- 30
- 80
XX
X
XXXX
X
X - X
X
XXX
Symbol
Alphanumeric
Alphanumeric
Symbol
Numeric
Special Character
Alphanumeric
Special Character
Alphanumeric
Special Character
Special Characters
Description
'$$SELECT'
Unused
Report Title
Unused
Description
'10'
Unused
Left Parenthesis
Unused
Data Abbreviation
Unused
Relational Operator
Unused
Test Value
Unused
Right Parenthesis
Unused
Boolean Operator
Unused
(Page 1 of 5)
Figure 6.5.2-a. Format of Quick Look Retrieval Specification Cards
620
-------
E IS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 30
Release Date: 2/01/80
Update #: P-l
20 Card (Output Specifications)
Columns Format
1-2 XX
3
4-5 XX
6
7-8 XX
9-80
Symbol
Numeric
Special Characters
Special Characters
Description
'20'
Unused
Report Code
Unused
Report Code
Unused
30 Card (Report Order, Page Break/Subtotalling Specifications)
Columns Format
1-2 XX
3
4-7 XXXX
8 X
9
10 - 13 XXXX
14 X
15
16 - 19 XXXX
Symbol
Numeric
Alphanumeric
Special Character
Alphanumeric
Special Character
Alphanumeric
Description
'30'
Unused
Data Abbreviation
Page Break/
Subtotal! ing Request
Unused
Data Abbreviation
Page Break/
Subtotal! ing Request
Unused
Data Abbreviation
(Page 2 of 5)
Figure 6.5.2-a - continued. Format of Quick Look Retrieval Specification Cards
621
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 31
Release Date: 2/01/80
Update *: P-l
30 Card - continued
Columns
20
22 -
28 -
34 -
21
25
26
27
31
32
33
37
38
Format
XXXX
X
XXXX
X
XXXX
X
Symbol
Special Character
Alphanumeric
Special Character
Alphanumeric
Special Character
Alphanumeric
Special Character
39 - 80
Description
Page Break/
Subtotal ling Request
Unused
Data Abbreviation
Page Break/
Subtotal ling Request
Unused
Data Abbreviation
Page Break/
Subtotal ling Request
Unused
Data Abbreviation
Page Break/
Subtotal ling Request
Unused
(Page 3 of 5)
Figure 6.5.2-a - continued. Format of Quick Look Retrieval Specification Cards
622
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 32
Release Date: 2/01/80
Update #: P-l
40. 41, 42 Cards (Quick Look Report Formats for One, Two, or Three Reports)
Columns
1
•!
6
12
18
24
30
36
- 2
3
4
vf»' 5
- 9
10
11
- 15
16
17
- 21
22
23
- 27
28
29
- 33
34
35
- 39
Format
XX
X
XXXX
X
XXXX
X
XXXX
X
XXXX
X
XXXX
X
XXXX
Symbol
Numeric
Special Character
Alphanumeric
Special Character
Alphanumeric
Special Character
Alphanumeric
Special Character
Alphanumeric
Special Character
Alphanumeric
Special Character
Alphanumeric
Description
'40', '41', or '42'
Unused
Suppression Request
Unused
Data Abbreviation
Totalling Request
Unused
Data Abbreviation
Totalling Request
Unused
Data Abbreviation
Totalling Request
Unused
Data Abbreviation
Totalling Request
Unused
Data Abbreviation
Totalling Request
Unused
Data Abbreviation
(Page 4 of 5)
Figure 6.5.2-a - continued. Format of Quick Look Retrieval Specification Cards
623
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 33
Release Date: 2/01/80
Update #: P-l
40, 41. 42 Cards - continued
Columns
42 -
48 -
54 -
60 -
65 -
40
41
45
46
47
51
52
53
57
58
59
63
64
80
$$END Card
Columns
1 - 5
6 - 80
Format
XXXX
X
XXXX
X
XXXX
X
XXXX
X
Symbol
Special Character
Alphanumeric
Special Character
Alphanumeric
Special Character
Alphanumeric
Special Character
Alphanumeric
Special Character
Format Symbol
XXXXX Special Characters
Description
Totalling Request
Unused
Data Abbreviation
Totalling Request
Unused
Data Abbreviation
Totalling Request
Unused
Data Abbreviation
Totalling Request
Unused
Data Abbreviation
Totalling Request
Unused
Description
•$$END'
Unused
(Page 5 of 5)
Figure 6.5.2-a - continued. Format of Quick Look Retrieval Specification Cards
624 -.
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 34
Release Date: 2/01/80
Update |: P-l
|$SELECT Card: This card is required and signals the beginning of the quick
look specification cards.
1. '$$SELECT': Required.
2. Report Title: Enter a title to appear on the quick look report or reports
(see 40, 41 and 42 cards) or on the turnaround document. The title will
also appear on the diagnostic report produced by the quick look edit
program. The title should be chosen carefully because it is the only
means of identifying a report which has been separated from the run
stream. A date may be included in the title to date the reports.
10 Card: One 10 card is required, up to twenty 10 cards are allowed to
specify the selection criteria.
1. '10': Required.
2. Left Parenthesis: Enter '(' if this 10 card is the first of a number of
10 cards to be grouped together.
3. Data Abbreviation: Enter one of the valid abbreviations for data fields
on the master file. The valid abbreviations are shown in Figure 6.5.2-d.
The data field specified by the data abbreviation will be compared to the
test value to determine which records from the master file are to be
selected for processing.
4. Relational Operator: Enter one of the following codes: 'E1 for equal,
'U' for unequal, 'G' for greater than, 'L' for less than, 'P' for present
(non-blank), or *B' for blank.
(Page 1 of 5)
Figure 6.5.2-b. Description of Quick Look Retrieval Specification Fields
625
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 45
Release Date: 2/01/80
Update #: P-l
5. Test Value: This field is left blank if the relational operator is P or
B. Otherwise enter a value (beginning in column 13) to which the field
specified by the data abbreviation will be compared. The length of the
test value should equal the length (on the master file) of the data field
being compared. If the data field is over 12 characters in length, the
twelve characters in the test value field are compared to the first 12
characters of the field on the master file. Numeric test values must be
expressed as they appear on the master file: zero-filled and with no
decimal. For example, for control equipment cost, a test value of
$2500.00 would be entered as 0250000.
6. Right Parenthesis: Enter ')' if this 10 card is the last of a number of
10 cards to be grouped together.
7. Boolean operator: Enter 'AND' or 'OR ' if the relational expression on
this 10 card is to be combined with the relational expression on the next
10 card by the 'AND' or 'OR1 boolean operator. This field must be blank
on the last 10 card. If this field is blank on any but the last 10 card,
it is assumed to have a value of 'AND1.
20 Card: This card is required to specify the outputs desired.
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 36
Release Date: 2/01/80
Update #: P-l
conjunction with either of the other two codes. The codes may be entered
in any order on the 20 card.
30 Card: This card is optional. It specifies the order of the quick look
report or turnaround document and includes page break/subtotal ling requests
for the quick look report.
1. '30': Required.
2. Data Abbreviation: Enter one of the valid abbreviations for data fields on
the master file. The valid abbreviations are shown in Figure 6.5.2-d.
Enter abbreviations from left to right on the 30 card in the order
of their priority in the sort order of the reports. The report order
specified will determine the order of data in the quick look report or
the turnaround document, but will not affect the order of the answer file.
(The answer file will have the same order as the input master file.)
The sorts are always in ascending order with the specified data fields.
3. Page Break/Subtotal!ing Request: Each page break/subtotal ling request is
associated with the data abbreviation immediately preceding it on the 30
card. Enter 'X' to request a page break in the quick look report when the
data field represented by the associated data abbreviation changes in
value. If totals are requested on the 40, 41, or 42 card for any data
field in the quick look report, a subtotal for the field(s) will be
printed before the page break in the quick look report(s). A page break/
subtotal!ing request on the 30 card and a totalling request on the 40, 41,
or 42 card cannot be entered for the same data element. The page
(Page 3 of 5)
Figure 6.5.2-b - continued. Description of Quick Look
Retrieval Specification Fields
627
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 37
Release Date: 2/01/80
Update #: P-l
break/subtotal ling request does not affect the turnaround document or the
answer file.
40. 41, 42 Cards: These cards are optional. They are entered when QL is
specified on the 20 card. They specify the content of quick look reports.
They may also specify totalling of certain fields and suppression of all but
the total lines. Each card generates a quick look report.
1. '40', '41', or '42': Required. The following combinations are allowed:
A 40 card, a 40 card followed by a 41 card, a 40 card followed by a 41
card followed by a 42 card. The 41 and 42 cards specify additional report
formats from the same quick look retrieval run.
2. Suppression Request: Enter 'X1 to suppress the printing of detailed lines
in the quick look report (only headings, subtotals, and totals would be
printed). If suppression is requested, totalling of at least one data
field must be requested on the same 40, 41, or 42 card and page break/
subtotal ling must be requested for at least one data field on the 30 card.
Also, each data field for which page break/subtotal!ing is requested on
the 30 card must be listed on the 40, 41, or 42 card. These fields must
appear in the same order on the 40, 41, or 42 card as they appear on the
30 card. '•
3. Data Abbreviation. Enter one of the valid abbreviations for data fields
on the master file. The valid abbreviations and data element lengths are
shown in Figure 6.5.2-d. The total of the lengths of the elements on any
40, 41, or 42 card cannot exceed 132 characters. To determine the total
lengths, sum the lengths for the data elements found in Figure 6.5.2-d
(Page 4 of 5)
Figure 6.5.2-b - continued. Description of Quick Look
Retrieval Specification Fields
628
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 38
Release Date: 2/01/80
Update #: P-l
under the column "Data Element Length In Quick Look Report" or, if the
data element is totalled, "Data Element Length In Quick Look Report If
Totalled." If the total exceeds 132, delete some of the fields or break
the report into two quick look reports. Enter abbreviations left to right
on the 40, 41, or 42 card in the order that the data fields are to appear
in the quick look report. If a 30 card is entered that specifies page
break/subtotal!ing when certain data fields change in value, the fields
for which page break/subtotal!ing is requested must be entered on the 40,
41, or 42 card in the same order that they appear on the 30 card.
4. Totalling Request. Each totalling request is associated with the data
abbreviations immediately preceding it on the 40, 41, or 42 card. Enter
'X' to request the totalling of the associated data field. A totalling
request is allowed for those data elements having an entry under "Data
Element Length In Quick Look Report If Totalled" in Figure 6.5.2-d. If
page break/subtotal ling requests are entered on the 30 card, subtotals
will be computed before each page break. A totalling request on the 40,
41, or 42 card and a page break/subtotal ling request on the 30 card cannot
be entered for the same data element. When a totalling request is entered
on a 40, 41, or 42 card for a data element, NO data element from a
subordinate master file segment should be entered on that 40, 41, or 42
card.
$$END Card: This card is required and signals the end of the quick look
retrieval specifications.
1. '$$END': Required.
(Page 5 of 5)
Figure 6.5.2-b - continued. Description of Quick Look
Retrieval Specification Fields
629
-------
a\
CO
o
EIS/PS QUICK LOOK RETRIEVAL
NAME
DATE
1
S |S | S, E | L, E ]C |T
C SELECTION CRITERIA
n>
en
ro
i
o
—i.
o
t—
0
0
o
o
o.
tr\
_,,
o
1|»
'1*
V
1,0
1,0
1,0
1,0
1,0
ill
c
REPORT TITLE
10
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
DATA
j
1 1 1
1 1 1
1 1 1
1 1 1
1 1 1
_l
1 1 1
1 1 1
OUTPUTS
Hi
!TTr
.
REPORT ORDER
l l
3 |9
HPT
DATA
Ann
4 r
1 1 1
X
•
ML
or
1 1 1 1
VALUE
1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 [ 1 1
1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1
)
|
ANO/OR
, ,
, |
1 1
| |
, |
, ,
| |
, |
I |
1 1 1 1 II
1
1
1°
1°
_!_i°
1,0
1,0
i
1°
1,0
1)0
1,0
1,0
REPORT CODES:
OL-OUICK LOOK REPORT TA - TURNAROUND DOCUMENT
DATA x DATA x DATA
lo is i« it i* M ?? n
III III III
X
?to
DATA .
AMR
?• 31
1 1 1
X
i.-t
DATA
ABBR
1*
, ,
DATA
ASBR
1 1
1 1 1 1 1 1 1
1 1 1
1 1 1
1 1 1
1 1 1
1 1 1
1 1 1
1 1 1
1 1 1
1 1 1
RE I
OP
!
l l I
VALUE
|
1
1
i i I
l i l
l
I 1 I 1 l i i i i l l i i l l I
1 i l
l i l
1 1 1 1 i 1 1 1 1 1 1
,
|
|
,
|
|
1
1
,
1
I
1
,
I
1 l I
1 l I
1 1 1
I 1 I
1 I I
i i i
i l I
1
1
I
1 l I
I 1 I
1 I 1
l I 1
1 1 1
i l l
1 I 1
)
ANO/OR
1 1
1 1
1 1
1 1
1 I
1 1
1 1
1 1
1 1
1 1
RELATIONAL
OPERATORS:
U - UNEQUAL
L- LESS THAN
P PRESENT
B - BLANK
AND/OR MUST BE
CARD
AF - ANSWER FILE
X ENTER DATA ABBREVIATIONS LEFT TO RIGHT
" " EMI
PER X FOR PAGE BREAK/SUBTOTALLING
CHJKK LOOK REPORTS
«,0
'I1
V
SUP
PHES
1 %
>|*|E|H|D
DATA
1
I
1
£
DATA b DATA S
ABBR g. AMR £
1 1 1
1 1
II 111
1 1
1 1
1
£
I
1
1
1 i J
1 1 1
1
1
1 1 1
s
I l 1
l 1 l
i 1 1
1 i l
1 LI
1 11
°
DATA
ASBR
1 1 1
1 1 1
1 1 1
0
— ENTER X FOR SUP-
PRESSION OF DE-
FOR TOTALS
EIS/PS
REPORTS
~O JO OO
50 c m
m o
o r— 2
o
^•"^ ^D O^
rn 7* .
TJ O1
o m •
ro o ro
O^ ~H
O i-i
-o
o
o
•yo
"o n> o>
Q. — • 03
01 m
O> t/> CO
CD VO
=tfc
Ql
C*
"O fD
1
i— «
ro
o
i— •
03
O
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 40
Release Date: 2/01/80
Update *: P-l
DATA ELEMENTS COMMON TO ALL SEGMENTS
DATA ELEMENT
AQCR
County
Plant
Segment Date
Segment Day
Segment ID
Segment Year
State
ABBRE-
VIATION
AQCR
CNTY
PLNT
DATE
DAVY
SEGM
YEAR
STTE
POSITION IN
MASTER FILE
50
46
53
57
59
57
62
44
DATA ELEMENT LENGTH
IN MASTER
FILE
3
4
4
5
3
2
1
2
IN QUICK
LOOK REPORT
5
5
5
6
5
5
5
5
IN QUICK
LOOK REPORT
IF TOTALLED
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
DATA ELEMENTS COMMON TO POINT, SCC, and COMMENT SEGMENTS
YEDS Point ID
NPID
63
2
5
N/A
(Page 1 of 9)
Figure 6.5.2-d. Quick Look Data Element Abbreviations
631
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 41
Release Date: 2/01/80
Update #: P-l
PLANT SEGMENT DATA ELEMENTS
DATA ELEMENT
AQCR
City
Contact
County
Local Control
Mailing Address
Name and Address
!o. of Employees
wnership
lant ID
rincipal Product
roperty Area
egment Date
Segment Day
Segment ID
Segment Year
State
Telephone
User Control Region
User Plant ID
JTM Zone
ABBRE-
VIATION
0AQC
CITY
CONT
0CNT
LCON
MAIL
NAAD
NUME
OWNS
0PLN
PROD
PROP
0DTE
0DAY
0SEG
0YER
0STT
TELE
UCON
UPLT
UTMZ
POSITION IN
MASTER FILE
50
82
89
46
68
182
124
172
88
53
114
176
57
59
62
57
44
104
65
70
86
DATA ELEMENT LENGTH
IN MASTER
FILE
3
4
15
4
2
48
48
4
1
4
10
6
5
3
1
2
2
10
3
12
2
IN QUICK
LOOK REPORT
5
5
16
5
5
49
49
5
5
5
11
8
6
5
5
5
5
11
5
13
5
IN QUICK
LOOK REPORT
IF TOTALLED
N/A
N/A
N/A
N/A
N/A
N/A
N/A
9
N/A
N/A
N/A
13
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
0 Denotes zero
(Page 2 of 9)
Figure 6.5.2-d - continued. Quick Look Data Element Abbreviations
632
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 42
Release Date: 2/01/80
Update #: P-l
POINT SEGMENT DATA ELEMENTS
DATA ELEMENT
AQCR
Boiler Design Capacity
Control Regulations
Control Regulation 1
Control Regulation 2
Control Regulation 3
Compliance Schedule
Comp. Schedule Month
Comp. Schedule Year
Compl iance Status
Compliance Update
Comp. Update Day
Comp. Update Month
Comp. Update Year
County
ECAP
Exhaust Flow Rate
IPP Code
Latitude
Latitude Degree
Latitude Minute
Latitude Second
ABBRE-
VIATION
1AQC
BOIL
CREG
REG1
REG2
REGS
CSCH
SCHM
SCHY
CSTT
CUPD
CUDY
CUMN
CUYR
1CNT
ECAP
FLOW
IPPC
LATT
LATD
LATM
LATS
POSITION IN
MASTER FILE
50
109
160
160
164
168
149
151
149
148
153
157
155
153
46
159
128
72
83
83
85
87
DATA ELEMENT LENGTH
IN MASTER
FILE
3
5
12
4
4
4
4
2
2
1
6
2
2
2
4
1
7
2
6
2
2
2
IN QUICK
LOOK REPORT
5
11
13
5
5
5
5
5
5
5
7
5
5
5
5
5
8
5
7
5
5
5
IN QUICK
LOOK REPORT
IF TOTALLED
N/A
11
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
(Page 3 of 9)
Figure 6.5.2-d - continued. Quick Look Data Element Abbbreviations
633
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 43
Release Date: 2/01/80
Update #: P-l
POINT SEGMENT DATA ELEMENTS (continued)
DATA ELEMENT
Longitude
Longitude Degree
Longitude Minute
Longitude Second
NEDS Point ID/SEGMENT 1
Normal Operating Rate
Number of Pollutants
Plant ID
Plume Height
Point IDs
Points w/ Common Stack
Segment Date
Segment Day
Segment ID
Segment Year
SIC Code
Space Heat %
Stack Data
Stack Diameter
Stack Height
Stack Temperature
State
ABBRE-
VIATION
LONG
LOND
LONM
LONS
S1ID
NORM
NUMP
1PLN
PLUM
PTID
PWCS
1DTE
1DAY
1SEG
IYER
SICC
SPAC
STAD
DIAM
HGHT
TEMP
1STT
POSITION IN
MASTER FILE
89
89
92
94
63
104
239
53
140
63
144
57
59
62
57
68
114
117
121
117
124
44
DATA ELEMENT LENGTH
IN MASTER
FILE
7
3
2
2
2
5
2
4
4
5
4
5
3
1
2
4
3
27
3
4
4
2
IN QUICK
LOOK REPORT
8
5
5
5
5
6
5
5
5
6
5
6
5
5
5
5
5
28
5
5
5
5
IN QUICK
LOOK REPORT
IF TOTALLED
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
(Page 4 of 9)
Figure 6.5.2-d - continued. Quick Look Data Element Abbreviations
634
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 44
Release Date: 2/01/80
Update #: P-l
POINT SEGMENT DATA ELEMENTS (continued)
DATA ELEMENT
Throughput
Throughput/Dec-Feb
Throughput/Jun-Aug
Throughput/Mar-May
Throughput/Sep-Nov
User Point ID
UTM Coordinates
UTM Horizontal
UTM Vertical
Velocity
ABBRE-
VIATION
THRU
WNTR
SUMM
SPNG
FALL
UPID
UTMC
HORZ
VERT
VELO
POSITION IN
MASTER FILE
96
96
100
98
102
65
74
74
78
135
DATA ELEMENT LENGTH
IN MASTER
FILE
8
2
2
2
2
3
9
4
5
5
IN QUICK
LOOK REPORT
9
5
5
5
5
5
10
6
7
6
IN QUICK
LOOK REPORT
IF TOTALLED
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
(Page 5 of 9)
Figure 6.5.2-d - continued. Quick Look Data Element Abbreviations
635
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 45
Release Date: 2/01/80
Update #: P-l
REPEATING POINT SEGMENT DATA ELEMENTS
(POLL must be specified)
DATA ELEMENT
Control Equipment
Control Equip. Cost
Emission Units
Emissions Allowable
Emissions Estimate
Emissions Measured
Est Control Efficiency
Estimation Method
Pollutant ID
Primary Control Equip
Secondary Control Equip
[Test Method
ABBRE-
VIATION
CEQP
CCST
EUNT
ALLO
EST I
MEAS
ECEF
ESTM
POLL
PCTL
SCTL
TSTM
POSITION IN
MASTER FILE
253
246
290
276
262
269
259
291
241
253
256
292
DATA ELEMENT LENGTH
N MASTER
FILE
6
7
1
7
7
7
3
1
5
3
3
1
IN QUICK
LOOK REPORT
7
9
5
8
8
8
5
5
6
5
5
5
IN QUICK
LOOK REPORT
IF TOTALLED
N/A
14
N/A
13
13
13
N/A
N/A
N/A
N/A
N/A
N/A
(Page 6 of 9)
Figure 6.5.2-d - continued. Quick Look Data Element Abbreviations
636
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 46
Release Date: 2/01/80
Update #: P-l
SCC SEGMENT DATA ELEMENTS
DATA ELEMENT
AQCR
Ash Content
BEC Code
BEC ID
BEC Number
Confidentiality
County
Emission Factor Source
Fuel Process Rate
Fuel Units
Heat Content
Maximum Design Rate
NEDS Point ID/Segment 2
No. of Emission Factors
Plant ID
Source Classification
Code
SCC 1
SCC 2
SCC 3
SCC 4
SCC Sequence Number
ABBRE-
VIATION
2AQC
ASHC
BECC
BEC I
BECN
CONF
2CNT
EMFS
FPRT
FUNT
HEAT
MDRT
S2ID
NEMF
2PLN
SCCC
SCC1
SCC2
SCC3
SCC4
SSQN
POSITION IN
MASTER FILE
50
98
75
78
75
106
46
133
81
80
101
88
63
197
53
65
65
66
68
71
73
DATA ELEMENT LENGTH
IN MASTER
FILE
3
3
5
2
3
1
4
1
7
1
5
7
2
2
4
8
1
2
3
2
2
IN QUICK
LOOK REPORT
5
5
6
5
5
5
5
5
8
5
6
9
5
5
5
9
5
5
5
5
5
IN QUICK
LOOK REPORT
IF TOTALLED
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
13
N/A
N/A
14
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
(Page 7 of 9)
Figure 6.5.2-d - continued. Quick Look Data Element Abbreviations
637
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 47
Release Date: 2/01/80
Update #: P-l
SCC SEGMENT DATA ELEMENTS (continued)
DATA ELEMENT
Segment Date
Segment Day
Segment ID
Segment Year
Source Code
Source Description
State
Sulfur Content
ABBRE-
VIATION
2DTE
2DAY
2SEG
2YER
SRCC
SRCD
2STT
SULC
POSITION IN
MASTER FILE
57
59
62
57
107
108
44
95
DATA ELEMENT LENGTH
IN MASTER
FILE
5
3
1
2
1
25
2
3
IN QUICK
LOOK REPORT
6
5
5
5
5
26
5
5
IN QUICK
LOOK REPORT
IF TOTALLED
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
Repeating SCC SEGMENT DATA ELEMENTS
(MPID must be specified)
DATA ELEMENT
Ash/Sulfur Code
Emission Factor
Emission Factor Units
Pollutant ID
ABBRE-
VIATION
ASSC
EMFA
EMFU
MPID
POSITION IN
MASTER FILE
214
204
215
199
DATA ELEMENT LENGTH
IN MASTER
FILE
1
9
1
5
IN QUICK
LOOK REPORT
5
11
5
6
IN QUlk
LOOK REPORT
IF TOTALLED
N/A
N/A
N/A
N/A
(Page 8 of 9)
Figure 6.5.2-d - continued. Quick Look Data Element Abbreviations
638
-------
EIS/PS
REPORTS
SECTION 6.5.2
QUICK LOOK EDIT PROGRAM
PRTQLED (EP0260)
Page 48
Release Date: 2/01/80
Update I: P-l
COMMENT SEGMENT DATA ELEMENTS
DATA ELEMENT
AQCR
Comments
County
Left Comment
Line Number
NEDS Point ID/Segment 3
Plant ID
PNR Sequence Number
Right Comment
Segment Date
Segment Day
Segment ID
Segment Year
ABBRE-
VIATION
3AQC
COMM
3CNT
LCMT
LINE
S3ID
3PLN
SEQN
RCMT
3DTE
3DAY
3SEG
3YER
POSITION IN
MASTER FILE
50
71
46
71
67
63
53
65
122
57
59
62
57
DATA ELEMENT LENGTH
IN MASTER
FILE
3
102
4
51
3
2
4
2
51
5
3
1
2
IN QUICK
LOOK REPORT
5
99
5
52
5
5
5
5
52
6
5
5
5
IN QUICK
LOOK REPORT
IF TOTALLED
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
N/A
(Page 9 of 9)
Figure 6.5.2-d - continued. Quick Look Data Element Abbreviations
639
-------
E1S/P3 UU1CK LUUK EDIT PKUGNAM • DIAGNOSTIC REPORT
PAGE I
PKUGKAM NAME; PRTULEO (LP02bO)
REVISION LEVEL: 1-00
LAST UPDATE »: P-l
DATE INCORPORATE!!: FEBRUARY 1,
TITLE TEST 1 • PLANTS IN STATE Ob AS OF 4/1/80
SELECTION CRITERIA
10 OSTT E Ob
FORMATS
20 dL
RfcPuHT SEQUENCE
CT, DEFAULT REPORT SEQUENCE, SAME AS MASTER FILE ORDER
O
:" QUICK LOOK DATA ELEMENTS - REPORT ONE
40 PLNT NAAD MAIL CONT TELE
PLANT ID
NAME AND ADDRESS
MAILING ADDRESS
CONTACT
TELEPHONE
Figure 6.5.2-e. Output from Example 1 — PRTQLED (EP0260)
(Page 1 of 3)
TO m
m *—i
-v co
o «-*.
70 -O
—I CO
00
-O JO CO
50 c m
—i t-i o
-o o -H
o
^^ o o*>
n 5^ •
~o en
o m •
ro o ro
o ^H
50
o
: 50 13
•O (D O>
O. —> (O
O» fD (B
f+ Qi
n> v> **
n> 10
.. o
o>
•o ro
ro
CD
O
-------
E1S/PS UUICK LOUK tXTKACT PHOKKAH - DIAGNOSTIC HEPUWT
PAGE
PROGRAM MA^t: PHluLfcK (EP0270)
HtVISlON LEVEL: 1-00
LAST UPDATE us P-l
UAtE INCORPORATED: FEbKUAKY 1, 1980
NUMBER UF EIS/PS MASTEK ULt KECOHOS KtAU:
NUMUhK UF UUICK LUUK REPUKt KECUKDS WRITTEN:
NU1HEH UF TURNAKOUNO DOCUMENT RbCURDS nRITTtN:
UF ANSMEK FILE RfcCURDS WHITTfcN:
172
4
0
0
Figure 6.5.2-e-continued. Output from Example 1 --
(Page 2 of 3}
PRTQLEX (EP0270)
30 m
-a
o
73
— I
en
Co
-o .o
50 c:
m
o
m ^
-o
o rn
ro o
CTv i—i
O -H
CO
m
o
ro
•a
o.
-o
t
o>
Q>
CD
O
O)
0>
ro
CO
o
10
n>
tn
o
-------
PHUUkAM NAME: PKPUUIK (EP02BO)
KtVISlUN LfcVtLJ 1-UO
LA3f UPUA1E *: H-t
DATE INCORPORATED: FEHKUARY I/ 1900
m
-a
o
CO
CO
EMISSIONS INVENTORY SYSIEM / POINT SOURCE SUBSYSTEM
HAGE 1
1ESI 1 - PLAMS IN STATE 06 A3 UH 4/1/80
PLNT NAME-AND-AUDRESS
MftlLlNG-AOOHtSS
CT>
0001 SYMTHE ENGINt CO
0041 SYMTHE ENbiNt CO
Ag"^
O —)
•yo
o
(Page 3 of 3)
Figure 6.5.2-e-continued. Output from Example 1 — PRPQUIK (EP0280)
o.
CD
f+
n>
=«=
-o
I
(6
—t
CD
CU
u>
n>
o»
(0
• *
ro
o
CO
o
tu
tQ
n>
-------
tlS/PS UliltK LUUK tOlT PRuliKAM . DlAGriUbUC KEPUKI
PAGt
PROGRAM NA*t: PHTULEO CtPO«;«jO)
KtvmoN LEVEL: i-oo
LAST UPOAlt «: P-l
DATE INCUKPuhATtP: FEBRUARY 1,
TITLE TEST 2 - PrtUUUCE AN ANSnEK FILfc r.ITH 30i DATA
1/1/60
SELECTIUN CRITERIA
10
10
PULL E D2401
MP10 E «<> o
o\ •—i
o —j
«
-o
50
O
CD
50
CO
m
o
cn
.
ro
*O fl>
Q. —'
CD
r* Qt
(/)
0>
O
tu
cn
ro
•o
I
(D
00
o
-------
US/PS MAbIEK FILL UEtAKEU KEPUKI
PA&t
STATE COUftlY AWLK PLAN I 1U
1(5 OU40 2i? 0/nft
Jb 000 1 (II V661 4b7.8 418a.7 2% 25 25 25 24 7
B01LEK SPACE
CAPACITY HEAT
STACK DATA CUMP SCHED CUHP STATUS CUNIKUL KEGULAIIUN
HEIGHT 01AH TEMP FLUM HATE VELOCITY PLUME PNIS CUMP YEAH MUNTH YEAK MONTH UAY ECAP NEG 1 KEG 2 KEG 3
0020 4
P7 PU1NT COMMENT
NEUS. FLAGS
P2 Pi Pa P5 Pi»CS
A A A
POINT FLAG
P7
I S
11
A
F L
12
A
A G 3
14
NUHtfEK OF POLLUTANT CONTROL CONIHUL EuUIP ESTM CNTL EMISSIONS ESlM TEST EIS FLU
PULLUIANTS 1U COST PKI SEC EFFICIENCY ESTIMATE MEASURED ALLOMAbLE POTENTIAL UNITS METHUD METHOD 13
U5 SU2 0000002 3 A
NOX OOOOOOt 3 A
TSP OOOUOOO 3 A
CO OOUOOOO 3 A
HC 0000001 0000001 3 A
(Page 2 of 2)
Figure 6.5.2-f-continued. Output from Example 2 — Detailed Report
70 m
m i— i
-o oo
o ^
CO
CO
-O JO CO
•yo c. m
—i i-t o
o o -H
o r-
o
— o
CJ1
•o
o
ro o ro
o^ *~^
O -H
•yo
O
CT)
•ya
•o
o.
Oi
c+
n>
S3 TO
n> cu
—• ua
n> o>
CU
(T
Q)
ro
o
oo
o
en
CO
-------
EIS/PS QUICK LOOK EDIT PROGRAM - DIAGNOSTIC REPORT
PAGE 1
PROGRAM NAME: PRTQLEO (EP0260)
REVISION LEVELS 1-00
LAST UPDATE «t P-l
DATE INCORPORATED! FEBRUARY I, 1980
SELECTION CRITERIA
10 STTE E 06
10 CNTY E 1460
10 PLNT E 0041
AND
AND
REPORT FORMATS
20 TA
REPORT SEQUENCE
DEFAULT REPORT SEQUENCE, SANE AS MASTER FILE ORDER
EIS/PS QUICK LOOK EXTRACT PROGRAM - DIAGNOSTIC REPORT
PAGE
PR06RAM NAMEl PRTQLEX (EP0270)
REVISION LEVEL» 1-00
CAST UPDATE *1 P-l
DATE INCORPORATED: FEBRUARY 1, 1980
NUMBER OF EIS/PS MASTER FILE RECORDS READj
NUMBER OF QUICK UOOK REPORT RECORDS WRITTENI
NUKBER OF TURNAROUND DOCUMENT RECORDS WRITTEN*
NUMBER OF ANShER FILE RECORDS WRITTEN!
172
0
22
0
Figure 6.5.2-g. Output from Example 3 — Diagnostic Reports
(Page 1 of 2)
TO m
m i—i
-o Co
o -^
70 ~T3
—\ CO
on
XD CO
c: m
1-1 O
O — I
m
a r-
o
^^ o
m ?<:
cx>
•
en
o m
ro o PO
O> t—i
o —i
73
8
•o n> cu
ex —• IQ
o> ro n>
c* cu
n w> tn
o
Q)
«-*•
CO
o
-------
EIS/PS QUICK -LOOK TURNAROUND DOCUMENT PAGE 1
TEST 3 - TURNAROUND DOCUMENT 4/1/80
3T CNTY AQCR PLANT YR DAY
00 0000 000 1111 11 111
12 3456 789 0123 45 678
06 1960 053 0041 80 147
C-R LC USER PLNT ID CITY UTM OWN CNTACT PER30NEL TELEPHONE PRNCPLPROD
122 22 222222333333 3333 44 4 444444455555555 5566666666 6677777777
901 23 456789012345 6789 01 2 345678901234567 8901234567 8901234567
123 04 PL-3175 0012 12 P GEORGE SMYTHE 6919544376 9PLANTS
ESTABLISHMENT NAME AND ADDRESS NEMP PR AREA
122222222223333333333444444444455555555556666666 6667 77777 7
901234567890123456789012345678901234567890123456 7890 12345 6
3YKTHE ENGINE CO 0014 00001.9
CD
ESTABLISHMENT MAILING ADDRESS
122222222223333333333444444444455555555556666666
901234567890123456789012345678901234567890123456
TNXLITES, COLORAD.O
PLANT SEGMENT COMMENT
1222222222233333333334444444444555555555566666666667
9012345678901234567890123456789012345678901234567890
PLANT NOT IN PRODUCTION 12/79 THRU /q/eo
SEG CD ACT
778
a 9 o
0 1
0 1
SEG CD ACT
7 7 8
890
0 2
0 2
SEG CO ACT
778
890
0 3
0 3
SEG CD ACT
778
890
0 4
0 4
(Page 2 of 2)
Figure 6.5.2-g-continued. Output from Example 3 — Turnaround Document
EIS/PS
REPORTS
-o jo co
50 c m
— 1 H-l O
-0 0 —I
1— 7* 1-1
m o
o r- z
o
x-x o en
m 7* •
•o en
o m •
ro o ro
en *•" '
o — i
-o
70
O
CD
70
*
C 70 -V
~O (0 O>
O. — ' tO
£U fD fD
C+ Q>
n> c/i m
fl> 01
.. o
0)
•o n>
1— »
0
1— »
00
o
-------
m
i— i
OO
oo
CO
is/fs
LOOK eon PHUBHAM - DIAGNOSTIC
PAGt I
Pklull")
LtvfL: l-(>u
LASf U^OAlfr »{ H-l
"Alt
lllLb ILSl 'I - "Yi;KiiL«KblJN
F-HK ClUINTY UU-XI AS >lf 1/1/80
StUCIU'N CHUfcKl*
to ICM E
ig MULL e
10 c tsn i»
lo ALLU P
nuao
?0 UL
UN
TO c.
in
SEMUfcM'E
50 tSfl ALLU
fcMISSIUNS LS11HATE
AlLUhAbLt
1-1 o
O — I
o
X O W
i ?<: •
01
O m •
ro o ro
> •— •
o — i
QUICK LUUK 1»A1A ELEnEWlS - KtHUnf lint
40 Silt CMV HLNf NP1U tSTU ALLIIX
STAft
PLANT in
NfcOS HIIINT II>
f'JSSlUNS tSM"/>fE
ALLOWABLfc EMISSIIINS
TllTAL
— ?O "O
•o* n> o*
D. —' (O
tu n> n>
f+ Q)
n> w> en
o> cr>
=«»s
o<
0+
y n>
(page 1 of 2)
Figure 6.5.2-h. Output from Example 4 — PRTQLED (EP0260)
ro
00
o
-------
tlb/Hb unlC.K LllUC t<
[HALF PKHuKAM - DIAGNOSTIC KtPIINT PAGt
PrtOGKA." NA*'L: Phliut* UP02/0)
HtVISl'ifc LI-VtL:
LAS I
OAfe
1-
00
uPOAlt »: K-I
II>CI)K
PUKAl
fcii:
I-EHKUAKY i, 141-
u
tUhbl-K U» MS/PS riASlhH MLE khCMHUfc KfcAn, ! 72
NUMMf
K llF
.JUlLn LUdiv KfHUKl Nfc'CuKliS >«K]|UN|
fcuttnFN iih IU«NA«HU
-P»
00
%
KlJMHI
TEST
STft
to
IB
ID
It
1 ft
It)
It*
44
34
34
34
34
34
34
34
34
34
34
34
34
to
11
34
:« uH
14 - f
C.^TY
Ol>40
oouo
0040
0040
oouo
0040
(HI40
U040
0040
0040
OU40
0040
0040
»040
0040
0040
0040
U040
0040
0040
0040
0040
UD40
ANS>-f
K F
ND ouci'HEnT HtCi
ILE I<[;C(IKOS "nl
iWliS Mid 1 IbN:
'(•M:
t"ilsSllln3
itOHOCAnnt i* f*lSSfnub HI* LIIH*IV 01140 AS
HLI, |
ooni
11002
OOOS
0005
OOOS
OOOS
ilOOb
O00t>
IHIOI
00"!
0001
11001
0003
0004
OOOS
OOOb
0006
0006
0007
0000
000*
OOOb
0005
f«»-l
01
01
01
02
03
04
OS
01
01
02
II I
u«
01
01
02
03
0?
03
01
01
07
06
01
„ Li-MM
d'jooooo
onooooo
ooonooo
obooonu
uduuuon
OOOOOOO
OOOOOOO
uoooooo
O'lOOOOO
OOOOOOO
onooooo
UUOOOOO
OOOOOOO
0(100000
OOOOOOO
OOUOOOO
OOOOOOO
OOUOOOO
onooooo
onooooo
OOOOU01
0000(11)2
0000002
OOOOOOOOOOOb
1UTAL MJMBbM Uf WHICH LOOK LlnES
Fi
gure
6
Lf'-ALLU
V9V9999
9999999
99V9999
99999V9
9«*999<*9
9999999
9999999
99X9999
9999999
9999999
9999999
9999999
9999999
OOU129999967
tUHALS 25
.5.2-h-continued. -Output
23
0
0
INVEHTUMf SrSIEH / PlUNf SUUKCE SUHSYSTEH PAGE 1
(IF 4/1/60
(Page 2 of 2)
from Example 4 — PRTQLEX (EP0270) and PRPQUIK (EP0280)
-o
^3
— 1
JO
r~
o
o
ro
o
cz
•a
a.
o>
a>
=«=
• *
i
k^
^™ •
2O
m
~o
O
73
CO
XD
CZ
t— 1
o
^
i—
0
o
m
a
—I
~D
o
£D
70
"3>
•^
po
n>
— J
Ql
(/)
a>
a
o>
r+
?J
ro
o
fc-?
00
C3
m
CO
"^^
CO
CO
m
o
-H
en
01
•
ro
•g
Ql
UO
cn
-j
-------
WD
tib/PS UUJCK LOOK EOIT PHObKAM - DIAGNOSTIC KtPUKT
. PASt 1
PHOGKAH hAMEt PHT^Lk1'
LAST UPDATE «: P-l
UAIE l'/ CUKMUN STACK
UUICK LUUK UAIA f.LtMt^TS - KhPUKl TnU
(It PLNT IvPID Htthl OlArt IENP H.U* VtLI) PLUM P»C:S UfULX
PL AM IP
MEUS PU1NT Il>
STACK HfclGhT
(Page 1 of 2)
Figure 6.5.2-i. Output from Example 5 — PRTQLED (EP0260)
•yo m
m •—i
CO
CO
-o -o co
TO c. m
—I i-« o
^ o -H
m o
O I— 3Z
o
^-» o o»
m ?*c •
"o en
o m •
fvj a r\i
cr> •-<
o —i
o
o
•yo
•o
o.
Qi
<-*•
tfe
•o
I
?O "O
n> D»
—' tQ
0) (D
Oi
(/> cn
n> oo
a
Q)
rt
(D
ro
-------
MILE ItSI <] - Sl
HA!* HH,
t IS/HS HOICK LUUK tUIl PHUUKAM
OUUD JN ,S|Alt S« AS UF U/t/rtO
> DIAGNOSTIC RtPUHT
PAGt
J>1 ftClV Ol A'lt f t«
bTACK It>PbH«lo>'c
1-XhAUST >Ld"< KAfc
VlL-iCIIY
Hlufcfc Ht. IGhl
i-./ cit»-mj
bfcSlbK CJHAC1IT
TuTAt
m
CO
m
i— >
oo
->«.
-o
oo
i-13/1*6 dUIlK LOilK t»l«HCl HKOUKAM - UlAGnUSfIC
PAGE
D )
c. m
i-t O
JO O — I
70
LtVfcL: 1-OU
LAST UHUAIF «: P-l
UAlfc l*CUKKUWATt 0:
m
o
1, 19nU
Nll«HtK ilF EJS/PS •>•<•.& I Lrt ULt
OF UUILK I 1)1 IK ntViMT Kf-CuHuS h
UF lUh^AKIIu IL> UHCUntNl KfcCiiKUS
ui-
m
T3
o
o
o
;•:
4 a
0
(I
m
O
en 1-1
o -H
o
CD
en
•
O1
<=
•a
o.
o>
rt-
a>
(Page 2 of 3)
Figure 6.5.2-i-conttnued. Output from Example 5 - PRTQLED (EP0270) and PRTQLEX (EP0270)
a>
— "
n>
0»
o
a>
ro
o
oo
o
to
en
-------
/ I»OIM
SUBSYSTEM
TtSI b - S1AO Oil* H-rt Ll'I'Mlr iHMli IK Stalt 41 AS
»•*•*•«
• *•••••*»*<
HbHI lil*>
I-L-I''-K| VUlIC HltlM
'l/t/Btl
••»•*•.•
"001 U) 0100 U4.ll D54S OOiOlSV
oool o^ n|nu Hi." i)t-4<> nuioisw
Oooi 01 niuu u'4.o oms UOIDISV
oooi o<« oiou oo.o nubu untoibv
fcUMnCH lit HtCt'HliS IN INJS PLM IS
UUUII
oooo
U0l>0
NUMotK Ul- htCUhUS I«r I HIS HLNT IS
(Page 3 of 3)
Figure 6.5.2-i-continued. Output from Example 5 — Report One and Report Two
en
ItSI
PI-I
OOOI
oovt
OOUl
OOOI
^» -
ml* 1
III
0?
Hi
04
blAO
U hbnl
OIOU
0100
OIOU
OIOU
O«l«
-ul«
04.
«•».
04.
O'l.
~.
n
0
0
n
tMSSI
(•tlM CUU«TY IIUUU IN HI oil 1
H-.Mf1 ^Lur-HT VtLlIC fLUW HA
Ui4*i 0050IS1' UOUO
OiUS (IfliUIS1) 11(1110
Oilb Oi>iOlbV 0000
04^0 un^oisv uuoo
(IMS l.lVtMUKY SYSTEM / I>U)M SOuKCt S"HSYSTE« PAGl )
1 A.S lit q/l/ttfl
CS HdlLM
000<|0
OII04H
00048
nou O"&
0) O
.. o
CD
TS n>
ro
-------
US/PS uUlCh LtlO* fOlf PHllGNAH - 01AG-4UMIC HtPONI PAGE 1
PHiiUfUi WA«4fc : KKluitii (tHOdhO)
KtVtSIHi. LfVhL! 1-UO
LASI uPu*lf »; K-I
DAlt llCUKPflMAlhu: f-tukUArtY 1, 1«*U
1 I ILt I>S! t - I!>H t'ISSU
SELt-Cl I UN CHI1F.HIA
10 1OI E OOUu
lu PULL t 11101
iO «L
KfcPliHl btbUENCE
iO SITE CMYX HLNlX
SfAfE
H2 C01IN1Y
fO PLANT ID
~
UUICK LuOK DATA ELtMEMS -
40 x si it CNIY PLNT ESI
S1ATE
CUUN 1 Y
PLANl in
t^LSSluNS tSI IMAIE
QUICK LUUK DMA £Lt«tMTS -
JNS Fim CUU.- UF 1/1/Hu
AND
PAGt hChAK/subTUTAL
PAGE hKfcnR/SUHTuTAL
HFPflhT UNE
IX
TOTAL
KEPURT TM(>
41 SITb CNTY PlnT NP10 tSIIX
1.1 alt
COUNTY
PLAM li>
NEU9 POINT II)
tHlSblllNb tSI IhAlt
1UT6L
(Page 1 of 3)
Figure 6.5.2-j. Output from Example 6 — PRTQLED (EP0260)
-o
70
JO
r~
m
a
"rn
-o
o
ro
en
o
c.
•o
o.
at
at
..
T3
?-•
m
TD
o
—I
CO
c:
o
•^
r—
o
0
m
o
»— i
—l
-a
20
o
cr>
50
^
TO
tt>
fD
O)
n>
a
QJ
n>
» *
ro
o
i— »
oo
o
m
•— •
CO
"•*.
CO
CO
m
o
-H
K— 1
O
z
CM
tJl
•
ro
~o
CU
o
CTl
1—*
-------
t).S/HS "U1LK
KkUGKfcM - D1AGNU311C HtPUHt
PACfc
REVISION LfctftL: |-i'0
L4SI Ul'lJAIt «: f—1
OAlt r-'Ci»t»'ut'ATto: 1-tuxuftNr i,
NtiHHI K Ut fc IS/PS HASlt* FILL KECCIKl'S ht-AI>:
NU"HJ N Ut- MUICK toon WtPHKT KtC»«Mi»S (*«J|ltM
NIJ'MtK Uf IUHl«AkOIM|i l»'ICU'>tNT
III- AIV&/-H* FILk «tClli«l»S
I /?
iU
u
0
UF ktCUkUS I" (HIS
IS
(Page 2 of 3)
(Page 2 of 3}
Figure 6.5.2-j-continued. Output from Example 6. PRTQLEX (EP0270) and Report Two
o>
en
cu
fissiuNs ifevfiTuKv stsifcM / POIM stiukte sutmsre*. PAG! 3
Jtsi o - ISP tPissni"»s> urn IMUMY mi no At- UF i/i/»o
sirt LKIY CLM INMIIJ »V-KSII
IH
to
i "
in
IK
In
lt»
UII1I)
U040
I) U 4 0
UU4I)
ODUI)
0(114(1
00140
OU(i*>
OUflS
OOUb
Odfli
OOOb
OOOb
DOO^
Ul
U*
U}
via
it *>
(ft
07
(1(1(101*4
(i 0 tl u 0 « 1
n o u ') mi i
UOOUilO}
nun 1)000
UUUOdUO
OUIIOIIOO
73 m
m t-i
X3
m
o
m o
a r- =z
o
--^ o cr>
m 7^ »
•o tn
o m •
PO o ro
CJ> 1-1
o -i
c:
13
a.
o<
rt
n>
a>
-a
01
n> n>
Q>
v> a>
ro ro
00
o
-------
H tHlS.-jJH-S Hilt Ll'IlM > 004V 4S HI- 4/t/HO
PAGE
Silt OIY
II--LSI i
0040 OOU1
NUMHtrt Uf KtCllkOS 1-4 IrllS HUM IS
OHIO ooo«? ooudoouoonuo
hlWBi-h OF kfcCMHDS IN IHIS PLNl IS
oouo onos ooouooonolJi
UF «ECUHUS IM IhlS HLU1 IS
0040 0001 OOlHiOUOOO—•
-D CO
O ^.
70 -O
—) CO
O O
r~ 7*c
m
o i—
O
r~* O
m 7*
•o
o m
r>o o
Oi •-«
o —i
-o
?a
o
CD
73
CO
m
crv
ro
•o
a.
Ca
(V
=*=
-O
I
70 -O
(D CU
—' tQ
(f> fl>
a> oj
a
Q>
H-
n>
ro
o
oo
o
-------
UU1CK LUUK EUII PHUGHAM - DIAGNOSTIC KtPUNT
PACE I
LIVH.: l-uu
LAST I'PUAIfr »: f~l
MATb I'lLUKPUI-AFtU:
Illtf IF.SI 7 - FXAMPtE UF IHTALS
0/1/BO
StLECIIlJii
10 SlTF f- Ufa
CTl
cn
cn
?0 UL AF-
HbPUMI SbOUENLt
Ul- FAULT NtHURI SfcttUtbCtt SAHt AS
QUICK LUOK UAIA tLkHENTS - KtPUKT Ui-
4U SITE CM* PLNI SUU PKUPX hUILX SPAC
IUTAL
TOTAL
FILt OKDEH
CHUN I Y
PL AN I ID
Stl>M£NT 1 NEDS PUlMl III
HUILEH DESIGN CAPACITY
SPACE HEAf X
OU1C.K LUUK UAIA tLtl-fcNTS - HEPUKl Tnt)
n>
QJ
D (/* O">
=«»s
CD
TJ n>
00
o
-------
Ol
LlllJh ExTKALf PKUGKAi- - Dl»(iliiJS[lC KEPtlHl
PACt
I.E vtu: i-nu
LAST ui'UAlt «: P-l
tJAth INI IIKHllHAlLlI: fl->KUMKY
1,
NUI»MhK lih fclS/Cb .««SlfcH F ILt ntCuwns K
(iF UllltK HnlK Hl-Piikl MhCl'KOS oh
I.F ItlffMAhU'J'll' DUCl'KF.Nl KtCUHUb
UF AbSAtrf FILE ktrCuKuS
>iKllTtl<<:
178
16
0
Ut
INVt-NIUKY bfbltM / PUINT SUUHCt SUHSYSIE"
PAUt
/ - EXA'-l'LE t'F TilTAlb UPIU'M
snt CMTY PLM bin' pK-»^tA
J/I/HO
HUILK HCAI
Ob
Ob
Ob
Ob
Ob
00
Ob
Ob
|4bO 0001
IVofl rtuOl
IVnO UOUI
IVbD 00 'II
£OUO OO
c m
i-i O
O -H
o
O
•D en
o m •
ro o ro
o^ i— i
o —i
TO
o
£73
C PD -O
"O fD CU
o. — • to
QI n> fl>
C+ Ol
re w cr>
n> CTI
QJ
c+
n>
ro
o
oo
o
-------
MS/HS MASTER ULt DETAILED REPORT
PAGE
SlAlt I-Mo.. If AuCrt PL»UI ID
06 19b« i»Si UUiil
OAfh
VtAk HAY
BO 017
IVHE
n
LUCflL
PLAMT
0<4 HL-J17S
tu
CllY HIM /ONE OWNER
001? 12 P
CONTACT
SHY 1 HE
1ELEPHUNE
VM9S44376
PRINCIPAL
PRODUCT
9ENG1NES
ESIAHLlSHMtNl NAME A.JU ADIihESS
«UIr*E CU
EIPL'IYfctS
0014
PHiJPEKlY
AHEA
00001.9
HAILING AOOHESS
KEl) IJAKt, CULUHAUO
ZIP
FLAI.
P7 PLAw I
PLANl HUT IN PKllUUCriUN 12/11 ThKU /4/HO
PI
A
PLANT FLAG
P7
A
e i
i
A
(LAGS
234
A A A
DAll-
YLAH OAY
«0 U47
IYPE
1
CUliI USER UTM CUUHDlHATES LATITUDE LONGITUDE
1 L) ^UI'Jl 10 .SIC I HP HOkllUNTAL VERTICAL OEG MIN SEC UEG MIN StC
Ot 'Ml Mil at iVi.u 09SS.5 71 31 21 OS1 SI S2
ANNUAL THRUPUT
DEC MAR JON SEP
02 03 03 01
S I A C K UA
HtlGHf UIAM TEMP FL1IK HAlE VtLIJtlfY PLUME
0090 (II.U U10U OUOU123 0015U
T
UME
1900
N E
P2
A
A
2
OS F L
Pi P4 PS
A A A
COMP SCHED COMP STATUS C
YEAR MUNTH YEAN MONTH DAY ECAP RI
81 10 79 12 15 1
ACS POINT FLAG EIS FLAG
PNCS P7 11 12 14
A A A A
NORMAL OPERATING
HR/D D/*K HK/YR
10 5 47
CONTROL REGULATION
1 REG 2 RE6 3
44 15 17
SPACE
CAPACIIV HFAl
00137 09.7
P7 PUINI COHMtNl
ADDED I2/14//9
UF PULLUTA.il COtlKUL CUNlKUL KunjP fcbIM LNTL EMISSIONS ESTM TEST EIS FLC
POLLUTANTS ID UlSr PR! SEC EFFICIENCY ESTIMAIt toEASUiiED ALLOMAHLE POTENTIAL UNITS METHOD METHOD 13
02 CH 00001.00 U22 041 9H.S 0000100 0000200 0000300 4 3 3 A
TSP 00001.00 0<>2 041 9H.S OOA0100 0000200 0000300 4 3 3 A
DAlE SEGKtNl POINT
YEA« L.AY lYPt ID
80 U47 2 01
P7 3CC. COMMENT
SCC LtFF CUMMtM H7
SuuxCt OtSCHIPTlu.g
LNOINt
StC SCC btb HEC FUEL - MAX DESIGN SULFUR ASH HEAT
I II III IV nHK MbK 10 UNITS PROCESS RATE CUNlfNT CONTENT CONTENT CUNF SOURCE
4 Oi Obi 01 00 123 01 2 0003000 0004.000 S.78 02.3 001SO 1 8
NEDS FLAG SCC FLAG EIS FLAGS
SCC
F F
WIGHT py ci»»MEi»f
NllHHtH Ul- POLLOIANI
SUHKLt t*SN f-ClK 10
D
U4 NOX
CO
221U4
TSP
P6
A
EMISSION
FACTUH
000000.000
000000.000
OOUU00.230
000000.000
P7 21
A A
ASH / FACTOK
SULFUR UNI TS
2
i
2
1
22 24 2*
A A
EMISSIONS
APPORT
0000000
0000000
A
EIS FLAU
23
A
A
A
A
(Page 3 of 4)
Figure 6.5.2-k-continued. Output from Example 7 - Detailed Report
70 rn
m >—'
*U CO
o ^»
CO
CO
"O JO CO
X3 c m
— J t-t O
-O O — I
t— 7S l-l
m o
a r- z
o
^^ o
m ?
(1> c/>
o
D)
rl-
O>
ro
o
CD
O
n
CTi
-------
en
CO
tis/^-s MASTER ULE UEIAILFD REPORT PAGE 4
SlAU CUUi. IY AuCK Cl.-t.vl ID
06 1901) H Si ml 1)1
OAlk StbMl^T ClIl.lKllL lilCAL PRINCIPAL
YEAR oftV IYPE Hti.ii.iN cuNiRui PLAM 10 CITY UTM /ONE OWNER CONTACT TELEPHONE PRODUCT
80 "47 0 lc-3 " 04 — HL-417b 0012 12 P FRANKE SMYTHt 5919544376 9F.HGINES
iMU*>UEH UF PROPER IY
fSI AHLISHMtNT MA"*t AND «l>MKtSS ZIP EMPLOYEES AREA MAILING ADDRESS ZIP
SYMIHE INOlKt CU . 0014 00001.9 RED OAKE, COLORADO
UEl'S FLAG PLANT FLAG EIS FLAGS
P/ Pl.ANl Cl lhl.it M PI P7 1234
PLA-wl MOT IN PRUOOC.1IUH 12//9 THRU /4/HO A A AAAA
OAlk StU'tM PillNI uSLR UTM COORDINATES LATITUDE LONGITUDE ANNUAL THRUPUT NORMAL OPERATING
YtAK I;A» TYPE ID POINT ID SIC 1PP HORIZONTAL VERTICAL DEG M1N SEC DEC MIN SEC DEC HAR JUN SEP HR/D 0/*K HK/VR
ao 113 1 In Oil 1141 21 245.4 0955.5 71 21 21 051 51 52 02 03 03 01 10 5 47
HUlLER SPACE S T A C h DATA COMP SCHED COMP STATUS CONTROL REGULATION
CAPACITY HEAT HEIUMI oi*i« TEMP FLOW HATE VELOCITY PLUME PNIS COMP YEAR MONTH YEAR MONTH DAY ECAP REG i REG 2 REG 3
0013/ 09.7 0090 01.0 0100 QOU01<>3 00151 0900 2 01 10 79 \Z 15 1 44 15 17
NEDS FLAGS POINT FLAG EIS FLAGS
P7 PUlHl Ct)M*FNT P? P3 P4 P5 PwCS P7 11 12 14
POINT AlJUEO 12/14/79 AAAA A A A A
NUUdfcH OF POLLUTAM COMRUL CluMlMuL FuUlP ESM CN1L EMISSIONS ESTM TEST EIS FLG
POLLUTANTS ID COST PHI S£C EFFICIENCY ESlJMAIt MEASURED ALLOnAHLE POTENTIAL UNITS METHOD METHOD 13
112 CO 00001.00 022 041 98. b 0000100 0000200 0000300 4 3 3 A
ISP 00001.00 022 041 9H.5 0000100 0000200 0000300 4 3 3 A
DATL" StG^ENI HillNT SCC SCC bEG HEC FOEL « MAX DESIGN SULFUR ASH HEAT
YEAR DAY TYPE ID I H 111 IV NOR uBR ID UMTS PROCESS HATfc CONTENT CONTENT CONTENT CONF SOURCE
tto 113 2 1'J 4 03 001 01 00 123 01 2 0003000 0004.000 5.78 02.3 00150 1 B
NEDS FLAG SCC FLAG EIS FLAGS
P7 'SCC CUMMtM P6 P7 21 22 24 25
SCC LtFT COMMENT P7 SCC RIGHT P7 COMMtNT A A AAAA
E F NUMBER UF POLLUTANT EMISSION ASh / FACTOR EMISSIONS EIS FLAG
SUURCL DESCRIPTION siuinct EMSN KCIR in FACIOR SULFUR UNITS APPORT 23
FNI>lr
e+ Eu
(0
* 0
QJ
t? fD
ro
o
i— '
CD
o
m
I—H
CO
CO
SECTION 6.5.2
o>
CO
n>
en
i
-------
EIS/PS
REPORTS
SECTION 6.5.3
QUICK LOOK EXTRACT
PROGRAM - PRTQLEX (EP0270
Page 1
Release Date: 2/01/80
Update #: P-l
6.5.3 QUICK LOOK EXTRACT PROGRAM - PRTQLEX (EP0270)
6.5.3.1 Description
PRTQLEX (EP0270) extracts records from the EIS/PS master file using the
selection criteria generated by PRTQLED (EP0260). The latter program
generates the selection criteria from use>-supp"lied quick look specification
cards and parses it to PRTQLEX (EP0270) in a temporary file. See Section
6.5.2 for a further discussion of PRTQLED (EP0260).
PRTQLEX (EP0270) has the capability of producing a quick look file, a
turnaround document file, or an answer file. The quick look file is produced
when 'QL' is specified on the 20 card of the quick look specification cards.
Master file records which meet the selection criteria are written to this
file. Then, the file is passed to PRPQUIK (EP0280) which produces the quick
look report.
The turnaround document file is produced when 'TA1 is specified on the 20
card of the quick look specification cards. Master file records which meet
the selection criteria are written to this file which is subsequently passed
to PRPTURN (EP0290) to produce the turnaround document report.
The answer file is produced when 'AF* is specified on the 20 card of the
quick look specification cards, and it can be produced in conjunction with
either a quick look report or a turnaround document report. Master file
records Which meet the selection criteria are written to this file. The
answer file is in master file format and sequence; therefore, it can be used
by any EIS/PS program which accepts the master file. Records that are
subordinate to records which meet the selection criteria will not be included
659
-------
EIS/PS
REPORTS
SECTION 6.5.3
QUICK LOOK EXTRACT
PROGRAM - PRTQLEX (EP0270)
Page 2
Release Date: 2/01/80
Update #; P-l
in the answer file unless they independently qualify for selection. But, if
subordinate records qualify, they will be accompanied by the records to which
they are subordinate. Entire records will be written to the file unless a
specific pollutant is requested in the specification cards. In this
situation, the point and SCC segments which meet the selection criteria will
contain only the repeating fields of the requested pollutant(s) along with the
non-repeating field data.
The user may wish to execute PRPDUMP (EP0220) or PRPMSTR (EP0210) to
produce a listing of the answer file for future reference.
6.5.3.2 File Formats
Input to PRTQLEX (EP0270) consists of the temporary extract control file
passed from PRTQLED (EP0260) and the EIS/PS master file. See Figure 4.3.9-a
for a description of the master file format.
Output from the program consists of a quick look file, a turnaround
document file, and an answer file, depending upon the options coded on the 20
card of the quick look specification cards. Also, a diagnostic report is
printed showing input and output counts. See Figure 6.5.3-a for a sample of
the diagnostic report.
6.5.3.3 Options and Control Cards
There are no user-supplied options or control cards for this program.
See Section 6.5.2.3 for a discussion of options and control cards for PRTQLED
(EP0260).
660
-------
EIS/PS
REPORTS
SECTION 6.5i}3
QUICK LOOK EXTRACT
PROGRAM - PRTQLEX (EP0270)
Page 3
Release Date: 2/01/80
Update #; P-l
6.5.3.4 Error Messages
There are no error messages.
6.5.3.5 Cataloged OCL - EPRTM40
6.5.3.5.1 JCL listing - PRTQLEX (EP0270) can be executed by any of the three
procedures EPRTM40, EPRPM60, or EPRPM70. All three cataloged procedures also
execute PRTQLED (EP0260). This section will discuss the cataloged procedure
EPRTM40. Refer to Section 6.5.4.5 for a discussion of the procedure EPRPM60
and Section 6.5.5.5 for a disucssion of EPRPM70. See Figure 6.5.3-b for a
listing of the cataloged procedure EPRTM40.
6.5.3.5.2 Cross-reference of DP names and files
Program Name: PRTQLED (EP0260)
DP Name
EPSINPT
EPSEXTR
EPSCNTL
EPSDIAG
File Description
Quick look retrieval specification cards
Quick look extract control file (temporary)
Quick look report control file (temporary)
Diagnostic report
Input/Output
Input
Output
Output
Output
661
-------
EIS/PS
REPORTS
SECTION 6.5.3
QUICK LOOK EXTRACT
PROGRAM - PRTQLEX (EP0270)
Page 4
Release Date: 2/01/80
Update #: P-l
Program Name: PRTQLEX (EP0270)
DP Name
EPSEXTR
EPSMSTR
EPSQUIK
File Description
Quick look extract control file (temporary)
EIS/PS master file
Quick look file (temporary)
Program Name: PRTQLEX (EP0270) - continued
Input/Output
Input
Input
Output
DP Name
EPSTURN
EPSANSR
EPSDIAG
File Description
Turnaround document file (temporary)
Answer file
Diagnostic report
Input/Output
Output
Output
Output
6.5.3.5.3 User-supplied JCL - To execute the cataloged procedure EPRTM40, the
user must supply the quick look retrieval specification cards, the data set
name of the EIS/PS master-file, and the data set name of the answer file. See
Section 6.5.2.3 for a discussion of the quick look retrieval specification
cards. See Figure 6.5.3-c for a description of the procedure's substitutable
parameters. The user should note that the default for the.substitutable
parameter 'DISP1 will cause the answer file to be cataloged.
6.5.3.5.4 Sample run stream - The following run stream is from example 2 of
Section 6.5.2.3. The data set names of the master file and answer file are,
respectively, 'CN.EPALMH.A087.CDHS.HQ.PNT.DATA.EPMSTR21 and 'CN.EPALMH.A087.
CDHS.HQ.PNT.DATA.QLANSR11.
662
-------
EIS/PS
REPORTS
SECTION 6.5.3
QUICK LOOK EXTRACT
PROGRAM - PRTQLEX (EP0270)
Page 5
Release Date: 2/01/80
Update #: P-l
// EXEC EPRTM40,
// MSTRFIL=EPMSTR2,
// ANSRFIL=QLANSR1
//EDIT.INPUT DD *
$$SELECT TEST 2 - PRODUCE AN ANSWER FILE WITH S02 DATA 4/1/80
10 POLL E 43401 OR
10 MPID E 42401
20 AF
$$END
6.5.3.6 Warnings and Special Instructions
The user should insure that the quick look retrieval specification cards
are coded properly in order to produce a meaningful answer file. See Section
6.5.2.3 for a discussion of these cards.
6.5.3.7 Cost Considerations
The estimates listed below are based on the execution of the run stream
in Section 6.5.3.5.4 on an IBM 370/168.
Number of master file records read: 172
Number of quick look records written: 0
Number of turnaround document records written: 0
Number of answer file records written: 34
CPU time: 0.67 seconds
I/O time: 1.74 seconds
Total time: 2.41 seconds
Estimated cost: $0.49
663
-------
EIS/PS
REPORTS
SECTION 6.5.3
QUICK LOOK EXTRACT
PROGRAM - PRTQLEX (EP0270)
Page 6
Release Date: 2/01/80
Update #: P-l
6.5.3.8 Related Programs and Procedures
The execution of PRTQLEX (EP0270) is entirely dependent upon the extract
control file passed from the quick look edit program, PRTQLED (EP0260). See
Section 6.5.2 for a discussion of PRTQLED (EP0260).
PRTQLEX (EP0270) can also be executed by the cataloged procedures EPRPM60
and EPRPM70. See Section 6.5.4.5 for a discussion of EPRPM60 and Section
6.5.5.5 for a discussion of EPRPM70.
When a listing of the answer file is desired, the user can execute
PRPMSTR*"(EP0210) or PRPDUMP (EP0220). See Section 6.3.2 for a discussion of
PRPMSTR (EP0210), the master file detailed report program* See Section 6.3.3
for a discussion of PRPDUMP (EP0220), the master file formatted dump program.
664
-------
E1S/P&K UU1CK LOOK KEIR1EVAL PROGRAM - DIAGNUSIIC NKPUKt
PAGF.
PRUGRAM NAME: PKTULM CEP027U)
REVISION LfcvtL: l-oo
LAST UPDATE »: P-I
UAIE INCORPORATED: FEBRUARY 1, 198U
NUMBER OF fcIS/PS MASTEH FILE RECORDS RtAD:
NUH8EK UK UUICK LUUK HEPUKT KECUHUS MKITTtN;
NUMttEH OF TUMMAROdMU UUCUMtNT HfcCUKDS HKllTtNi
NUMBEK UF ANSnEH FILE RECORDS MRUTEM:
172
0
0
CTl
cn
Figure 6.5.3-a. Diagnostic Report
m
T3
O
?o
-H
CO
00
~Q JO CO
•yo cz rn
O 1-1 O
03 O —I
^H/ ^^ ^^
3> O
3E I— -Z.
O
I O CD
-o cn
*Q m •
—I X CO
r~ TO
m 3>
x o
m
•o
o
IV3
•o
Q.
Di
n>
— i
ft)
cu
>
o>
O)
n>
• •
ro
o
oo
o
a>
»Q
ro
-------
EIS/PS SECTION 6.5.3
REPORTS QUICK LOOK EXTRACT
PROGRAM - PRTQLEX (EP0270)
//* tPALMH/AO»7 HEDGEPTH, LLOYD M. (9i9) 541-5091
//*
//* PROCEDURE NAME: EPRTM40
//* HtVISION LEVEL! 1-00
//* LAST UPDATE * : P-l
//* DATE INCORPORATED: FEBRUARY I, 1980
//*
Page 8
Release Date: 2/01/80
Update #: P-l
00000100
00000200
00000300
00000400
00000500
00000600
00000700
//* THIS PROCEDURE ALLOWS THE USER TO GENERATE AN EIS/PS QUICK LOOK 00000600
//* ANSWER FILE
//*
//*
//EPRTM40 PROC PRUJECTs'CN.EPALMH.A087.CDHS.MQ.PNT1,
// PRUG1=PRTQL£D»
// PKOG2=PRTQLEX,
// Rfc6IONl=100K,
// REGION2slOOK,
// TIMF.1 = '1,0',
// TIHE2s'l,0',
// MSTRFILaEPMASTERr
// ANSKFlLsEPQLANSR,
// UNIT=33iO,
// TEMPaSYSDA,
// StRIALsCDHSPK,
// OISP='NEW,CATLS, DELETE1.
// SPCUNlTsTRK,
// PRIMARYS20,
// SECNDRYalO,
// WORKSPCs'gO^lO'r
// OUT=A
//*
//EDIT EXEC PGMs&PROGl,
// REGKlNs®IONl,
// TIME=(&TIME1)
//*
//* EDIT QUICK LOOK CONTROL CARDS
//*
//STEPLIB DO DSN=RPHOJECT..LOAD,
// VOLUM£=(PRIVATE, RETAIN),
// DISP*(SHR,PASS)
//* j
//* INPUT DATA SET - QUICK LOOK CONTROL CARDS
//*
//EPSINPT DO DDNAME=INPUT,
// DCB=BLK3IZEs80
//*
//* OUTPUT DATA SET - QUICK LOOK RETRIEVAL CONTROL TABLES
//*
//EPSEXTR DO DSNAMf.sfc&QLTABL,
// UNlT=*TtMP,
// D1SP=(NEW,PASS),
// SPACt=<*SPCUNlT, (RWORKSPC), RLSE)
//*
//* OUTPUT DATA SET - QUICK LOOK REPORT CONTROL FILE
//*
//EPSCNTL DO DSNAMEs&hQLRCNT,
// UNITs&TEMP,
00000900
00001000
00001100
00001200
00001300
00001400
00001500
00001600
00001700
00001800
00001900
00002000
00002100
00002200
00002300
00002400
00002500
00002600
00002700
00002800
00002900
00003000
00003100
00003200
00003300
00003400
00003500
00003600
00003700
00003800
00003900
00004000
00004100
00004200
00004300
00004400
00004500
00004600
00004700
00004800
00004900
00005000
00005100
00005200
00005300
00005400
00005500
00005600
(Page 1 of 3)
Figure 6.5.3-b. Cataloged Procedure EPRTM40
666
-------
EIS/PS
REPORTS
SECTION 6.5.3
QUICK LOOK EXTRACT
PROGRAM - PRTQLEX (EP0270)
Page 9
Release Date: 2/01/80
Update #: P-l
//
D ISPs (NEW, PASS),
SPAC£sUSPCUNIT,UHORKSPC),RLSE)
//*
//* OUTPUT DATA SET - DIAGNOSTIC REPORT
//*
//EPSDIAG DO SVSUUTs&OUT
//*
//* OUTPUT DATA SETS - SYSTEM OPERATION
//*
//SYSOUT DO SYSOUTs&QUT
//*
//SYSPRINT DD SYSOUTs&OUT
//*
//SYSDTERM DD SYSOUT=&OUT
//*
//SYSUDUMP DD SYSOUTs&OUT
//*
//SYSDBOUT DD SYSOUTsROUT
//*
//RETRIEVE EXEC PGMe&pRosa,
// KEGIONS®ION2,
// TlMEsUTJrtEg)
//*
//* RETRIEVE FROM THE MASTER FILE
//*
//STEPL1B DD DSNS&PROJECT..LOAD,
// VULUME»(PRIVATE, RETAIN),
// DlSPs(SHH,PASS)
//*
//* INPUT DATA SET - QUICK LOOK RETRIEVAL CONTROL TABLES
//*
//EPSEXTR DD USN=&&QLT ABL»
// DISP*(SHR,PASS),
// UNIT=RTEMP
//*
//* INPUT DATA SET - EIS/PS MASTER FILE
//*
//EPSMSTR DO DSNAMES&PKOJECT..DATA.&MSTRFIL,
// VULUMt*(PRIVATE, RETAIN),
// DISPs(SHR,PASS)
//*
//* OUTPUT DATA StT - QUICK LUOK REPORT FILE
//*
//EPSUUIK DD OSNs&syLRPTF.
// UNlfsiTEMP,
// DISPs(NE»«,PASS)r
// SPACF.sUSPCUNJT, (&WOf?KSPC),RLSE)
//*
//* OUTPUT DATA SET - QUICK LOOK TURN-AROUND REPORT FILE
//*
//EPSTURN DO DSNs&tQLTURN,
// UiMirsHTEMP,
// DlSPs(NEW,PASS),
// SPACE= (&8PCUN I T , ( KhORKSPC ) , RLSE )
//*
//* OUTPUT DATA SET - UUICK LOOK ANSWER FILE
00005700
OOOOS800
00005VOO
00006000
00006100
00006300
00006300
00006400
00006500
00006600
00006700
00006800
00006900
00007000
00007100
00007200
00007300
00007400
00007500
00007600
00007700
00007800
00007900
00008000
00008100
00008200
00008300
00008400
00008500
00008600
00008700
00008800
00008900
00009000
00009100
00009200
00009300
00009400
00009500
00009600
00009700
00009800
00009900
00010000
00010100
00010200
00010300
00010400
00010500
00010600
00010700
00010800
00010900
00011000
00011100
00011200
(Page 2 of 3)
Figure 6.5.3-b - continued. Cataloged Procedure EPRTM40
667
-------
EIS/PS
REPORTS
SECTION 6.5.3
QUICK LOOK EXTRACT
PROGRAM - PRTQLEX (EP0270)
Page 10
Release Date: 2/01/80
Update #: P-l
//*
//fcPSANSR 00 DSN=&PKOJECT..DATA.ftANSRFIl.r
VnL=(P«IVATEfkETAIN,SERs»SERlAU,
DISP=UDI3P),
SPACt*(S,SPCUNIT, UPRIMARY, &SECNDRY) ,RLSE)
//
//*
//* OUTPUT DATA SET - DIAGNOSTIC REPORT
//*
//EPSDIAG DD SYSOUTs&UUT
//*
//* OUTPUT DATA SETS - SYSTEM (JPEKATION
//*
//SYSUUT DD SYSOUTs&UUT
//*
//SYSPRINT DD SYSOUTa&OUT
//*
//SYSDTfcHM DD SYSOUTeftOUT
//*
//SYSUDUMP OD SYSOUTs&OUT
//*
//SYSDBOUT I)D SYSOUTs&UUT
//*
00011)00
00011400
00011500
00011600
00011700
00011800
00011900
00012000
00012100
00012200
00012300
00012400
00012SOO
00012600
00012700
00012600
00012900
00013000
00013100
00013200
00013300
00013400
00013500
(Page 3 of 3)
Figure 6.5.3-b - continued. Cataloged Procedure EPRTM40
668
-------
EIS/PS
REPORTS
SECTION 6.5.3
QUICK LOOK EXTRACT
PROGRAM - PRTQLEX (EP0270)
Page 11
Release Date: 2/01/80
Update #: P-l
Parameter
Name
PROJECT
PROG1
PROG2
REGION1
REGION2
TIME1
TIME2
MSTRFIL
Default
Value
'CN.EPALMH.A087.
CDHS.HQ.PNT1
PRTQLED
PRTQLEX
100K
100K
'1,0'
•l.O1
EPMASTER
Description
Highest-level index of data set names
(e.g., CN.EPALMH.A087.CDHS.HQ.PNT.
DATA.EPMASTER would be the full name
of an EIS/PS master file)
Quick look edit program
Quick look extract program
Region size allocated for the
execution of PRTQLED
Region size allocated for the
execution of PRTQLEX
Time allocated for the execution of
PRTQLED.
Time allocated for the execution of
PRTQLEX.
Lowest-level index of EIS/PS master
file
ANSRFIL
EPQLANSR
Lowest level index of quick look
answer file
(Page 1 of 2)
Figure 6.5.3-c. Substitutable Parameters for EPRTM40
669
-------
EIS/PS
SECTION 6.5.3
QUICK LOOK EXTRACT
PROGRAM - PRTQLEX (EP0270)
Page 12
Release Date: 2/01/80
Update #: P-l
Parameter
Name
UNIT
TEMP
SERIAL
Default
Value
DISP
SPCUNIT
3330
SYSDA
CDHSPK
1 NEW,CATL6,DELETE'
TRK
Description
Unit type to which the quick look
answer file is to be written
Unit type to which temporary data sets
are to be written
Volume serial number of volume to
which the quick look answer file is to
be written
Disposition of quick look answer file
Units in which space for all data sets
is to be allocated
PRIMARY
SECNDRY
WORKSPC
20
10
'20,10'
Primary space allocation for the quick
look answer file
Secondary space allocation for the
quick look answer file
Space allocation for temporary data
sets
OUT
SYSOUT class for all print files
(Page 2 of 2)
Figure 6.5.3-c - continued. Substitutable Parameters for EPRTM40
670
-------
EIS/PS
REPORTS
SECTION 6.5.4
QUICK LOOK REPORT
PROGRAM PRPQUIK (EP0280)
Page 1
Release Date: 2/01/80
Update #: P-l
6.5.4 QUICK LOOK REPORT PROGRAM - PRPQUIK (EP0280)
6.5.4.1 Description
PRPQUIK (EP0280) produces the quick look report(s) according to the
format specifications in the report control file which is passed from PRTQLED
(EP0260). The data that appears in the quick look report(s) is taken from the
quick look file which is passed from PRTQLEX (EP0270).
PRPQUIK (EP0280) is capable of producing a quick look report in three
different formats simultaneously. This is accomplished by utilizing the 40,
41, and 42 cards of the user-supplied specification cards. (See Section
6.5.2.3 for further discussion of these cards). This feature enhances the
flexibility of the quick look programs in that a user may obtain different
quick look reports from the same selected master file records.
The COBOL SORT verb is utilized in this program to sort the quick look
file records. IF the user submits a 30 card (sort sequence card) as input to
PRTQLED (EP0260), the primary sort sequence will consist of the data fields
coded from left to right on this card. The secondary sort sequence will be
the master file sequence. If no 30 card is submitted, the master file
sequence will be the default sort sequence. See Section 6.5.2.3 for further
discussion of the 30 card.
The user should note that the installation's collating sequence may have
an impact on the resulting quick look report(s) when a primary sort sequence
is specified on the 30 card. However, since the master file record key is
entirely numeric, it will not cause sequence errors in the report when used as
the default sort sequence.
671
-------
EIS/PS
REPORTS
SECTION 6.5.4
QUICK LOOK REPORT
PROGRAM PRPQUIK (EP0280)
Page 2
Release Date: 2/01/80
Update #: P-l
6.5.4.2 File Formats
Input to PRPQUIK (EP0280) consists of the quick look report file passed
from PRTQLEX (EP0270) and the report control file passed from PRTQLED
(EP0280). Both of these files are temporary files.
Output consists of the quick look report, which contains the program
update messages on the page prior to page one of the actual report. See
Figure 6.5.4-a for a sample of the quick look report.
6.5.4.3 Options and Control Cards
There are no user-supplied options or control cards for this program.
See Section 6.5.2.3 for a discussion of options and control cards for PRTQLED
(EP0260).
6.5.4.4 Error Messages
QLR001 ERROR:
Meaning:
Action:
NO RECORDS IN REPORT CONTROL FILE
The quick look edit program, PRTQLED (EP0260), encountered
serious error(s) and deleted the retrieval, therefore no
records were written to the report control file.
Correct the error(s) in the quick look retrieval specification
cards and resubmit the job.
672 *
-------
EIS/PS
REPORTS
SECTION 6.5.4
QUICK LOOK REPORT
PROGRAM PRPQUIK (EP0280)
Page 3
Release Date: 2/01/80
Update #: P-l
QLR002 ERROR:
Meaning:
Action:
NO RECORDS IN QUICK LOOK REPORT PRINT FILE
The quick look edit program, PRTQLED (EP0260), encountered
serious error(s) and deleted the retrieval, thereby causing the
quick look retrieval program to retrieve no records; the
logic of the 10 cards entered is such that no records from the
master file satisfied the selection criteria; or QL was not
entered on the 20 card.
Correct the error(s) in the quick look retrieval specification
cards, change the logic of the 10 cards, or enter QL on the
20 card in the quick look retrieval specification cards.
Resubmit the job.
6.5.4.5 Cataloged JCL - EPRPM60
6.5.4.5.1 JCL Listing - PRPQUIK (EP0280) can be executed by the cataloged
procedure EPRPM60. This procedure also executes the quick look edit program,
PRTQLED (EP0260), and the quick look extract program, PRTQLEX (EP0270), prior
to executing PRPQUIK (EP0280). See Figure 6.5.4-b for a listing of EPRPM60.
6.5.4.5.2 Cross-reference of DD names and files
Program Name: PRTQLED (EP0260)
DD Name File Description
EPSINPT Quick look retrieval specification cards
EPSEXTR Quick look extract control file (temporary)
EPSCNTL Quick look report control file (temporary)
EPSDIAG Diagnostic report
Input/Output
Input
Output
Output
Output
673
-------
EIS/PS
REPORTS
SECTION 6.5.4
QUICK LOOK REPORT
PROGRAM PRPQUIK (EP0280)
Page 4
Release Date: 2/01/80
Update #: P-l
Program Name: PRTQLEX (EP0270)
DP Name File Description
EPSEXTR Quick look extract control file (temporary)
EPSMSTR EIS/PS master file
EPSQUIK Quick look file (temporary)
EPSTURN Turnaround document file (temporary)
EPSANSR Answer file
EPSDIAG Diagnostic report
Program Name: PRTQUIK (EP0280)
DP Name File Description
EPSQUIK
EPSCNTL
EPSPRNT
Quick look file (temporary)
Quick look report control file (temporary)
Quick look report
Input/Output
Input
Input
Output
Output
Output
Output
Input/Output
Input
Input
Output
6.5.4.5.3 User-supplied JCL -To execute the cataloged procedure EPRPM60, the
user must supply the quick look retrieval specification cards, the data set
name of the EIS/PS master file, and the data set name of the quick look answer
file if an answer file is requested. The user should note that the
disposition of the'answer file in this procedure will cause the file to be
deleted at the end of the run. This disposition can be changed by overriding
the substitutable parameter 'DISP1 when executing EPRPM60. See Figure 6.5.4-c
for a description of the procedure's substitutable parameters.
674
-------
EIS/PS
REPORTS
SECTION 6.5.4
QUICK LOOK REPORT
PROGRAM PRPQUIK (EP0280)
Page 5
Release Date: 2/01/80
Update #: P-l
6.5.4.5.4 Sample run stream -The following run stream would produce a quick
look report of all TSP emissions in state 06 and an answer file. Note that
the disposition of the answer file is overridden in this example. The full
data set names of the master file and answer file are their respective default
values.
// EXEC EPRPM60,
// DISP='NEW,CATLG,DELETEI
//EDIT.INPUT DD *
$$SELECT TSP EMISSIONS IN STATE 06 4/1/80
10 1STT E 06 AND
10 POLL E 11101
20 QL AF
30 CNTYX
40 CNTY PLNT NPID ALLOX ESTIX ECEF
$$END
/*
6.5.4.6 Warnings and Special Instructions
Since the COBOL SORT verb is used in this program, the user should be
aware that collating sequences are not the same on all machines; therefore,
care should be taken in coding the 30 card of the quick look retrieval
specification cards. See Section 6.5.2.3 for a discussion of these cards.
The user should note the disposition of the answer file in the cataloged
procedure EPRPM60 and override it according to the desired results.
675
-------
EIS/PS
REPORTS
SECTION 6.5.4
QUICK LOOK REPORT
PROGRAM PRPQUIK (EP0280)
Page 6
Release Date: 2/01/80
Update #: P-l
The user should also insure that the quick look retrieval specification
cards are coded properly in order to produce a meaningful report and answer
file. See Section 6.5.2.3 for a discussion of these cards.
6.5.4.7 Cost Considerations
The estimates listed below are based on the execution of the run stream
in Section 6.5.4.5.4 on an IBM 370/168 and pertain only to the quick look
report program, PRPQUIK (EP0280).
Total number of quick look lines printed: 23 lines
CPU time: 1.03 seconds
I/O time: 1.13 seconds
Total time: 2.16 seconds
Estimated cost: $.60
6.5.4.8 Related Programs and Procedures
The execution of PRPQUIK (EP0280) is entirely dependent upon the report
control file passed from PRTQLED (EP0260) and the quick look report file
passed from PRTQLEX (EP0270). See Section 6.5.2 for a discussion of PRTQLED
(EP0260) and Section 6.5.3 for a discussion of PRTQLEX (EP0270).
676
-------
CT)
t-»l.SSl!lnS MlVtulUnY J>TbltM / PlIlNl SUUKCt SimSYStE* HAGE 1
ItSI
srit
10
It)
to
1H
lf>
Id
34
34
34
3*1
34
34
34
34
34
34
34
34
34
10
18
34
TOTAL
it - (
tvirr
ooiiu
01)40
0040
0040
0 0 4 (1
0040
0040
voao
OOMO
0040
UH40
OU40
0040
0040
0040
U040
0040
0040
0040
0040
0040
0040
t>040
VlliK.jC
VLhl
0001
000?
OOUS
OUOS
01105
0005
I'OOb
«00ft
0001
UO2
(It
U4
01
01
Od
03
0?
03
01
01
07
06
01
« L-ISSI....:. HiK
1 L^i-f.Sfi
OOOOO'IO
unuvoou
uoonooo
UOOClOUU
u o u o o (i o
ooooooo
oooooou
000(1000
ooooooo
ooooooo
OOllUOUvl
ooooooo
OOOOOOO
udOUOOO
ooooooo
onooooo
0001)000
OUUVllOO
ooooooo
ooooooo
OOOU001
OOl)0(F()
000000?
uiiiitiY 0040 *.s HF a/i/ao
L*--AU-U
9999999
9999999
9999999
999<* «*•>«»
99999«9
9999999
9999999
99U9949
9999999
9999999
9999999 •
9999999
9999999
OOOOOOOOU005 OOul«J<»99Y9d7
1 ji i f/*M 1 /li^M lIuFC klJllAI^ ** 4
(•|f I i*n LUUl\ L. I I1C.9 C'*L"<|_O C. 3
Figure 6.5.4-a. Quick Look Report
-o
o
73
—1
CO
-0 .0
73 C
O «— «
C7 C~5
^
o
T3 0
73 ^
r?
c m
I-H "^
7^ O
2
m
•^
o
PO
0
"
c: 73
T3 •
C+ Ql
n> w
(D
.. o
Ql
0+
-0 fD
\- >
ro
o
00
o
m
CO
"^
CO
CO
m
o
»-H
O
z
CTi
•
tn
*^
^
Ql
(O
(D
^^
-------
EIS/PS
REPORTS
SECTION 6.5.4
QUICK LOOK REPORT
PROGRAM PRPQUIK (EP0280)
Page 8
Release Date: 2/01/80
Update #: P-l
//* EPALMH/A087 HtDGEPETH, LUUVD M. (919) 541-5091
//*
//* PKOCEDUKE NAME: EPRPMbO
REVISION LEVEL: 1-00
LAST UPDATE »l P-l
DATE INCORPORATED; FEBRUARY 1, 1980
THIS PROCEDUKE ALLOWS THE USER TO GENERATE AN EIS/PS QUICK
LOOK REPORT
//*
//*
//*
//*
//*
//*
//*
//*
//EPRPM60 PROC PROJtCT='CN.EPALMH.A087.CDHS.HQ.PNT'.
// PHOG1«PRTQLED,
// PRUG2=PRTULfcX,
// PROG3=PRP»UIK,
// «EGION1=100K,
// REG10N2=100K,
// REGION3=100K,
// TIME1='1,0',
// TIME?s'l,0«,
// TIKiE3=«l,0',
// MSTHFIL=EPMASTER,
// ANSRFIL=t.PQLANSR,
// UNIT=3330,
// TEMPsSYSDA,
// SERIALsCDHSPK,
// DISPs'NEW, PASS, DELETE'.
// SPCUNIT=THK,
// PRIMAKY=20,
// SECNDRYslO,
// WURKSPC='20,10'f
// OUT=A
//*
//*
//EDIT
EXEC PGMs&PROGl,
REGION=&KEGIUN1,
TIMEs(&TIMEl)
//*
//* EDIT UUICK LUOK CONTROL CARDS
//*
//8TEPLIB DO DSNS&PROJECT..LOAU,
// VOLUMEs(PRIVATE, RETAIN),
// DISPx(SHR,PAS3)
//*
//* INPUT DATA SET • QUICK LOUK CON1ROL CARDS
//*
//EPSINPT DO DDNAME*INPUT,
// DCH=t)LKSUEa80
//*
//* OUTPUT DATA SET - MUICK LOOK RETRIEVAL CONTROL TABLES
//*
//EPSEXTR DO DSNAMEs&tCblLTABL,
// UNITsfcTEMP,
// DISP=(NtW,PASS),
// SPACts(ftSPCUNlT,UMORKSPC),RLSE)
//*
00000100
00000200
00000300
00000400
00000500
00000600
00000700
00000800
00000900
00001000
00001100
00001200
00001300
00001400
00001500
00001600
00001700
00001800
00001900
00002000
00002100
00002200
00002300
00002400
00002500
00002600
00002700
00002800
00002900
00003000
00003100
00003200
00003300
00003400
00003500
00003600
00003700
00003800
00003900
00004000
00004100
00004200
00004300
00004400
00004500
00004600
00004700
00004800
00004900
00005000
00005100
00005200
00005300
00005400
00005500
00005600
(Page 1 of 4)
Figure 6.5.4-b. Cataloged Procedure EPRPM60
678
-------
EIS/PS
REPORTS
SECTION 6.5.4
QUICK LOOK REPORT
PROGRAM PRPQUIK (EP0280)
Page 9
Release Date: 2/01/80
Update #: P-l
//* DUTPUT DATA SfcT • UUICK LUOK REPORT CONTROL HLE
//*
//FPSCNTL 00
// D1SP=
-------
EIS/PS
REPORTS
SECTION 6.5.4
QUICK LOOK REPORT
PROGRAM PRPQUIK (EP0280)
Page 10
Release Date: 2/01/80
Update #: P-l
UNITsHTF.MP,
DISP=(Nt",PftSS),
SPACE* U8PCUN1T,U*0»KSPC),RLSF.)
//* OUTPUT DATA SET - QUICK LUUK ANSWER FILE
//*
//FPSANSK 00 DSN=&PRUJECT..UATA.IUNSRFIL,
// UNIT=*UNIT,
// VtlL = (PKiVATErKETAIN,SER*8,SERIAL),
// DISP=UOISP),
// SPACES USPCUN1T,UPRIMARY,&SECNDRY),RLSE)
//*
//* OUTPUT DATA 3ET - DIAGNOSTIC REPORT
//*
//EPSDIAG DO SYSUUTsMHIT
//*
//* OUTPUT DATA SETS - SYSTEM OPERATION
//*
//SYSOUT DD SYSOUT=8.0UT
//*
//3YSPRINT DO SYSOUT=&OUT
//*
//SYSOTfcRM DO SYSOUTslOUT
//*
//3YSUDUVP DD SYSOUT=«-OUT
//*
//SYSDBOUT DD SYSUUT*8.0UT
//*
//*
//«EPUHT EXEC PGMs&PRUGJ,
// REGIHN*g,REGIONJ,
// T1ME=(&T1ME5)
//*
//* PRODUCE THE tiUICK LUUK REPOHT
//*
//STEPL1B DD OSNS&PRUJECT..LDAD*
// VOLUMEsCPRIVATE, RETAIN),
// DlSPs(S.HRrPASS)
//*
//SURILIB DD DSNsSYSl.SORTLIB,
// DI3P=(SHH,PASS)
//*
//* INPUT DATA SET - UUICK LOOK REPORT FILE
//*
//EPSUUIK DD DSNs&liULRPTF,
// OISP=tSHK,PASS)
//*
//« INPUT DATA SET - QUICK LOOK REPORT CONTROL FILE
//*
//EPSCNTL DD DSNs&»(JLRCNT»
// UNlTs&TfcMP,
// D1SP=(SHR,PASS)
//*
//* SORT DATA SETS
//*
OOOlt^OO
oooiiaoo
00011500
00011600
00011700
00011BOO
00011900
00012000
00012100
00012200
00012300
00012400
00012SOO
00012600
00012700
00012800
00012900
00013000
00013100
00013200
00013300
00013400
00013500
00013600
00013700
00013000
00013900
00014000
oooiaioo
00014200
00014300
00014400
OOOiasoQ
00014600
00014700
00014800
00014900
00015000
00015100
00015200
0001S300
0001S400
0001S500
00015600
00015700
00015800
00015900
00016000
00016100
00016200
00016300
00016400
00016500
00016600
00016700
00016800
(Page 3 of 4)
Figure 6.5.4-b -continued. Cataloged Procedure EPRPM60
680
-------
EIS/PS
REPORTS
SECTION 6.5.4
QUICK LOOK REPORT
PROGRAM PRPQUIK (EP0280)
Page 11
Release Date: 2/01/80
Update #: P-l
//3UKTWK01 00 UNlT=KTE*f»,
// SPACE=(&SPCUN1T, (ft«ORKSPC),,CUNTIG)
//*
//SORTWK02 00 UNIT = UTMP,SEP=SURTWK01),
// SPACES (*SPCIJN11,{*WORKSPC),,CONTIG)
//*
//SURTWK03 00 UNI T = (S IEMP,SEPs(SQRTWK01 ,SOHTt»K02 J
// SPACfc=(8,SPCUNIT, (&WORKSPC),,CONTIG)
//*
//* OUTPUT DATA Sfc T - UUICK LOOK REPORT
//*
//F.P8PRNT 00 SYSOUTs&UUT
//*
//* OUTPUT DATA SETS - SYSTEM OPERATION
//*
X/SYSOUT DD SYSUUTs&OUT
//*
//SYSPRINT OD SYSCJUT=i(JUT
//SYSOTERM DO SYSOU1=8.0UT
//*
//SYSUDUMP 00 SYSOUT=ftOUT
//*
//SYSDBOUT DD SYSOUTs&UUT
//*
//*
00016900
00017000
00017100
00017200
00017300
00017400
00017SOO
00017600
00017700
00017800
00017900
00018000
00018100
00016200
00018300
00018400
00018500
00018600
00018700
00018800
00018900
00019000
00019100
00019200
00019300
00019000
(Page 4 of 4)
Figure 6.5.4-b - continued. Cataloged Procedure EPRPM60
681
-------
EIS/PS
REPORTS
SECTION 6.5.4
QUICK LOOK REPORT
PROGRAM PRPQUIK (EP0280)
Page 12
Release Date: 2/01/80
Update #: P-l
Parameter
Name
PROJECT
PROG1
PROG2
PROGS
REGION1
Default
Value
'CN.EPALMH.A087.
CDHS.HQ.PNT1
PRTQLED
PRTQLEX
PRPQUIK
100K
REGION2
REGIONS
TIME1
TIME2
TIMES
MSTRFIL
ANSRFIL
100K
100K
'1,0'
'1,0'
'1,0'
EPMASTER
EPQLANSR
Description
Highest-level index of data set names
(e.g., CN.EPALMH.A087.CDHS.HQ.PNT.DATA.
EPMASTER would be the full name of an
EIS/PS master file)
Quick look edit program
Quick look extract program
Quick look report program
Region size allocated for the execution
of PRTQLED
Region size allocated for the execution
of PRTQLEX
Region size allocated for the execution
of PRPQUIK
Time allocated for the execution of
PRTQLED
Time allocated for the execution of
PRTQLEX
Time allocated for the execution of
PRPQUIK
Lowest-level index of EIS/PS master
file
Lowest-level index of EIS/PS answer
file
(Page 1 of 2)
Figure 6.5.4-c. Substitutable Parameters for EPRPM60
682
-------
EIS/PS
REPORTS
SECTION 6.5.4
QUICK LOOK REPORT
PROGRAM PRPQUIK (EP0280)
Page 13
Release Date: 2/01/80
Update #: P-l
Parameter
Name
UNIT
TEMP
SERIAL
DISP
SPCUNIT
Default
Value
3330
SYSDA
CDHSPK
'NEW,PASS,DELETE1
TRK
PRIMARY
SECNDRY
WORKSPC
20
10
'20,10'
OUT
Description
Unit type to which quick look answer
file is to be written
Unit type to which temporary data sets
are to be written
Volume serial number of volume to which
quick look answer file is to be written
Disposition of quick look answer file
Units "In which space for all data sets
is to be allocated
Primary space allocation for quick look
answer file
Secondary space allocation for quick
look answer file
Primary and secondary space allocation
for all data sets except the quick look
answer file
SYSOUT class for all print files
(Page 2 of 2)
Figure 6.5.4-c - continued. Substitutable Parameters for EPRPM60
683
-------
EIS/PS
REPORTS
SECTION 6.5.5
QUICK LOOK TURNAROUND
DOCUMENT PROGRAM PRPTURN
Page 1
Release Date: 2/01/80
Update #: P-l
6.5.5 QUICK LOOK TURNAROUND DOCUMENT PROGRAM - PRPTURN (EP0290)
6.5.5.1 Description
PRPTURN (EP0290) supplies the user with a report from which EIS/PS master
file transactions can be coded. The report contains a complete set of
transactions for each record that appears in the quick look turnaround
document file which is passed from PRTQLEX (EP0270). The quick look
turnaround document file contains only those master file records which meet
the criteria set forth on the user-supplied quick look retrieval specification
cards (See Section 6.5.2.3 for further discussion of these cards). However,
all data from each selected record will appear in the turnaround document
regardless of whether or not repeating (pollutant-dependent) fields are
included in the selection criteria.
The turnaround document displays the data from the selected records in
card transaction format. Each field of data is printed below an abbreviation
for the data field and the card column numbers in which the data would appear
in a transaction. The card column numbers are printed vertically; therefore,
ST CNTY
00 0000
12 3456
06 1960
indicates that the state code is 06 and is coded in card columns 01 and 02,
while the county code is 1960 and is coded in card columns 03 through 06.
Note that the number of periods (...) indicates the allowable field width
for each data field. Space is left between the data and the periods below the
684
-------
EIS/PS
REPORTS
SECTION 6.5.5
QUICK LOOK TURNAROUND
DOCUMENT PROGRAM PRPTURN
Page 2
Release Date: 2/01/80
Update #: P-l
data so that handwritten changes can be entered. These changes should be
written carefully above each period.
The first 18 columns of each card (transaction) in a set is printed only
once at the upper left of the page. This information must be punched on all
transactions.
If the turnaround document is distributed for verification and updating,
include a detailed set of coding instructions and a sample set of EIS/PS load
sheets so that the headings and field content of the turnaround document are
clear. Also, provide a clear set of keypunch instructions for the person
performing that task.
The COBOL SORT verb is used in this program to sort the turnaround
document file records prior to printing the report. The default sort order is
the same as the master file sequence; however, the user may specify a primary
sort order on the 30 card of the quick look retrieval specification cards.
6.5.5.2 File Formats
Input to PRPTURN (EP0290) consists of the quick look turnaround document
file passed from PRTQLEX (EP0270) and the report control file passed from
PRTQLED (EP0260). Both of these files are temporary and their generation is
dependent upon the user-supplied quick look retrieval specification cards.
See Section 6.5.2.3 for a discussion of these cards.
Output from the program consists of the quick look turnaround document.
See Figure 6.5.5-a for a sample of this report.
685
-------
EIS/PS
REPORTS
SECTION 6.5.5
QUICK LOOK TURNAROUND
DOCUMENT PROGRAM PRPTURN
Page 3
Release Date: 2/01/80
Update #: P-l
6.5.5.3 Options and Control Cards
There are no user-supplied options or control cards for this program.
See Section 6.5.2.3 for a discussion of options and control cards for PRTQLED
(EP0260).
6.5.5.4 Error Messages
QLT001 ERROR:
Meaning:
Action:
NO RECORDS IN REPORT CONTROL FILE
The quick look edit program encountered serious error(s) and
deleted the retrieval; therefore, no records were written to
the report control file.
Correct the error(s) in the quick look retrieval specification
cards and resubmit the job.
QLT002 ERROR:
Meaning:
Action:
NO RECORDS IN TURNAROUND PRINT FILE
The quick look edit program encountered serious error(s) and
deleted the retrieval, thereby causing the quick look extract
program to retrieve no records; the logic of the 10 cards
entered is such that no records from the master file satisfied
the selection criteria; or TA was not entered on the 20 card.
Correct the error(s) in the quick look retrieval specification
cards, or change the logic of the 10 cards, or enter TA on the
20 card in the quick look retireval specification cards.
Resubmit the job.
QLT003 DISASTER: REPORT CONTROL FILE CONTAINS INVALID RECORD
Meaning: The first record in the report control file is not the report
title record. Program execution is terminated.
686
-------
EIS/PS
REPORTS
SECTION 6.5.5
QUICK LOOK TURNAROUND
DOCUMENT PROGRAM PRPTURN
Page 4
Release Date: 2/01/80
Update #: P-l
Action: Contact personnel at the National Air Data Branch for further
assistance.
6.5.5.5 Cataloged JCL - EPRPM70
6.5.5.5.1 JCL Listing - PRPTURN (EP0290) can be executed by the cataloged
procedure EPRPM70. This procedure also executes the quick look edit program,
PRTQLED (EP0260), and the quick look extract program, PRTQLEX (EP0270). See
Figure 6.5.5-b for a listing of EPRPM70.
6.5.5.5.2 Cross-reference of DD Names and Files
Program Name: PRTQLED (EP0260)
DD Name File Description
EPSINPT
EPSEXTR
EPSCNTL
EPSDIAG
Quick look retrieval specification cards
Quick look extract control file (temporary)
Quick look report control file (temporary)
Diagnostic report
Program Name: PRTQLEX (EP0270)
DD Name File Description
EPSEXTR
EPSMSTR
EPSQUIK
EPSTURN
EPSANSR
EPSDIAG
Quick look extract control file (temporary)
EIS/PS master file
Quick look file (temporary)
Turnaround document file (temporary)
Answer file
Diagnostic report
Input/Output
Input
Output
Output
Output
Input/Output
Input
Input
Output
Output
Output
Output
687
-------
EIS/PS
REPORTS
SECTION 6.5.5
QUICK LOOK TURNAROUND
DOCUMENT PROGRAM PRPTURN
Page 5
Release Date: 2/01/80
Update #: P-l
Program Name: PRPTURN (EP0290)
DP Name File Description
SORTWK01 Sort work file
EPSTURN Turnaround document file (temporary)
EPSCNTL Quick look report control file (temporary)
EPSPRNT Turnaround document
Input/Output
Internal
Input
Input
Output
6.5.5.5.3 User-supplied JCL - To execute the cataloged procedure EPRPM70, the
user must supply the quick look retrieval specification cards, the data set
name of the EIS/PS master file, and the data set name of the quick look answer
file if an answer file is requested. The user should note that the
disposition of the answer file in this procedure will cause the file to be
deleted at the end of the run. This can be changed by overriding the
substitutable parameter 'DISP' when executing EPRPM70. See Figure 6.5.5-c for
a description of the procedure's substitutable parameters.
6.5.5.5.4 Sample run stream -The following run stream would produce a
turnaround document and answer file for all records in county 1960 of state
06. The data set names of the EIS/PS master file and the answer file are
their respective default values. The default disposition of the answer file
is overriden to cause it to be saved and cataloged in the system catalog.
// EXEC EPRPM70,
// DISP='NEW,CATLG,DELETE1
//EDIT.INPUT DD *
$$SELECT TA REPORT FOR COUNTY 1960 IN STATE 06 AS OF 4/1/80
10 STTE E 06 AND
10 CNTY E 1960
688
-------
EIS/PS
REPORTS
SECTION 6.5.5
QUICK LOOK TURNAROUND
DOCUMENT PROGRAM PRPTURN
Page 6
Release Date: 2/01/80
Update #: P-l
20 TA AF
30 SEGM
$$END
6.5.5.6 Warnings and Special Instructions
Since the COBOL SORT verb is used in this program, the user should be
aware that collating sequences are not the same on all machines; therefore,
care should be taken in coding the 30 card of the quick look.retrieval
specification cards. The user should also insure that these cards are coded
properly to produce a meaningful report and answer file. See Section 6.5.2.3
for a discussion of these cards.
The user should note the disposition of the answer file in the cataloged
procedure EPRPM70 and override it according to the desired results.
6.5.5.7 Cost Considerations
The estimates listed below are based on the execution of the run stream
in Section 6.5.5.5.4 on an IBM 370/168 and pertain only to the quick look
turnaround document program, PRPTURN (EP0290).
Number of turnaround document file records read:
Number of transactions printed:
CPU time:
I/O time:
Total time:
Estimated cost:
12
50
1.00 seconds
2.23 seconds
3.23 seconds
$0.47
689
-------
EIS/PS
REPORTS
SECTION 6.5.5
QUICK LOOK TURNAROUND
DOCUMENT PROGRAM PRPTURN
Page 7
Release Date: 2/01/80
Update #: P-l
6.5.5.8 Related Programs and Procedures
The execution of PRPTURN (EP0290) is entirely dependent upon the report
control file passed from PRTQLED (EP0260) and the turnaround document file
passed from PRTQLEX (EP0270). See Section 6.5.2 for a discussion of PRTQLED
(EP0260) and Section 6.5.3 for a discussion of PRTQLEX (EP0270).
690
-------
en
CIS/PS QUICK LOCK TURNAROUND DOCUMENT
• f •
TEST 3 " TURNAROUND DOCUMENT
4/1/80
ST CNTY AQCR PLANT VR DAY
00 0000 000 1111 11 111
12 3456 789 0123 45 678
06 I960 053 0001 80 047
C«R LC USER PLNT ID CITY UTM OHN CNTACT PERSONEL TELEPHONE PRNCPLPR.OD SEG CD ACT
122 22 222222333333 3333 44 4 4444444555SS5S5 5566666666 6677777777 778
901 23 456789012345 6789 01 2 345678901234567 8901234567 8901234567 690
123 04 PL-3175
.t» •. ........
0012 12 P FRANKE SMYTHE 5919544376 9ENGINE3
ESTABLISHMENT NAME AND 'ADDRESS NEMP PR AREA
122222222223333333333444444444455555555556666666 6667 77777 7
901234567690123456789012345676901234567890123456 7690 12345 6
SYMTHE ENGINE CO
••<.............<
0014 0000t.9
ESTABLISHMENT MAILING ADDRESS
122222222223333333333444444444455555555556666666
901234567890123456769012345678901234567890123456
RED OAKEf COLORAD.O
• •>«••>•*•««•••.•»•>»•»«••«•«•»•««•«••««••••»
PLANT SEGMENT COMMENT
1222222222233333333334444444444555555555566666666667
9012345678901234567890123456789012345678901234567890
Pb*NT NOT IN PRODUCTION 12/79 THRU /a/80
t.* t •
0 1
0 1
SEG CD ACT
778
690
0 2
0 2 .
SEG CD ACT
778
890
0 3
0 3 .
SEG CD ACT
778
690
0 4
0 4 .
PAGE
(Page 1 of 4)
Figure 6.5.5-a. Turnaround Document Report
73 n
m •—i
T3 CO
o --
—I CO
CO
O .O CO
o cm
c o —|
m o
—I o
O CTi
~U 7^ •
TO cn
o —t •
cn c. cn
70 70
70
3 8
-o z
-H O
C 70 -O
TJ fl> O»
O. —' IQ
o< n> n>
r+ Cu
n w co
(0
tts
.. o
ta
-O C+
ro
o
CO
0
-------
US/PS QUICK LOOK TURNAROUND DOCUMENT
• •' •'» i
TEST
3 - TURNAROUND DOCUMENT
4/1/00
3T CUTY AQCR PLANT YR DAY
oo oooo ooo mi u m
12 3456 769 0123 45 678
06 I960 053 OOOt 80 017
• * » • *
10 UIO SIC IPP HQRIZ VERT LATITUDE LONGITUDE OF MM JA SN HR D NK CAPAC HEAT
12 222 2222 22 333 3 3333 3 34 44 44 444 14 55 55 55 55 55 6fe 6 66 66666 77 7
90 123 4567 89 012 3 4567 8 90 t2 3« 567 89 01 33 45 67 89 01 2 34 56789 01 2
SEC CD ACf
778
890
01 Oil 1141 21 245,4 0955,5 71 il 21 051 51 52 02 03 03 01 10 5 47 00137 09.7 1 1
t. ... .... .. ... It.
10 MGHT OIAM TEMP FL RATE VELOC PLUME PT/3TK CQPP 3Y SM UY UM UD E REG1 REG2 REG3 3EG CD ACT
12 2222 22 2 2233 3333333 34444 4444 4455 5 55 55 55 56 66 6 6666 6677 7777 7 7 8
90 1234 56 7 8901 2345678 90133 4567 6901 2 34 56 78 90 12 3 4567 8901 2345 890
Ot 0090 01.0 0100 0000123 00150 0900 2 81 10 79 12 15 1 44 15 17 1 2
••••••• • «••« •••» • •• ••••• • " •••• i * -
10 POLUT CNTEQC3T PCE 3CE EPIC EMISE3T MEAEMIS ALOEMIS UNIT EM TM SEG CD ACT
12 22222 22223 33 333 333 34 4 4444444 4555555 5555666 666 778
90 12345 67890 12 345 676 90 1 2345676 90U345 6789012 345 690
Ot 42101 00001*00 022 041 98.5 0000100 0000200 0000300 433 13
,< *•**, ..... .. ... ... >* . ....... ....... ....... , . . 13,
Ot 11101 00001.00 022 041 98.5 0000100 0000200 0000300 433 13
,.....> ..... .. ... ... ,. . ....... ....... ,.....« ... 13.
10 POINT SEGMENT COMMENT SE6 CO ACT
12 2222222223333333333444444444455555555556666666666777 7 7 8
9« 1234567890123456789012345678901234567890123456789012 890
01 'POINT ADDED 12/14/79 i «
PAGE
Figure 6.5.5-a. Turnaround Document Report
(Page 2 of 4)
O
PD
O JO CO
o c: m
O •— i O
CZ O — I
m
"O
X!
o
o
O 0s!
en
-a o
73 c:
ro
c
•o
CL —•'
Qi f£>
{"«• CU
fD w>
=t»s
ro
^>.
o
00
C3
-------
EIS/HS QUICK LOCK TUHN4ROUND DOCUMENT
TEST 3 - TUaNAROUNO DOCUMENT
1/1/80
01
03 001 01 00 12301 2 OOOiOOO 0004.000 5.78 02.3 00150
B
ID SCCl 3CC2 SCC3 3CC4 3EQ CON SC SOURCE DESCRIPTION
12 2 22 222 22 23 3 3 3333333444444444455555555
90 1 23 456 78 90 1 2 3456789012345678901230567
01
03 001 01 00 1 B ENGINE
3EG CO ACT
778
890
2 2
2 2
cj ID SCCt SCC2 SCC3 3CC4 3EQ 0 3 PLTIU EMI33 FCTR A3 UN PLTIO EMIS3 FCTR AS UN SEG CD ACT
12 2 22 222 22 23 3 3 33333 334444 444 4 4 45555 555555 666 6 6 778
90 1 23 456 78 90 1 2 34567 890123 456 7 8 90123 456789 Ot2 3 4 890
01
03 001 01 00 L B 42602 000000.000
2 42101 000000,000
1
01
03 001 01 00 L B 22104 000000,230
2 11101 000000.000
10 SCCl 3CC2 3CC3 3CC4 SCO SCC SEGMENT LEFT COMMENT
12 2 22 222 22 23 33333333344444444445555555
90 1 23 456 76 90 12345678901234567890123456
01
03 001 01 00 3CC LEFT COMMENT P7
!0 SCCl 3CC2 3CC3 3CC4 3EQ 3CC SEGMENT RIGHT COMMENT
12 2 22 222 22 23 3333333Si444444444455SS$55
90 1 23 456 78 90 123456789012345&789012345&
01
4 03 001 01 00 3CC RIGHT P7 COMMENT
2 3
2 3
3EG CO ACT
778
890
2 4
2 4
SEG CO ACT
7 7 8
890
2 5
I 5
P»Ct
3T CUT? AQCR PL*NT YR DAY
00 0000 000 1111 11 111
12 3456 739 0123 45 678
06 I960 053 0001 80 047
* * * * *
ID SCCl SCC2 3CC3 3CC4 SEO BEC UN HASTE RT MAX RATE 3ULF A3H HEAT ORG SRC SEG CO ACT
12 2 22 222 22 23 33333 3 3334444 4444 «45 5 55 55 5 55566 66778
90 1 23 456 78 90 12345 6 7890125 4567 890 1 23 45 6 78901 23890
(Page 3 of 4)
Figure 6.5.5-a. Turnaround Document Report
"O
O
73
m
CO
CO
O jO
o c
o
<=.
m
Z
ICK
T
LOOK
"O
73
O —I
CD C
73 73
§ g
X!
-o o
73 c=
~D Z
—t a
SECTION 6.5
T3
a.
Cu
73 T3
fD fu
—' <£>
fD fD
CD
O
O
a>
ro
o
CO
o
-------
CTl
VO
EI3/P3 QUICK LOOK TURNAROUND DOCUMENT
PAGE
T18T 3 • TURNAROUND DOCUMENT 4/1/80
3T CNTY AQCR PLANT YR DAY
00 0000 000 till 11 111
12 34S6 789 0123 45 676
06 I960 053 0001 80 047
ID 3EQ LINE LR COMMENT SEG CD ACT
12 22 222 2 222333333333344444444445555555555666666666677777777 778
90 12 345 6 789012345678901234567890123456789012345678901234567 890
01 02 021 I PLANT NOT FOLLOHING GUIDELINES AS SET DOhN 12/14/79 3 0
.. ... L 3 0
02 021 R HILL BE CITED 3/1/80 3 0
.. ... R ........................*•••«•»••»•••««'»•'«»•••• 3 °
t *
01
Figure 6.5.5~a. Turnaround Document Report
(Page 4 of 4)
73 m
m •—i
-o oo
o -*-.
73 "U
-H 00
00
O .O t
o c r
O HH O
c= o -
m
o
O Oi
O -H
CD <=
73 73
70
T3 O
73 G
-a -z.
—\ O
en
•
tn
CZ PO "X3
•o n> o»
ex — • ua
QI n> CD
Q)
cf
ro
oo
o
-------
E IS/PS
REPORTS
SECTION 6.5.5
QUICK LOOK TURNAROUND
DOCUMENT PROGRAM PRPTURN
Page 12
Release Date: 2/01/80
Update #: P-l
//« EPALMH/A087 HfcDGEPfcTH, LLUYD M. (919) 541-5491
//*
//* PROCEDURE NAME: EPRPM/0
//* REVISION LEVEL: 1-00
//* LAST UPDATE *: P-l
DATE INCORPORATED: FEBRUARY 1, 1980
THIS PROCEDURE ALLOWS THE USER TO GENERATE AN EIS/PS QUICK
LOOK TURN-AROUND DOCUMENT
//*
//*
//*
//*
//*
//EPRPM70 PROC PRUJECT='CN.EPALMH.A087.CDHS.HO.PNTI.
//
//
//
//
//
PROGlsPWTQLED,
PRUG2sPRT«LEX»
PROG3=PHPTURN,
SEGIONlslOOK,
REGIUN2slOOK,
REGIUN3=100K,
TIMF.2=«1,0'
MSTHFIL=EPMASTER,
ANSRFILstPOLANSR,
UNJT=3330,
TEMP=SYSDA,
SERIALsCOHSPK,
DISP=«NEW, P*SS, DELETE
SPCUNITrTRK.
PRIMARYsZOr
SfcCNORYslO,
WURKSPCs'20,101,
OUT=A
EXEC PGMS&PRUG1,
REGIUNs®IONl/
//
//
//
//
//
//
//
//*
//EDIT
//
//
//*
//* FOIT OUJCK LOOK CONTROL CARDS
//*
//STEPLIB OD OSN=&PROJECT..LOAO»
// VULUMfs(PRjVATE, RETAIN),
// DISP=(SHR,PASS)
//*
//* INPUT DATA SET - UUICK LOOK CONTROL CARDS
//*
//EPSINPT DO DONAMEsfNPUT,
// DCH=BLKSIZEs80
//*
//« OUTPUT DATA SET • QUICK LOOK RETRIEVAL CONTROL TABLES
//*
//EPSEXTR OU f)SNAME=li&ULTABL»
// UNITsiTEMP,
// OISP=(NEW,PASS),
// SPACEs(itSPCUNn,(8WORKSPC),RLSE)
//*
//* OUTPUT DATA SfcT - QUICK LLHJK REPORT CONTROL FILE
00000100
00000200
00000300
00000000
00000500
00000600
00000700
OOOOOflOO
00000900
00001000
00001100
00001200
00001300
00001400
00001500
OOOOlbOO
00001700
00001800
00001900
00002000
00002100
00002200
00002300
00002400
00002500
00002600
00002700
00002800
00002900
00003000
00003100
00003200
00003300
00003400
00003500
00003600
00003700
00003600
00003900
00004000
00004100
00004200
00004300
00004400
00004500
00004600
00004700
00004800
00004900
00005000
00005100
00005200
00005300
00005400
00005500
00005600
(Page 1 of 4)
Figure 6.5.5-b. Cataloged Procedure EPRPM70
695
-------
EIS/PS
REPORTS
SECTION 6.5.5
QUICK LOOK TURNAROUND
DOCUMENT PROGRAM PRPTURN
Page 13
Release Date: 2/01/80
Update #: P-l
//*
//fcPSCNTL DO
// UNIT=RTEMP,
// DISP=(NEw,PASS),
// SPACE=USPCUN1T, UwORKSPC) , RLSE )
//*
//* OUTPUT DATA StT - DIAGNOSTIC KEPOHT
//*
//EPSDIAG DO SYSUUT = U)UT
//*
//* OUTPUT DATA SfeTS - SYSTEM OPERATION
//*
//SYSOUT DD SYSUUT=dOUT
//*
//SYSPRINT DD SYSOUT=&OUT
//*
//8YSDTERM DD SYSOUTs&UUT
//*
//SYSUDUMP DD SYSUUTs&OUT
//*
//SYSDBUUT DD SYSDUT=&OUT
//*
//RETRIEVE EXEC PGM*&PR(JG2,
// HtGION=®ION2,
// TIMfc=(&TJME2)
//*
//* RETRIEVE FROM THE MASTER FILE
//*
//STEPLIB DD OSN=&PROJECT..LOAD,
// VOLUME=(P«IVATE, RETAIN),
// DISP=(SHR,PASS)
//*
//* INPUT DATA SET - OU1CK LOOK RETRIEVAL CONTROL TABLES
//*
//EPSEXTR DD DSNs&iQLTABL,
// OISH=(SHR,PASS),
//* INPUT DATA SET - EIS/PS MASTER FILE
//*
//EPSMSTR DD DSNAME=fcPRfJJtCT..DATA.&MSTRFIL»
// VOLIJMEs(PRIVATE,RETAIN),
// DISP=(SHRfPASS)
//*
//* OUTPUT DATA SET - QUICK LOOK REPORT FILE
//*
//EPSUU1K DD OSNS&&GILRPTF,
// UMI=KTEMP,
// DISPs(NEV»,PASS),
// SPACE = (&SPCUNIT,(«,WOHKSPC),RLSE)
//*
//* OUTPUT DATA SET • UUICK LOOK TURN-AROUND REPORT FILE
//*
//EPSTURN DD DSN=(UULTURN,
// UN1T=KTEMP,
// DlSP=(NEh,PASS),
00005700
00005BOO
00005900
00006000
00006100
00006200
00006300
00006400
00006500
00006600
00006700
00006800
00006900
00007000
00007100
00007200
00007300
00007400
00007500
00007600
00007700
00007800
00007900
00008000
00008100
00008200
00008300
00008400
OOOOA500
00008600
00008700
00008800
00008900
00009000
00009100
00009200
00009300
00009400
00009500
00009600
00009700
00009800
00009900
00010000
00010100
00010200
00010300
00010400
00010500
00010600
00010700
00010800
00010900
00011000
00011100
00011200
(Page 2 of 4)
Figure 6.5.5-b - continued. Cataloged Procedure EPRPM70
696
-------
EIS/PS
REPORTS
SECTION 6.5.5
QUICK LOOK TURNAROUND
DOCUMENT PROGRAM PRPTURN
Page 14
Release Date: 2/01/80
Update #: P-l
// SPACEaU8PCUNlT,(*wUHK8PC),HL3fc)
//*
//* OUTPUT DATA Stt • tlUICK LOOK ANSWER FILE
//*
//EPSANSP 00 DSNs*P»ujECT..DATA.*ANSRFIL»
// UNITz&UNIT,
// V,
// SPACEsUSPCUNi T, (&PKIMARY,&3ECNDRY> ,RLSE)
//*
//* OUTPUT DATA SET - DIAGNOSTIC REPORT
//*
//EPSOIAG 00 SYSOUT=&OUT
//*
//• OUTPUT DATA SETS - SYSTEM OPERATION
//*
//SYSOUT 00 SYSOUTalKJUT
//SYSPRINT DD SYSOUTsftOUT
//*
//SYS0TERM DO SYSUUT=&OUT
//*
//SYSUOUMP 00 SYSOUTs&OUT
//*
//SYSOBUUT DO SYSUUTs%OUT
//*
//*
//REPORT EXEC PGMS&PRUGS,
//*
//* PRODUCE QUICK LOOK TURN-AROUNO DOCUMENT
//*
//STEPLIB 00 OSWAM£afcpROJECT..LOAO,
// VOLUMEs(PRIVATE»RETAIN),
// DISP=(SHR,PASSJ
//SORTLIR 00 USNA«EsSYSl.SURTLI8»
// DISP=(SHR,PASS)
//*
//* INPUT DATA SET - QUICK LOOK REPORT CONTROL FILE
//*
//EPSCNTL 00 DSNAMEs&ftULRCNT,
// UNITs&TEMP,
// OISPs(SHRrPASS)
//*
//* INPUT DATA SET » OUICK LOOK TURN-AROUND REPORT
//*
//EPSTURN DD DSNAMEafcRBLTURN,
// UNIIsiTtNP,
// OISPs(SHRrPASS)
//*
//* SORT DATA SETS
//*
//3URIWK01 DD UNITrHTEMP,
// 3PACEs(fcSPC»NlT,(*«aRKSPC),,CONTI6)
OflOtIJOO
00011400
00011t>00
00011600
00011700
00011800
00011900
00012000
00012100
00012200
00012300
00012400
00012500
00012600
00012700
00012900
00012900
00013000
00013100
00013200
00013300
00013400
00013500
00013600
00013700
00013800
00013900
00014000
00014100
00014200
00014300
00014400
00014SOO
00014600
00014700
00014800
00014900
00015000
00015100
00015200
00015300
00015400
00015500
00015600
00015700
00015800
00015900
00016000
00016100
00016200
00016300
00016400
00016500
00016600
00016700
00016800
(Page 3 of 4)
Figure 6.5.5-b - continued. Cataloged Procedure EPRPM70
697
-------
EIS/PS
REPORTS
SECTION 6.5.5
QUICK LOOK TURNAROUND
DOCUMENT PROGRAM PRPTURN
Page 15
Release Date: 2/01/80
Update #: P-l
//*
//SUHTWK02
//
//*
//SURTWK03
//
//*
//* OUTPUT
//*
//EPSPRNT
//*
//* OUTPUT
//*
//SYSOUT
//*
//SYSPKINT
//*
//SYSDTERM
//*
//3YSUDUMP
//*
X/SYSOHOUT
//*
DD UNlTr(MEMP,SEPs80RTrtK01),
SPACfc = (&SfJCUNIT»(&W(lWKSPC)»rCONTIG)
OU UNir=(fcTEMP,ShP=(SUWTWK01,SORTWK02)),
SPACE=(&SPCUNITr(«i1U«KSPC),,CUNTIG)
DATA SET - QUICK LOOK TURN-AROUND DOCUMENT
DD SYSUUTs&OUT
DATA SETS - SYSTEM OPERATION
DD SY.SUUTs&UUT
DO SYSOUTa&OUT
DD SYSOUTs&UUI
DD SYSUUT=«.OUT
DD SYSUUTsiOUT
00016900
00017000
00017100
00017200
00017JOO
00017400
00017500
00017600
00017700
00017800
00017900
00018000
00018100
00018200
00018300
00018100
00018500
00018600
00018700
00018800
00018900
00019000
00019100
(Page 4 of 4)
Figure 6.5.5-b - continued. Cataloged Procedure EPRPM70
698
-------
EIS/PS
REPORTS
SECTION 6.5.5
QUICK LOOK TURNAROUND
DOCUMENT PROGRAM PRPTURN
Page 16
Release Date: 2/01/80
Update #: P-l
parameter
Name
PROJECT
Default
Value
'CN.EPALMH.A087,
CDHS.HQ.PNT1
PROG1
PROG2
PROGS
REGION1
REGION2
REGIONS
TIME1
TIME2
TIMES
MSTRFIL
ANSRFIL
UNIT
PRTQLED
PRTQLEX
PRPTURN
100K
100K
100K
'1,0'
'1.0'
'1,0'
EPMASTER
EPQLANSR
3330
Description
Highest-level index of data set names
(e.g., CN.EPALMH.A087.CDHS.HQ.PNT.DATA.
EPMASTER would be the full name of an
EIS/PS master file)
Quick look edit program
Quick look extract program
Quick look turnaround document program
Region size allocated for the execution
of PRTQLED
Region size allocated for the execution
of PRTQLEX
Region size allocated for the execution
of PRPTURN
Time allocated for the execution of
PRTQLED
Time allocated for the execution of
PRTQLEX
Time allocated for the execution of
PRPTURN
Lowest-level index of EIS/PS master
file
Lowest-level index of quick look answer
file
Unit type to which the quick look
answer file is to be written
(Page 1 of 2)
Figure 6.5.5-c. Substitutable Parameters for EPRPM70
699
-------
EIS/PS
REPORTS
SECTION 6.5.5
QUICK LOOK TURNAROUND
DOCUMENT PROGRAM PRPTURN
Page 17
Release Date: 2/01/80
Update #: P-l
Parameter
Name
TEMP
SERIAL
DISP
SPCUNIT
PRIMARY
SECNDRY
WORKSPC
OUT
Default
Value
SYSDA
CDHSPK
'NEW,PASS,DELETE1
TRK
20
10
'20,10'
A
Description
Unit type to which temporary data sets
are to be written
Volume serial number of volume to which
the quick look answer file is to be
written
Disposition of quick look answer file
Units in which space for all data sets •
is to be allocated
Primary space allocation for the quick
look answer file
Secondary space allocation for the
quick look answer file
Space allocation for all data sets
except the quick look answer file
SYSOUT class for all print files
(Page 2 of 2)
Figure 6.5.5-c - continued. Substitutable Parameters for EPRPM70
700
-------
EIS/PS
INTER-FUNCTIONAL
PROCEDURES
SECTION 7.0
INTRODUCTION
Page 1
Release Date: 2/01/80
Update #: P-l
7.0 INTER-FUNCTIONAL PROCEDURES
7.1 INTRODUCTION
This section provides an example of a run stream from the EIS/PS baseline
test run series in which more than one function is performed. In the brief
discussion of the example, references are given to specific sections in the
User's Guide for more detailed information on the programs and procedures.
Also, a figure is provided which shows the run stream. The primary emphasis
of this section is to demonstrate how various functions can be linked together
in a single job to accomplish a desired result (by executing several EIS/PS
procedures).
701
-------
EIS/PS
INTER-FUNCTIONAL
PROCEDURES
SECTION 7.2
EXAMPLES
Page 1
Release Date: 2/01/80
Update #: P-l
7.2 EXAMPLES
7.2.1 RETRIEVAL AND EMISSION PROJECTION
This retrieval is the same as that discussed in Example 2 of section
5.2.2.2. Records for county 0040 and SCC 40100101 are selected. Information
on the retrieval can be found in Section 5.2. The retrieval procedure EPRTM30
is run.
The answer file retrieved is used as input to the emissions projection
procedure EPRPM50. The SCC option is used for the emissions projection
program PRPEPRJ (EP0250). The SCC 40100101 is projected by increasing thruput
by 25%. Information on emissions projection can be found in Section 6.4.3.
Figure 7.2-a shows the run stream for this example. Note that TEMPRETR
is the answer file retrieved from the master file EPMSTR2. The projection
file is PROJFL2.
702.
-------
EIS/PS
INTER-FUNCTIONAL
PROCEDURES
SECTION 7.2
EXAMPLES
Page 2
Release Date: 2/01/80
Update #: P-l
//ADHOC01A EXEC EPRTM30,
// MSTRFIL=EPMSTR2,
// ANSWRFL=TEMPRETR
//COMPILE.INPUT DD *
$$SELECT
COUNTY
SCC
$$END
//ADHOC01B EXEC EPRPM50,
// MSTRFIL=TEMPRETR
// PROJFIL=PROJFL2
a
//PROJCT.OPTION DD *
40100101 025
'0040'
140100101'
AND
Figure 7.2-a. Runstream for Example 7.2.1
703
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.1
IBM JCL
Page 1
Release Date: 2/01/80
Update #: P-l
8.0 JCL AND GENERAL TOPICS
8.1 IBM JCL
8.1.1 INTRODUCTION
This section discusses the IBM 360/370 OS JCL used in the baseline EIS/PS
subsystem. Those users who have other types of hardware and operating systems
will have to modify or replace this JCL and should consult their systems
personnel for specific instructions.
There are three basic types of IBM JCL statements necessary to run the
EIS/PS programs. These are the JOB, EXEC, and DD statements. All JCL
statements follow a similar format: the first two columns of the card must
contain slashes (//) to denote that the card is a JCL card; an optional name
immediately follows the slashes and may be one to eight characters in length;
the keyword (JOB, EXEC or DD) must be preceded and followed by at least one
space. There are several fields of information specified in these statements,
each field being separated from the preceding one by a comma. All of the
information must be punched in columns 1-71. See Figure 8.1-a for an
illustration of this format.
If a statement is too long to be punched on one card, the additional
information can be punched on successive continuation cards. Each
continuation card must contain slashes in columns 1 and 2 followed by at least
one space. The information contained on the card must start between columns 4
through 16, inclusive. In addition, the last field on the preceding card must
be followed by a comma.
There are three JCL statements that do not follow the general format.
Information on these exceptions can be found in Section 8.1.5.
704
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.1
IBM JCL
Page 2
Release Date: 2/01/80
Update #: P-l
8.1.2 JOB CARD
A job is a group of JCL statements grouped together into a single run
stream. The JOB card is the first of these statements, and it contains the
accounting information and run parameters that the computer operating system
must have to run the job. Each computer installation has its own standards
for JOB card formats, but a sample format is shown in Figure 8.1-b. Some of
the parameters mentioned here may not be allowed or may be specified
differently at your installation. The user should consult his local computer
systems personnel for details of the JOB card requirements at his
installation. Each job card will generally contain an equal sign and a value
for each keyword. Each field, except the last, must be followed by a comma.
Figure 8.1-c gives a listing of frequently used information fields for JOB
cards.
8.1.3 EXEC CARD
The EXEC card is used to specify the procedure or program to be executed.
In EIS/PS, all JCL to execute specific programs is included in cataloged
procedures (see Section 8.1.6). Several EXEC cards can be included in a given
job; for example, to run both a retrieval and a detailed report of the answer
file, two EXEC cards would be used, one for the retrieval procedure EPRTM30
and one for the detailed report procedure EPRPM20.
The cataloged procedures in EIS/PS contain substitutable parameters to
indicate frequently changed information such as file names and storage
information for new data sets. Values for these substitutable parameters are
specified on the EXEC card. Information on the substitutable parameters for
the cataloged procedures can be found in the program sections of this User's
Guide.
705
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.1
IBM JCL
Page 3
Release Date: 2/01/80
Update #: P-l
8.1.4 DD CARD
The DD (Data Definition) card is used to define the data sets associated
with a particular program's execution. The DD card provides information such
as the data set name, the unit type (such as disk or tape), the volume on
which the data set resides, and the disposition (is the data set old or new;
should it be cataloged, kept, or deleted?). These DD cards are included in
the cataloged procedures, with the most variable information (data set name,
space allocation, disposition, etc.) specified by substitutable parameters.
Fields that can be specified on the DD card are shown in Figure 8.1-d.
In some cases, the user will have to override one or more DD cards in a
cataloged procedure. The cataloged procedures in EIS/PS contain deferred DD
names for many data sets to eliminate the necessity for overrides. The DD
cards defining option cards and transaction files for EIS/PS programs are
examples of deferred DD names. For example, in the cataloged procedure
EPRPM20 (see Section 6.3.2.5), which produces the master file detailed report,
the DD card used to define the option card input to PRPMSTR (EP0210) is as
follows:
//EPSOPTN DD DDNAME=OPTIONS,
// DCB=BLKSIZE=80
To run this procedure, a card must be entered into the run stream to further
define this data set. The required card would be coded as follows:
//REPORT.OPTIONS DD *
Note that REPORT indicates the job step which executes PRPMSTR (EP0210),
OPTIONS indicates which data set is being defined, and the * indicates that
data (in this case, the option card) will immediately follow the DD card in
the run stream.
706
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.1
IBM JCL
Page 4
Release Date: 2/01/80
Update #: P-l
8.1.5 SPECIAL JCL CARDS
There are three special JCL cards: the in-line data set delimiter, the
comment card, and the end-of-job card.
The special control card
/*
is used to indicate the end of an in-line data set, such as transactions,
retrieval specifications, and option cards.
The comment card
//* comment
can be used anywhere in the run stream after the JOB card.
The // card is used to denote the end of a job.
Some installations also require an end-of-file card, but there is no
standard format for it.
8.1.6 CATALOGED PROCEDURES
' With the JCL cards described above (JOB, EXEC, DO), it is possible to
write all of the control language statements necessary to run the EIS/PS
programs. For example, over 200 control statements are required to run a
retrieval. Since it would be very time consuming to code all of the JCL
statements each time a program is run, and since there would also be a great
possibility for errors, the JCL to run the EIS/PS programs has been
organized into procedures. These procedures are cataloged in a systems
library and can be executed by using only a few JCL control statements. The
cataloged procedure which invokes an EIS/PS program is discussed in the
707
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.1
IBM JCL
Page 5
Release Date: 2/01/80
Update #: P-l
section of this User's Guide which relates to that program. A list of the
substitutable parameters associated with the procedure, a brief discussion,
and sample job streams are also provided in that section.
A procedure can be executed directly from the EIS/PS JCL library if a
procedure library (PROCLIB) control card immediately follows the JOB card in
the run stream. However, some installations may require that the procedures
be copied into a system procedure library. In this case, no PROCLIB statement
is needed to execute a procedure. The systems personnel at a particular
installation can explain what that installation requires. Please note that if
the procedures are executed from a system procedure library, any updates to
the EIS/PS procedures must be made in both the EIS/PS JCL library and the
system library.
708
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.1
IBM JCL
Page 6
Release Date: 2/01/80
Update #: P-l
Columns
1 3
Column
71
//[name] [keyword]
information
Name - one to eight characters
Keyword - DD, EXEC, JOB
Information - consists of several fields separated by commas
Figure 8.1-a. General Format of JCL Statement
709
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.1
IBM JCL
Page 7
Release Date: 2/01/80
Update #: P-l
//[job name] JOB [accounting information],[name],[information]
Job name - name given to job by user. Must be one to eight characters in
length and must begin in column 3
Accounting information - installation-dependent account number (consult
the local systems personnel)
Name - name selected by user to identify run, 1 to 20 characters long
Information - see Figure 8.1-c
Figure 8.1-b. JOB Card Format
710 „
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.1
IBM JCL
Page 8
Release Date: 2/01/80
Update #: P-l
MSGLEVEL Specifies whether or not all JCL cards should be listed.
PRTY
Specifies the job priority. These priorities are established by
the installation; consult the local systems personnel for
information.
CLASS Specifies the job class to be used. Job classes determine the
overall priority (and cost schedule) of the job. The user
should consult the local systems personnel for information on
classes used at his installation.
TIME
Specifies a time limit for the job. It can be given in minutes
(e.g., TIME=3) or in minutes and seconds (e.g., TIME=(1,30)). If
no value is specified, the installation's default value will be
used. Consult the local systems personnel for information on the
default value.
Figure 8.1-c. JOB Card Information Fields
711
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.1
IBM JCL
Page 6
Release Date: 2/01/80
Update #: P-l
DUMMY This parameter is specified for the input master file when running
file maintenance procedures to create initial files. DUMMY
signifies that the data set is not present.
UNIT Specifies the input/output unit. Disk units can be specified by
DISK, 2314, 3330, etc., to denote the specific disk type used.
Tapes can be specified by TAPE or 2400, etc. Consult the local
systems personnel for specific information on the specifications.
DISP Specifies the data set disposition. There are three positional
subparameters within the DISP parameter:
DISP=(current status, normal disposition, abnormal disposition).
One of three values can be specified for current status: NEW, OLD,
or SHR. Their meanings are as follows:
NEW specifies that no data set with the specified name currently
exists.
OLD designates an existing data set and specifies that the step
will be given sole access to the data set.
l
SHR specifies an existing data set which can be shared with other
jobs running at the same time.
The normal disposition is used if the step proceeds to normal
system completion; the abnormal disposition is used if the step has
an abnormal system termination. Note that most ABORT errors in
(Page 1 of 4)
Figure 8.1-d. DD Card Field Specifications
712
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.1
IBM JCL
Page 10
Release Date: 2/01/80
Update #: P-l
EIS/PS will cause the step to terminate prematurely, but will not
cause a system ABORT, and therefore, the normal disposition is still
in effect. The possible values for both dispositions are CATLG,
KEEP, PASSi DELETE, and UNCAT. Their meanings are as follows:
CATLG, generally used for new permanent data sets, specifies that
the data set will be kept and that an entry will be made in the
system catalog for that data set. Cataloged data sets can be
referred to in later jobs by name and disposition only.
KEEP is used to indicate that a new permanent data set is to be kept
but that no entry will be made in the system catalog. Data sets
written with a disposition of KEEP must be referenced by complete DD
information.
PASS is used to pass the data set to subsequent job steps. The use
of PASS saves time, since the system retains the data set location
and volume information, and the volume containing the data set
remains mounted. PASS can be used for both temporary and permanent
data sets.
DELETE deletes the data set and removes it from the catalog, if
applicable.
UNCATLG removes the data set from the catalog, but does not delete
it.
(Page 2 of 4)
Figure 8.1-d - continued. DD Card Field Specifications
713
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.1
IBM JCL
Page 11
Release Date: 2/01/80
Update #: P-l
VOL
LABEL
The volume parameter requests a specific volume, such as a tape reel
or a disk pack. VOL must specify the volume serial number for a
data set. It also can be used to specify that the volume is
private, and that a mountable volume is to be retained. This is
denoted by VOL=(PRIVATE,RETAIN,SER=XXXXXX), where XXXXXX is the six-
character volume serial number. If only the volume serial number is
to specified, VOL=SER=XXXXXX can be used.
Provides label information for the data set. EIS/PS has been set up
to specify all data sets as unlabeled. If this is not allowed at a
particular installation, all programs in the system for that
installation must be modified to reflect that the data sets are
labeled. The user must consult NADB prior to making such a
modification. Since tapes can contain more than one file, the file
number is also specified in the LABEL parameter; i.e., LABEL=(file
number, type). The value for type is NL for unlabeled data sets and
SL for labeled data sets.
SPACE The space parameter is used on direct access (disk) volumes to
indicate the amount of space to be allocated. Space can be
allocated by tracks (TRK) or cylinders (CYL). Both a primary and a
secondary allocation can be specified; if the primary space is
exceeded, up to 15 times the secondary allocation will be used. To
conserve space, a release (RLSE) parameter can be coded. RLSE
requests that only that space actually used for the data set be
kept. As an example, to allocate ten primary and five secondary
tracks with extra space released, the SPACE parameter would be coded
as follows:
SPACE=(TRK,(10,5),RLSE)
(Page 3 of 4)
Figure 8.1-d - continued. DD Card Field Specifications
714 .
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.1
IBM JCL
Page 12
Release Date: 2/01/80
Update #: P-l
SYSOUT Routes a data set to a specific device, such as a printer or a card
punch. Standard values are A for printer and B for card punch.
Consult the local systems personnel for installation values used to
specify special forms, etc.
DCB Specifies the data control block (DCB) parameters, such as the
record and block sizes and the record format. This information is
not generally needed for EIS/PS. The subparameters generally used
are RECFM, LRECL, and BLKSIZE. They are described as follows:
!)
RECFM is used to specify the record format. Values used in EIS/PS
are V for van"able-length records, F for fixed-length records, and B
for blocked records. The EIS/PS master file has RECFM=*VB; the
emission factor file has RECFM=FB.
LRECL indicates the record length of the file. If needed, this
information can be found on the particular file's record layout in
the User's Guide.
BLKSIZE is used to indicate the block size (in bytes). The number
of records per block can be found in the data division of each
EIS/PS source program.
>Page 4 of 4)
Figure 8.1-d - continued. DD Card Field Specifications
715
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 1
Release Date: 2/01/80
Update #: P-l
8.2 UPDATES
8.2.1 INTRODUCTION
Changes are made to the EIS/PS programs and procedures as necessary to
provide additional capabilities such as new user-oriented reports; to meet
changing EPA requirements, such as changes to EPA standards; and to correct
program "bugs." Some past examples of enhancements to EIS/P&R include adding
the ability to add and delete machine processes and pollutants. Changes in
the file maintenance program were necessitated by changes in the NEDS edit
checking. Several program "bugs" which allowed for records to be lost have
been corrected in the file maintenance program.
Whenever changes to the EIS/PS subsystem are necessary, an update will be
issued by EPA to make that change. The purpose of this and the following
sections is to provide information on installing these updates.
8.2.2 GENERAL UPDATE INFORMATION
8.2.2.1 Update Numbers
Each update is assigned an update number which serves as a means of
identifying a particular program's status. The updates are numbered sequen-
tially starting with 1; i.e., Update P-l was the first update to EIS/PS.
Each program in the EIS/PS system provides an update message (see
Figure 8.2-a) at the beginning of the diagnostic report. This update
message includes the program's name, its revision level, the update number,
and the date the update was incorporated in the EPA Baseline system. This
information is necessary for troubleshooting since the update message includes
the update status of the program being executed. Past problems have occured
716
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 2
Release Date: 2/01/80
Update #: P-l
when users compiled new updates but failed to link edit them and also when
jjsers have not installed updates which corrected known problems. In both of
these cases, the update message immediately reveals the problem. The user is
reminded not to remove these update comments since doing so constitutes a
modification to the system; EPA will not provide troubleshooting assistance
modified systems.
8.2.2.2 Update Package
If only a few changes are necessary, the update will be sent to users on
cards, otherwise the update will be sent on a tape. Each installation should
receive one full copy of the update (tape or cards). An abbreviated listing
of the modified programs will be included in the package. This listing (see
Figure 8.2-b) shows all modifications to the programs, plus the first and last
page of the program source code.
The update package distributed by EPA also contains an update letter (see
Figure 8.2-c), an update packing list (see Figure 8.2-d), and an update veri-
fication form (see Figure 8.2-e). Additional items may be included; they will
be checked on the update packing list.
The update letter gives both detailed information on the modifications
made in the update and instructions on installing the update. If the update
is sent on tape, the letter will include a listing of the files on the tape
with information on the number of records and programs contained in each file.
See Figure 8.2-f for an example of a listing of a tape update. Each update
letter contains a paragraph reminding users that NADB is not responsible for
any modifications made to the system other than those authorized to meet a
specific computer system problem.
The update packing list includes information on when the user's update
was copied, the tape number (if applicable), and a checklist of items sent in
717
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 3
Release Date: 2/01/80
Update #: P-l
the update package. If the update package does not correspond exactly with
those items specified on the packing list, notify NADB for needed items.
The update Packing list also includes information on the hardware and
software used by the installation. This information is necessary to
provide each installation with a suitable update package. If there are any
errors or omissions in this information, please notify NADB.
The update verification form is to be returned to NADB once the update
has been installed. The form provides NADB with information on the update
status of your installation. Such information is vital when problems occur in
your EIS/PS system and NADB is contacted for troubleshooting assistance.
Additional personnel at your installation may be on the EIS/PS mailing
list to receive letters-only copies of updates. These people will receive the
update letter and any updates to the EIS/PS documentation, but will not
receive the tape or cards to install the update. A checklist for installing
the update is shown in Figure 8.2-g. Details on the installation are found in
Section 8.2.3 through Section 8.2.5.
8.2.3 UPDATE INSTALLATION
The following sections discuss the procedures and systems utilities used
to install an update. It is recommended that updates be installed as soon as
possible. If the update has been sent on a magnetic tape, the tape should be
returned to NADB promptly. If there is a delay in installing the update, copy
it onto your own tape and return the tape sent from NADB. NADB should be
contacted for troubleshooting assistance.
718
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 4
Release Date: 2/01/80
Update f: P-l
8.2.3.1 IBM Utility IEBUPDTE
The IBM utility IEBUPDTE allows for the addition, deletion, replacement,
and modification of modules in partitioned data sets. EIS/PS uses partitioned
data sets for both the source and the procedure libraries. The load library
is also a partitioned data set, but changes are made to it by compiling and
link editing modified programs. A sample listing of an IEBUPDTE deck is shown
in Figure 8.2-h. This deck is provided with each EIS/PS update. The update
letter lists any changes the user should make in the update deck prior to
running it at his installation.
If the update has been sent on cards, all modifications to the source
library are included to be run in one execution of IEBUPDTE; procedure
modifications are included to be run in a separate execution. If the update
is on a tape, each program is in a separate file on that tape. Each of .the
files can be input to a separate run of IEBUPDTE if time and page limits are
small at your installation site; if such limits are not important, all of the
files can be input to one run. The control cards are coded so that each
modified program will be renumbered, beginning with 100 and incrementing by
100.
A listing of each program will be produced and this listing should be
compared with the listing sent in the update package to insure that all
modifications were made correctly and that the program has the correct number
of lines. In addition, the condition code returned by the computer upon
execution of IEBUPDTE should be 0 and a message should be printed indicating
that the source module was altered. See Figure 8.2-i for an example of the
condition codes and Figure 8.2-j for an example of the printed message.
If you have made modifications to the source programs that cause the line
numbers to be different from the baseline version, any updates which change
specific lines of code (as compared to replacing the entire program) must be
examined. Using the abbreviated program listing (see Figure 8.2-b) and a
719
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 5
Release Date: 2/01/80
Update #: P-l
listing of your source program, change the line numbers in the update deck to
the line numbers of the appropriate lines of code in your source program.
This will insure that the update will be correctly applied to your source
program. For example, if 'MAIN-LOOP.' is line 1500 of the baseline version,
but is 1502 in your source program, the update statement specifying line 1500
must be changed to specify line number 1502. However, if the update replaces
the entire program, the replacement should be made first; any local
modifications can then be made to a copy of the replacement program. Whenever
local modifications are made, a copy of the baseline system must be kept.
This copy will be useful in implementing future updates. ;
8.2.3.2 Run Stream for IEBUPDTE
The update deck contains all of the necessary JCL statements (excluding
the job card) for executing IEBUPDTE. Upon receipt of the update, process the
update deck through an interpreting keypunch. A listing of the update deck is
included in the update package; the user should verify that the cards he
receives are exactly as listed (see Fi.gure 8.2-h for a sample listing).
The data set names (DSN=data set name) on the SYSUT1 and SYSUT2 DD cards
must be changed to reflect the user's data set names if they are not
identical. Thus, if the user's source library is 'F734.CDHS.PNT.SOURCE', the
cards should be changed to the following:
//SYSUT1 DD DSN=F734.CDHS.PNT.SOURCE,DISP=OLD
//SYSUT2 DD DSN=F734.CDHS.PNT.SOURCE,DISP=OLD
If the user's source modules for the EIS/PS programs differ in name from the
baseline (e.g., if the numeric names rather than the alphanumeric names are
used), those names must be changed on all control statements. Thus, if the
card
./ REPL NAME=PRPMSTR,LIST=ALL
is included in the update deck and the user's version of the master file
720
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 6
Release Date: 2/01/80
Update #: P-l
detailed report program is stored under the name EP0210 rather than PRPMSTR,
the card should be changed to
./ REPL NAME=EP0210,LIST=ALL.
A job card must be added prior to running the IEBUPDTE run stream. If
several programs are to be modified in one run, specify sufficient time and
page parameters on the job card.
8.2.3.3 Non-IBUPDTE Updates
y ^^••••••••^^•"••i^^^"^""""**"""' * ^^^™*»^>
Some IBM installations use software packages such as ADR LIBRARIAN or
PANVALET that have their own methods for updating. Installations which use
these packages should consult their systems personnel for information on
installing the EPA-distributed updates.
Non-IBM installations have different utilities to facilitate updating.
For example, UNIVAC has an (PELT processor; CDC, the MODIFY and UPDATE
utilities; and Honeywell, UTILITY. The user should consult his installation's
systems personnel for information on these utilities.
An update package can be tailored to a user's individual needs if he
provides NADB with information about his installation's exact specifications.
The update packing list notes the specifications that have been reported to
NADB; the user should inform NADB of any errors or omissions in this
information.
8.2.4 COMPILING UPDATED PROGRAMS
Once the IEBUPDTE procedure has been successfully performed for each
program, all modified programs should be compiled and link edited. EPCLC10
721
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 7
Release Date: 2/01/80
Update #: P-l
is a cataloged procedure in EIS/PS to execute the COBOL compiler and the
linkage editor. See Section 8.2.4.1 for instructions on using the procedure.
After the compile and link edit steps have been executed, the condition
codes for each should be checked to insure that they are either a 4 or a 0
(see Figure 8.2-k). Also, any error messages from the compile step (see
Figure 8.2-1) should be inspected. If the return code is not 4 or 0 for any
job step, contact personnel at NADB and forward the listing of that job to
NADB. Warning messages (W) do not cause the compile to fail, but all other
messages (C, E, or D) do. The printout from the linkage editor should
indicate that the load module was added to or replaced in the data set (see
Figure 8.2-m).
8.2.4.1 Cataloged JCL (EPCLC10)
The cataloged procedure EPCLC10 allows IBM users to compile and link edit
the COBOL programs in their source libraries. The standard IBM ANSI COBOL
compiler program IKFCBLOO and linkage editor program IEWL are executed by this
procedure. The actual version/level of the compiler that these programs call
is installation-dependent. Information on the compiler program/level will be
printed when the procedure is executed (see Figure 8.2-n).
8.2.4.1.1 JCL listing - Figure 8.2-0 shows a listing of the cataloged
procedure EPCLC10.
8.2.4.1.2 User-supplied JCL - To execute EPCLC10, the user must supply the
names for the source and load modules of the program being compiled and link
edited. See Figure 8.2-p for a description of the procedure's substitutable
parameters.
8.2.4.1.3 Sample run stream -The following run stream compiles and
link edits the COBOL program PEDMSTR (EP0080). The source library is
722*
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 8
Release Date: 2/01/80
Update #: P-l
CN.EPALMH.A087.CDHS.HQ.PNT.SOURCE and the load library is
CN.EPALMH.A087.CDHS.HQ.PNT.LOAD.
// EXEC EPCLC10,
// SOURCE=PEDMSTR,
// LOADMOD=PEDMSTR
8.2.5 TESTING MODIFICATIONS
Once all modifications have been made to programs and procedures, it is
recommended that tests be run to insure that the update has been successfully
installed. The EIS/PS baseline test run series contains tests of all programs
and procedures. The volume of the data in the test series is much smaller
than in the active data files most users maintain. Running tests with these
smaller files means lower costs; also, there is no risk of destroying active
files should the tests fail. The EIS/PS master file, and the parameter, site,
and parameter standards files created in the test run series could be stored
on tape and used for testing updates. This procedure would allow for the
testing of any desired program without requiring that the entire test run
series be run to create these files.
8.2.6 COST CONSIDERATIONS
The estimate given here is for a program with 3800 statements and an
update deck containing 107 cards. This update was installed using an IBM
370/168.
IEBUPDTE
CPU time: 2.1 seconds
I/O time: 20.3 seconds
723
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 9
Release Date: 2/01/80
Update #: P-l
Total time:
22.4 seconds
Estimated cost;
Compile and Link edit
$9.65
CPU time:
I/O time:
Total time:
22.7 seconds
1 minute 36.5 seconds
1 minute 59.2 seconds
Estimated cost:
$25.43
8.2.7 WARNINGS AND SPECIAL INSTRUCTIONS
Each user is reminded not to make any modifications to EIS/PS other
than those released or approved by NADB. Only the NADB baseline version of
EIS/PS will be supported by NADB. All modified versions (unless authorized to
meet a specific computer system problem) must be supported by the .organization
which performs the modification. NADB has begun a practice of inserting
comments in the programs affected by updates. These comments will allow the.
user to inform NADB of the update status of a particular program in case of
problems. The user is urged not to remove these comments since doing so
constitutes a modification to the NADB version.
If the user wants to make modifications for his own purposes, he should
make them to a copy of the baseline system. He should, however, always
maintain the baseline system with no changes. This will give him an
opportunity to test problems against the baseline system. If there is a
problem and the problem is reproduced in the baseline, the user should report
the problem to NADB. If the problem occurs in the modified version only, it
is the user's responsibility to correct that problem.
724
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 10
Release Date: 2/01/80
Update #: P-l
Once the updated programs have been tested, they may be incorporated into
the production system. If the update includes modifications to file
structures, programs and instructions for making the file conversions will be
sent with the update package.
The update verification form (see Figure 8.2-e) should be completed and
sent to NADB as soon as the update has been installed and tested. Any changes
in personnel should be included on this form. Also, all NADB tapes should be
returned as soon as possible.
Once the update has been completed, all people who use the system should
be informed of any effect the modifications will have on their work.
If there are any problems in installing the update, contact NADB for
further help.
725
-------
O O i-<
O
CO
CO
cr>
m
(Q
C
n>
oo
*
ro
Q)
tIS/PS MASIIH MLF INlfcHNftL IRANSAC1 H1"' SOMT
PROGRAM MAN'EI PSRINr« (EP0110)
REVisinh LFVEL: «-n«
L»SI IJPD4IE «: P-l
IF
ro
at
fil
-a
n>
Q.
a>
c*
(D
NU"BFH UF INPUT
(.IF r'UTMII TRANSACTIONS:
7S
7'i
c: co
-o m
o o
CO
00
•
ro
(D
U)
.«/»
O)
CO
<= TO
"O (D
Q. —•
0) fl>
ct O)
n> co
o>
.. o
o>
•O (1>
Q)
CO
0)
ro
o
oo
o
-------
SVSTN
./
./
00
«
ro
I
cr
s
m
o
o
-h
ro
HAS IF if
ISTrAU.
iNC«'=livn
1)1 V ISInri.
'JF.SMt.fH
iN.srrruiF.
l-OIi.
THIS is IMF USAPS MASIE" Flit
ntTAitFu HF.pn«i
I HIS IS VEK8IHN I IMF (IF THUS PrtdRRAN.
IHHATf P-l tSIAULISMfli vFhSJDp i.iMF OF I'MPMSTP (FPo?|0)
HELEASLt» WIIH UPHAIF P-l (in (l?/ni/«n.
I,
ENVIRONMENT
IMI.-JMI.
IJH Jt r t -r.fnpiiTh«? .
OH.IfCI-r.H'«PUTtW.
Sf'FClAl-N«MtS.
cm is IF«-PAI;F.
tn
SUFTI
»S
sn FT r ^ is-
ItHUHnlF. l_ni, >>M,F mini
it on mil on
oon o ti^ti n
(i n * i fi (i x (i n
onooo'itifi
unonosno
ononubon
(ipnoti7uo
unnni)on(i * H{" HI fcft r**
(I0f}0()tj() 0 |>f f>(_ A(^F" »iF M T *
unooinop ^F PL fir f. n*
oooojnoo ft^LACf HFM*
onnniion I'tPLACf-f-FHl*
iinonipoo wFi'i ATF.n*
nnont?i>n ft.Pi.ACf --tM*
iiood i^un
nooni^on
unonjopn
iinon) | f- n-nn
iinon^^uo * i ^iSF H T (• o*
nnoo^^ioo * i^iSFki^-^*
nn
OO IS
CD
CD
rn
m
73
i—
c
0
__J
m
oo
c: TO
•o o>
O *«4
O) fl>
(0 (/>
!*B "*
•• o
S-
T3 n>
1
1— »
ro
2
00
o
rn
t— i
^
00
m
o
|H
O
00
ro
-a
CXI
ta
rp
i— «
ro
-------
SYSJN
ro
oo
oo
•
ro
us
m
o
c
•a
c,
c+
I
-a
o
i
(O
-o
0*
(O
a>
ro
o
H>
no
MS rn-CNrc-i-|L
FLSt
M|.lVfc MRFR-FSI-niNIRUL-FhF fl.I,lF-SUP) I'l M-CN1L.
«l)Vt MSIH-FSTIHAttS (LINF-Sllf.) |M P-FSTJ"ATt.
M||Vt MSI»-ACTll»L (l-irit-SUil) 111 K-MFASIJHtn.
Mnvh MSIP-ALI.IIHAKI f (LiNf-sun) in P-«U im/>"LF.
"UVt MS|I».P|,T>NI Irtl (LI'"F-'«l/n) III P-PillfcNI IAL.
"IJVF M5IK-EMr.S.<«iriN-UM] TS ILINh-SUlO ll>P-U«l|TS.
«IJVf fSlU-FSn^ATlllN-MEIHU'1 (L I NF-SH") lit P-ESl -'T 1 Hli
•««(Wt t SIR-USr-MF IHllO (LlWt-SllH) If) P-lFSI-MF|Hun.
^UVt MST»-FlS-1i-FLAi: (LIUF-SU") I" P-MS-1 i-Fl A«.
Muvt DFTAii.-Ob in nu»-ii>'t.
"HUE PRINT-L1NF.
AFftH AOVANCTUfi H/vF I
A(;l> MIflAWY-IIMt I" L I
«i)Vt SPACF Til P-Plll 1.111
FMSSMINS-FNO.
FXII.
St AHr.H-HIILI.-TrtAH- I I»L .
If- HnuO-PUl L-l'^lHI s. PII|.l.-1llFM-Ntl» fPOLI -I
Miitft Pill. L-intNl -MAMF (p(l(_| -lUFlvI-.SUU) 111 Hill I"-P"I L -HM I '-LtfiE-< TII OTA/;-I int.
4FTL" A|)VA»'CIMU Hl""PY-1 Ll'if-S.
NT-^ ru I"'»K-UF-*.
LM'i-Ul">F-« TII HI AR-t |Hfc .
E l)lAi,MMSt1C-l IrJK AUt" »l)«4MLl«n H|MACY-I LMFS.
K JS-f'AS'F"
MS-PIMM
l 1C.
Fxll.
If Mill-lift I'll, PAI.I On?'l
n n | no 7 n n
n n \ t\ 'i no o
n ft i il 'l€i 0 0
n *> | tt "j (i (i i)
o n | n s 1 1) "
n n 1 ii s ? o n
n n t 'i vn"1
(101 fl-iSllO
n n i /i s 7 on
QIM/ISOOII
1)111 'If, II Oil
Dill list ii ii
DC) II h. ID II
n 0 i n n ii ii ii
0 1) I dfihon
00 | i|uo
nn j iiMTn'1
ito i o ^ mi o
III) 1 Uf. Ui)0
1) 0 1 1 *VO (1 0
flOtlWIt'P
0*>|flV?iM»
d ti i ti «j "^ u 0
0 0 | tl*Jil n 0
oni'i^soo
(»nj/jv^(.»0
n d I flu 7 aft
(if) | U *>M() A
— 1 C-.
O' 0
Ty ^^
0 >
00 Z
m
m
r—
c
-u
o
m
oo
•o to
a. —*
01 rt>
C<- O»
ro (^
n>
=»=
.. o
o>
-o fD
i • •
i— »
ro
O
i-»
oo
o
m
1-1
4/i
-o
00
00
m
o
— »
»-i
0
z
CO
ro
-o
o>
(Q
(0
i_t
CO
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8i2
UPDATES >'
Page 14
Release Date: 2/01/80
Update #: P-l
DATE:
SUBJECT:
UNITED STATES ENVIRONMENTAL PROTECTION AGENCY
EIS/P&R Update 27
FROM:
Lloyd Hedgepeth, Environmental Engineer
TO:
EIS/P&R Users
Enclosed is the package for Update 27 to the EIS/P&R system.
Please note that the full update package is sent to only one person
at each installation, but copies of this cover memorandum are sent
to a number of people who need to be informed of program and
documentation updates. The Update Packing List shows what your
package contains. If the hardware or software information on the
form is not correct for your installation, please notify me. This
information will be used to provide you with an update package most
suited to the needs of your installation.
This update consists of four new programs, three new cataloged
procedures, and revised versions of three existing
programs. The new
programs and cataloged procedures comprise the EIS/P&R Quick look
package. The Quick Look package enhances the users' retrieval and
report capability, and provides a turnaround document for the
master file. The three revised programs affect the processing of
the measured and estimated emissions fields, and correct problems in
the file maintenance progrm. See Attahcment I for information on
all modifications made by this update.
Update 27 is released on tape recorded at 1600 bpi with a
record size of 80 bytes and a blocking factor of 50 (4000 bytes per
block). The tape contains ten sequential data sets. The first
three data sets contain revised versions of existing programs. The
next four data sets contain the new programs. The last three data
sets contain the three new cataloged procedures. See Attachment II
for a list of the contents of these files.
For users with standard IBM utilities, an update deck is
enclosed, along with a listing of the deck. This deck may be used
to execute the IBM utility IEBUPDTE to update your source and JCL
libraries. This deck should be tailored to your particular
Figure 8.2-c. Update Letter
729
(Page 1 of 4)
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 15
Release Date: 2/01/80
Update #: P-l
installation. For example, it assumes that the source and JCL
libraries are named CN.EPALMH.A087.CDHS.HQ.PNR.SOURCE and
CN.EPALMH.A087.CDHS.HQ.PNR.JCL, respectively. You should replace
these names with the correct data set names for your installation.
Users who use standard IBM utilities and receive the update deck,
also receive an update tape in which appropriate IEBUPDTE control
cards are included in each data set.
For users who do not use standard IBM utilites, no update deck
is enclosed and the update tape contains no IEBUPDTE control cards.
These users should use their own utilities to udpate their source
and JCL libraries.
You are reminded not to make program modifications to EIS/P&R
other than those released or approved by NADB. Only the NADB
version of EIS/P&R will be supported by NADB. All modified versions
(unless authorized to meet a specified computer system, problem) must
be supported by the organization whin performs the modifications*
NADB inserts update status comments in the programs affected by
udpates. These comments are printed each time the program is run
and allow you to inform NADB of the update status of a particular
program should you have problems. You are urged not to remove these
comments as removal of any. comment is considered a modification to
the NADB version.
If you wish to make modifications for your own purposes, you
should make them to a copy of the baseline system. You should,
however, maintain the baseline system incorporating only those
changes distributed by NADB. This will give you an opportunity only
those changes distributed by NADB. This will give you an
opportunity to test problems against the baseline. If you have a
problem, and the problem is reproduced in the baseline, please
report the problem to NADB. If the problem occurs in the modified
version only, it is your responsibility to correct the problem.
When you have installed the update in your system, please
complete all items on the enclosed Update Verification Form and
return it to me.
If you need further assistance or additional information,
please contact Mr. Lloyd Hedgepeth at (919) 541-5491 or Mr. Larry
McMaster at (919) 541-6821.
Enclosures
(Page 2 of 4)
Figure 8.2-c. Update Letter
730 '
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 16
Release Date: 2/01/80
Update #: P-l
Attachment I
Improvements Incorporated in Update 27 to EIS/P&R
1. CXNEDSCV, the NEDS point source to EIS/P&R conversion program,
modified, so that for pollutants with estimation method of 1
(measured), the NEDS emission estimate field will be placed in the
measured emissions field on the EIS/P&R 13 transaction. For all
other estimation methods, the NEDS emission estimate will be placed
in the estimated emissions field on the EIS/P&R 13 transaction.
2. NXNEDSCV the NEDS point source output program, was modified to allow
the measured emissions field from the EIS/P&R-master file to be used
for the NEDS emissions estimate field for NEDS pollutants with an
estimation method of 1. For all other estimation methods, the
estimated emissions field from the EIS/P&R master file will be used
for the NEDS emission estimate field.
3. FXFILMNT, the file maintenance program, was modified to accomplish
the following:
A problem of allowing duplicate pollutants for a point or was
corrected. If an add transaction contains a pollutant which
already exists on the master file, then the entire set of
transactions (i.e., either a set of 11, 12, 13 transaction or
21, 22, 23 transactions) will be rejected and an error message
produced.
A problem of rejecting 30 add transactions when segment 1 or 2
transactions were run for the same point was corrected.
The estimated emissions field need not be nonblank for an
estimation method of 1 on a 13 transaction. This modification
is coordinated with changes in CXNEDSCV and NXNEDSCV related to
estimation method 1 (See number 1 and 2 above).
4. The EIS/P&R Quick Look Package is released. This package consists of
four programs: the Quick Look Edit program, QXQLEDIT; the Quick Look
Retrieval program, QXQLRETR; the Quick Look Report program, QXQLREPT;
and the Quick Look Turnaround Document program, QXQLTURN. Three
cataloged procedures are also released to execute these programs:
PNRQLRTR, PNRQLRPT, and PNRQLTRN. The quick look package enables the
user to generate reports in user-defined format. Selected records
may be retrieved from the master file for inclusion in these reports.
The quick look package also includes the capability to produce a
turnaround document for user-selected master file records. The quick
look package is documented in Addendum 3 to the EIS/P&R User's Guide.
This addendum is included in this update.
oo- ,
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 17
Release Date: 2/01/80
Update #: P-l
Attachment II
Contents of the EIS/P&R Update 27 Release Tape
File
1
2
3
4
5
6
7
8
9
10
Contents
CXNEDSCV, the NEDS point source to EIS/P&R conversion
program
NXNEDSCV, the NEDS point source output program
FXFILMNT, the file maintenance program
QXQLEDIT, the quick look edit program
QXQLRETR, the quick look retrieval program
QXQLREPT, the quick look report program
QXQLTURN, the quick look turnaround document
program
PNRQLRTR, the cataloged procedure to execute
QXQLEDIT and QXQLRETR
PNRQLRPT, the cataloged procedure to execute
QXQLEDIT, QXQLRETR, and QXQLREPT
PNRQLTRN, the cataloged procedure to execute
QXQLEDIT, QXQLRETR, and QXQLTURN
Figure 8.2-c. Update Letter
732
(Page 4 of 4)
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 18
Release Date: 2/01/80
Update #: P-l
UPDATE PACKING LIST
Update #:_
Name:
Date :
Tape #:_
Date Copied:
Date Mailed to User:
Update #: Returned: YES NO
Type of Hardware:
Software Configuration:
Date Listed:
Date Returned:
Special Instructions:
Tape Enclosed:_
Tape Contents:_
Update Deck:
Update Verification Form:
Documentation:
Tape or Update Listing:
Problem Reporting Form:
Update Deck Listing:
Update Packing List:
Update Cover Letter:
Verified by:
Figure 8.2-d. Update Packing List
733
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 19
Release.Date: 2/01/80
Update #: P-l
UPDATE NO.
UPDATE VERIFICATION FORM
AQDHS-II EIS/PS_
DATE UPDATE PERFORMED.
DATE AFFECTED PROGRAMS COMPILED.
DATE AFFECTED PROGRAMS LINK EDITED.
EIS/AS.
NEW EMPLOYEE (NAME)
ADDRESS
REPLACES (NAME)
TO RECEIVE
FULL UPDATE ,
PERSONNEL CHANGES
, TELEPHONE ,
AQDHS-II.
EIS/PS.
EIS/AS.
.LETTER ONLY UPDATE.
, CDHS USER'S BULLETIN
ADDRESS CHANGE (NAME).
ADDRESS
TELEPHONE.
(For additional listings, please use blank thtat)
SIGNATURE.
DATE
RETURN TO: Lloyd M. Hedgepeth
National Air Data Branch (MD - 14)
Environmental Protection Agency
Research Triangle Park, N.C. 27711
Figure 8.2-e. Update Verification Form
734
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 20
Release Date: 2/01/80
Update #: P-l
Attachment II
Contents of the EIS/P&R Update 27 Release Tape
File Contents
1 CXNEDSCV, the NEDS point source to EIS/P&R conversion
program
2 NXNEDSCV, the NEDS point source output program
3 FXFILMNT, the file maintenance program
4 QXQLEDIT, the quick look edit program
5 QXQLRETR, the quick look retrieval program
6 QXQLREPT, the quick look report program
7 QXQLTURN, the quick look turnaround document
program
8 PNRQLRTR, the cataloged procedure to execute
QXQLEDIT and QXQLRETR
9 PNRQLRPT, the cataloged procedure to execute
QXQLEDIT, QXQLRETR, and QXQLREPT
10 PNRQLTRN, the cataloged procedure to execute
QXQLEDIT, QXQLRETR, and QXQLTURN
8.2-f. Tape Contents
735
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 21
Release Date: 2/01/80
Update #: P-l
Verify that package contents are correct
Copy tape update onto private tape (tape update only)
Return NADB tape (tape update only)
Install documentation updates, if any
Interpret update deck
Run update utility to modify source programs
Verify program updates
Compile and link edit all modified programs
Verify that all compiles and link edits are correct
Run update utility to modify cataloged procedures (if applicable)
Verify procedure updates (if applicable)
Test modified programs and procedures
(move procedures to system library)
Return completed update verification form
Backup complete system
Figure 8.2-g. Checklist for Installing Update
736
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 22
Release Date: 2/01/80J
Update I: P-l
// EXEC PGMsIEBUPOTE,PARMs(MOD)
//SVSPRINT 00 3Y30UTa4
//SYSUTl 00 DISPa3HR,03NaCN.EPALMH.A087.CDHS.HQ.pflfl.SOURCE
//SV3UT2 DO DISPaSHR,D3NaCU.EPALMH.A087.COM3.HO.PNR.SOURCE
//SVSIN DO *
./ CHANGE NAM£»FOFILMNT,LI3T«ALL
./ NUMBER NEhlaloO,I.'4CRaiOO
DATE-HRITTEM. SEPTEMBER 20, 1979.
REVISION LEVEL J-OI.
* UPDATE 26 INSTALLED 09/20/79.
03 FILLER PIC XtZO) VALUE '3-01'.
03 FILLER PIC XC20) VALUE '26'.
03 FILLER PIC X(30) VALUE 'SEPTEMBER 20,
MOVE SW-ON TO BYPA33-CALC-3*.
./ DELETE 3EQlal80aoO,SE02sla0600
IF SAVE-POINT-COMTROL-EFFICIENCV (POLLUTANT-3UB)
IS NOT NUMERIC
fOVE ZERO TO EMISSION-REDUCTION
ELSE
/*
ooooosoo
OnOOObOO
00091410
00(11400
OHH1000
1979*. 011112200
00180100
00286110
002A6120
09286130
00286140
Figure 8.2-h. Listing of Update Deck
737
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 23
Release Date: 2/01/80
Update #: P-l
tc"7it FPA*MM LAST Atrtss AT
WAT I'll Ij IISfcPsFPAHMM KI«peAOH7 AaAO«7
tM"»SlM71 STAPIM) - IfJJT I - tl AS.S t
ItFVVil ALIJir. H<« M'AWrtnilP
ILF;M7t .IKS? AllllCAIFI) III SYSPP|N|
TLF,M7I VF Al.l_nCA[F.U HI SVSIlTl
UF.M7I ?3t Al.LHtAIF.O m SYSOOOV
in SVSHTc1
in
UN »o.mi
in APH no
itFi'i«;T PPA»VHIIP - SUP WAS FXFUHF.I) - Icf'Ni) runt onon|
TlFtfRbt JES£. jnH030u7.l'l)0 10?
H F?«ST CN.tPAC 1H. A OH 7 . CAMfl «"U.PMI . S'HU'CF
UF<>fl$T Will. SH' NUS= rnHSPK.
lEF^HSI SY.SCTl_r-.VSYSTM1
ItF/nsT VUL StP Nllls SYST-il.
'tF?»Sl rN.tPfll •1M.AUP7.COHS.HW.PM( .snul'CF
|FF«:«5I VIM st" NUS= CPHSPK.
tfF^Rs! .Its? . jnH03n<47.Sl 0 1 0 I
TPPJ71T SFFP / / SIAUT «(l 1 0 1 . 1 6'lr1
TI-FJ7U1 SIFP / / S1OP "QlUl.tflfl? CPU ""I
we MS 111
»)Cf 9 '11 1
wtrvsol
»AY OO/1Q/HII AT 16:1?:1'/
1:1i.6« fLAPSEH USOO.S3 TTH "!
MFl'flHY: 9?00h WIHTUAl AODHfSS SPACE.
EXC.PS: ' 77 »A, o MT,
tXCPS HY IIM1 f! 000: (I 9/f ;
97F: t>> 000! , 0
PA(;fs I": o win i;
PAGFS IMH : 0 VJII II
1° PA«t SFCIH-JDS
cnii c"sr FUR SIFP A( PCKIHIIY
MIIIIHI rHnKT.I-S: 0 DISK, n TAPI:
T"ML C"ST FUR SIFP IIP Jim fa
WCC9U9I •<,»*****.*.*»«*<****+**«**»*»**.«•**»•»*».
IFF^HSI CH.hPALMM.AO«7.COHS.HU.PMT.Sn»PCf
IEF?«S' VIII. St° "OSs C^HSP* .
If F^n-jl rN.KPAlMH.Aon7.tnHS.Hlj.PNI ..SMilRCF
'(•F<»M',| \/|j| Sf» '-'HS= CHMSPK.
II-F\7(.t jnu /FPA,- 'I,MP/ S|OP MplOt.l^'l? CPU O-i
SYSIMIt
p»sstn
KFf'T
PASSl"
SYSIN
IM OO.SJStC SM" Of)'. Ou.ll»SPC
cm." CC: oooo
SIllP 0'1/10/RO Al 16:4?: f3
no.nR SUM (i:i)0.f>i KII CPU
?SH> »:i»O.Si tin ":
»CCv«'J
"•CCVS1 |II|AU C'UJ CMA'-'Ul- Fil" .IH1* FPA'."HII»>s
"Trvsi MLIIIN! PHIKOFS: o ' Acrmi'vi »"
o: n'l :?u.H«t rii ijiipHF.
,
-------
f'.M.f
c
(I>
00
ro
|T' "*
00 40
C CO
-o 01
O (O
—f tD
m
o Q.
CL --•
-<• o
2 S-
o .-*•
01 3
rf- IQ
-o
(D
rt-
—j.
O
3
O
ICH4I6T WEMBFCH NAMF (PRPMSIK ) HMJNH IN MM oikFctiipy.
Hli;i|FST CUNOMIlIN CURF k *S
FH» "(• JUH
rrw is
AI
O O i-i
O
(S)
G1
m
m
c: co
Ta m
o o
^ ^
m o
00
ro
•a ro 01
CL —I (Q
o» ro n>
r«- a>
4*
.. o
01
•o n>
ro
o
00
o
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 25
Release Date: 2/01/80
Update #: P-l
STMT Nil. "ENSM.F
CHLOO,PFr,l(lM= I «OK,P»Rrta' SOIIUCt, Nn/HH,l>FCK,SX«rF,VEftH,
PAClr'lT
TEM'J2T
ltF£8ST
,PARMr'l FI,LI8T,XHLF,S|7h=(,) '
«, LI ,CUH)
su«siI TUT ION JCL -
SUBSTITUTION JCL -
'EFh^3I SUBSTITUTION JCL -
SUHSTITUTIOU JCL -
SUHSTITUT10H JfL -
SUBSTITUTION JCL -
'EFfo^JT "INSTITUTION JCL -
SlIHST JTUT10N JfL -
HUNAMb KFFFKNtn TO DM DUMAMb KF YMIPi.) IN PKlllB SIFP HAS NUT
LAbT ACCI-3S AT 17:27:14 ON 80.101
STAPIFl) - 1?J|T \H - Cl ASS F
Anor. M»W bpAl.MHui cup
?l 1 Al L'lf.MFK 111 SIFPI. |R
?i\ AiL"c"iFi) 10 srsooon?
JtS? AlLOQAIFu 111
OMY ALL"CATFO |O
?i3 ALLOf.ATFI) T'O SYSUTI
^8(1 AIL'ICATFO 1O SYSUT?
AI LOCAiFD in SYSIITJ
AIL1CAIFD in SYSUTU
ALLOC4IFI) I'J 3YSUTS
ALLOCAIFD H) SYSIN
AiLficATFD in SYSOUOOQ
ijn SIAIFMFMI MISS INI;
C"H - STEP >"AS FXFCIMH) -
SYSLIh
AL
.SY
Vlll
onou
1,
Will
"OSr APPI.01.
fpl.Ol
S= APfLlll .
?ia/aa.i. •»
SYS»<010I . l?ia/'lvOKKt>(>.
ri«.EPA( MM. AOH7.Cn».'«.IH(.pHl .SOHI'CI
VOI Rl-P iJUS= CI'MSt'K.
.SY3UT3
.SYSHT/I
HFf
KFPT
PASSH>
8YSOIIT
UFLFIFD
DF.LF1FI)
• IFl)
I'FLF, IFl)
KFPT
viii RLR i MS= ?
31FP /CUM /
S1FP /CUU /
**************
npiol.?i<>/
oi.?ia
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 26
Release Date: 2/01/80
Update #: P-l
•"CCViOI
»cc9'i9i
"CC9SOI
WCT9SOT
'KCCSSOl
"CC9MH
HY HNll:
A
«!1r
o"ot
Hilt
H»BFS P'J
HAUFS ItUl I
0 VlO
" VIO
99
stcunv*
COST FIJP STF.P Cll« Al CP|IIKflV 1/1/1:
«UHwT CH4«KtSs 0 HJSK, 0 TAPE*
ir»i»L ci'Si Fin' sifp c"w ("f jrm IPALMHOIJ
50.00
*;>./*
*»»**»*«*•*»»**»**»**»«*•»**«»*««»»««»*.»»*»«•»««»»*»»»«».«••»»**»»»»**'
ALIUC. FHf e°AlMHlM LliFl)
211 All"(»|Fl> If) SVRLfh
5HA Al LOC4IFU 10
AttotAieo 10
???
I-MY
in s»si if)
|r<
I" SYSL"ur>
f» SYSOOOIrt
|(| SYSI'RINI
.'f.
?i
IPALMHOI
SYSi.C
Will St" "OSs APPKH.
SYSJ.cnj-iWt I.SYRLIH
wui. StP tJftss MVSSYS.
SYS1.KHK1LIH.
Will. Stf MUSs MVSSYS.
I>AS tXKttiTtn -Ir
cni>F
KFFf
KFPT
VUI St" MU.SS 1/SfcPJi*.
SYRCTLK.VAPPLUI
KFPT
. pAuoo.KPAl .MHO! .
IFU
VOI SEW "lISs
TN.tl'AI M
#111. StP i
KFPT
SYSl'l/T
Of Lf CFU
Tfcf
VUL SfrP
SfFI' /I.
SIFP /I
• it****
H.MKKS".
/ Sl»«l
/ SKIP
. ?!!
(Page 2 of 2)
Figure 8.2-k. Condition Codes for Compiler and Linkage Editor
741
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 27
Release Date: 2/01/80
Update #: P-l
'IS
I'M"
S"l1l-w
UK A s
ii; ^l^ll) HTl.HI HAVF 1|S M||:H
lltl.il ("rial I
Figure 8.2-1, Error Message from Compiler
742 .
-------
ua
c
CD
00
•
rss
•vj
^
oo
sr
U3
n>
2
o
-s
a>
v>
V)
Dl
tnjInw
nHlinMs)
M/n
I A«o
1A90
51.JC
•jFin
SF1«
turn*
CUM I Kill StCIJUN
NA"h OKlMiM Lt'lUlH
PKPM.si'J no aaFt
IL"i.iritR * fl'lFu Ii70
6A
UFO
«72
i7C
I7C
FA
no
' S7HO
11. MUSK v » sc?»
IL"n*l" * SFA8
ILHOAAlF *
Sf'FtlFllll Lll,l lS1.XRtF,Sl7E.= (,
• SI7t=(!966IW,h^S56)
TWIISS HKFEl'hWU TAMI F.
FNtl«Y
II
flS?2
ILHHFXTO
S30?
ILHllSPAO
St.6;>
SI- DA
SV^H'H. IN CMNTK'IL SfCTIIlg
II
II nOH «n
uenFi. in
II rtlUFM
II
n n
U
II MHSPA
II iti iH «
SUNwFStH VK'M'O
SFI
L'ltAllllH
LHIJAIInrj
ILItlJFLIri? SJOA
ILBUSPAI
IL»USI
57F6
L'ICAIIi.l'l HF.FFl'S In SYMMia |N f
1 A7C II 'HiS*
| A'l'l |l H'lO.'-U,')
IAMC MnMt XI 0
1 AV/I n -iii>iii«n
II hUFl n?
•jl i» M '
II
, iii
II
Hi
U '
ILo'Ulw
1L •
SF1C
O O HI
O 3> •«
CO 2; OO
o
CD
m
c: oo
"o m
o o
on
00
ro
•a
Q.
30
n>
Q> a>
rt CD
a> (/>
« ro
(O
ro
oo
-o
Q)
n>
oo
o
-------
C
O
CO
ro
i
o
o
w>
-H c_. m
O O HH
tj r- <
<"> > -
c/i z co|
PP
V«l KELf ftSfc !./!
I"M US AMHMC»M
. S I *NO.,»I>
l>^ 11
|-« 3YSI. IH Nil! MHAMlh. n.lMMIl.»| 1IIH niM| IMIM H,.
c: oo
m o
GO ,
00
ro
*
in
ua
o
C TO -O
•o fD a>
o. —' «
fi) f^ fD
r*- OJ
n> to ro
(D VO
=«=
o/
ro
o
00
o
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 30
Release Date: 2/01/80
Update #: P-l
//* tP*LMH/*Q<»7 HtDUtftlH, LLUVi) H. ( V|9)S1 1-S4VI
OOUUOI IHI
//• PKUtEOUHt nA*f : tPttCIO
//* weVISION LEVEL: i-oo
//« LAST UPOAIE »: P-l
//* !>ATE IftCMKHilHAlEU: FtrtWl'AHlf 1, 1VHO
//*
//• IMIS PKUCtUUHt ALLUftS IHE USEH M) CUMPlLfe 4WU LI*l*-fcOIl CUtf'JL
//*
//»
//*
//EPCLCIO
// P AWA»-s • I/MAC, S*Kfcr rUlH» SI /t = 1 1 IK , HUF = 30« » SIA I L/^ Lll>"= 1 0'
//
//
//
//
//
//*
//CiiBi/L EXEC PGM=IKFCbLuO,
SUOfiCEsNULL.
//
//*
//* EXECUIfc CUHUL CtlMPIlErt
//SYSLIB 00 OSNAME=APKMJfcCr..SUUktE,
// DISP = (SM>«,PA5S)
//*
//• JKPl'l <»AfA SEI - SUUWCt HUOULfc
//*
//SfSlh l>0 DSNAMt = KHMi)Jtr. I..SUUWCt (KSUUKCF.),
//*
UU
//
//
//*
//
= ^PklVrtr^,^<^. r A IN),
DO
. .SilUWCL <«'iir on ^oo
I'OOOOMOO
IM/OOOVOO
oonoioon
oooolloo
00001^00
HOOOliOH
00001100
00001/OO
i»000 Irtoo
OOOOI9UO
OOOU^IOO
I10UO<>40I>
000«»«?/00
00003000
00004100
00003£00
Ouo>»330ii
OOooiaoo
00005700
1*0005^00
00004VOO
i)0«01OOOIM>
UI'OO^I !FO
I' V H •!'>«? Oil
H00o»».4oo
li lio OS Sm)
(page 1 of 3)
Figure 8.2-o. Cataloged Procedure EPCLCIO
745
-------
EIS/PS
JCL AND GENERAL
TOPICS '
XX
XX*
XX 1)1)
XX
XX
XX*
XX 1)1)
XX
XX
XX*
XX I)L>
XX
XX
XX*
XX 1)1)
XX
XX
XX*
XX* UlJIPUl DAI
XX*
XXSYSLJIM I'D
SECTION 8.2
UPDATES
Dl.Sf =( SUN, PASS)
OSMAMh =HPhilJ(.(. T . .SiJlJKCLl K.M'j) ,
VIILllKtsd'Hl VAH , Kt I A IN) ,
1)1 J>P=(SMK,PAt>{>)
L)SIJA"1|: = *PHiJJhC I . . .SUUHLE ( K.H6) ,
VULllMf = d'H lvAH,'Vt!AIN),
H13P=(.SMW,MAS3)
OSNAM(. = KPR(IJLC 1 . . Si)UHCE (Ki47) ,
VflLUMt = dM< IVAll-fUtlAIN),
U1SP= (•SHK,IJASS)
O.SriAMtsuPKllJF C I . .SUUKCK (K»fl) ,
VIIUJMF. = (PR1V A h.RtfAIM),
U I !i(' = ( SUM, PASS)
A SM - IJHJtC 1 MMDULt
USh = V.X,l|HJMUL>, UI4I 1 =* 1 tMP,
XX SPACL=tCYL,(S»2),NLSt) , l» 1 3P= ( Nt W, PASS )
XX*
xx* iNPuT/uurPiii DAIA stis - SYSIEM IIPLRAIIUN
XX*
XX8Y3PHIU1 DO
XX*
XXSYSUIl UU
XX
XX*
xxsYSin? on
XX
XX*
XXSYSUTi DO
XX
XX*
XXSYSUlu ill)
XX
XX*
XX*
XX*
XXCULU hXf r.
XX
XX
XX
XX
XX*
XX* 1 tivi\-Li'l I
XX*
XX*
XXUT.SI.lt. IH)
XX
XX
XX Of
XX
XX
3T3HUI=A
UNI 1 =& IF.MP.
SPACEst IKK, (&PRIMAKY,&SECNI)KY) )
UN 1 1 = (iIEMp,3E.P = SVSUf 1 ) ,
SPACb = ( IWK, (K.PHIMAKY,l<,SbCIlAKT,X,btCNOKY) )
Ut'l I = (KIEHP,3tP=(SYSUTl ,SYSOI2,SYSUI3) ) ,
SPACE = (lKK,(HPRIMA«Y,fcStCNL)NY))
POf,= IL U ,
Ci".>i|i=(S,L 1 fCHniil. ) ,
PAKfis'l. IST,I.K , )^KL^ ' ,
HF (,!" Mi=l OOK,
1 I «*f- = ( 1 , 0 )
1 (It niijt C 1 MilDULh
DliiiA- il ='.l'i\'i)./H C 1 . .Liliil),
^•11 il'.h = (l'l< 1 VA IF ,'Kl- 1 A 11. ) ,
I: 1 ,'if'= f :ilih ,1'rtSS ) *
r>,',i-,u. f- =Sr.S 1 .t,H>'L 1 •>,
vi u. i !'•! = ( MM I v a I e tnt- |A|'>I),
111 S*'= I '•iii^,»'A.:i.'i )
Page 31
Release Date: 2/01/80
Update #: P-l
i) U 0 0 S / 0 0
00 DO SHOO
IMIQDS90II
0 U (1 (1 h 0 1) 0
0 ') 0 1) f, | 0 0
OO.OOficfOO
UOOO', iuO
0 0 0 " b 't 0 0
OOOOh'jOO
OOOO^hOO
0 0 U 0 >3 1 C 0
OOOUhMOO
U (t 0 0 h V 0 0
0(1 00 /OOO
0000 /I III)
0000/^00
0000 / MM)
0 1.1 0 1) / *4 0 0
OOv07bUU
0000/600
0000/700
o o o o ; u o o
0000 /VOO
0 0 0 0 M 0 0 0
OOOOKlOO
OOOllbtJOI'l
0 0 0 0 H i 0 0
ilOOOM'ldO
OOOOHSOO
OlMlOHrtOt)
0 0 0 0 H / (1 0
OMUOttHOO
OOOOrtVOO
0 U U 0 V 0 0 0
0001(41 00
OUOOV200
OOOOV300
00009'400
00009SOO
OOOOV600
000')V700
oooovnoo •
oooov^oo
0 0 (1 1 U 0 (1 0
oooioloo
oooi n<>oo
00010300
00(1 1 ouui)
000 1 0*711(1
000 1 O'lOO
(ll.ld 1 II 7111)
0001 0 HO 1.1
0')0l("*l'0
III).) 1 1 1)111)
•100111 00
O')')ll^;l()
(page 2 of 3)
Figure 8.2-o - continued. Cataloged Procedure EPCLC10
746 .
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 32
Release Date: 2/01/80
Update #: P-l
//*
//* Imf'UI DATA Sir I - OlUtCr
//*
//SYSI. IN HI)
// 1)1SH=(SHH,PASS)
//*
//» HUlHlM I»A1A JiM - LOAD
//*
//LDAU u [i OSMA iKsiiPKiiJici ..ILIAD,
// VIU.IIML = (PHltf Alt ,rtt I AJU) ,
//
//*
//SYSLMHI) Ul)
//*
//* INPUT/lllllflll (JAlA Otl.S
//*
//.SYSUI1 00 Ui-ill=*.1LMH,
//*
//S
//*
- SrMtM UKfeKAIlDlM
3Y3HUT=A
OOUI I iuO
0 0 (11 I '4 0 0
0001JSUO
000 I 1 Mill
00011700
iioo 11 HOD
u o (i 11 w o o
IIOOl«"lin)
0 0 0 1 «? 1 0 it
000 1
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 33
Release Date: 2/01/80
Update #: P-l
Parameter Name
PROJECT
Default Value
1CN.EPALMH.A087.CDHS.HQ.PNT'
PARAM
IDMAP,SXREF,LIBJSIZE=114K,
BUF=30K,STATE,FLOW=10'
PRIMARY
50
SPCUNIT
TRK
Description
Highest-level index of
data set names (e.g.
the EIS/PS source
library is CN.EPALMH.
A087.CDHS.HQ.PNT.
SOURCE)
Parameters used by the
compiler. Information
on these parameters can
be found in the IBM
COBOL Programmer's
Guide
Primary space alloca-
tion for temporary
files used by compiler
Units in which space is
to be allocated for
temporary file used by
linkage editor
(page 1 of 2)
Figure 8.2-p. Substitutable Parameters for EPCLC10
748
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.2
UPDATES
Page 34
Release Date: 2/01/80
Update #: P-l
Parameter Name
Default Value
Description
SECNDRY
100
M2 thru M8
SOURCE
LOADMOD
PRIM1
PRIM2
TEMP
NULL
NULL
NULL
60
60
SYSDA
Secondary space allocation
for temporary files used by
compiler
Source library members
concatenated onto the pri-
mary program (no source
1ibrary members are conca-
tenated onto any EIS/PS
program)
Name of source library
module for program
Name of load library module
for program
Primary spaces allocation
for temporary file used by
linkage editor
Secondary space allocation
for temporary file used by
linkage editor
Unit type specified for
temporary file
(page 2 of 2)
Figure 8.2-p - continued. Substitutable Parameters for EPCLC10
749
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.3
INSTALLATION
Page 1
Release Date: 2/01/80
Update #: P-l
8.3 INSTALLATION OF EIS/PS
8.3.1 INTRODUCTION
The information contained in this section is intended to supplement the
instructions in the letter sent with an installation package. Only those
installations using standard IBM utilities are addressed herein.
To obtain a copy of EIS/PS, a blank tape certified at 1600 BPI must be
sent to NADB. The type of computer that will be used and the recording
specifications for the tape should be specified in the letter.
A checklist of tasks for the installation is shown in Figure 8.3-a.
8.3.2 INITIAL PREPARATION
The installation package should contain a letter (see Figure 8.3-b); an
installation deck and listing (see Figure 8.3-c); the tape containing EIS/PS
source, procedure, and test data sets; an EIS/PS User's Guide; back copies of
the CDHS User's Bulletin; and a System Status/Hardware/Software Questionnaire
(see Figure 8.3-d). If any of these items are missing, the user should report
this problem to personnel at EPA-NADB.
The cards in the installation deck are not interpreted; however, the
contents of each card can be printed on the cards by processing the deck
through an interpreting keypunch machine. This interpreting should be done
because changes must be made to the cards to reflect the user's particular
data set names.
The data sets used for the source, load, procedure, and test libraries
are created in the step named ALLOC using the IBM program IEFBR14. The names
750
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.3
INSTALLATION
\
Page 2
Release Date: 2/01/80
Update #: P-l
of these data sets should be changed to reflect the installation-dependent
data set naming conventions. The space allocated assumes the use of 3330 disk
packs; if other units are used, both the unit and the space allocations should
be modified to reflect the units used. The value CDHSPK should be changed to
indicate the volume serial number of the disk device used.
Data set names, units, and volume serial numbers in the remainder of the
installation deck should also be changed to correspond with the values used in
the ALLOC step.
The step named PUNCH punches the test run series on computer cards. The
numbered PRINT steps (e.g., PRINT1, PRINT2,...) print the cataloged
procedures, the test run series, and the source code of all programs. It may
be desirable to run these steps separately since the program listings will
generate a large volume of paper. To run these steps separately, the
installation deck must be divided into several decks, each containing one or
more steps.
8.3.3 INSTALLATION JOB EXECUTION
Once the installation deck has been modified, the installation job may be
run. A job card must be added and sufficient time and page parameters should
be specified (suggested time and page estimates are included in the
installation deck as comments). Information on job cards can be is found in
Section 8.1.
When the job has been run, the condition codes for each step should be
verified. Condition codes should be 0 (zero) for successful completion (see
Figure 8.3-e).
751
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.3
INSTALLATION
Page 3
Release Date: 2/01/80
Update #: P-l
8.3.4 PROGRAM MODIFICATION
The EIS/PS baseline programs should run with no modifications on most IBM
computers. However, some changes may be necessitated by the file requirements
of a particular installation. Information on EIS/PS file specifications can
be found in Appendix D. Note that the blocking factors for all files can be
modified without affecting the program line numbers.
Non-IBM users will need to make more extensive modifications.
Information on the changes required for each type of hardware can be obtained
from EPA-NADB.
If other user-specified modifications are desired, a copy of the baseline
version should also be maintained since all updates issued by NADB are for the
baseline programs only. If line numbers in the user's program have been
modified, an update to that program will not be applied correctly.
See Section 8.2.3.1 for additional information on program modification.
8.3.5 PROCEDURE MODIFICATION
The programs in EIS/PS are executed using cataloged procedures.
Information on cataloged procedures can be found in Section 8.1.6 and
information on individual procedures can be found in the discussions of
cataloged JCL which are included in the discussions of the EIS/PS programs.
752
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.3
INSTALLATION
Page 4
Release Date: 2/01/80
Update #: P-l
Each procedure contains substitutable parameters for such items as
project, unit, and volume serial number- Each of these items may be changed
at execution time following instructions given in the sample run streams.
Since some of these variables remain fairly constant for a given installation,
they may be changed in the procedures themselves so that the changes need not
be made each time the procedure is executed. The substitutable parameters are
listed on and immediately following the PROC statement for each procedure.
As an example of these changes, suppose the procedure contains the
following statements:
// PROJECT= 'C N.EPALMH.A087.CDHS.HQ.PNT', 00000800
// UNIT=3330, 00000900
// SERIAL
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.3
INSTALLATION
Page 5
Release Date: 2/01/80
Update #: P-l
8.3.6 COMPILING PROGRAMS
Once IEHMOVE has been performed (step TAPE IN of the installation deck)
and the source programs are in the source library, the programs must be
compiled and link edited. There is a cataloged procedure in EIS/PS to execute
either the COBOL compiler in conjunction with the linkage editor: EPCLC10.
See Sections 8.2.4.1 and 8.2.4.2 for instructions on using these procedures.
After each program has been compiled and link edited, the condition codes
for each step of the job should be checked to insure that they are either 4 or
0 (see Figure 8.2-k). Also, any error messages from the compile step (see
Figure 8.2-1) should be inspected. If the return code is not 4 or 0 for any
job step, contact personnel at NADB and forward the listing of that job to
NADB. The printout from the linkage editor should indicate that the load
module was added to the data set (see Figure 8.2-m).
8.3.7 TESTING THE SYSTEM
A test run series, stored in a test library, is provided on the
installation tape to test all programs and procedures in EIS/PS. The volume
of the data in the test run series is much smaller than in the live data files
most states maintain.' Running tests with these smaller files means lower
costs; also, there is no risk of destroying live files if any test should
fail. The final EIS/PS master and emission factor files created in the test
run series should be stored on tape and used for testing future updates. This
allows any program to be tested without requiring that the entire test run
series be run to create these files.
754
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.3
INSTALLATION
Page 6
Release Date: 2/01/80
Update I: P-l
8.3.8 COST CONSIDERATIONS
The following examples provide an estimate of the cost of creating the
libraries, printing the listings, and compiling a program on an IBM 370/168,
Copy EIS/PS from tape to disk using the IEHMOVE utility:
CPU time: 18 seconds
I/O time: 1 minute 54 seconds
Total time: 2 minutes 12 seconds
Estimated cost: $32.23
Print listings of the EIS/PS programs:
Number of programs: 27 programs
Number of lines: 37,851 lines
CPU time: 15 seconds
I/O time: 2 minutes 01 seconds
Total time: 2 minutes 16 seconds
Estimated cost: $24.05
Compile and link edit for program with 3800 statements:
CPU time: 22.7 seconds
I/O time: 1 minute 36.5 seconds
Total time: 1 minute 59.2 seconds
Estimated cost: $25.43
755
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.3
INSTALLATION
Page 7
Release Date: 2/01/80
Update #: P-l
8.3.9 WARNINGS AND SPECIAL INSTRUCTIONS
Each user is reminded not to make any modifications to EIS/PS programs or
procedures other than those modifications released or approved by NADB. Only
the NADB baseline version of EIS/PS will be supported by NADB. All modified
versions (unless authorized to meet a specific computer system problem) must
be supported by the organization which performs the modification.
If the user wishes to make modifications for his own purposes, he should
make them to a copy of the baseline system. He should, however, maintain the
baseline system with no changes. Thus, if a problem occurs in the user's
system and it is reproduced in the baseline, the user should report the
problem to NADB. If the problem occurs in the modified version only, it is
the user's responsibility to correct the problem.
If there are any problems in installing EIS/PS, contact NADB for further
help.
The user should maintain a backup of the source, load, and procedure
libraries as well as all files used in EIS/PS. Systems personnel should be
consulted on the proper techniques in creating backups of the EIS/PS system.
756
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.3
INSTALLATION
Page 8
Release Date: 2/01/80
Update #: P-l
Jferify that the installation package contents are correct
Jnterpret installation deck
_Modify installation deck as needed
_Run installation job
_Verify installation programs
_Modify programs as needed
_Compile and link edit all programs
Jferify that all compiles and link edits are correct
_Modify cataloged procedures as needed
_Test programs and procedures
_Move procedures to system libraries
_Back up complete system
_Create initial files with live data
Jnform NADB that installation is complete using System Status/
Software/Hardware Questionnaire.
Figure 8.3-a. Checklist for Installing EIS/PS
757
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.3
INSTALLATION
Page 9
Release Date: 2/01/80
Update #: P-l
Mr. Larry McMaster
Research Triangle Institute
Research Triangle Park, NC 27709
Dear Mr. McMaster
Enclosed is a tape to which I have copied the EIS/PS subsystem of CDHS.
I am enclosing a copy of the JCL printout which resulted from the copy.
Please note that the IBM utility IEHMOVE was used in creating your tape.
Since IEHMOVE copies the data sets to your tape in an unloaded format, it will
be necessary to use IEHMOVE to copy the system from this tape to your disk
before you can obtain a readable printout. The tape was copied using no
system labels and was recorded at 1600 BPI.
To aid you in the installation, I am also enclosing an "installation
deck", which is set up for an IBM (OS) computer, and a listing of it. There
are three data sets on your tape, each containing several members. These
members are
DSNAME=CDHS.PNT.JCL
DSNAME=CDHS.PNT.JOBS
DSNAME=CDHS.PNT.SOURCE
Necessary disk space for each data set is allocated in the first step of the
installation using IEFBR14. The actual copy from tape to disk is accomplished
using IEHMOVE. The load modules will be created when you compile and link
edit the programs. Also, if you wish to re-name the data sets when you copy
then from tape to disk, you can do so by adding the appropriate control card
in each COPY statement.
The installation deck is also set up to punch out all jobs required to
accomplish the following:
Copy cataloged procedures to PROCLIB
Compile and link edit all programs
Run test programs using test data supplied with the installation (run
in order)
It is also set up to print all the JOBS which were punched, as well as
all source code and the JCL for all the cataloged procedures.
(page 1 of 4)
Figure 8.3-b. Installation Letter
758 -
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.3
INSTALLATION
Page 10
Release Date: 2/01/80
Update #: P-l
Please note that it will be necessary for you to make changes to the
installation deck to suit your local situation. For example, you may not use
3330 disk packs at your installation, and I am sure that your disk volume
serial number will not be CDHSPK. Your tape unit designation may not be 2400,
and you may wish to re-name the data sets when copying them from the tape to
your disk.
After you have installed the system, it will be necessary for you to
change several lines of coding in the cataloged procedures prior to copying
them into your PROCLIB. A complete list of these procedures is attached.
Should you choose to retain the prefix of CDHS.PNT. for your data set
names, you should change the appropriate line of each procedure to read:
//ddname PROC PROJECT='CDHS.PNT1,
An equivalent change must also be made if you choose a different prefix for
your data set names. Similar changes will be required in the data set names
specified on the DD cards (DSNAME=CDHS.PNT.JOBS).
I urge you not to make any modifications other than those which must be
made to the Job Control Language (JCL). NADB will make all modifications to
the standard NADB system, and will support ONLY NADB-modified versions of the
system*
If you wish to make modifications for your own purposes, you should make
them to a copy of the baseline system* You should, however, maintain the
baseline system incorporating only those changes distributed by NADB* This
will give you an opportunity to test problems against the baseline. If you
have a problem, and the problem is reproduced in the baseline, please report
the problem to NADB. If the problem occurs in the modified version only, it
is your responsibility to correct that problem.
Update 1 has been incorporated into your system; thus, the next EIS/PS
update to your system will be number 2.
(page 2 of 4)
Figure 8.3-b - continued. Installation Letter
759
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.3
INSTALLATION
Page 11
Release Date: 2/01/80
Update #: P-l
Also included are a copy of the EIS/PS User's Guide, all back issues of
the CDHS User's Bulletin, and a copy of the System Status/Hardware/Software
Questionnaire. This questionnaire should be completed and returned to me when
your installation is complete.
If you have any questions, do not hesitate to call me at (919) 541-5491.
Sincerely yours,
Lloyd M. Hedgepeth
Project Officer
National Air Data Branch (MD-14)
Enclosures
Figure 8.3-b - continued.
(page 3 of 4)
Installation Letter
760
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.3
INSTALLATION
Page 12
Release Date: 2/01/80
Update #: P-l
Attachment 1 - EIS/AS Cataloged Procedure
EPCET10
EPCVE10
EPEDT10
EPEME10
EPEME20
EPEMM10
EPFMM10
EPFMM20
EPFMM30
EPMSM10
EPMST10
EPMST20
EPRPE10
EPRPM10
EPRPM20
EPRPM30
EPRPM50
EPRPM60
EPRPM70
EPRTM10
EPRTM20
EPRTM30
EPRTM40
EPSRM10
EPSRM20
EPSRM30
EPCLC10
Figure 8.3-b - continued. Installation Letter
761
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.3
INSTALLATION
Page 13
Release Date: 2/01/80
Update #: P-l
//* 00000100
//* EI3/P3 INSTALLATION 00000200
//* 00000300
//* THIS JOB HILL SCRATCH AND RE-ALLOCATt ALL DATA SETS NECESSARY FOH 00000400
//* 00000500
//* THE INSTALLATION OF EIS/PS. IT WILL THEN COPY THE INSTALLATION 00000600
//* 00000700
//* TAPE INTO THESE DATA SETS AND PUNCH THE JOBS REQUIRED TC CONPILE 00000800
//* 00000900
//* AND LINK-EDIT THE VARIOUS PROGRAMS IN THE SYSTEM. IT WILL THEN 00001000
//* 00001100
//* PRINT THOSE J.OBS, THE CATALOGED PROCEDURES? THE LINKAGE EDITOR 00001200
//* 00001300
//* CONTROL CARDS, AND THE TEST DATA. THE 00001400
//* 00001500
//* LISTING SHOULD BE EXAMINED TO BE CERTAIN THAT THE PROCEDURES ARE 00001600
//* 00001700
//* CORRECT FOR THIS PARTICULAR COMPUTER CENTER. AFTER ANY NECESSARY 00001800
//* 00001900
//* CHANGES HAVE BEEN MADE, THE JOBS PUNCHED OUT MAY BE RUN 00002000
//* 00002100
//* SEQUENTIALLY TO INSTALL AND TEST EIS/PS. 00002200
//« 00002300
//SCRATCH EXEC PGMsIEFBRl4, 00002100
// TIME=(0,5), 00002500
// REGIONsMK 00002600
//JCL DO DISP3(OLD,DELETE), 00002700
// DSNAMEsCDHS.PNT.JCL 00002800
//JOBS DD OISP*
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.3
INSTALLATION
Page 14
Release Date: 2/01/80
Update #: P-l
//SOURCE
//TAPEIN
3PACEs(TRK,(40,10,5)),
DSNAMEaCOH3.PNT.LOAD
DD UNIT33330,
VOLUME*(PRIVATE,RETAlN,3ERsCDH3PK),
DISPs(NEW,CATLG,DELETE),
3PACEs(TRK,(100,50,5)),
DSNArlEaCDHS.PNT.SOURCE
EXEC PGMalEHKOVE,
REGION390K,
00 SYSOUTsA
DO UNITs33J0,
VOLUMES(PRIVATE,RETAIN,SERsCDHSPK),
//3V3IN
//SYSPRINT
//3YSUT1
//CDHSPK DD UN1T33330,
ff VOLUMES(PRIVATE,RETAIN,SERaCDHSPK),
// DISPaQLD
//TAPE DD UNITaTAPE,
// VOLUMEsSERsPSTAPE,
// OISPa(NEh,PASS)»
// LA8ELs(,BLP),
DCB3(RECFMaFB,LRECLa80,BLKSlZE«800,DENa3)
DD *
COPY TOs33303CDHSPK,FROMDD3TAPE,FRQMsTAPEs(PSTAPE,l),
PD3aCDH3.PNT.JCL
COPY TOa3330aCDH3PK,FROMDDaTAPE,FROMsTAPE"(P8TAPE,2),
PD3aCDH3.PNT.JOBS
COPY TQs33J03COHSPK,FROMDDsTAPE,FROMsTAPEs(PSTAPE,3),
PDSsCDHS.PNT,SOURCE
//PUNCH EXEC PGMsIEBPTPCH,
// REGION360K,
// TIMEa(i,o)
//SYSPRINT DD 3YSOUT3A
//SYSUT1 DD D3NAME3CDHS.PNT.JOB3,
ft VOLUM£3(PRIVATE,RETAIN),
// DISPa(SHR,PAS3)
//SYSUT2 QD SYSOUTaB
//SYSIN DD *
PUNCH TYPQRGapQ,MAXNAMEs2
//PRINT1 EXEC PGMalEBPTPCH,
// REGION360K,
// TIMEa(l,0)
//SYSPRINT DD SYSOUTsA
//3Y3UT1 DD 03NAME3CDHS.PNT.JCL,
// VOLUM£s(PRiVATE,RETAIN),
// DI3Pa(SHR,PASS)
//3YSUT2 DD 3YSOUT»A
//3Y3IN DD *
PRINT TYPORGsPO,MAXFLDSBl
TITLE iTENaC* EIS/PS CATALOGED PROCEDURES',!)
TITLE ITEMsC -,i)
RECORD FIELDe(60,l,,25)
00005100
00005200
00005300
00005400
00005500
00005600
00005700
00005800
00005900
00006000
00006100
00006200
00006300
00006400
00006500
00006600
00006700
00006800
00006900
00007000
00007100
00007200
00007300
X00007400
00007500
X00007600
00007700
X00007800
00007900
00008000
00008100
00008200
00008300
00008400
00008500
00008600
00008700
00008800
00008900
00009000
00009100
00009200
00009300
00009400
00009500
00009600
00009700
00009800
00009900
00010000
00010100
00010200
(Page 2 of 3)
Figure 8.3-c - continued. EIS/PS Installation Deck
763
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.3
INSTALLATION
Page 15
Release Date: 2/01/80
Update #: P-l
//PRINT2 EXEC
//3YSPRINT
//3YSUT1
DO
DD
//SYSUT2 DD
//SYSIN DD
PRINT
TITLE
TITLE
RECORD
//PRINTS EXEC
//SYSPRINT
//3Y3UT1
DD
DD
//SYSUT2 DD
//3Y3IN DD
PRINT
TITLE
TITLE
RECORD
PGMsIEBPTPCH,
REGIONs60K,
TIME=(1,0)
SYSOUTaA
DSNAMEsCDH3.PNT.JOBS,
VOLUMES (PRIV ATE »RETAIN),
DISP=(3HR,PA3S)
SYSOUTsA
*
TYPORGspQ,MAXFLDSsi
ITEMsC'EIS/PS INSTALLATION J08S'»1)
FIEL(Js(80,l,»25)
PGM=IEOPTPCH,
REGIUNsbOK,
TIMEs(UO)
SYSOUTsA
DSNAMEaCDHS .PNT .SOURCE ,
VOLUMES (PRIVATE, RETAIN),
OI3Ps(SHR,PASS)
SYSOUTsA
*
TYPORGsPO,MAXFLDSsl
ITEMs('El3/PS SOURCE CODE',1)
FIELDs(80,l,,25)
00010300
00010400
00010500
OOOlObOO
00010700
00010800
00010900
00011000
00011100
00011200
00011300
00011400
00011500
00011600
00011700
00011600
OOOll^OO
00012000
00012100
00012200
00012300
00012400
00012500
00012600
00012700
00012800
(Page 3 of 3)
Figure 8.3-c - continued. EIS/PS Installation Deck
764
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.3
INSTALLATION
Page 16
Release Date: 2/01/80
Update #: P-l
SYSTEM STATUS/HARDWARE/SOFTWARE QUESTIONNAIRE
(Please complete and return to NADB)
Agency:
Address:
HARDWARE
Location:
Other %
IBM UNIVAC (Specify)
Model Number
Series Number
Core size (specify words or
bytes]
Operating System (specify
OS-MFT, OS-MVTVOS-VSr;
EXEC-8, etc.)
Tape Drive (specify 7-tracl<
556 bpi, 9-trach 1600 bpi,
etc.)
D1!!b8:18c.(Jpecify 2314'
SOFTWARE
Please list.software items (installed, being installed, or planned)
which are/will be peculiar to your installation and programs [e.g.,
tape management, spooling requirements, update utilities other than
standard.IBM utilities). WeVe specifically interested in any
peculiarities of your computing systems which affect how an update
is or can be incorporated.
(page 1 of 4)
Figure 8.3-d. System Status/Hardware/Software Questionnaire
765
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.3
INSTALLATION
Page 17
Release Date: 2/01/80
Update #: P-l
SYSTEM STATUS/HARDWARE/SOFTWARE QUESTIONNAIRE
SUBSYSTEM STATUS
Air Quality Data Handling Subsystem II (AQDHS-II):
Installed? Yes No
By whom?
Task order expiration (date)
Operational since (date)
Scheduled to be operational (date)
Installation in progress? Yes No
By whom?
Installation planned? Yes . No
Installation schedule (dates)
Last update performed # Date
Emissions Inventory Subsystem/ Area Source Point Source
Installed? Yes No Yes ' No
By whom?
Task order expiration (date) (date)_
Operational since (date) (date)_
Installation in progress? Yes No Yes No
By whom?
Scheduled to be (date) (date)
operational
Installation planned? Yes No Yes No
Installation schedule (date) (date)
Last update performed # date # date
(page 2 of 4)
Figure 8.3-d - continued. System Status/Hardware/Software Questionnaire
766
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.3
INSTALLATION
Page 18
Release Date: 2/01/80
Update #: P-l
SYSTEM STATUS/HARDWARE/SOFTWARE QUESTIONNAIRE
AIR POLLUTION CONTROL MANAGER:
Please furnish full title and address of the State and/or Local (county
or municipal) agency responsible for all air pollution control activities
of the agency and tne name, title, address, and phone number of the
aaencv s director.
agency s director
Name and Title:
Agency:
Address:
City: State: Zip:
Phone Number(s):
AQDHS-II DATA BASE COORDINATOR;
Name and Title:
Address:
City: State: Zip:
Phone Number(s):
EIS DATA BASE COORDINATOR: POINT SOURCE AREA SOURCE
Name and Title:
Address:
City: State: Zip:
Phone Number(s):
(page 3 of 4)
Figure 8.3-d - continued. System Status/Hardware/Software Questionnaire
767
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.3
INSTALLATION
Page 19
Release Date: 2/01/80
Update #: P-l
SYSTEM STATUS/HARDWARE/SOFTWARE QUESTIONNAIRE
DATA PROCESSING PERSONNEL:
Director:
Name and Title:
Address:
City: . State: Zip:
Phone Number(s):
AQDHS-II Contact (person responsible for performing updates):
Name and Title:
Address:
City: State: Zip:
Phone Number(s):
EIS Contact (person responsible for performing updates):
Name and Title:
Address:
City: State: Zip:
Phone Number(s):
Contract Support:
Please identify contractor and furnish name, address and phone
number(s) of any contract personnel supporting your CDHS subsystems.
(page 4 of 4)
Figure 8.3-d - continued. System Status/Hardware/Software Questionnaire
768
-------
EIS/PS
JCL AND GENERAL
TOPICS
SECTION 8.3
INSTALLATION
Page 20
Release Date: 2/01/80
Update #: P-l
1CH70001I KPALMH LASI ACCk&S A! 17140:54 UN HO.106
NACIN1I: USENsLPALMH (JhH = AOH7 ArAOH?
»HASP37J SlANttU - INII 6 - CLASH F
IEF236I ALLUC. FUN IPAL^HMM
III SY8PN1NI
ALLOCATED IU SYSUll
ALLUCATbO TU DISK
TU
15 APR 80
1EF2371 JES2 ALLOCATED
IEF237I 233
IEF2371 37F
IEF23/1 47E ALLOCATED
ItF2i7I JES2 ALLUCATf-D
IEF2S/1 231
I APfc
IU SYSIN
ALLOCATED TU bYJjOUOOl
IEF142I EPALMliHM -
WAS tXECUlEI) -ICUM' CUDfc 00nu|
IEF2HSI
1EF265I
IEF2B51
. laical I.HAUOO.EPAL^HHM.HOOOODOI
VOL StR NOS= rtUHKSH.
tN.tPALMH.A087.LUHS.HIJ.PNT.bl)UkCt
V(IL Strt NUS= CUHSPK.
CN.tHALKH.AOH7.tl>MS.H(J.PNT.bOUKCL
VUL SbM N0b= HSH4b2.
JtS«?.JUHOJlbl .blUlOl
SYSUUT
UELEIEP
PASSED
ltF2H5I JES2.JUH03151.510101 SYSIN
IEF2851 SYSCILG.VSfSr*! KEPI
IEF285I VUL SEN UUS= SYSTM1.
IEF373I SIEP / / STAKT 80106.2152
1EM74I STEP / / STOP H0106.2200 CPU OMlN 05.63SEC SNH OM1N 04.16SEC VIKT
HCC9491 *
nCC950I * JUH fcPAL«HHM, SIEP 209.4(1 CUU
WCC949I *
WCC950I
HCC9501
"CC9501
MCC9SOI
WCC950I
*CC950I
1CC949I
MCC950I
HCC950I
MCC9501
HCC949I
KCC9501
WCC950I
MCC950I
HCC9491
WCC949I
*****************
CC: 0004
STAR! TUESDAY 04/IS/80 AT 21:52:11 STOP 04/15/80 At 22:00:02
7:50.85 ELAPSED 0:05.63 ICH 0:04.16 SNH
MEMORY: 9200K VIRTUAL ADDNESS SPACE* 252K USED
EXCPS: 1658 DA, 6239 Ml, U OIHEK,
EXCPS UY DMT: 000: 0 H33I 111
A7E: 62i9 ooo: o flil: o
PAUE.S IN: o viu 62 SWAP
PAUES UUT: 0 VIU 69 SnAP
0:u9./9 TUT CPU
7«97 TOTAL
97F: 1547
16 UTHEH
0 OTHfcK
162 PAGt SECONDS 124.63 NESlOtNl SECONDS
CUU CUSI FOK STEP AT PHIUK1TY l/l/l:
MUUNl CHANGES: 0 DISK, 0 IAPE:
TIIIAL CUSI H'R STEP OF JUH EPALMHHM;
******************************************************
*«?3.05
*0.00
*23.45
IEF285I
1EF37SI
UF376I
"CC949I.
WCC9Q9I
MCC951I
ACC949I
"CC9S1I
"CC9511
WCC949I
WCC951I
"CC95U
"CC951I
MCC951I
»CCV«9I
CN.IPALMH.A08/.CUHS.HU.PNT.SUUNCE DELETE!*
VUL SEN «OS>= US8462.
JOH /EPALfiHHM/ SIANT 81)106.2152
JOB /EPALi»HriM/ SIOP 80106.2200 CPU OMIN 05.h3SEC SKB OMlN 04.163EC
***************** CUMNfcI - SYSTEM (ib32 • JUH SUMMARY ******************
JUH EPALMHHM, 1 STEPS
209.40 TUTAL CUU
CC: 0004
SUHMI1 TUESDAY 04/15/80 AT 16:i4s49
SIAMT 04/15/HO Al 21:52:11
7:S0.97 ELAPSED 0:05.63 ICH
5:17:22.08 UN UUEUh
S1UP 04/15/80 AT 22!00:02
0:04.16 8Kb 0:09.79 TUI CfU
PRIONJIY NEU/HCD/CHO: 1/1/1
IDIAL CUU CHAHUE HjN JOB EPALHHHM;
KiUOiMT CHANGES: 0 DISK* 0 TAPE:
TUIAL COST FUN JUH EPALMHHM, ACCOUNT A087:
-10.00
Figure 8.3-e. Condition Code for IEHMOVE
769
-------
EIS/PS
APPENDIX
A
CODE TABLES
Table A-l. Valid
State
Number
01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
State
Name
Alabama
Alaska
Arizona
Arkansas
California
Colorado
Connecticut
Delaware
District of
Columbia
Florida
Georgia
Hawaii
Idaho
Illinois
Indiana
Iowa
Kansas
Kentucky
Louisiana
Maine
Maryland
Massachusetts
Michigan
Minnesota
Zones
Min
16
01
11
15
10
12
18
18
18
16
16
04
11
15
16
14
14
16
15
19
17
18
16
14
Max
16
59
12
16
11
13
19
18
18
17
17
05
12
16
16
15
15
17
16
19
18
19
17
16
UTM Zones
Page 1
Release
Update
and Components
Horizontal
Min
350
0
120
0
0
90
20
420
280
0
30
0
0
0
380
130
0
0
0
275
50
40
0
80
Max
720.0
999.9
999.9
830.0
999.9
999.9
825.0
498.0
310.0
999.9
999.9
930.0
999.9
999.9
730.0
999.9
930.0
999.9
999.9
770.0
999.9
999.9
960.0
999.9
Date:
#: P-l
2/01/80
Vertical
Min
3342
5408
3450
3640
3595
4090
4529
4254
4290
2720
3353
2144
4630
4089
4178
4486
4090
4035
3189
4760
4200
4562
4617
4815
Max
3891
7629
4100
4045
4660
4550
4661
4419
4330
3450
3880
2452
5430
4711
4628
4825
4440
4342
3645
5265
4413
4738
5265
5470
-770
-------
EIS/PS
APPENDIX A
State
Number
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
Table
State
Name
Mississippi
Missouri
Montana
Nebraska
Nevada
New Hampshire
New Jersey
New Mexico
New York
North Carolina
North Dakota
Ohio
Oklahoma
Oregon
Pennsylvania
Puerto Rico
Rhode Island
South Carolina
South Dakota
Tennessee
Texas
Utah
Vermont
A-l -
CODE TABLES
continued.
Vali
Zones
Mi n Max
15
15
11
13
11
18
18
12
17
16
13
16
13
10
17
19
19
17
13
15
13
12
18
16
16
13
15
11
19
18
13
18
18
14
17
15
11
18
20
19
17
14
17
15
12
19
Min
30
0
0
0
200
140
440
95
30
0
0
110
0
0
0
80
230
260
0
0
0
198
50
Page 2
Release
Update #
Date:
: P-l
2/01/80
d UTM Zones and Components
Horizontal
Vertical
Max
995.0
790.0
999.9
999.9
898.0
850.0
625.0
999.9
999.9
999.9
999.9
999.9
999.9
999.9
999.9
870.0
290.0
750.0
999.9
999.9
999.9
795.0
855.0
Min
3331
3980
4920
4420
3860
4717
4309
3473
4491
3738
5079
4244
3617
4640
4397
1969
4551
3540
4694
3867
2848
4090
4727
Ma
388
450
543
477
4661
502:
458'
410(
499(
406(
543(
465(
41K
512?
468:
2055
465f
390J
5085
406;
404E
466(
499]
771
-------
EIS/PS
APPENDIX A
CODE TABLES
Page 3
Release Date: 2/01/80
Update #: P-l
Table A-l - continued. Valid UTM Zones and Components
State State
Number Name
48 Virginia
49 Washington
50 West Virginia
51 Wisconsin
52 Wyoming
53 American Samoa
54 Guam
55 Virgin Islands
Zones
Min
17
10
17
15
12
Max
18
11
18
16
13
Horizontal
Min
0
0
0
0
0
Max
999.9
999.9
840.0
999.9
999.9
Vertical
Min
4041
5035
4117
4705
4530
Max
4370
5430
4502
5211
4990
no validation done
no validation done
20 20 290
350.0
1946
2056
772
-------
EIS/PS
APPENDIX A
CODE TABLES
Page 4
Release Date: 2/01/80
Update #: P-l
Table A-2. Valid Control Equipment
Identification Number Control Device/Method
000 No Equipment
001 Wet Scrubber - High Efficiency
002 Wet Scrubber - Medium Efficiency
003 Wet Scrubber - Low Efficiency
004 Gravity Collector - High Efficiency
005 Gravity Collector - Medium Efficiency
006 Gravity Collector - Low Efficiency
007 Centrifugal Collector - High Efficiency
008 Centrifugal Collector - Medium Efficiency
009 Centirfugal Collector - Low Efficiency
010 Electrostatic Precipitator - High Efficiency
Oil Electrostatic Precipitator - Medium Efficiency
012 Electorstatic Precipitator - Low Efficiency
013 Gas Scrubber (general, not classified)
014 Mist Eliminator - High Velocity
015 Mist Eliminator - Medium Velocity
016 Fabric Filter - High Temperature
017 Fabric Filter - Medium Temperature
018 Fabric Filter - Low Temperature
019 Catalytic Afterburner
020 Catalytic Afterburner with Heat Exchanger
021 Direct Flame Afterburner
022 Direct Flame Afterburner with Heat Exchanger
023 Flaring
039 Catalytic Oxidation - Flue Gas Desulfurization
040 Alkalized Alumina
773
-------
EIS/PS
APPENDIX A
CODE TABLES
Page 5
Release Date: 2/01/80
Update #: P-l
Table A-2. Valid Control Equipment - continued
Identification Number
041
042
043
044
045
046
047
048
049
050
051
052
053
054
059
060
061
062
063
064
065
066
071
Control Device/Method
Dry Limestone Injection
Wet Limestone Injection
Sulfuic Acid Plant - Contact Process
Sulfuric Acid Plant - Double Contact Process
Sulfur Plant
Process Change
Vapor Recovery System (including condensers,
hooding, and other enclosures)
Activiated Carbon Absorption
Liquid Filtration System
Packed-Gas Absorption Column
Tray-Type Gas Absorption Column
Spray Tower
Venturi Scrubber
Process Enclosed
Metal Fabric Filter Screen (Cotton Gins)
Process Gas Recovery
Dust Suppression by Water Sprays
Dust Suppression by Chemical Stabilizers or
Wetting Agents
Gravel Bed Filter
Annular Ring Filter
Catalytic Reduction
Molecular Sieve
Fluid Bed Dry Scrubber
"774
-------
EIS/PS
APPENDIX B
FILE SPECIFICATIONS
Page 1
Release Date: 2/01/80
Update #: P-l
APPENDIX B - EIS/PS File Specifications
INTRODUCTION
This appendix presents a cross-reference of the EIS/PS files and the
programs that read or write them; it also discusses the blocking factors of
these files.
The files used by EIS/PS can be catagorized as follows:
1) Permanent files such as the EIS/PS master file and the emission
factor files. These are the essential files of EIS/PS.
2) NEDS report files. These are files placed on magnetic tape and
submitted to EPA for inclusion in the NEDS data base.
3) Temporary Files. These files are passed between various EIS/PS
programs and are not permanently retained.
4) Unit record files such as print files and input card files.
5) Library files (program source module library, program load
module library, and procedure library). These files are
maintained as partitioned data sets on IBM/OS systems.
775
-------
EIS/PS
APPENDIX B
FILE SPECIFICATIONS
Page 2
Release Date: 2/01/80
Update #: P-l
CROSS-REFERENCE OF FILES AND PROGRAMS
Table B-l is a cross-reference of EIS/PS files and programs that read or
write them. This cross-reference is provided to assist the user in modifying
a file's blocking factor or otherwise modifying the characteristics of a file.
776
-------
EIS/PS
APPENDIX B
FILE SPECIFICATIONS
Page 3
Release Date: 2/01/80
Update #: P-l
BLOCKING FACTORS
The blocking factor of a file is defined as the number of logical records
that are contained in one physical record or block. A file's blocking factor
determines how efficiently it can be stored on disk or magnetic tape. It also
affects the efficiency of any program that uses the file.
Table B-2 lists for each EIS/PS file the recommended blocking factor for
storage on IBM 3330 disk units, IBM 2314 disk units, and magnetic tape. The
recommended blocking factors were primarily established to optimize storage
efficiency for these two models of disk and to optimize processing efficiency
for tape files. Each user may determine and implement his own blocking
factors; indeed, a user who utilizes a medium of storage other than the IBM
3330 disk unit, 2314 disk unit, or magnetic tape should establish blocking
factors suitable for his storage medium. A blank column has been provided in
Table B-2 for the user to enter the locally-defined blocking factors.
As released by NADB, EIS/PS utilizes the recommended blocking factors for
IBM 3330 disk units. Additionally, all unit record files have a blocking
factor of one.
To change the blocking factor for a file other than a library file the
user must accomplish the following:
1) Modify the source module of each COBOL program that reads or writes
the file to reflect the new blocking factor (see Table B-l). For all
files other than unit record files, the RECORD CONTAINS clause in the
file's FD statement must be modified. For unit record files, no
RECORD CONTAINS clause appears in the source module of the COBOL
777
-------
EIS/PS
APPENDIX B
FILE SPECIFICATIONS
Page 4
Release Date: 2/01/80
Update #: P-l
programs; however, a comment line is provided for insertion of a
RECORD CONTAINS clause. When changing the blocking factor for unit
record files, this comment line should be replaced by the RECORD
CONTAINS clause (to maintain the line number integrity of the source
module).
2) Compile and link edit each COBOL program that is modified.
3) If the above actions are taken to change the blocking factor of a
file prior to the creation of any copies of the file, no further
action is necessary; the file will be created with the blocking
factors that have been specified. However, if there are existing
copies of the file, they must be reblocked before they can be used.
IBM users can acccomplish the reblocking with the utility IEBGENER.
An example of a run stream to reblock a disk file is shown in Figure
B-l. ^,
To change the blocking factor of the program source module library, the
user must modify programs PRTLNGP (EP0140) and PSRLNGP (EP0160) as discussed
in step 1 above, compile and link edit PRTLNGP (EP0140) and PSRLNGP (EP0160),
and reblock the program source module library (see Figure B-2). IBM users
should not reblock the program load module library or procedure library.
(Assistance in accomplishing these tasks may be obtained from the user's
systems personnel or NADB.)
778
-------
EIS/PS
APPENDIX B
FILE SPECIFICATIONS
Page 5
Release Date: 2/01/80
Update #: P-l
Table B-l. Cross-Reference of Files and Programs
File
Programs which
Process
the File
NEDS - Report Files
NEDS Transaction File
PCENETR (EP0060)
PRPENTR (EP0200)
PSRNETR (EP0050)
Usage
Input/Output
Permanent Files
Emission Factor Description
File
Emission Factor File
Master File
PEMEFAC (EP0040)
PRPEFAC (EP0230)
PEMEFAC (EP0040)
PMSEFIN (EP0100)
PMSEFGN (EP0130)
PRPEFAC (EP0230)
PFMMSTR (EP0120)
PMSEFGN (EP0130)
PRPDUMP (EP0220)
PRPNETR (EP0200)
PRPEPRJ (EP0250)
PRPMSTR (EP0210)
PRTGENR (EP0150)
PSRGENR (EP0170)
Input/Output
Input
Input/Output
Input
Input
Input
Input/Output
Input
Input
Input/Output
Input
Input
Input
Input/Output
Input
Output
Input/Output
(Page 1 of 2)
779
-------
EIS/PS FILE SPECIFICATIONS
APPENDIX B
Page 6
Release Date: 2/01/80
Update #: P-l
Table B-l - continued
Programs which
Process
File the File
Temporary Files
Answer File* PRPEPRJ (EP0250)
PRTGENR (EP0150)
PSR6ENR (EP0170)
Sorted Emission Factor PCVNEEF (EP0020)
Transactions PEMEFAC (EP0040)
PSREFTR (EP0030)
Internal Transactions PCENETR (EP0060)
PEDMSTR (EP0080)
PFMMSTR (EP0120)
PMSEFIN (EP0100)
PMSEFGN (EP0130)
PRPENTR (EP0200)
PSRINTR (EP0110)
PSREFIN (EP0090)
Pre-insertion Transactions PMSEFIN (EP0100)
PSREFIN (EP0090)
Usage
Input/Output
Output
Output
Output
Output
Input
Input/Output
Output
Output
Input
Output
Output
Output
Input/Output
Input
Input
Output
(Page 2 of 3)
*An answer file may be used instead of the master file in any program that
uses the master file as input.
780
-------
EIS/PS
APPENDIX B
FILE SPECIFICATIONS
Page 7
Release Date: 2/01/80
Update #: P-l
Table B-l - continued
File
Programs which
Process
the File
Usage
Input/Output
Unit Record Files
EIS/PS Transactions
Emission Factor Transactions
Print Files
Option/Control Cards
PSRMFTR (EP0070)
PSREFTR (EP0030)
All Programs
PCENETR (EP0060)
PCVNEEF (EP0020)
PEDMSTR (EP0080)
PEMEFAC (EP0040)
PFMMSTR (EP0120)
PMSEFIN (EP0100)
PMSEFGN (EP0130)
PRPENTR (EPQ200)
PRPEPRJ (EP0250)
PRTLNGP (EP0140)
PSRLNGP (EP0160)
Input
Input
Output
Input
Input
Input
Input
Input
Input
Input/Output
Input
Input
Input
Input
(Page 3 of 3)
781
-------
00
Table
File
Permanent Files
Emission Factor
Description File
Emission Factor File
Master File
NEDS - Report File
NEDS Transaction File
Temporary Files
Answer File
Emission Factor
Transactions (sorted)
*Blocking factors used by E IS/AS
B-2. Blocking Factors of EIS/AS Files
Recommended
Block for Fi
Characters IBM 3330
per record Disk
(13,030
characters
per track)
150 21
70 46
172-1088 5
80 NA
172-1088 5
80 40
as released by NADB
Records per
les on Disk Recommended
Records per
IBM 2314 Records per
Block used
Disk Block for
Locally
(7,294 Files on
characters Magnetic
per track) Tape
24 26
52 57
6 3
NA 50*
6 3
45 50
(Page 1 of 2)
APPENDIX B
m
>— i
CO
"O
en
-n
t— 4
1
m
CO
TJ
m
0
»—i
~n
t—t
o
^!
t— -»
o
z
CO
C 73
•o n>
o. — •
Qi fD
r*- a>
(D V)
0)
=tfc
o
o>
r*
-O (D
1 ••
I— '
l\3
O
I—"
00
o
•o
o>
<£>
fD
00
-------
Table B-2 - continued. Blocking Factors of EIS/AS
Recommended Records per
Block for Files on Disk
Characters IBM 3330 IBM 2314
File
per record Disk Disk
(13,030 (7,294
characters characters
per track)* per track)
Internal Transactions 120 27 30
Pre- insert ion Transactions 135 24 27
S Master File Transactions (sorted) 80 40 45
CO
*Blocking factors used by E IS/PS as released by NADB
Files
Recommended
Records per
Records per
Block used
Block for
Local ly
Files on
Magnetic
Tape
33
29
50
(Page 2 of 2)
3> m
~O *— *
-o to
z ~o
O CO
X
D3
-n
»— i
i—
m
CO
~o
m
0
1— 4
1— 1
0
1— 1
0
CO
C. 73 -0
T3 fl> O>
Q. — ' (Q
QJ fD fD
rt a
(D W VO
fD
.. o
o>
"o ro
1 * *
I— »
o
1— •
00
o
-------
EIS/PS
APPENDIX B
FILE SPECIFICATIONS
Page 10
Release Date: 2/01/80
Update #: P-l
1. // EXEC PGM=IEBGENER
2. //SYSPRINT DD SYSOUT=A
3. //SYSUT1 DD DISP=OLD,
4. // DSNAME='file name1
5. //SYSUT2 DD DISP=(NEW,CATLG,DELETE),
6. // DSNAME='file name',
7. // SPACE=(TRK,(10,1),RLSE),
8. // UNIT=DISK,
9. // VOL=('volume/serial information1),
10. // DCB=('DCB information1)
11. //SYSIN DD DUMMY
User-supplied JCL:
Line 4. Replace 'file name' with the name of the file to be reblocked.
Line 6. Replace 'file name' with the name of the reblocked file.
Line 7. Space allocation is dependent upon the file size, and it may be
necessary to increase the space allocation.
Line 9. Replace 'volume/serial information' with the volume and serial
specifications of the reblocked file.
Line 10. Replace 'DCB information1 with the DCB information specifying the
new blocking factor.
Figure B-l. Sample Job Stream to Reblock a Permanent EIS/PS
File Stored on Disk.
784
-------
EIS/PS
APPENDIX B
FILE SPECIFICATIONS
Page 11
Release Date: 2/01/80
Update #: P-l
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11..
12.
13.
// EXEC
//SYSPRI
//SYSUT1
II
//SYSUT2
II
II
II
II
II
//SYSIN
COPY
/*
PGM=IEBCOPY
DD SYSOUT=A
DD DISP=OLD,
DSNAME='library name1
DD DISP=(NEW,CATLG,DELETE),
DSNAME='library name1,
SPACE=(TRK,(10,1),RLSE),
UNIT=DISK,
VOL=('volume/serial information'),
DCB=('DCB information')
DD*
OUTDD-SYSUT2,INDD=SYSUT1
User-supplied JCL
Line 4. Replace 'library name1 with the name of the program source module
library to be reblocked.
Line 6. Replace 'library name' with the name of the reblocked library.
Line 7. Space allocation is dependent upon the file size, and it may be
necessary to increase the space allocation.
Line 9. Replace 'volume/serial information' with the volume and serial
specifications of the reblocked library.
Line 10. Replace 'DCB information1 with the DCB information specifying the
new blocking factor.
Figure B-2. Sample Job Stream to Reblock an EIS/PS
Program Source Module Library
785
-------
EIS/PS
APPENDIX C
FILE SPECIFICATIONS
Page 1
Release Date: 2/01/80
Update #: P-l
This appendix provides sample load sheets which can be reproduced by the
user to aid in the generation of transactions for the emission factor files
and the master file. A sample load sheet is also provided for retrieval
language specifications.
786
-------
AGENCY
EMISSIONS INVENTORY SYSTEM / POINT SOURCE (EIS / PS)
COMPREHENSIVE DATA HANDLING SYSTEM {CDHSJ
PLANT RECORD (SEGMENT O) TRANSACTIONS
S
T
A
T
E
1
,
COUNTY
3
1 1 1
AQCR
7
I 1
PL ANT ID
NUMBER
10
1 1 I
DA
RE
YR
14
|
TE OF
CORD
DAY
18
1 1
BY
DATE.
PAGE
OF
CON-
TROL
REGION
19
1 1
LOCAL
CON-
TROL
22
1
USER PLANT ID
24
1 1 1 1 1 1 1 I 1 1 I
CITY
36
1 I 1
UTM
ZONE
40
1 „
W
N
F
R
42
CONTACT PERSON
43
1 1 1 1 1 I 1 1 1 1 1 1 1 1
TELEPHONE
58
1 1 1 1 1 1 1 1 1
PRINCIPAL PRODUCT
68
1 1 1 1 1 1 I i 1
CARD
NBR
78
0|1
C
T
ti
80
»N|
00
•vl
ESTABLISHMENT NAME AND ADDRESS
19
1 I 1 1 I 1 1 1 1 1 1 1 1 I 1 1 1 1 1 1 1 I I I 1 | 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
NUMBER
OF
EMPLOYEES
67
1 1 1
PROPERTY
AREA
71
1 I 1 1 A
CARD
NBR
78
0|2
A
r
T
8
80
ESTABLISHMENT MAILING ADDRESS
19 66
I I I I 1 1 1 1 1 1 1 I I 1 1 1 1 1 1 1 1 1 1 1 1 I I 1 1 1 1 1 1 1 1 I 1 1 1 1 1 1 1 1 1 ! 1
1 1 1 1 1 1 1 1 1 |
CARD
NBR
78
0|3
A
C
T
1
n
N
80
NEDS P7 PLANT COMMENT
19 70
( ) | | | | | | ) | | 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 I 1 1 I 1 1 1 I 1 1 1 1 1 1 I 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1
CARD
NBR
78
0 4
A
C,
T
O
N
80
-------
AGENCY,
EMISSIONS INVENTORY SYSTEM/POINT SOURCE (EIS/PS)
COMPREHENSIVE DATA HANDLING SYSTEM (CDHS)
POINT RECORD (SEGMENT 11 TRANSACTIONS
BY .
DATE.
PAGE.
-OF.
T
A
T
E
1
I
COUNTY
3
i 1 1
AQCR
7
1 1
PLANT
ID NBR
10
1 1 1
DATE OF
RECORD
YR
14
|
DAY
1 1
NEDS
PO'NT
ID
19
|
USER
POINT
ID
?1
1 1
SIC
24
1 1 1
IPP
28
1
UTM
HORiZ
30
1 1 A
UTM
VERT
1 1 1 A
LATITUDE
DFG
39
1
MIN
1
SEC
1
LONGITUDE
DEC
45
1 1
MIN
1
SEC
1
ANNUAL THRUPUT
DEC
FEB
52
1
MAR
MAY
1
JUN-
AUG
1
SEP
NOV
_1_
OPERATE
RATE
HR |D
60
1
WK
1
BOILER
CAPACITY
65
1 1 1 1
SPACE
HEAT
70'
1 A
1 1 1 1
t/>H!>
\I:H
n;
V
c
T
'•()
STACK DATA
HEIGHT
21
I ! I
DIAM
25
1 A
TEMP
23
1 1 1
FLOWRATE
32
1 1 1 1 1 1
VELOCITY
39
1 I I
PLUME
HEIGHT
44
I 1 i
POINTS
WITH
COMMON
STACK
48
1
1
c
o
M
p
52
COMP
SCHED
YR
53
1
MO
1
COMPLIANCE
UPDATE
VR
57
1
MO
1
DAY
1
E
C
P
fi'.i
CONTROL REGULATIONS
REG 1
64
1 1 1
REG 2
1 1 1
REG 3
7f;
1 1 1
1
' . t ; i :
i'f\
'!•'
c
T
1
f /
N,
HI)
POL! l'TA,\T
ID
21
1 1 1 1
1 1 1 1
1 1 1 1
1 1 1 1
1111
1 1 1 1
1 1 1 1
1 1 1 1
1 1 1 1
1 1 1 1
1 1 I 1
1 1 1 1
fill
1 1 1
1 1 1 1
1 1 1 1
CONTROL
EQUIPMENT
COST
?6
1 1 1 1 A 1
II 1 1 A 1
II 1 1 A 1
1 1 1 1 A 1
II 1 1 A 1
1 1 1 1 A 1
II 1 1 A 1
II 1 1 A 1
II 1 1 A 1
11 1 1 A 1
11 | 1 A 1
II 1 1 A 1
II 1 1 A 1
II 1 1 A 1
II 1 1 A 1
'' ' ' A 1
PRIM
CNTRL
EQUIP
33
1 1
1 1
1 I
1 I
1 1
1 |
.
1 1
1 1
L 1
1 1
1 1
1 I
SECNDY
CNTRL
EQUIP
36
1 1
j 1
1 1
, ,
1 1
, ,
j (
1 1
1 1
1 1
1 1
1 1
EST
CONTROL
f^f
39
1 A
1 A
1 A
1 A
1 A
1 A
| A
| A
1 A
1 A
1 A
1 A
1 A
1 A
1 A
1 A
EMISSIONS
ESTIMATE
42
II 1 1 1 1
II 1 1 1 1
II 1 1 1 1
|| 1 1 1 1
II 1 1 1 1
II 1 1 1 1
II 1 1 1 1
II 1 1 1 1
II 1 1 1 1
II 1 1 1 1
II 1 1 1 1
11 1 1 1 1
II 1 1 1 1
II 1 1 1 1
II 1 1 1 1
II 1 1 1 1
MEASURED
EMISSIONS
49
1 1 1 1 1 1
1 1 1 1 1 1
1 1 1 1 1 1
1 1 1 1 1 1
1 1 1 1 1 1
1 1 1 1 1 1
1 1 1 1 1 1
1 1 1 1 1 1
1 1 1 1 1 1
1 1 1 1 1 1
1,1,11
1 1 1 1 1 1
1 1 1 1 1 1
1 1 1 1 1 1
1 1 1 1 1 1
1 1 1 1 1 1
ALLOWABLE
EMISSIONS
56
III ( II
1 1 1 J 1 1
III III
III III
111 III
III III
III III
III III
1 1 1 1 I 1
III III
1 1 1 1 1 1
1 1 1 1 1 1
1 I 1 1 1 1
1 1 1 1 1 1
1 1 1 1 1 1
1 1 1 1 1 1
E
U
N
T
G'
E
I
64
E
S
T
HC
65
1 i 1 1 11 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1
1 1 1 i 1 1 1 1 1 1 1
l l l 1 1 l 1 1 1 1 1
1 1 i 1 1 1 1 1 1 1 1
1 1 l 1 l 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1
1 l 1 1 1 1 1 1 1 1 1
1 : 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1
1 1 1 1 l 1 I 1 1 1 1
1 1 1 1 1 l 1 1 1 1 1
Mill
1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1
l 1 1 1 1 1 1 1 1 1 1
Mil:
.'.
,|;
i | :*
'I-'-
'1
,|,
'1 •
'1
,,,
P
,, .
M-
'1
'I
•I-'-
-------
AGENCY
EMISSIONS INVENTORY SYSTEM/POINT SOURCE (EIS/PS) BY —
COMPREHENSIVE DATA HANDLING SYSTEM (CDHS) DATE
SCC RECORD (SEGMENT 2) TRANSACTIONS PAGE
OF
STATE
1
|
COUNTY
3
1 1 1
AQCR
7
| |
PLANT
IDNBR
10
1 1 1
DATE
OF RECORD
YR
14
|
DAY
I I
NEDS
POINT
ID
19
|
SCC
I
21
II
1
III
1 1
IV
1
SCC
SEQ
NBR
29
|
BEC
NO.
31
I I
ID
u
36
FUEL PROCESS
SOLID WASTE
OPERATING RATE
37
M M M
MAXIMUM
DESIGN RATE
44
IMA
I
SULFUR
CON-
TENT
51
-AJ
ASH
CON-
TENT
54
I A
HEAT
CONTENT
57
I I
^/S^
0
R
G
6?
A/S
S
R
r
63
I II I
MM
I
I
CARC
NBR
78
2
1
I
80
o
o
N
F
31
S
H
C
H
3?
SOURCE DESCRIPTION
33
M M M II
I
MM
I
57
i 1
1 M 1 M
1
1 1
1
CARD
NBR
78
2)2
A
1
8
80
:M\-
31
EM
32
F POLLUTANT
ID
33
I I II
MM
MM
I I I I
MM
I 1 1 1
MM
II 1 1
1 I 1 1
MM
till
1 1 1 1
1 1 1 1
II II
I'll
I'll
EMISSION FACTOR
38
1 1 M 1 A II
M M I A 1 1
1 1 M 1 A 1 1
1 1 1 1 1 A 1 1
1 1 1 1 lA 1 1
M M 1 A 1 1
1 1 1 1 1 A 1 1
1 1 1 1 1 A 1 1
1 1 1 1 1 A 1 1
I I 1 M A 1 1
1 1 1 1 1 A I 1
1 1 M 1 A M
1 1 1 1 lA 1 1
1 1 M 1 A M
1 1 M 1 A M
1 1 M 1 A M
8S
47
HZC ml
4R
POLLUTANT
ID
49
1 1 1 1
MM
1 1 M
1 1 1 1
1 1 1 1
1 1 1 1
1 1 1 1
1 1 1 1
1 1 1 1
1 1 1 1
1 M 1
1 1 M
1 1 1 1
1 1 1 1
i r t I
1 1 M
EMISSION FACTOR
54
1 1 1 1 1 A 1 1
1 1 M 1 A 1 1
1 1 M 1 A 1 1
1 1 1 1 1 A 1 1
1 1 M 1 A 1 1
1 I 1 1 1 A t 1
1 1 1 1 1 A 1 1
1 1 1 1 1 A 1 1
1 1 1 1 1 A 1 1
1 1 M 1 A 1 1
1 1 M 1 A 1 1
1 1 M 1 A 1 1
1 1 1 1 1 A 1 1
1 1 1 1 1 A 1 1
II 1 MAI 1
1 1 1 1 1 A 1 1
A/s
8
S3
E
¥
S4
1 M 1 1 1 1 1 1 M 1
1 1 M 1 M 1 1 1 M
1 1 1 1 1 M 1 I M 1
1 1 M 1 1 M 1 II 1
1 1 II 1 II 1 1 II 1
1 1 M 1 1 1 1 1 M 1
1 1 1 I 1 1 1 1 1 1 1 1
1 1 M 1 1 1 1 1 II 1
1 1 1 1 1 1 1 1 1 M 1
1 1 1 I I 1 1 1 1 M I
I 1 1 1 1 1 M 1 1 1 1
1 1 1 1 1 M 1 1 M 1
1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 II 1 1 II
i 1 1 1 1 1 II 1 M 1
1 M I 1 1 1 1 1 M 1
CARD
NBR
78
2|3
2|3
2|3
2|3
2|3
2(3
2|3
213
2L3
2|3
2|3
2|3
2)3
213
2| 3
2(3
I
80
NEDS P7 SCC COMMENT -LEFT HALF
31 56
M I I I I I I I I I I I I I I I I I I I I I I I
I_LJ I I I M I I I I I I f I | I i i
OAFtr
NBR
78
2U
1
h
an
789
NEDS P7 SCC COMMENT -RIGHT HALF
31 56
I I I I I I I I I I I I I I I I I I I I ! I I I I
' ' ' I I I I I I I I I I I I I I I 1 |
CARC
NBR
111
[
80
-------
AGEN
STATE
1
|
FMISSIONS INVENTORY SYSTEM / POINT SOURCE (EIS / PS) BY_
COUNTY
3
1 1 1
OOMPRFHFNSIVF "ATA HANDLING SYSTEM (CDHS) nftTF
COMMENT RECORD (SEGMENT 3) TRANSACTIONS pftnp ^
DATE
PLANT OF RECORD POINT
AQCR ID NBR YR DAY ID
7 10 14 19
II III I II 1
PNR
SEQ
NBR
21
1
|
1
1
|
|
|
I
I
,
1
1
1
1
1
1
1
1
1
LINE
NBR
23
1 |
| 1
1 1
1 1
| |
| |
| 1
1 1
I |
I |
| |
1 1
1 1
1 1
1 1
1 1
1 1
1 1
1 1
1 1
L/
R
?6
HALF COMMENT
27
, 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 I 1 1 1 I 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
l I i l 1 I l I | i l 1 1 1 1 1 1 1 1 | 1 1 I I 1 1 1 1 1 l 1 l l 1 ! l i 1 I 1 I 1 1 1 1 I I i i |
i i l i i l i i l i l l l l i l i l l l 1 i i i l l 1 l 1 l i l 1 l i i i 1 l l i l l i 1 l l i i i
i i 1 i i i l I l l l l l 1 1 1 1 l l l l l l i l l 1 1 1 l l i i l i l l i i l 1 l l l 1 l l i i i
1 i i i i i l i l i i l 1 i l 1 1 l i i l i l i l 1 1 l 1 l 1 i l 1 l 1 l l l l 1 1 l l 1 1 l 1 l l
i i i i i i i i i i i l i 1 l 1 i l l i i l i l l l 1 1 1 l 1 l 1 1 1 | l 1 1 1 1 1 l 1 1 l 1 1 t 1
i i i i i i i i i i i i i i i i i i i i i i i i i i i i l i i l 1 1 l i i I i i i l i l l l l i l i
1 1 1 l I l l 1 1 1 l 1 1 1 1 1 1 1 1 1 1 l 1 1 1 1 1 1 1 1 1 1 1 1 1 l l l 1 1 1 i 1 1 1 1 1 1 1 1
i 1 1 1 1 1 1 1 1 l l l 1 1 1 1 1 1 1 1 1 1 l l 1 1 1 1 1 1 1 1 1 1 1 1 1 1 l 1 1 1 1 1 1 1 1 1 l 1
i i l l i l i | i i i i i i i l i l l l l i i i i 1 1 l l l l l 1 l 1 i 1 i i 1 1 1 1 1 1 1 1 1 1 1
i i i l i i l l l l l l 1 i l l i l l l 1 1 1 1 1 l i 1 1 1 1 1 1 l l l i i l 1 l i l l i
1 l l 1 1 I 1 l l l l l l 1 1 1 1 1 1 l 1 1 l l 1 1 l l i i l i l 1 1 1 i l l i l l l i 1 1 l l l 1
1 1 1 l I 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 l l l 1 1 1 1 1 1 l l 1
i i l l i i l I 1 l l 1 l 1 l l i l l 1 1 1 1 1 l 1 1 1 l i i l l 1 1 1 l l i i l i l i 1 1 1 i i l
l 1 l 1 l l 1 1 l 1 1 1 1 1 1 1 l i i l 1 1 1 1 1 1 1 i i i i i i l | | | i |
1 l 1 l 1 l l i 1 1 1 l | 1 1 l l i 1 1 1 1 l l 1 1 1 1 1 l l 1 1 1 1 1 l i l i i i 1 l l 1 1 1 l l
CARD
NBR
8
3,JT
3|*
3|*
3|*
3\H
3\t
3|*
3I*
3|jar
3|jar
3|jar
3|«r
3\g
3\ff
3 |d
3|Jf
3|J»
3|jr
3|jr
3I*
E
i
0
-------
AGENCY.
EMISSIONS INVENTORY SYSTEM/POINT SOURCE (EIS/PS)
COMPREHENSIVE DATA HANDLING SYSTEM (CDHS)
EMISSION FACTOR FILE TRANSACTIONS
BY —
DATE.
PAGE.
OF
SCC NUMBER
10
NEDS CATEGORY 1
23
I I
I I I I I
I
I I
I I
NEDS CATEGORY 2
40
I I I I I II I I I
I I I I
NEDS CATEGORY 3
57 73
' i i i nil
NEDS CATEGORY 4
23
1 1 1 M 1 1 1 1 1 1 1 1 1 1 1
NEDS UNITS 1 -35
40 74
I I I I I I I I I I I I I I I I I I I I I I I I I I I I 1 I I I I I
NEDS UN ITS 36-69
23
56
I I I I I I I I I I I I I I I I I I I I I I I I I I I I I I I I I
N
R
1
4
4
4
4
4
4
4
4
4
4
4
4
4
4
4
4
4
M
C
o
N
2
|
11
1
12
POLLUTANT
ID
13 17
0I0I0I0I0
I I I I
I I I I
I I I I
I I II
I I I I
I I I I
I I I I
I I I I
I I I I
I I I I
I I I I
I I I I
I I I I
I I I I
I I I I
I I I I
POLLUTANT NAME
23 42
I I I I I
I I I I I
1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1
I I I I I I I I I I I I 1 I I I I 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 II 1 1 1 1 1
1 1 1 1 1
1 1 1 1 1
1 1 1 1 1
1 1 1 1 1
1 1 1 1 1
1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1
I 1 1 1 1 1 1 I 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 I 1
1 1 1 1 1 1 1 1 1 1 1 1 I 1 1 1 1 i
1 1 1 1 1
I i i i i i i i i i t i i
1 1 1 1 1 1 I 1 1 1 I 1 1 ! 1 1 1 1 1
HIM
i i i M i i
i M i i i i
1 1 II I
1 1 II 1 1 1 1 1 1 1 1 1
FLAG
V 1 A
43 [45
|
|
|
|
|
|
|
|
|
|
|
|
1
1
1
1
1
S
s
6
I I
47
|
|
|
|
|
|
|
|
|
|
|
|
1
1
1,
1
1
EMISSION
FACTOR
49
1 1 1 1 (A 1 1
1 1 1 1 IA 1 1
1 1 1 1 1 A 1 1
1 1 1 1 1 A 1 1
1 1 1 1 1 A 1 1
1 1 1 1 1 Al 1
1 1 1 1 lAl 1
1 1 1 1 lAl 1
1 1 1 1 lAl 1
1 1 1 1 IA 1 1
1 1 1 1 IAI 1
1 1 1 1 1 A 1 1
1 1 1 1 IAI 1
1 1 1 1 1 Al 1
1 1 1 1 1 Al I
1 II 1 IAI 1
1 II 1 IAN
ASH
CNT
8
| A
| A
| A
| A
| A
| A
| A
| A
| A
| A
| A
I A
| A
| A
I A
| A
IA
SUL
CNT
1
Al
Al
A I
Al
A|
Al
Al
Al
A)
A I
A |
A|
Al
Al
Al
Al
Al
CDEF
4
| A
IA
I A
I A
I A
I A
I A
IA
IA
|A
I A
I A
IA
I A
1 A
1 A
IA
791
-------
AGENCY
SEE BACK OF FORM FOR VALID CODES
EMISSIONS INVENTORY SYSTEM / POINT SOURCE (EIS / PS)
COMPREHENSIVE DATA HANDLING SYSTEM (CDHS)
RETRIEVAL SPECIFICATIONS
BY
DATE.
PAGE.
OF
1 8
S|S|S|E| L|E|C|T
USER
KEYWORD
10 13
I I I
COPY MEMBER NAME
16 23
I I I I I 1 I
SUBJECT NAME
I I I I I I I I I I
III I I I I I
ill!
I 1 L_L
1 i
I I I
I I I
I
I I I I I I I
I 1 1 L I I 1 I I I I I I I I I I I I
I I I I I I I I I
I I I I I I I I I I I I I I I I I I I I I I I I I I I
I I I I 1 L I I I l I I I I l I l l I I I I
I I
I I I I I I I I I I I I I I I I I I I I I I I I I I I
l I I I I I I I I I I l I I I 1 I I I I I I I I
I I l I I l I l l I l l l l i l I I I I I I I I I I
I I 1 I I I I I I i I I I l I I I I I I I I I I I I I I I I
I I I I I I I I I I I I I I I I I I I I I I I
OBJECT NAME (LITERALS MUST BE ENCLOSED IN SINGLE QUOTES) 67
37
I I I I I I I I I I I I I I I I I I I I I I I I I I I I I I
I I I I I I I I I I I I
I I I I I I I I I I I I I I I I I I I I I I I I I I I I I I
I I I I I I I I
I I I I I I I I I I I I I I I I
I I I I I I I I I I I I 1 I I I I I I I I I I I I
I I I I I I I I I I I I I I I I I I I I I I I I I I I
I I I I I I I I I I I I I I
I I I I I I I I I I I I I I I I I I I I I I I I I
I I I I I I I I I I I I I I I I I I I I I I I I I I I I I I
I I I I I I I I I I I I I I I I I I I I I I I I I I I I I 1
I I I I I I I I I I I 1 I I I I I I I I I I
I I I I I 1 I I I I
I I I I I I I I I I I
I I I I I I I I I I I
_L_L
l i l i i i l i i i l i l l l I l l I l i i i l l i i l l l
I I I I I l I I I 1 I I
I I I I I l i i l II I l l I i
B O
69 71
I I
1 I
I I
II
I I
I I
I 1
I I
1 I
I I
1 I
I I
I I
1 I
CM
CTi
S I S I E
-------
EMISSIONS INVENTORY SYSTEM / POINT SOURCE (EIS/PS)
RETRIEVAL SPECIFICATIONS
PAGE 2
VALID VALUES FOR
NEGATION FLAG (NF):
BLANK. N
RELATIONAL OPERATOR (RO):
"EQUAL
>GREATER THAN
< LESS THAN
BOOLEAN OPERATOR (BO):
AND, OR. BLANK
TYPE: N = NUMERIC
A • ALPHABETIC
PLANT RECORD DATA NAMES
NAME
AQCR
CITY
CONTACT
COUNTY
DATE-OF-O-RECORD
LOCAL-CONTROL
NUMBER-OF-EMPLOYEES
OWNER
PLANT-ID
PRINCIPAL-PRODUCT
PROPERTY -AREA
RECORD-O-DAY
RECORD -O-YEAR
SEG-O-ID
STATE
TELEPHONE
USER-CONTROL-REGION
USER-PLANT-ID
UTM-ZONE
LENGTH
3
4
15
4
5
2
4
1
4
10
6(1)
3
2
1
2
10
3
12
2
TYPE
N
N
A
N
N
A
N
A
A
A
N
N
N
N
N
N
A
A
N
COMMENT RECORD DATA NAMES
NAME
DATE-OF-3-RECORD
LINE-NBR
PNR-SEQ-NBR
RECORD-3-DAY
RECORD -3-YEAR
SEG-3-ID
SEG-3-POINT-ID
LENGTH
5
3
2
3
2
1
2
TYPE
N
N
N
N
N
N
A
POINT RECORD DATA NAMES
NAME
ANNUAL-THRUPUT
BOILER-DESIGN-CAPACITY
COMPLIANCE-SCHEDULE
COMPLIANCE-STATUS
COMPLIANCE-STATUS-UPDATE
CONTROL-REGULATIONS
DATE-OF-1-RECORD
DAY-WEEK
DEC-FEB
DIAMETER
ECAP
FLOW-RATE
HEIGHT
HORIZONTAL
HOURS-DAY
IPP
JUN-AUG
LATITUDE
LATITUDE-DEGREE
LATITUDE -MINUTE
LATITUDE -SECOND
LONGITUDE
LONGITUDE-DEGREE
LONGITUDE -MINUTE
LONGITUDE -SECOND
MAR-MAY
NBR-OF-POLLUTANTS
NEDS-POINT-ID
NORMAL-OPERATING
PLUME
POINTS-PER-STACK
RECORD-1-DAY
RECORD-1-YEAR
REG-1
REG-2
REG-3
SCHEDULE-MONTH
SCHEDULE-YEAR
SEG-1-ID
SEP-NOV
SIC
SPACE-HEAT
STATUS-DAY
STATUS-MONTH
STATUS-YEAR
TEMPERATURE
USER-POINT-ID
UTM-COORDINATES
VELOCITY
VERTICAL
WEEK-YEAR
LENGTH
8
5
4
1
6
12
5
1
2
3(1)
1
7
4
4(1)
2
2
2
6
2
2
2
7
3
2
2
2
2
2
5
4
4
3
2
4
4
4
2
2
1
2
4
3(1)
2
2
2
4
3
9
5
5(1)
2
TYPE
N
N
N
N
N
N
N
N
N
N
N
N
N
N
N
N
N
N
N
N
N
N
N
N
N
N
N
A
N
N
N
N
N
N
N
N
N
N
N
N
N
N
N
N
N
N
A
N
N
N
N
POINT REPEATING DATA NAMES
NAME
ALLOWABLE
CNTL-EQU IP-COST
CONTROL EQUIPMENT
EMISSION-UNITS
EST-CONTROL-EFF
ESTIMATES
ESTIMATION-METHOD
MEASURED
POLLUTANT-ID
POTENTIAL
PRIMARY-CNTL
SECONDARY-CNTL
TEST-METHOD
LENGTH
7
7(2)
e
1
3(1)
7
1
7
5
7
3
3
1
TYPE
N
N
N
N
N
N
N
N
N
N
N
N
N
SCC RECORD DATA NAMES
NAME
ASH-CONTENT
BEC
BEC-ID
BEC-NUMBER
CONFIDENTIALITY
DATE-OF-2-RECORD
EMISSION-FACTOR-SOURCE
FUEL-PROCESS-RATE
FUEL-UNITS
HEAT-CONTENT
MAX-DESIGN-RATE
NUMBER-OF-EF
RECORD-2-DAY
RECORD-2-YEAR
SCC
SCC-I
SCC-II
SCC-III
SCC-IV
SCC-SEQ-NBR
SEG-2-ID
SEG-2-POINT-ID
SOURCE-CODE
SOU RCE-DESCRIPTION
SULFUR-CONTENT
LENGTH
3(1)
5
2
3
1
5
1
7
1
5
7(3)
2
3
2
8
1
2
3
2
2
1
2
1
25
3(2)
TYPE
N
N
N
N
N
N
A
N
N
N
N
N
N
N
N
N
N
N
N
N
N
A
A
A
N
NUMBERS IN PARENTHESES INDICATE
ASSUMED DECIMAL POSITIONS
793
-------
EIS/PS QUICK LOOK RETRIEVAL
NAME
DATE
i a
S,S
S
E
L
E|C|T
REPORT TITLE
10 '-'
1 1
1 1 1 1
SELECTION CRITERIA
1 2
1,0
1,0
1,0
1,0
1,0
1,0
1,0
1,0
1,0
(
4
DATA
ABBR
e 9
1 1 1
1 1
1 1
1 1
1 1 1
1 1 1
1 1
1 1 1
1 1 1
_l 1 1
REL
OP
U
|
1 1
1 M 1 M
VALUE
13
1 1 1
1 1 1
1 1 1
1 1 1
1 1 1
1 1 1
1 1 1
1 1 1
1 1 1
1 1 1
OUTPUTS "^
|
|
1
|
|
|
I
|
|
| |
1 1
1 1
I 1
1 1
1 1
1 1 1
I |
1 1
1 1 1
1 1 I
|
|
24
1
|
1
|
|
1 1
! |
)
?6
AND/OR
28
30
1 1
,
|
|
1
1 1
,
! |
, ,
1
I
1 2
1,0
1,0
1,0
1,0
1,0
1,0
1,0
1,0
(
4
1 1
I
DATA
ABBR
6
I
|
9
I
| |
REL
OP
11
1 1 1
1 1 1
1 1 1
VALUE
13
I
1
1
|
|
|
1
|
|
1
1111
1 1 1
LJ 1 1 1
1 1 1
1 1 1
1 1 1 1
1 1 1 1
MM
1 1 1
MM
24
1 i 1
1 I 1 1
1 t 1
1 1 1
1 1 1
1 1 1
1 1 1
1 1 i
1 1 1
1 1 1
)
26
AND/OR
?8 30
1 1
1 1
1 1
1 1
1 1
1 1
1 1
1 1
1 1
1 I
M 1 1 1 M 1
RELATIONAL
OPERATORS:
E - EQUAL
U- UNEQUAL
GftRFATPR TMAISJ
L - LESS THAN
P PRESENT
B BLANK
AND/OR MUST BE
BLANK ON LAST 10
CARD
OUTPUTS
1 2
2,0
_
HPT
CODE
4 S
|
RPT
CODE
7 8
|
-•J
IO
-p»
REPORT CODES:
QL - QUICK LOOK REPORT
TA - TURNAROUND DOCUMENT
AF - ANSWER FILE
REPORT ORDER
1 2
3,0
DATA
ABBR
« 7
1 1 1
X
a
DATA
ABBR
10 13
1 1 1
X
14
DATA
ABBR
16 19
1 1 1
X
20
DATA
ABBR
22 25
1 1 1
X
20
DATA
ABBR
28 31
1 1 1
X
32
DATA
ABBR
34 3?
1 1 1
X
38
QUICK LOOK REPORTS
ENTER DATA ABBREVIATIONS LEFT TO RIGHT
ENTER X FOR PAGE BREAK/SUBTOTALLING
1 2
4|0
4,1
4,2
SUP-
PRES
4
DATA
ABBR
6 9
1 1 1
1 1 1
J 1 1
S
10
DATA
ABBR
ir ib
1 1 1
1 1 1
1 1 1
H
o
1-
lf>
DATA
ABBR
18 ?I
1 1 1
1 1 1
1 1 1
5
i-
??
DATA
ABBR
24 0!
1 1 1
1 1 1
.1 1 L_
£
rn
DATA
ABBR
30 3J
1 1 1
1 1 1
1 1 1
H
o
(-
14
DATA
ABBR
Ib 30
1 1 1
1 1 1
1 1 1
5
>-
4O
DATA
ABBR
4?
Jb
1 1
1 1
1 1
5
Jo
DATA
ABBR
4R 5 I
1 1 1
1 1 1
1 1 i
5
t-
b.'
DATA
ABBR
b-l i /
1 1 1
1 1 1
1 1 1
l-
O
*-
•j«
DATA
ABBR
,.0 i- J|
1 1 1
1 1 1
1 1 1
K
o
t~
ENTER X FOR SUP-
PRESSION OF DE-
TAIL LINES AND
FOR TOTALS
-------
EIS/PS QUICK LOOK RETRIEVAL
PAGE 2
DATA ELEMENT
ABBRE-
VIATION
POSITION IN
MASTER FILE
D;
IN MASTER
FILE
iTA ELEMENT
IN QUICK
LOOK REPORT
.ENGTH
**
IN QUICK
LOOK REPORT
IF TOTALLED
DATA ELEMENT
ABBRE-
VIATION
POSITION IN
MASTER FILE
fit
IN MASTER
FILE
ATA ELEMLNT 1
IN QUICK
LOOK REPORT
.EHCTH
IN QUICK
LOOK REVOHr'
IF TOTALLED]
IAQCR 1
County
Plant
Segment Date
Segment Day
Segment ID
Segment Year
State
1 AQCR 1
CNTY
PLNT
DATE
DAYY
SEGM
YEAR
STTE
1 55 1
46
53
57
59
57
62
44
3
4
4
5
3
2
1
2
5
5
5
6
5
5
5
5
DATA ELEMENTS COMMON TO POINT. SCC. and COMMENT SEGMENTS
NEDS Point ID
NPID
63
2
5
State
Throughput
Throughput /Dec-Feb
Throughput /Jun-Aug
Throughput /Mar-May
Throughput /Sep-Nov
User Point ID
UTM Coordinates
UTM Horizontal
UTM Vertical
Velocity
1 IsTt 1
THRU
WNTR
SUMM
SPNG
FALL
UPID
UTMC
HORZ
VERT
VELO
1 ** 1
96
96
100
98
102
65
74
74
78
135
2
8
2
2
2
2
3
9
4
5
5
9
5
5
5
i
5
10
6
7
6
PLANT SEGMENT DATA ELEMENTS Reoeatinu Point Sequent Data Elements (POLL must be specified)
AQCR
City
Contact
County
Local Control
Mailing Address
Name and Address
No. of Employees
Ownership
Plant ID
Principal Product
'roperty Area
Segment Date
Segment Day
Segment ID
Segment Year
State
Telephone
User Control Region
User Plant ID
UTM Zone
J3AQC
CITY
CONT
JJCNT
LCON
MAIL
NAAD
NUME
OWNS
jOPLN
PROD
PROP
JODTE
0DAY
J3SEG
MR
flSTT
TELE
UCON
UPLT
UTMZ
50
82
89
46
68
182
124
172
88
53
114
176
57
59
62
57
44
104
65
70
86
3
4
15
4
2
48
48
4
1
4
10
6
5
3
1
2
2
10
3
12
2
5
5
16
5
5
49
49
5
5
5
11
8
6
5
5
5
5
11
5
13
5
9
13
Control Equipment
Control Equip. Cost
Emission Units
[Missions Allowable
Emissions Estimate
Emissions Measured
Est Control Efficiency
Estimation Method
Pollutant 10
Primary Control Equip
Secondary Control Equip
Test Method
CEQP
CCST
EUNT
ALLO
ESTI
ME AS
ECEF
ESTM
POLL*
PCTL
SCTL
TSTM
253
246
290
276
262
269
259
291
241
253
256
292
6
7
1
7
7
7
3
1
5
3
3
1
7
9
5
8
8
8
5
5
6
5
5
5
14
13
13
13
SCC SEGMENT DATA ELEMENTS
(AQCR
Ash Content
BEC Code
•IBEC ID
: :BEC Number
[[Confidentiality
' 'County
lEmission Factor Source
POINT SEGMENT DATA ELEMENTS 'Fuel Process Rate
AQCR
Boiler Design Capacity
Control Regulations
Control Regulation 1
Control Regulation 2
Control Regulation 3
Compliance Schedule
Comp. Schedule Year
iComp. Schedule Month
{Compliance Status
'Compliance Update
Comp. Update Day
Comp. Update Month
'Comp. Update Year
'County
|ECAP
Exhaust Flow Rate
IPP Code
Latitude
Latitude Degree
Latitude Minute
Latitude Second
longitude
longitude Degree
Longitude Minute
Longitude Second
NEDS Point ID/SEGMENT
Normal Operating Rate
Number of Pollutants
Plant ID
Plume Height
Point IDs
Points w/ Common Stack
Segment Date
Segment Day
Segment ID
Segment Year
SIC Code
Space Heat I
Stack Data
Stjck Diameter
Stuck Height
jtack Tei.iperature
1AQC
BOIL
CREG
REG1
REG2
REG3
CSCH
SCHY
SCHM
CSTT
CUPD
CUDY
CUMN
CUYR
1CNT
ECAP
FLOW
IPPC
LATT
LATD
LATH
LATS
LONG
LOND
LONM
LONS
S1ID
NORM
NUMP
1PLH
PLUM
PTID
PWCS
10TE
1DAY
1SEG
IYER
SICC
SPAC
STAD
DIAM
HGHT
TENP
SO
109
160
160
164
168
149
149
151
148
153
157
155
153
46
159
128
72
U3
83
85
87
89
89
92
94
b3
104
239
53
140
63
144
57
59
b2
57
G8
114
117
121
117
124
3
5
12
4
4
4
4
2
2
1
6
2
2
2
4
1
7
2
6
2
2
2
7
3
2
2
2
5
2
4
4
5
4
5
3
1
2
4
3
27
3
4
4
5
11
13
5
5
5
5
5
5
5
7
5
5
5
5
5
8
5
7
5
5
5
8
5
5
5
5
6
5
b
5
6
5
6
5
5
5
5
5
28
5
5
6
nFuel Units
11 (Heat Content
'Maximum Design Rate
(NEDS Point ID/Segment 2
iNo. of Emission Factors
IPlant ID
Source Class. Code
SCC 1
SCC 2
SCC 3
SCC 4
SCC Sequence Number
Segment Date
Segment Day
Segment ID
Segment Year
Source Code
Source Description
State
Sulfur Content
2AQC
ASHC
BECC
BECI
BECN
CONF
2CNT
EMFS
FPRT
FUNT
HEAT
MDRT
S2ID
NEMF
2PLN
SCCC
SCC1
SCC2
SCC3
SCC4
SSQN
2DTE
2DAY
2SEG
2YER
SRCC
SRCD
2STT
SULC
50
98
75
78
75
106
46
133
81
80
101
88
63
197
53
65
65
66
68
71
73
57
59
62
57
107
108
44
95
3
3
5
2
3
1
4
1
7
1
5
7
2
2
4
8
1
2
3
Z
2
5
3
1
2
1
25
2
3
5
5-
6
5
5
5
5
5
8
5
6
9
5
5
5
9
5
5
5
5
5
6
5
5
5
5
26
5
5
!
13
14 ;
REPEATING SCC SEGMENT DATA ELEMENTS (MPID must be specified)
t
i
I
Ash/Sulfur Code
Emission Factor
Emission Factor Units
Pollutant ID .
ASSC
EMFA
EMFU
MPID*
214
204
215
199
1
9
1
5
5
11
5
6
COMMENT SEGMENT DATA ELEMENTS
AQCR
;omments
:ounty
.eft Comment
Line Number
NEDS Point ID/Segment 3
Plant ID
PNR Sequence Number
Right Comment
Segment Date
Segment Day
Segment ID
Segment Year
3AQC
COMM
3CNT
LCHT
LINE
S3ID
3PLN
SEQN
RCMT
3DTE
3DAY
3SEG
3YEK
50
71
46
71
67
63
53
65
122
57
59
b2
b7
3
102
4
51
3
2
4
2
51
5
3
1
2
5
99
5
52
5
5
5
•>
!>2
C
!>
5
5
,
* Relational Operator Must Be E
if denotes zero
795
Only fields having an entry in this column are eligible for totalling.
-------
TECHNICAL REPORT DATA
(Please read Instructions on the reverse before completing)
REPORT NO,
EPA 45Q/4-8Q-1Q
TITLE AND SUBTITLE
2.
3. RECIPIENT'S ACCESSION-NO.
Emission Inventory System/Point Source User's Guide
5. REPORT DATE
May 1980
6. PERFORMING ORGANIZATION CODE
7. AUTHOR(S)
The Research Triangle Institute
Operations Analysis Division, Research Triangle Park, flLC. 27709
8. PERFORMING ORGANIZATION REPORT NO.
9. PERFORMING ORGANIZATION NAME AND ADDRESS
Office of Air Quality Planning and Standards
Monitoring and Data Analysis Division
Research Triangle Park, North Carolina 27711
10. PROGRAM ELEMENT NO.
11. CONTRACT/GRANT NO,
68-02-3011
12. SPONSORING AGENCY NAME AND ADDRESS
:. SPONSORING AGENCY NAME AND ADDRESS
U. S. Environmental Protection Agency
Office of Air, Noise, and Radiation
Office of Air Quality Planning and Standards
Research Triangle Park, N.C. 27711
13. TYPE OF REPORT AND PERIOD COVERED
14. SPONSORING AGENCY CODE
15. SUPPLEMENTARY NOTES
16. ABSTRACT
When dealing with atmospheric pollution, it is necessary to amass, catalog,
sort, evaluate and perform calculations upon large volumes of data. The Emissions
Inventory System/Point Source (EIS/PS) provides air pollution control agencies with
the capability to create and maintain their own data bases of point source data and
to retrieve data and generate reports from those data bases. This report contains
step by step procedures for the operation of each program in the system. Each
program has sections containing a description, file formats, options, error
messages, catalogues JCL (IBM), warnings and special instructions, cost considera-
tions, and related programs and procedures. The report is structured along
system functional lines; i.e., file creation and maintenance, data accessing and
manipulation, and reports. There is also a section dealing with inter-functional
procedures and one which deals with JCL and general topics. The EIS/PS is
compatible with NEDS and will automatically handle EPA reporting requirements.
17.
KEY WORDS AND DOCUMENT ANALYSIS
DESCRIPTORS
b.lDENTIFIERS/OPEN ENDED TERMS
c. COSATi Field/Group
Computer Programs
Computer Sofware
Data Processing
Emissions Inventory
Data Handling
Computer System Programs
Data Base Management System
CDHS
EIS/AS
EIS/PS
NEDS
Atmospheric Pollution
18.
19. SECURITY CLASS (ThisReport)
Unclassified
21. NO. OF PAGES
795
20. SECURITY CLASS (Thispage)
Unclassified
22. PRICE
EPA Form 2220-1 (9-73)
------- | |