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>  
. • •
 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>    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*" l 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?-4i02020Fl. 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*.<»0l 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'i0 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  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  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 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 7oaoo
                                                                               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 = (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 !)*, 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)
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/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 
-------
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  •<•.& 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()«»
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)

-------