-------
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*.<»0Af-fMfLU|i|||i-|l JBfcjlViJfl^VI 1? *
/ / «;>rfll»|^3l\«a'l*''IVIlFl'>r" "ilf%»-="" iiii|piir="" dafn="" sm="" -="" uf'irmj="" ta"o="" hik="" p.mj.="" fpsiipin="" no="" i)shv-if="**rAWi,j," f="">l SMr ( Mt WfPASS, DFLF t F ) ,
// 'IN I I =«. 1 1 l-.l'.
// SI'AMh = » 1 WK , 1 )
//* HlJ|°llT DATA S^ 1 - 1)1 AHMIIST IT H>H'i|K|
//*
//f-psniAf; '>!> squill =M)III
//*
//* niiil'uf »AlA :;I--IS - Srsifn iiPi-i-'/vl Jiiij
//*
//*
//SYSPHjnl 111) SYJilHITsAlllll
//*
//SYSliMlnlf I>H :iY.SIIllT=V.IMI
//*
//*
//SY3I/DUMP Ol> SY.'iMin = ^UiM
//*
//*
//SHIM MLC i-r:Mr%pwiii;?,
// IlMFsfMI-'l'?)
//*
//* SIIWI H IS/I'S Mfl.siF'w Kf|h lnTH/.jAL (WA'J
//*
//s rrf'i.. i '< on OR -i/uiF =*HWII.II c i . .1 IIAIJ,
// tfML'iMf- = rMi'^VArt ,»/F IA.IMI,
//SIIWMIM ni> I>S.-IA«F=SY.SI .ofKFL i'i.
// <)t:->t'=( SHH.h'ASS)
//*
//r.iip 1 .VKri) nil iifJ|l=MMiP,
// ;it-'Af I- = 1 x SITI'Ml^, f x('H .IKY?, -,
//*
//Sill/ | i«-ikf>^» 1)1) il'-l 1 f = f ^H '1i'».->' l' = .fli< 1 />« U 1 1 i
f f SI'dTf =( ^..iri.'l"! f r , I '.I'" I'/Y/3, '
//*
n ""!!!! "*!!-"
oon'oi!/')"
m'.n"hMn"
n (i n (i 7 n n <>
ft- 1H 0110(17 1 no
n n no TV 'Hi
oo oo 7. Sim
n o o i) 7 'i do
(Ml O'l /SCO
n no n 7 «.> IYII
Odoo 7 /«o
on rm /MOO
0 ooo /•/'")
'i on or< ti (MI
')tl"llM | III)
'I II 0 U H i> (I 0
, (in no Mn on
OOOOHSPO
Oiirti)'«j,ni|
nun IIH /nil
'"'nT^rt!'
no nn 'in on
(Ml1|J''l '10
ourig'/f'oo
o n n i)^ $1*1 o
0 II O (l^ij 0 II
o o n (j fi s n ii
nonii'M.no
Oi)()ll" /OU
iACTIH'JS 1- ) , ,i.n,i r in ) i>'i" o/oo
011(1 l>Mf)0
ft o «) nv/no
i( .jHi< r^ ) , , ( n , r 1 1, ) O'i'i In il if
it, ii\ t | nrj
'ill^ I -'h 0 -. I'M 11-' 1 I = (A II- ll', :,M'= ( .Sill' I TIM) I , :i'l'-" I "• it/* ) ) ,
Dill1
(Page 2 of 4)
Figure 4.3.10-c - continued. Cataloged Procedure EPMSM10
338 *
Af-fMfLU|i|||i-|l JBfcjlViJfl^VI 1? *
/ / «;>rfll»|^3l\«a'l*''IVIlFl'>r" "ilf%»-="" iiii|piir="" dafn="" sm="" -="" uf'irmj="" ta"o="" hik="" p.mj.="" fpsiipin="" no="" i)shv-if="**rAWi,j," f="">-------
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