Emissions Inventory System/Point Source User's Guide

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) 0O* 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.2l-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 cuu 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 FCT(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 'lIOIOOl"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 OOOOOflOOS7OOb7 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?OOh040057EXICOMB 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 riJL 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 UFSIONS HUHNFD 1U-10QMHHTO PULTONS 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 100(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 itNiHaiip 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 AHAou?'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 "I1. ,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 0619005400010011311)01 11 t412t245400SS57i;>tZI05l5l5;»U?0030l 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 960050000000 1U1 272103(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? OblV6uOb0000040l 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 0011552 ? 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.37 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: FLr,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 l4lil \-\\.\ //* //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: =«PiII.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 ?\?\ < Obl9t0os-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''0tlOirvtl? ?^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 8000 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)^ $11 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'111I; 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'4J\| // //* 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 0i»'" 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-KSir ), ,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-=( \|lV''»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 0000700 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 ,iF 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. Alj7.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 uAih : LI'.SKHIO // in rmic.f mint AILII-.S IML HSI* rn CI/L/XIL 00000110 // 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.. Lr 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 0500 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 'ii 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(iui3iiij\| // //SYSIHIUUI HU S Yoll'll =MJU 1 //•» //5» ISO ft KM Ul( b»SIMl 1 =M)HI //* //SYSUHIJMP DO SYSUl)l=MIUI //* //Ci'HIlL bLC 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\|(,iAM 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 6058009 7fl?r PL AN I 06\|9bOOt3004 \| 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 1002320290 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 06200OSiUNl"u34S\|AHO\| 1 1 141 21 2454095SS7I ?\|2I 05151 5207030301 1054/00137097009001001000000 1 0620040S3HM\|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 0i90053000000010001240300i0202nooooo29o 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 1012102 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 062004ltS3ua 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 >1STM< 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 i1!- 1) IITu^.S I-MM IHt »H»HP. i • =R,pill.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 iirtSriP=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/CH3=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)0N 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/AO7 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 120? 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 1201 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 EF 0. DATE BOOST EMF 0. IIAIE 80057 EMF 0. OAIE 80057 lf 0, -._ I, HI\ lip Clli. 1 1 « T tMl1 •m CrU »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: NUdE* 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 , // IIiM = ' 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 NAt: 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* flSSfnub HI LIIHIV 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/16 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 Ui4i 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 uPulf »; 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(1014 (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~ 7c 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 «UIrE 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 tSN 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 oii« 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)MFNT 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 31 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 in 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 DDNAMEINPUT, // 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,U0»KSPC),RLSF.) // OUTPUT DATA SET - QUICK LUUK ANSWER FILE //* //FPSANSK 00 DSN=&PRUJECT..UATA.IUNSRFIL, // UNIT=UNIT, // VtlL = (PKiVATErKETAIN,SER8,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 SYSUUT8.0UT // //* //«EPUHT EXEC PGMs&PRUGJ, // REGIHNg,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=KTEf», // 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 PbNT 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 0000100 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 PLNT 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, PSS, 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 DSNsP»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 \| tlJil 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 FPAMM 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"nl" 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 // tPLMH/Q<»7 HtDUtftlH, LLUVi) H. ( V\|9)S1 1-S4VI OOUUOI IHI //• PKUtEOUHt nAf : tPttCIO // weVISION LEVEL: i-oo //« LAST UPOAIE »: P-l //* !>ATE IftCMKHilHAlEU: FtrtWl'AHlf 1, 1VHO //* //• IMIS PKUCtUUHt ALLUftS IHE USEH M) CUMPlLfe 4WU LIl-fcOIl CUtf'JL //* //» //* //EPCLCIO // P AWA»-s • I/MAC, SKfcr 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 10005^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 0711(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) -------


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)
-------