Financial Accounting System

Production Automation

Dataset Descriptions

Database global record contains system control data.

Entity: Valid-Name-Master
Valid-Name-Master depends on no other dataset entries.
It contains the names, phone no.s, pager no., work no., email address, etc., for all names referenced in the JOBSTREAM-MASTER data set and the NAMES-JOBS-ASSOC data set.
Keyed on: System ID, Valid-Name. or : V-N-USERID
Entity: Names-Jobs-Assoc
This dataset is used to control what jobs can be requested by a valid requestor. It associates the names of valid requestors in the Valid-Names-Master with the jobs they are permitted to request.
Keyed on: System ID, Valid-Name, Job-Name.
Entity: Process-Groups
This dataset will be used to associate multiple jobstreams which typically run as part of a larger process with a process mnemonic. Its primary purpose is as an aid in job scheduling. It will permit scheduling of a group of jobs through a process mnemonic. Dataset entries in all of the Schedule, Job, and Program datasets can be created for all jobs identified with the process mnemonic using the default values and dependencies for each job and program.
Keyed on: System-ID, Group-Mnemonic, Process-Seq.
Entity: Jobstream-Master
This dataset contains the names, for both the primary and secondary callback contacts, the manager name, whether the driver can be up or not, and whether the job requires job or program parameters to be entered.
Keyed on: System ID, Jobstream Name.
Entity: Job-Depends-Mstr
This dataset will be used to store default information indicating a job's dependency on jobs, programs, or events, external or internal to the production automation system.
Keyed on: System ID, Jobstream Name, Dependency Seq.
Entity: Event-Master
This dataset will be used to store standard event names and actions associated with the job names and program names in the job and program master and job and program dependency datasets.
Keyed on: System-ID, Process-Name, Event-Name, Event-Seq-No
Entity: Program-Mstr

This dataset contains a job's valid program names, the sequence they are to occur in within the job, whether a program parameter is required or not, and whether the program can coprocess with the driver up.
Keyed on System-Id, Job-Name, Program-Name.
Entity: Pgm-Depends-Mstr

This dataset stores default information pertaining to a particular programs dependency on jobs, programs, or events internal or external to the production automation system.
Keyed on: System-Id, Job-Name, Program-Name, Dependency-Seq.
Entity: Pgm-Report-Mstr

This dataset stores default information pertaining to the reports produced by a program.
Keyed on: System-Id, Job-Name, Program-Name, Report-Name, Destination-Id.
As a result of the inclusion of Job-Name as a key field, some redundancy is introduced, this is however, a necessary evil (necessary in order to meet the needs of Fas, where we have multiple versions of the daily process for our various daily/monthly process cycles, and the report requirements vary by jobstream).
Entity: Actual-Events

This dataset would be used to record information pertaining to actual events referred to and caused by schedule, jobstream, and/or program requests, or events deliberately caused by analyst intervention. These events will be referred to by schedule, jobstream, and/or program dependency datasets.
Keyed on: System-Id, Sched-Date, Sched-Seq, Process-Name, Event-Name, Event-Seq-No
Entity: Schedule-Req
This dataset would be used to record information pertaining to a request to schedule a process, which could consist of one or more jobstreams(within a given system-id) (executed sequentially?).
Keyed on: system ID, schedule date, schedule sequence.
Entity: Sched-Depends-On
This dataset stores information pertaining to a particular schedule's dependency on jobs, programs, and events internal or external to the production automation system.
Keyed on: System ID, schedule date, schedule sequence, dependency-seq.
Entity: Jobstream-Req
This dataset records information pertaining to a particular jobstream within a schedule request. The same jobstream can be included more than once in a given request.
Keyed on: System ID, Schedule date, Schedule sequence, Jobstream name, and Job sequence.
Entity: Job-Parameters
This dataset stores the run-time parameters for each job. A given job can have multiple parameter records. This data would be passed to the production scheduler to be included as part of the start string for the job.
Keyed on: System ID, Schedule date, Schedule seq., Jobstream name, Job sequence, parameter number.
Entity: Job-Depends-On
This dataset stores information pertaining to a particular jobstream's dependency on jobs, programs, and events internal or external to the production automation system.
Keyed on: system ID, schedule date, schedule sequence, jobstream name, job sequence, and dependency-seq.
Entity: Program-Req
This dataset records information pertaining to the execution of individual programs within a requested jobstream, in particular those programs which require parameter entry.
Keyed on: system id, schedule date, schedule seq., jobstream name, job sequence, program name, and program sequence,
Entity: Pgm-Parameters
This dataset stores the run-time parameters for each program. A given program can have multiple parameter records.
Keyed on: System ID, schedule date, schedule seq., jobstream name, job sequence, program name, program sequence, and parameter number.
Entity: Pgm-Dependencies
This dataset stores information pertaining to a particular program's dependency on jobs, programs, and events internal or external to the production automation system.
Keyed on: system id, schedule date, schedule sequence, jobstream name, job sequence, program name, program sequence and dependency-seq.
Entity: Program-Files
This dataset stores manual input file serial numbers, run numbers, and record counts. A given program can have multiple file records. It is used by AM11000 (Reformat) to dynamically determine what files to read at run time. Every file has a run-number or sequence number which identifies the iteration of that input file and is incremented throughout the biennium. This file sequence number will be used to prevent double posting of files to FAS.
Keyed on: System ID, schedule date, schedule seq, jobstream name, job sequence, program name, program sequence, and file name.
Entity: Program-Reports
This dataset is used to request reports, control report copies, record microfiche information and control report destination, formids, report recipients and print time.
Keyed on: System ID, schedule date, schedule seq, jobstream name, job sequence, program name, program sequence, and report-number.

LFPADB1 TIMESTAMP = 07/09/98 @ 13:03:30 02 GLOBAL-INFO. 03 BIEN-START-YEAR. 04 FUTURE-BIENNIUM PIC X(4) DISPLAY. 04 CURRENT-BIENNIUM PIC X(4) DISPLAY. 04 PREVIOUS-BIENNIUM PIC X(4) DISPLAY. 04 PRIOR-PREV-BIEN PIC X(4) DISPLAY. 03 REPORTING-MONTHS. 04 CB-CURR-RPT-MONTH PIC XX DISPLAY. 04 CB-PREV-RPT-MONTH PIC XX DISPLAY. 04 PB-CURR-RPT-MONTH PIC XX DISPLAY. 04 PB-PREV-RPT-MONTH PIC XX DISPLAY. 03 LAST-RUN-DATES. 04 CB-CRM-RUN-DATE PIC X(8) DISPLAY. 04 CB-PRM-RUN-DATE PIC X(8) DISPLAY. 04 PB-CRM-RUN-DATE PIC X(8) DISPLAY. 04 PB-PRM-RUN-DATE PIC X(8) DISPLAY. 03 LAST-RUN-NUMBER. 04 CB-CRM-RUN-NUMBER PIC XXX DISPLAY. 04 CB-PRM-RUN-NUMBER PIC XXX DISPLAY. 04 PB-CRM-RUN-NUMBER PIC XXX DISPLAY. 04 PB-PRM-RUN-NUMBER PIC XXX DISPLAY. 03 LAST-RUN-FLAGS. 04 CB-CRM-FLAGS PIC XXX DISPLAY. 04 CB-PRM-FLAGS PIC XXX DISPLAY. 04 PB-CRM-FLAGS PIC XXX DISPLAY. 04 PB-PRM-FLAGS PIC XXX DISPLAY. 03 ACCRUALS-ACCEPTED PIC X DISPLAY. 03 TC23-PROCESSED PIC X DISPLAY. 03 STAGGERED-CLOSE PIC X DISPLAY.

01 VALID-NAME-MASTER. VALID-NAMES-SET SET OF VALID-NAME-MASTER KEYS ARE SYSTEM-ID, VALID-NAME VALID-USER-ID SET OF VALID-NAME-MASTER KEYS ARE V-N-USERID 02 VALID-NAMES-DATA . 03 VALID-NAME-KEY. 04 SYSTEM-ID PIC X(06) DISPLAY. 04 VALID-NAME PIC X(26) DISPLAY. 04 V-N-USERID PIC X(17) DISPLAY. 03 V-N-PERMISSIONS-1 PIC X(01) DISPLAY. 03 V-N-PERMISSIONS-2 PIC X(01) DISPLAY. 03 V-N-PHONE PIC X(14) DISPLAY. 03 V-N-PAGER PIC X(14) DISPLAY. 03 V-N-WORK-PH PIC X(14) DISPLAY. 03 V-N-OTHER-PH PIC X(14) DISPLAY. 03 V-N-EMAIL PIC X(50) DISPLAY. 03 V-N-DEPT PIC X(30) DISPLAY. 03 V-N-BOX-NO PIC X(06) DISPLAY. 01 NAMES-JOBS-ASSOC. NAMES-JOB-SET SET OF NAMES-JOB-ASSOC KEYS ARE SYSTEM-ID VALID-NAME JOB-NAME 02 NAMES-JOB-DATA. 03 N-J-KEY-DATA. 04 SYSTEM-ID PIC X(06) DISPLAY. 04 VALID-NAME PIC X(26) DISPLAY. 04 JOB-NAME PIC X(17) DISPLAY. 03 PERMISSIONS PIC X(01) DISPLAY.

01 PROCESS-GROUPS. PROCESS-GROUP-SET SET OF PROCESS-GROUPS KEYS ARE SYSTEM-ID, GROUP-MNEMONIC, PROCESS-SEQ 02 PROC-GROUP-DATA. 03 PROC-GROUP-KEY. 04 SYSTEM-ID PIC X(06) DISPLAY. 04 GROUP-MNEMONIC PIC X(17) DISPLAY. 04 PROCESS-SEQ PIC X(04) DISPLAY. 03 PROC-SYSTEM-ID PIC X(06) DISPLAY. 03 JOB-NAME PIC X(17) DISPLAY.

01 JOBSTREAM-MASTER. JOB-MASTER-SET SET OF JOBSTREAM-MASTER KEYS ARE SYSTEM-ID, JOB-NAME 02 JOB-MASTER-DATA . 03 JOB-MASTER-KEY. 04 SYSTEM-ID PIC X(06) DISPLAY. 04 JOB-NAME PIC X(17) DISPLAY. 03 JOB-CATEGORY PIC X(12) DISPLAY. 03 DRIVER-UP-OK PIC X(06) DISPLAY. 03 JOB-PARAMS-REQRD PIC X(01) DISPLAY. 03 PGM-PARAMS-REQRD PIC X(01) DISPLAY. 03 RESPONSE-REQRD PIC X(01) DISPLAY. 03 PRIMARY-CONTACT PIC X(26) DISPLAY. 03 SECONDARY-CONTACT PIC X(26) DISPLAY. 03 MANAGER PIC X(26) DISPLAY.

01 JOB-DEPENDS-MSTR. JOB-DEP-MSTR-SET SET OF JOB-DEPENDS-MSTR KEYS ARE SYSTEM-ID, JOB-NAME, DEPENDENCY-SEQ. 02 JOB-DEP-MSTR-DATA. 03 JOB-DEP-MSTR-KEY. 04 SYSTEM-ID PIC X(06) DISPLAY. 04 JOB-NAME PIC X(17) DISPLAY. 04 DEPENDENCY-SEQ PIC X(02) DISPLAY. 03 DEPENDENCY-TYPE PIC X(06) DISPLAY. 03 DEP-SYSTEM-ID PIC X(06) DISPLAY. 03 DEP-EVENT-NAME PIC X(30) DISPLAY. 03 DEP-EVENT-OCCURS PIC X(04) DISPLAY. 03 COMMENTS PIC X(240) DISPLAY.

01 EVENT-MASTER. EVENT-MSTR-SET SET OF EVENT-MASTER KEYS ARE SYSTEM-ID, PROCESS-NAME, EVENT-NAME, EVENT-SEQ-NO EVENT-NAME-SET SET OF EVENT-MASTER KEYS ARE SYSTEM-ID EVENT-NAME 02 EVENT-MASTER-DATA. 03 SYSTEM-ID PIC X(06). 03 PROCESS-NAME PIC X(17). 03 EVENT-NAME PIC X(30). 03 EVENT-SEQ-NO PIC X(02). 03 EVENT-ACTION PIC X(30).

01 PROGRAM-MSTR. PROGRAM-MSTR-SET SET OF PROGRAM-MSTR KEYS ARE SYSTEM-ID, JOB-NAME, PROGRAM-NAME. 02 PROGRAM-MSTR-DATA. 03 PROGRAM-MSTR-KEY. 04 SYSTEM-ID PIC X(06) DISPLAY. 04 JOB-NAME PIC X(17) DISPLAY. 04 PROGRAM-NAME PIC X(17) DISPLAY. 03 TASK-SEQ-NO PIC X(06) DISPLAY. 03 DRIVER-UP-OK PIC X(06) DISPLAY. 03 PGM-PARAMS-REQRD PIC X(01) DISPLAY.

01 PGM-DEPENDS-MSTR. PGM-DEP-MSTR-SET SET OF PGM-DEPENDS-MSTR KEYS ARE SYSTEM-ID, JOB-NAME, PROGRAM-NAME, DEPENDENCY-SEQ. 02 PGM-DEP-MSTR-DATA. 03 PGM-DEP-MSTR-KEY. 04 SYSTEM-ID PIC X(06) DISPLAY. 04 JOB-NAME PIC X(17) DISPLAY. 04 PROGRAM-NAME PIC X(17) DISPLAY. 04 DEPENDENCY-SEQ PIC X(02) DISPLAY. 03 DEPENDENCY-TYPE PIC X(06) DISPLAY. 03 DEP-SYSTEM-ID PIC X(06) DISPLAY. 03 DEP-EVENT-NAME PIC X(30) DISPLAY. 03 DEP-EVENT-OCCURS PIC X(04) DISPLAY.

01 PGM-REPORT-MSTR. PGM-RPT-MSTR-SET SET OF PGM-REPORT-MSTR KEYS ARE SYSTEM-ID, JOB-NAME, PROGRAM-NAME, REPORT-NAME DESTINATION-ID. 02 PGM-RPT-MSTR-DATA. 03 PGM-RPT-MSTR-KEY. 04 SYSTEM-ID PIC X(06) DISPLAY. 04 JOB-NAME PIC X(17) DISPLAY. 04 PROGRAM-NAME PIC X(17) DISPLAY. 04 REPORT-NUMBER PIC X(17) DISPLAY. 04 DESTINATION-ID PIC X(12) DISPLAY. 03 RPT-COPIES PIC X(02) DISPLAY. 03 FICHE-COPIES PIC X(02) DISPLAY. 03 DEST-PRINTER PIC X(50) DISPLAY. 03 RPT-FORMID PIC X(12) DISPLAY. 03 RPT-TRANSFORM PIC X(50) DISPLAY. 03 RPT-DISPOSITION PIC X(10) DISPLAY. 03 RPT-RECIPIENT PIC X(26) DISPLAY. 03 RPT-PRINT-TIME PIC X(16) DISPLAY.

01 ACTUAL-EVENTS. ACTUAL-EVENT-SET SET OF ACTUAL-EVENTS KEYS ARE SYSTEM-ID, SCHED-DATE, SCHED-SEQ, PROCESS-NAME, EVENT-NAME, EVENT-SEQ-NO ACTUAL-EVENT-NAME SET OF ACTUAL-EVENTS KEYS ARE SYSTEM-ID, SCHED-DATE, SCHED-SEQ, EVENT-NAME 02 ACTUAL-EVENT-DATA. 03 ACTUAL-EVENT-KEY. 04 SYSTEM-ID PIC X(06) DISPLAY. 04 SCHED-DATE PIC X(08) DISPLAY. 04 SCHED-SEQ PIC X(04) DISPLAY. 04 PROCESS-NAME PIC X(17) DISPLAY. 04 EVENT-NAME PIC X(30) DISPLAY. 04 EVENT-SEQ-NO PIC X(02) DISPLAY. 03 EVENT-OCCURANCES PIC X(04) DISPLAY. 03 EVENT-ACTION PIC X(30) DISPLAY.

01 SCHEDULE-REQ. SCHEDULE-REQ-SET SET OF SCHEDULE-REQ KEYS ARE SYSTEM-ID, SCHEDULE-DATE, SCHEDULE-SEQ 02 SCHEDULE-REQ-DATA. 03 SCHEDULE-REQ-KEY. 04 SYSTEM-ID PIC X(06) DISPLAY. 04 SCHEDULE-DATE PIC X(08) DISPLAY. 04 SCHEDULE-SEQ PIC X(02) DISPLAY. 03 REQUESTOR-NAME PIC X(26) DISPLAY. 03 SCHED-TIME PIC X(08) DISPLAY. 03 EMAIL-CC PIC X(50) DISPLAY. 03 SCHED-STATUS PIC X(12) DISPLAY. 03 LAST-REV-DATE PIC X(08) DISPLAY. 03 LAST-REV-TIME PIC X(06) DISPLAY. 03 LAST-REV-USER-ID PIC X(12) DISPLAY. 03 LAST-REV-PROGRAM PIC X(07) DISPLAY. 03 PRINT-SCHEDULE PIC X(01) DISPLAY. 03 MISC-FLAG-1 PIC X(01) DISPLAY. 03 MISC-FLAG-2 PIC X(01) DISPLAY. 03 ABORTED-JOB PIC X(17) DISPLAY. 03 ABORT-MSG PIC X(80) DISPLAY. 03 GROUP-MNEMONIC PIC X(17) DISPLAY. 03 FLOW-CHART-NAME PIC X(30) DISPLAY. 03 COMMENTS PIC X(240) DISPLAY.

01 SCHED-DEPENDS. SCHED-DEP-ON-SET SET OF SCHED-DEPENDS KEYS ARE SYSTEM-ID, SCHEDULE-DATE, SCHEDULE-SEQ, DEPENDENCY-SEQ 02 SCHED-DEPENDS-DATA. 03 REQ-DEPENDS-KEY. 04 SYSTEM-ID PIC X(6) DISPLAY. 04 SCHEDULE-DATE PIC X(08) DISPLAY. 04 SCHEDULE-SEQ PIC X(04) DISPLAY. 04 DEPENDENCY-SEQ PIC X(02) DISPLAY. 03 DEPENDENCY-TYPE PIC X(06) DISPLAY. 03 DEP-SYSTEM-ID PIC X(06) DISPLAY. 03 DEP-SCHED-DATE PIC X(08) DISPLAY. 03 DEP-SCHED-SEQ PIC X(04) DISPLAY. 03 DEP-EVENT-NAME PIC X(30) DISPLAY. 03 DEP-EVENT-OCCURS PIC X(04) DISPLAY. 03 COMMENTS PIC X(240) DISPLAY.

01 JOBSTREAM-REQ. JOBSTREAM-REQ-SET SET OF JOBSTREAM-REQ KEYS ARE SYSTEM-ID, SCHEDULE-DATE, SCHEDULE-SEQ, JOB-NAME, JOB-SEQ JOB-REQ-SUBSET OF JOBSTREAM-REQ KEYS ARE SYSTEM-ID, JOB-NAME, SCHEDULE-DATE, SCHEDULE-SEQ, JOB-SEQ. (WHERE JOB-STATUS NEQ "COMPLETEDOK") 02 JOBSTRM-REQ-DATA . 03 JOBSTRM-REQ-KEY. 04 SYSTEM-ID PIC X(06) DISPLAY. 04 SCHEDULE-DATE PIC X(08) DISPLAY. 04 SCHEDULE-SEQ PIC X(04) DISPLAY. 04 JOB-NAME PIC X(17) DISPLAY. 04 JOB-SEQ PIC X(04) DISPLAY. 03 ID-NUMBER PIC X(04) DISPLAY. 03 PRINT-REQUEST PIC X(01) DISPLAY. 03 DRIVER-UP-OK PIC X(06) DISPLAY. 03 START-DATE PIC X(08) DISPLAY. 03 START-TIME PIC X(06) DISPLAY. 03 COMPLETION-DATE PIC X(08) DISPLAY. 03 COMPLETION-TIME PIC X(06) DISPLAY. 03 JOB-STATUS PIC X(12) DISPLAY. 03 ABORTED-JOB PIC X(17) DISPLAY. 03 ABORT-MSG PIC X(80) DISPLAY. 03 COMMENTS PIC X(240) DISPLAY.

01 JOB-PARAMETERS. JOB-PARAMETER-SET SET OF JOB-PARAMETERS KEYS ARE SYSTEM-ID, SCHEDULE-DATE, SCHEDULE-SEQ, JOB-NAME, JOB-SEQ, PARAM-NO 02 JOB-PARAM-DATA. 03 JOB-PARAM-KEY. 04 SYSTEM-ID PIC X(06) DISPLAY. 04 SCHEDULE-DATE PIC X(08) DISPLAY. 04 SCHEDULE-SEQ PIC X(04) DISPLAY. 04 JOB-NAME PIC X(17) DISPLAY. 04 JOB-SEQ PIC X(04) DISPLAY. 04 PARAM-NO PIC X(02) DISPLAY. 03 PARAM PIC X(240) DISPLAY.

01 JOB-DEPENDENCIES. JOB-DEP-ON-SET SET OF JOB-DEPENCENCIES KEYS ARE SYSTEM-ID, SCHEDULE-DATE, SCHEDULE-SEQ, JOB-NAME, JOB-SEQ, DEPENDENCY-SEQ 02 JOB-DEP-ON-DATA . 03 JOB-DEP-ON-KEY. 04 SYSTEM-ID PIC X(06) DISPLAY. 04 SCHEDULE-DATE PIC X(08) DISPLAY. 04 SCHEDULE-SEQ PIC X(04) DISPLAY. 04 JOB-NAME PIC X(17) DISPLAY. 04 JOB-SEQ PIC X(04) DISPLAY. 04 DEPENDENCY-SEQ PIC X(02) DISPLAY. 03 DEPENDENCY-TYPE PIC X(06) DISPLAY. 03 DEP-SYSTEM-ID PIC X(06) DISPLAY. 03 DEP-SCHED-DATE PIC X(08) DISPLAY. 03 DEP-SCHED-SEQ PIC X(04) DISPLAY. 03 DEP-EVENT-NAME PIC X(30) DISPLAY. 03 DEP-EVENT-OCCURS PIC X(04) DISPLAY. 03 COMMENTS PIC X(240) DISPLAY.

01 PROGRAM-REQ. PROGRAM-REQ-SET SET OF PROGRAM-REQ KEYS ARE SYSTEM-ID, SCHEDULE-DATE, SCHEDULE-SEQ, JOB-NAME, JOB-SEQ, PROGRAM-NAME, PROGRAM-SEQ PGM-REQ-SUBSET OF PROGRAM-REQ KEYS ARE SYSTEM-ID, JOB-NAME, PROGRAM-NAME, SCHEDULE-DATE, SCHEDULE-SEQ, JOB-SEQ, PROGRAM-SEQ (WHERE PROGRAM-STATUS NEQ "COMPLETEDOK") 02 PROGRAM-REQ-DATA. 03 PROGRAM-REQ-KEY. 04 SYSTEM-ID PIC X(06) DISPLAY. 04 SCHEDULE-DATE PIC X(08) DISPLAY. 04 SCHEDULE-SEQ PIC X(04) DISPLAY. 04 JOB-NAME PIC X(17) DISPLAY. 04 JOB-SEQ PIC X(04) DISPLAY. 04 PROGRAM-NAME PIC X(17) DISPLAY. 04 PROGRAM-SEQ PIC X(02) DISPLAY. 03 PROGRAM-STATUS PIC X(12) DISPLAY. 03 ERROR-CODE PIC X(06) DISPLAY. 03 START-DATE PIC X(08) DISPLAY. 03 START-TIME PIC X(06) DISPLAY. 03 COMPLETION-DATE PIC X(08) DISPLAY. 03 COMPLETION-TIME PIC X(06) DISPLAY. 03 TOTAL-PROCESSOR PIC X(06) DISPLAY. 03 COMMMENTS PIC X(240) DISPLAY.

01 PGM-PARAMETERS. PGM-PARAM-SET SET OF PGM-PARAMETERS KEYS ARE SYSTEM-ID, SCHEDULE-DATE, SCHEDULE-SEQ, JOB-NAME, JOB-SEQ, PROGRAM-NAME, PROGRAM-SEQ, PARAM-NO 02 PGM-PARAM-DATA. 03 PGM-PARAM-KEY. 04 SYSTEM-ID PIC X(06) DISPLAY. 04 SCHEDULE-DATE PIC X(08) DISPLAY. 04 SCHEDULE-SEQ PIC X(04) DISPLAY. 04 JOB-NAME PIC X(17) DISPLAY. 04 JOB-SEQ PIC X(04) DISPLAY. 04 PROGRAM-NAME PIC X(07) DISPLAY. 04 PROGRAM-SEQ PIC X(02) DISPLAY. 04 PARAM-NO PIC X(02) DISPLAY. 03 PARAM PIC X(240) DISPLAY.

01 PGM-DEPENDENCIES. PGM-DEP-SET OF PGM-DEPENDENCIES KEYS ARE SYSTEM-ID, SCHEDULE-DATE, SCHEDULE-SEQ, JOB-NAME, JOB-SEQ, PROGRAM-NAME, PROGRAM-SEQ, DEPENDENCY-SEQ 02 PGM-DEP-DATA. 03 PGM-DEP-KEY. 04 SYSTEM-ID PIC X(06) DISPLAY. 04 SCHEDULE-DATE PIC X(08) DISPLAY. 04 SCHEDULE-SEQ PIC X(04) DISPLAY. 04 JOB-NAME PIC X(17) DISPLAY. 04 JOB-SEQ PIC X(04) DISPLAY. 04 PROGRAM-NAME PIC X(07) DISPLAY. 04 PROGRAM-SEQ PIC X(02) DISPLAY. 04 DEPENDENCY-SEQ PIC X(02) DISPLAY. 03 DEPENDENCY-TYPE PIC X(06) DISPLAY. 03 DEP-SYSTEM-ID PIC X(06) DISPLAY. 03 DEP-SCHED-DATE PIC X(08) DISPLAY. 03 DEP-SCHED-SEQ PIC X(04) DISPLAY. 03 DEP-EVENT-NAME PIC X(30) DISPLAY. 03 DEP-EVENT-OCCURS PIC X(04) DISPLAY. 03 COMMENTS PIC X(240) DISPLAY.

01 PROGRAM-FILES. PGM-FILES-SET SET OF PROGRAM-FILES KEYS ARE SYSTEM-ID, SCHEDULE-DATE, SCHEDULE-SEQ, JOB-NAME, JOB-SEQ, PROGRAM-NAME, PROGRAM-SEQ, FILE-NAME PGM-FILE-SEQ SET OF PROGRAM-FILES KEYS ARE SYSTEM-ID, PROGRAM-NAME FILE-NAME FILE-SEQ-NO 02 PGM-FILES-DATA. 03 PGM-FILE-KEY. 04 SYSTEM-ID PIC X(06) DISPLAY. 04 SCHEDULE-DATE PIC X(08) DISPLAY. 04 SCHEDULE-SEQ PIC X(04) DISPLAY. 04 JOB-NAME PIC X(17) DISPLAY. 04 JOB-SEQ PIC X(04) DISPLAY. 04 PROGRAM-NAME PIC X(07) DISPLAY. 04 PROGRAM-SEQ PIC X(02) DISPLAY. 04 FILE-NAME PIC X(30) DISPLAY. 04 FILE-SEQ-NO PIC X(03) DISPLAY. 03 FILE-SERIALNO PIC X(06) DISPLAY (string) 03 FILE-READ-IND PIC X(01) DISPLAY. 03 FILE-RCD-COUNT PIC X(09) DISPLAY.

01 PROGRAM-REPORTS. PGM-RPTS-SET OF PROGRAM-REPORTS KEYS ARE SYSTEM-ID, SCHEDULE-DATE, SCHEDULE-SEQ, JOB-NAME, JOB-SEQ, PROGRAM-NAME, PROGRAM-SEQ, REPORT-NAME 02 PGM-RPT-DATA. 03 PGM-RPT-KEY. 04 SYSTEM-ID PIC X(06) DISPLAY. 04 SCHEDULE-DATE PIC X(08) DISPLAY. 04 SCHEDULE-SEQ PIC X(04) DISPLAY. 04 JOB-NAME PIC X(17) DISPLAY. 04 JOB-SEQ PIC X(04) DISPLAY. 04 PROGRAM-NAME PIC X(07) DISPLAY. 04 REPORT-NAME PIC X(12) DISPLAY. 03 RPT-COPIES PIC X(02) DISPLAY. 03 FICHE-COPIES PIC X(02) DISPLAY. 03 DEST-PRINTER PIC X(50) DISPLAY. 03 RPT-FORMID PIC X(12) DISPLAY. 03 RPT-TRANSFORM PIC X(50) DISPLAY. 03 RPT-DISPOSITION PIC X(10) DISPLAY. 03 RPT-RECIPIENT PIC X(26) DISPLAY. 03 PRINT-AFTER PIC X(16) DISPLAY.