
IGNORE CONDITION

SEND CONTROL

RETURN

ASKTIME

INLINE-19

INLINE-20

GET-TIME-AND-DATE

SEND MAP 'PM01'

SEND-MCLPP01-MAP

RETURN

CICS-RETURN

RECEIVE MAP 'PM00'

SEND MAP 'PM00'

SEND-MCLPP00-MAP

CICS-RETURN

SEND TEXT

CICS-RETURN

READ

SEND-MCLPP00-MAP

READ

GET-INSTALLATION-FOR-UPDT

DELETE-OLD-QUEUES

STARTBR

READNEXT

WRITEQ TS

LOAD-QUEUE-FOR-UPDATING

ENDBR

READ

STARTBR

READNEXT

WRITEQ TS

WRITEQ TS

LOAD-QUEUE-FOR-SCHEDULING

ENDBR

LOAD-TABLE

STARTBR

READNEXT

WRITEQ TS

INLINE-13

ENDBR

LOAD-RESOURCE-QUEUE

READ

READQ TS

RESOURCE-ROLLUP

WRITEQ TS

RESEQUENCE-QUEUE

REWRITE

RESEQUENCE-BY-RESOURCE

RESEQUENCE-TABLE

READQ TS

READ

GET-RESOURCE-BY-NUMBER

SET-UP-LEAP-CALENDAR

SET-UP-CALENDAR

CHECK-FOR-LEAP-YEAR

CALC-DAY-OF-WEEK

INLINE-17

INLINE-18

WORK-DAY-CHECK

CHECK-FOR-LEAP-YEAR

TARGET-DATE-CALCS

CALC-TARGET-DATE

TARGET-CALC-HANDLING

PROGTASK-RELATED-CALCS

READ

REWRITE

UPDATE-RESOURCE-REC

WRITEQ TS

READQ TS

WRITEQ TS

REFRESH-DEPENDENCIES

INLINE-14

UPDATE-TABLE

STARTBR

READNEXT

WRITEQ TS

INLINE-15

ENDBR

LOAD-PROJECT-QUEUE

READQ TS

SETUP-PROJECT-DATES

GET-MOST-DISTANT-SEQ-NBR

READQ TS

WRITEQ TS

IDENTIFY-CRITICAL-PATH

READ

REWRITE

UPDATE-PROJECT-RECORD

PROCESS-PROJECT-PATHS

UPDATE-CRITICAL-PATH

READQ TS

DELETE

WRITE

INLINE-16

PUT-TABLE

DELETE-OLD-QUEUES

PROJECT-TABLE-UPDATE

REWRITE

UPDATE-INSTALLATION-REC

INSURE-SYSTEM-UPDATED

SEND-MCLPP01-MAP

SEND-MCLPP00-MAP

LOGON-PROCESSING

CICS-RETURN

READ

SEND-MCLPP00-MAP

INSURE-SYSTEM-UPDATED

SEND-MCLPP01-MAP

SEND-MCLPP00-MAP

LOGON-PROCESSING

LOGON-PROCESSING-EXIT

GET-INSTALLATION-FOR-UPDT

PROJECT-TABLE-UPDATE

UPDATE-INSTALLATION-REC

INSURE-SYSTEM-UPDATED

INSURE-SYSTEM-UPDATED-EXIT

SEND MAP 'PM00'

SEND-MCLPP00-MAP

SEND-MCLPP00-MAP-EXIT

MCLPP00

RECEIVE MAP 'PM01'

SEND TEXT

RETURN

READ

INLINE-21

SECURITY-CHECK

STARTBR

READNEXT

BROWSE-PROJECTS-FWD

ENDBR

GET-NEXT-PROJECTS

INLINE-05

LOAD-MCLPP20-MAP

SEND MAP 'PM20'

SEND-MCLPP20-MAP

READ

LOAD-INSTALLATION-MAP

SEND MAP 'PM05'

SEND-MCLPP05-MAP

SEND-MCLPP05-MAP

DISPLAY-INSTALLATION-REC

STARTBR

READNEXT

BROWSE-PROGRAMMERS-FWD

ENDBR

GET-NEXT-PROGRAMMERS

INLINE-01

LOAD-RESOURCE-BROWSE-MAP

SEND MAP 'PM10'

SEND-MCLPP10-MAP

DISPLAY-PROGRAMMERS

GET-NEXT-PROJECTS

LOAD-MCLPP20-MAP

SEND-MCLPP20-MAP

GET-NEXT-PROGRAMMERS

DISPLAY-PROGRAMMERS

SEND MAP 'PM45'

SEND-MCLPP45-MAP

STARTBR

READPREV

BROWSE-USERS-BKWD

ENDBR

BACKUP-USERS

STARTBR

READNEXT

BROWSE-USERS-FWD

ENDBR

GET-NEXT-USERS

GET-NEXT-USERS

GET-USERS

LOAD-USER-TABLE

LOAD-MCLPP90-MAP

SEND MAP 'PM90'

SEND-MCLPP90-MAP

DISPLAY-USERS

LOAD-MCLPP01-MAP

SEND-MCLPP01-MAP

GET-MASTER-MENU-OPTION

CICS-RETURN

GET-NEXT-PROJECTS

LOAD-MCLPP20-MAP

SEND-MCLPP20-MAP

DISPLAY-INSTALLATION-REC

GET-NEXT-PROGRAMMERS

DISPLAY-PROGRAMMERS

GET-NEXT-PROJECTS

LOAD-MCLPP20-MAP

SEND-MCLPP20-MAP

GET-NEXT-PROGRAMMERS

DISPLAY-PROGRAMMERS

SEND-MCLPP45-MAP

DISPLAY-USERS

LOAD-MCLPP01-MAP

SEND-MCLPP01-MAP

GET-MASTER-MENU-OPTION

GET-MASTER-MENU-OPTION-EXIT

LOAD-MCLPP01-MAP

LOAD-MCLPP01-MAP-EXIT

SEND MAP 'PM01'

SEND-MCLPP01-MAP

SEND-MCLPP01-MAP-EXIT

MCLPP01

RECEIVE MAP 'PM05'

SEND-MCLPP01-MAP

CICS-RETURN

SECURITY-CHECK

SEND-MCLPP05-MAP

GET-INSTALLATION-FOR-UPDT

WRITE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

BIF

BIF

BIF

BIF

BIF

BIF

BIF

BIF

BIF

BIF

BIF

EDIT-INSTALLATION

LOAD-INSTALLATION-REC

PROJECT-TABLE-UPDATE

REWRITE

INSTALLATION-CHANGE

READ

LOAD-INSTALLATION-MAP

SET-UP-INST-CHANGE

SEND-MCLPP05-MAP

INST-CHANGE-HANDLING

DISPLAY-INSTALLATION-REC

INSTALLATION-MAINT

CICS-RETURN

SEND-MCLPP05-MAP

INST-CHANGE-HANDLING

DISPLAY-INSTALLATION-REC

INSTALLATION-MAINT

INSTALLATION-MAINT-EXIT

READ

LOAD-INSTALLATION-MAP

SEND-MCLPP05-MAP

SEND-MCLPP05-MAP

DISPLAY-INSTALLATION-REC

DISPLAY-INSTALLATION-REC-EXIT

SEND MAP 'PM05'

SEND-MCLPP05-MAP

SEND-MCLPP05-MAP-EXIT

LOAD-INSTALLATION-MAP

LOAD-INSTALLATION-MAP-EXIT

INSTALLATION-CHANGE

SET-UP-INST-CHANGE

SEND-MCLPP05-MAP

INST-CHANGE-HANDLING

INST-CHANGE-HANDLING-EXIT

READ

LOAD-INSTALLATION-MAP

SET-UP-INST-CHANGE

SET-UP-INST-CHANGE-EXIT

GET-INSTALLATION-FOR-UPDT

WRITE

EDIT-INSTALLATION

LOAD-INSTALLATION-REC

PROJECT-TABLE-UPDATE

REWRITE

INSTALLATION-CHANGE

INSTALLATION-CHANGE-EXIT

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

BIF

BIF

BIF

BIF

BIF

BIF

BIF

BIF

BIF

BIF

BIF

EDIT-INSTALLATION

EDIT-INSTALLATION-EXIT

LOAD-INSTALLATION-REC

LOAD-INSTALLATION-REC-EXIT

MCLPP05-EXIT

MCLPP05

RECEIVE MAP 'PM10'

SEND-MCLPP01-MAP

CICS-RETURN

SECURITY-CHECK

CALC-CURSOR-POSITION

INLINE-02

LOAD-MCLPP11-MAP

SET-UP-RESOURCE-ADD

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-RESOURCE

GET-INSTALLATION-FOR-UPDT

LOAD-RESOURCE-RECORD

LOAD-MCLPP11-MAP

WRITE

CHECK-FOR-EIBRCODE-ERRORS

5300-ADD-RECORD

UPDATE-INSTALLATION-REC

EXECUTE-RESOURCE-ADD

SEND MAP 'PM11'

SEND-MCLPP11-MAP

ADD-RESOURCE-HANDLING

READ

GET-RESOURCE-BY-NAME

STARTBR

READPREV

BROWSE-ASSIGNMENTS-BKWD

ENDBR

BACKUP-ASSIGNMENTS

STARTBR

READNEXT

READ

CHECK-FOR-EIBRCODE-ERRORS

GET-PROJECT-BY-NUMBER

INLINE-03

ENDBR

BROWSE-ASSIGNMENTS-FWD

GET-NEXT-ASSIGNMENTS

GET-NEXT-ASSIGNMENTS

GET-NEXT-ASSIGNMENTS

BACKUP-ASSIGNMENTS

GET-NEXT-ASSIGNMENTS

BROWSE-ASSIGNMENTS-FWD

GET-ASSIGNMENTS

LOAD-MCLPP11-MAP

SEND-MCLPP11-MAP

DISPLAY-RESOURCE

GET-RESOURCE-BY-NAME

CALC-DAY-OF-WEEK

SET-UP-WK-DATES

LOAD-DOW-LINE

CHECK-FOR-LEAP-YEAR

BACKUP-PERIOD-ENDING

LOAD-DOW-LINE

INLINE-08

GET-PERIOD-ENDING-DSPLY

CLEAR-TIMESHEET-DISPLAY

STARTBR

READPREV

P41-BROWSE-PROGS-BKWD

ENDBR

P41-BACKUP-PROGTASKS

STARTBR

READNEXT

GET-PROJECT-BY-NUMBER

P41-BROWSE-PROGS-FWD

ENDBR

P41-BROWSE-PROGS-FOREWARD

P41-GET-NEXT-PROGRAMS

SET-UP-WK-DATES

READ

GET-TIME-SHEET

BACKUP-PERIOD-ENDING

LOAD-TIME01

SET-UP-WK-DATES

GET-TIME-SHEET

BACKUP-PERIOD-ENDING

LOAD-TIME02

SET-UP-WK-DATES

GET-TIME-SHEET

BACKUP-PERIOD-ENDING

LOAD-TIME03

SET-UP-WK-DATES

GET-TIME-SHEET

BACKUP-PERIOD-ENDING

LOAD-TIME04

SET-UP-WK-DATES

GET-TIME-SHEET

BACKUP-PERIOD-ENDING

LOAD-TIME05

LOAD-TIMESHEET-PAGE

P41-GET-NEXT-PROGRAMS

LOAD-TIMESHEET-PAGE

P41-BROWSE-PROGS-FOREWARD

LOAD-TIMESHEET-PAGE

P41-BROWSE-PROGS-FOREWARD

LOAD-TIMESHEET-PAGE

P41-BROWSE-PROGS-FOREWARD

LOAD-TIMESHEET-PAGE

P41-GET-ASSIGNMENTS

LOAD-MCLPP41-MAP

SEND MAP 'PM41'

SEND-MCLPP41-MAP

DISPLAY-TIMESHEET

RESOURCE-MAINTENANCE

STARTBR

READPREV

BROWSE-PROGRAMMERS-BKWD

ENDBR

BACKUP-PROGRAMMERS

GET-NEXT-PROGRAMMERS

GET-NEXT-PROGRAMMERS

GET-PROGRAMMERS

DISPLAY-PROGRAMMERS

GET-NEXT-PROGRAMMERS

DISPLAY-PROGRAMMERS

SELECT-MCLPP10-PROCESSING

CICS-RETURN

RESOURCE-MAINTENANCE

GET-PROGRAMMERS

DISPLAY-PROGRAMMERS

GET-NEXT-PROGRAMMERS

DISPLAY-PROGRAMMERS

SELECT-MCLPP10-PROCESSING

SELECT-MCLPP10-PROCESSING-EXIT

LOAD-RESOURCE-BROWSE-MAP

SEND-MCLPP10-MAP

DISPLAY-PROGRAMMERS

DISPLAY-PROGRAMMERS-EXIT

CALC-CURSOR-POSITION

ADD-RESOURCE-HANDLING

DISPLAY-RESOURCE

GET-RESOURCE-BY-NAME

GET-PERIOD-ENDING-DSPLY

DISPLAY-TIMESHEET

RESOURCE-MAINTENANCE

RESOURCE-MAINTENANCE-EXIT

BACKUP-PROGRAMMERS

GET-NEXT-PROGRAMMERS

GET-NEXT-PROGRAMMERS

GET-PROGRAMMERS

GET-PROGRAMMERS-EXIT

STARTBR

BROWSE-PROGRAMMERS-FWD

ENDBR

GET-NEXT-PROGRAMMERS

GET-NEXT-PROGRAMMERS-EXIT

READNEXT

BROWSE-PROGRAMMERS-FWD

BROWSE-PROGRAMMERS-FWD-EXIT

STARTBR

BROWSE-PROGRAMMERS-BKWD

ENDBR

BACKUP-PROGRAMMERS

BACKUP-PROGRAMMERS-EXIT

READPREV

BROWSE-PROGRAMMERS-BKWD

BROWSE-PROGRAMMERS-BKWD-EXIT

SEND MAP 'PM10'

SEND-MCLPP10-MAP

SEND-MCLPP10-MAP-EXIT

INLINE-01

LOAD-RESOURCE-BROWSE-MAP

LOAD-RESOURCE-BROWSE-MAP-EXIT

INLINE-01

INLINE-01-EXIT

MCLPP10

RECEIVE MAP 'PM11'

GET-NEXT-PROGRAMMERS

DISPLAY-PROGRAMMERS

CICS-RETURN

SECURITY-CHECK

SEND-MCLPP11-MAP

DISPLAY-RESOURCE

ADD-RESOURCE-HANDLING

EDIT-RESOURCE

GET-INSTALLATION-FOR-UPDT

READ

CHECK-FOR-EIBRCODE-ERRORS

READ-RESOURCE-FOR-UPDATE

WRITE

PUT-ARCHIVE-RECORD

DELETE

CHECK-FOR-EIBRCODE-ERRORS

DELETE-RESOURCE-RECORD

LOAD-RESOURCE-RECORD

5300-ADD-RECORD

PROJECT-TABLE-UPDATE

UPDATE-INSTALLATION-REC

GET-RESOURCE-BY-NAME

GET-ASSIGNMENTS

LOAD-MCLPP11-MAP

EXECUTE-RESOURCE-CHANGE

GET-RESOURCE-BY-NAME

GET-ASSIGNMENTS

LOAD-MCLPP11-MAP

SET-UP-RESOURCE-CHANGE

SEND-MCLPP11-MAP

CHANGE-RESOURCE-HANDLING

GET-RESOURCE-BY-NAME

GET-ASSIGNMENTS

SET-UP-RESOURCE-DELETE

LOAD-MCLPP11-MAP

SEND-MCLPP11-MAP

DELETE

CHECK-FOR-EIBRCODE-ERRORS

DELETE-RESOURCE-WITH-KEY

EXECUTE-RESOURCE-DELETE

DELETE-RESOURCE-HANDLING

DISPLAY-RESOURCE

SELECT-MCLPP11-PROCESSING

CICS-RETURN

SEND-MCLPP11-MAP

DISPLAY-RESOURCE

ADD-RESOURCE-HANDLING

CHANGE-RESOURCE-HANDLING

DELETE-RESOURCE-HANDLING

DISPLAY-RESOURCE

SELECT-MCLPP11-PROCESSING

SELECT-MCLPP11-PROCESSING-EXIT

GET-RESOURCE-BY-NAME

GET-ASSIGNMENTS

LOAD-MCLPP11-MAP

SEND-MCLPP11-MAP

DISPLAY-RESOURCE

DISPLAY-RESOURCE-EXIT

SET-UP-RESOURCE-ADD

EXECUTE-RESOURCE-ADD

SEND-MCLPP11-MAP

ADD-RESOURCE-HANDLING

ADD-RESOURCE-HANDLING-EXIT

LOAD-MCLPP11-MAP

SET-UP-RESOURCE-ADD

SET-UP-RESOURCE-ADD-EXIT

EDIT-RESOURCE

GET-INSTALLATION-FOR-UPDT

LOAD-RESOURCE-RECORD

LOAD-MCLPP11-MAP

5300-ADD-RECORD

UPDATE-INSTALLATION-REC

EXECUTE-RESOURCE-ADD

EXECUTE-RESOURCE-ADD-EXIT

EXECUTE-RESOURCE-CHANGE

SET-UP-RESOURCE-CHANGE

SEND-MCLPP11-MAP

CHANGE-RESOURCE-HANDLING

CHANGE-RESOURCE-HANDLING-EXIT

GET-RESOURCE-BY-NAME

GET-ASSIGNMENTS

LOAD-MCLPP11-MAP

SET-UP-RESOURCE-CHANGE

SET-UP-RESOURCE-CHANGE-EXIT

EDIT-RESOURCE

GET-INSTALLATION-FOR-UPDT

READ-RESOURCE-FOR-UPDATE

DELETE-RESOURCE-RECORD

LOAD-RESOURCE-RECORD

5300-ADD-RECORD

PROJECT-TABLE-UPDATE

UPDATE-INSTALLATION-REC

GET-RESOURCE-BY-NAME

GET-ASSIGNMENTS

LOAD-MCLPP11-MAP

EXECUTE-RESOURCE-CHANGE

EXECUTE-RESOURCE-CHANGE-EXIT

SET-UP-RESOURCE-DELETE

LOAD-MCLPP11-MAP

SEND-MCLPP11-MAP

EXECUTE-RESOURCE-DELETE

DELETE-RESOURCE-HANDLING

DELETE-RESOURCE-HANDLING-EXIT

GET-RESOURCE-BY-NAME

GET-ASSIGNMENTS

SET-UP-RESOURCE-DELETE

SET-UP-RESOURCE-DELETE-EXIT

DELETE-RESOURCE-WITH-KEY

EXECUTE-RESOURCE-DELETE

EXECUTE-RESOURCE-DELETE-EXIT

SEND MAP 'PM11'

SEND-MCLPP11-MAP

SEND-MCLPP11-MAP-EXIT

INLINE-02

LOAD-MCLPP11-MAP

LOAD-MCLPP11-MAP-EXIT

INLINE-02

INLINE-02-2XIT

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-DATE

EDIT-RESOURCE

MCLPP11

RECEIVE MAP 'PM20'

SEND-MCLPP01-MAP

CICS-RETURN

SECURITY-CHECK

CALC-CURSOR-POSITION

LOAD-MCLPP21-MAP

2100-SET-UP-ADD-HANDLING

LOAD-MAP-HEADER

SEND MAP 'PM21'

REFRESH-MAP

EDIT-PROJECT

BIF

LOAD-PROJECT-RECORD

GET-INSTALLATION-FOR-UPDT

WRITE

CHECK-FOR-EIBRCODE-ERRORS

ADD-PROJECT

WRITE

INLINE-07

ADD-MANDATORY-TASKS

PROJECT-TABLE-UPDATE

STARTBR

READPREV

BROWSE-PROGS-BKWD

ENDBR

3200-BACKUP-PROGTASKS

STARTBR

READNEXT

RELATED-TASK-EDIT

3110-BROWSE-PROGS-FWD

ENDBR

BROWSE-PROGS-FOREWARD

GET-NEXT-PROGRAMS

GET-NEXT-PROGRAMS

BROWSE-PROGS-FOREWARD

BROWSE-PROGS-FOREWARD

GET-RELATED-PROGRAMS

LOAD-MCLPP21-MAP

PREPARE-DATA-FOR-RETURN

UPDATE-INSTALLATION-REC

2200-EXECUTE-ADD

SEND MAP 'PM21'

SEND-MCLPP21-MAP

ADD-PROJECT-PROCESSING

READ

CHECK-FOR-EIBRCODE-ERRORS

GET-PROJECT-BY-ALPHA

GET-RELATED-PROGRAMS

GET-RESOURCE-BY-NUMBER

PREPARE-DATA-FOR-RETURN

SEND-MCLPP21-MAP

DISPLAY-PROJECT

GET-PROJECT-BY-ALPHA

INLINE-11

READ

SET-UP-LEAP-CALENDAR

SET-UP-CALENDAR

6110-CHECK-FOR-LEAP-YEAR

6020-BACKUP-DATE

STARTBR

READPREV

1520-BACKUP-GANTT-RECS

ENDBR

GET-LAST-GANTT-PAGE

STARTBR

READNEXT

GET-RESOURCE-BY-NUMBER

6110-CHECK-FOR-LEAP-YEAR

6200-CALC-DAY-OF-WEEK

6120-VACATION-CHECK

6125-HOLIDAY-CHECK

6115-WORK-DAY-CHECK

6110-CHECK-FOR-LEAP-YEAR

6010-ADVANCE-DATE

6010-ADVANCE-DATE

SET-UP-GANTT-DISPLAY-LINE

BROWSE-GANTT-FWD

ENDBR

STARTBR

BROWSE-GANTT-FWD

ENDBR

STARTBR

BROWSE-GANTT-FWD

ENDBR

SET-UP-GANTT-DISPLAY

STARTBR

READNEXT

ENDBR

CHECK-FOR-EIBRCODE-ERRORS

READ-PROGTASK-RECORD

GET-RESOURCE-BY-NUMBER

LOAD-MCLPP51-MAP

SEND MAP 'PM51'

SEND-MCLPP51-MAP

DISPLAY-GANTT

2000-PROJECT-MAINTENANCE

STARTBR

READPREV

BROWSE-RECS-BKWD

ENDBR

BACKUP-PROJECTS

GET-NEXT-PROJECTS

GET-NEXT-PROJECTS

LOAD-MCLPP20-MAP

SEND-MCLPP20-MAP

INLINE-04

SELECT-MCLPP20-PROCESSING

CICS-RETURN

2000-PROJECT-MAINTENANCE

INLINE-04

SELECT-MCLPP20-PROCESSING

SELECT-MCLPP20-PROCESSING-EXIT

BACKUP-PROJECTS

GET-NEXT-PROJECTS

GET-NEXT-PROJECTS

LOAD-MCLPP20-MAP

SEND-MCLPP20-MAP

INLINE-04

INLINE-04-EXIT

CALC-CURSOR-POSITION

ADD-PROJECT-PROCESSING

DISPLAY-PROJECT

DISPLAY-GANTT

2000-PROJECT-MAINTENANCE

2000-EXIT

STARTBR

BROWSE-PROJECTS-FWD

ENDBR

GET-NEXT-PROJECTS

GET-NEXT-PROJECTS-EXIT

READNEXT

BROWSE-PROJECTS-FWD

BROWSE-PROJECTS-FWD-EXIT

STARTBR

BROWSE-RECS-BKWD

ENDBR

BACKUP-PROJECTS

BACKUP-PROJECTS-EXIT

READPREV

BROWSE-RECS-BKWD

BROWSE-RECS-BKWD-EXIT

INLINE-05

LOAD-MCLPP20-MAP

LOAD-MCLPP20-MAP-EXIT

INLINE-05

MCLPP20

RECEIVE MAP 'PM21'

GET-NEXT-PROJECTS

LOAD-MCLPP20-MAP

SEND-MCLPP20-MAP

SETUP-RETURN-TO-MCLPP20

CICS-RETURN

SECURITY-CHECK

SEND-MCLPP21-MAP

DISPLAY-PROJECT

GET-PROJECT-BY-ALPHA

SEND-MCLPP21-MAP

CALC-CURSOR-POSITION

GET-PROJECT-BY-NUMBER

READ

GET-LEAD-PROGRAMMER

LOAD-MCLPP22-MAP

SET-UP-PROGTASK-ADD

LOAD-MAP-HEADER-INFO

SEND MAP 'PM22'

SEND-MCLPP22-MAP

BIF

BIF

BIF

EDIT-INPUTS

GET-INSTALLATION-FOR-UPDT

LOAD-PROGTASK-RECORD

WRITE

CHECK-FOR-EIBRCODE-ERRORS

ADD-PROGTASK-RECORD

PROJECT-TABLE-UPDATE

READ

GET-PROGTASK-RECORD

GET-RESOURCE-BY-NUMBER

GET-PROJECT-BY-NUMBER

GET-LEAD-PROGRAMMER

GET-PROGTASK-INFO

LOAD-MCLPP22-MAP

UPDATE-INSTALLATION-REC

EXECUTE-PROGTASK-ADD

SEND-MCLPP22-MAP

ADD-PROGTASK-HANDLING

GET-PROGTASK-INFO

LOAD-MCLPP22-MAP

SEND-MCLPP22-MAP

DISPLAY-PROGTASK

TRANSFER-TO-MCLPP22

PROGTASK-MAINTENANCE

ADD-PROJECT-PROCESSING

GET-PROJECT-BY-ALPHA

GET-RESOURCE-BY-NUMBER

GET-RELATED-PROGRAMS

PREPARE-DATA-FOR-RETURN

SET-UP-CHANGE-HANDLING

EDIT-PROJECT

GET-INSTALLATION-FOR-UPDT

READ

CHECK-FOR-EIBRCODE-ERRORS

READ-PROJECT-FOR-UPDATE

PUT-ARCHIVE-RECORD

DELETE

CHECK-FOR-EIBRCODE-ERRORS

DELETE-PROJECT-RECORD

LOAD-PROJECT-RECORD

ADD-PROJECT

PROJECT-TABLE-UPDATE

UPDATE-INSTALLATION-REC

GET-PROJECT-BY-ALPHA

GET-RESOURCE-BY-NUMBER

GET-RELATED-PROGRAMS

PREPARE-DATA-FOR-RETURN

3200-EXECUTE-CHANGE-HANDLING

SEND-MCLPP21-MAP

3000-CHANGE-PROCESSING

GET-PROJECT-BY-ALPHA

GET-RESOURCE-BY-NUMBER

GET-RELATED-PROGRAMS

4100-SET-UP-DELETE-HANDLING

PREPARE-DATA-FOR-RETURN

SEND-MCLPP21-MAP

DELETE

CHECK-FOR-EIBRCODE-ERRORS

DELETE-PROJECT-WITH-KEY

SETUP-RETURN-TO-MCLPP20

4200-EXECUTE-DELETE

4000-DELETE-PROCESSING

DISPLAY-PROJECT

SELECT-MCLPP21-PROCESSING

CICS-RETURN

SEND-MCLPP21-MAP

DISPLAY-PROJECT

PROGTASK-MAINTENANCE

ADD-PROJECT-PROCESSING

3000-CHANGE-PROCESSING

4000-DELETE-PROCESSING

DISPLAY-PROJECT

SELECT-MCLPP21-PROCESSING

SELECT-MCLPP21-PROCESSING-EXIT

GET-PROJECT-BY-ALPHA

GET-RELATED-PROGRAMS

GET-RESOURCE-BY-NUMBER

PREPARE-DATA-FOR-RETURN

SEND-MCLPP21-MAP

DISPLAY-PROJECT

DISPLAY-PROJECT-EXIT

2100-SET-UP-ADD-HANDLING

REFRESH-MAP

2200-EXECUTE-ADD

SEND-MCLPP21-MAP

ADD-PROJECT-PROCESSING

ADD-PROJECT-PROCESSING-EXIT

LOAD-MCLPP21-MAP

2100-SET-UP-ADD-HANDLING

2100-EXIT

EDIT-PROJECT

LOAD-PROJECT-RECORD

GET-INSTALLATION-FOR-UPDT

ADD-PROJECT

ADD-MANDATORY-TASKS

PROJECT-TABLE-UPDATE

GET-RELATED-PROGRAMS

PREPARE-DATA-FOR-RETURN

UPDATE-INSTALLATION-REC

2200-EXECUTE-ADD

2200-EXIT

SET-UP-CHANGE-HANDLING

3200-EXECUTE-CHANGE-HANDLING

SEND-MCLPP21-MAP

3000-CHANGE-PROCESSING

3000-EXIT

GET-PROJECT-BY-ALPHA

GET-RESOURCE-BY-NUMBER

GET-RELATED-PROGRAMS

PREPARE-DATA-FOR-RETURN

SET-UP-CHANGE-HANDLING

SET-UP-CHANGE-HANDLING-EXIT

EDIT-PROJECT

GET-INSTALLATION-FOR-UPDT

READ-PROJECT-FOR-UPDATE

DELETE-PROJECT-RECORD

LOAD-PROJECT-RECORD

ADD-PROJECT

PROJECT-TABLE-UPDATE

UPDATE-INSTALLATION-REC

GET-PROJECT-BY-ALPHA

GET-RESOURCE-BY-NUMBER

GET-RELATED-PROGRAMS

PREPARE-DATA-FOR-RETURN

3200-EXECUTE-CHANGE-HANDLING

EXECUTE-CHANGE-HANDLING-EXIT

4100-SET-UP-DELETE-HANDLING

PREPARE-DATA-FOR-RETURN

SEND-MCLPP21-MAP

4200-EXECUTE-DELETE

4000-DELETE-PROCESSING

4000-EXIT

GET-PROJECT-BY-ALPHA

GET-RESOURCE-BY-NUMBER

GET-RELATED-PROGRAMS

4100-SET-UP-DELETE-HANDLING

4100-EXIT

DELETE-PROJECT-WITH-KEY

SETUP-RETURN-TO-MCLPP20

4200-EXECUTE-DELETE

4200-EXIT

INLINE-07

ADD-MANDATORY-TASKS

ADD-MANDATORY-TASKS-EXIT

WRITE

INLINE-07

INLINE-07-EXIT

GET-PROJECT-BY-ALPHA

SEND-MCLPP21-MAP

TRANSFER-TO-MCLPP22

PROGTASK-MAINTENANCE

PROGTASK-MAINTENANCE-EXIT

CALC-CURSOR-POSITION

ADD-PROGTASK-HANDLING

DISPLAY-PROGTASK

TRANSFER-TO-MCLPP22

TRANSFER-TO-MCLPP22-EXIT

LOAD-MCLPP21-MAP

PREPARE-DATA-FOR-RETURN

PREPARE-DATA-FOR-RETURN-EXIT

LOAD-MCLPP21-MAP

LOAD-MCLPP21-MAP-EXIT

SEND MAP 'PM21'

SEND-MCLPP21-MAP

SEND-MCLPP21-MAP-EXIT

LOAD-MAP-HEADER

SEND MAP 'PM21'

REFRESH-MAP

REFRESH-MAP-EXIT

LOAD-MAP-HEADER

LOAD-MAP-HEADER-EXIT

EDIT-PROJECT

MCLPP21

RECEIVE MAP 'PM22'

DISPLAY-PROJECT

CICS-RETURN

SECURITY-CHECK

SEND-MCLPP22-MAP

DISPLAY-PROGTASK

GET-INSTALLATION-FOR-UPDT

READ

CHECK-FOR-EIBRCODE-ERRORS

READ-REC-FOR-UPDATE

PUT-ARCHIVE-RECORD

DELETE

CHECK-FOR-EIBRCODE-ERRORS

DELETE-PROGTASK-RECORD

ADD-PROGTASK-RECORD

PROJECT-TABLE-UPDATE

DISPLAY-PROGTASK

UPDATE-INSTALLATION-REC

ACCEPTANCE-HANDLING

ADD-PROGTASK-HANDLING

EDIT-INPUTS

GET-INSTALLATION-FOR-UPDT

READ-REC-FOR-UPDATE

DELETE-PROGTASK-RECORD

LOAD-PROGTASK-RECORD

ADD-PROGTASK-RECORD

PROJECT-TABLE-UPDATE

GET-PROGTASK-INFO

LOAD-MCLPP22-MAP

UPDATE-INSTALLATION-REC

EXECUTE-PROGTASK-CHANGE

GET-PROGTASK-INFO

LOAD-MCLPP22-MAP

SET-UP-PROGTASK-CHANGE

SEND-MCLPP22-MAP

160-CHANGE-HANDLING

GET-PROGTASK-INFO

SET-UP-PROGTASK-DELETE

LOAD-MCLPP22-MAP

SEND-MCLPP22-MAP

GET-INSTALLATION-FOR-UPDT

READ-REC-FOR-UPDATE

DELETE

PROJECT-TABLE-UPDATE

UPDATE-INSTALLATION-REC

DISPLAY-PROJECT

EXECUTE-PROGTASK-DELETE

DELETE-PROGTASK-HANDLING

DISPLAY-PROGTASK

SELECT-MCLPP22-PROCESSING

CICS-RETURN

SEND-MCLPP22-MAP

DISPLAY-PROGTASK

ACCEPTANCE-HANDLING

ADD-PROGTASK-HANDLING

160-CHANGE-HANDLING

DELETE-PROGTASK-HANDLING

DISPLAY-PROGTASK

SELECT-MCLPP22-PROCESSING

SELECT-MCLPP22-PROCESSING-EXIT

GET-PROGTASK-INFO

LOAD-MCLPP22-MAP

SEND-MCLPP22-MAP

DISPLAY-PROGTASK

DISPLAY-PROGTASK-EXIT

GET-PROJECT-BY-NUMBER

GET-LEAD-PROGRAMMER

SET-UP-PROGTASK-ADD

SEND-MCLPP22-MAP

EXECUTE-PROGTASK-ADD

SEND-MCLPP22-MAP

ADD-PROGTASK-HANDLING

ADD-PROGTASK-HANDLING-EXIT

LOAD-MCLPP22-MAP

SET-UP-PROGTASK-ADD

SET-UP-PROGTASK-ADD-EXIT

EDIT-INPUTS

GET-INSTALLATION-FOR-UPDT

LOAD-PROGTASK-RECORD

ADD-PROGTASK-RECORD

PROJECT-TABLE-UPDATE

GET-PROGTASK-INFO

LOAD-MCLPP22-MAP

UPDATE-INSTALLATION-REC

EXECUTE-PROGTASK-ADD

EXECUTE-PROGTASK-ADD-EXIT

EXECUTE-PROGTASK-CHANGE

SET-UP-PROGTASK-CHANGE

SEND-MCLPP22-MAP

160-CHANGE-HANDLING

160-EXIT

GET-PROGTASK-INFO

LOAD-MCLPP22-MAP

SET-UP-PROGTASK-CHANGE

SET-UP-PROGTASK-CHANGE-EXIT

EDIT-INPUTS

GET-INSTALLATION-FOR-UPDT

READ-REC-FOR-UPDATE

DELETE-PROGTASK-RECORD

LOAD-PROGTASK-RECORD

ADD-PROGTASK-RECORD

PROJECT-TABLE-UPDATE

GET-PROGTASK-INFO

LOAD-MCLPP22-MAP

UPDATE-INSTALLATION-REC

EXECUTE-PROGTASK-CHANGE

EXECUTE-PROGTASK-CHANGE-EXIT

GET-PROGTASK-INFO

SET-UP-PROGTASK-DELETE

LOAD-MCLPP22-MAP

SEND-MCLPP22-MAP

EXECUTE-PROGTASK-DELETE

DELETE-PROGTASK-HANDLING

DELETE-PROGTASK-HANDLING-EXIT

SET-UP-PROGTASK-DELETE

SET-UP-PROGTASK-DELETE-EXIT

GET-INSTALLATION-FOR-UPDT

READ-REC-FOR-UPDATE

DELETE

PROJECT-TABLE-UPDATE

UPDATE-INSTALLATION-REC

DISPLAY-PROJECT

EXECUTE-PROGTASK-DELETE

EXECUTE-PROGTASK-DELETE-EXIT

GET-INSTALLATION-FOR-UPDT

READ-REC-FOR-UPDATE

DELETE-PROGTASK-RECORD

ADD-PROGTASK-RECORD

PROJECT-TABLE-UPDATE

DISPLAY-PROGTASK

UPDATE-INSTALLATION-REC

ACCEPTANCE-HANDLING

ACCEPTANCE-HANDLING-EXIT

LOAD-MAP-HEADER-INFO

SEND MAP 'PM22'

SEND-MCLPP22-MAP

SEND-MCLPP22-MAP-EXIT

LOAD-MAP-HEADER-INFO

LOAD-MAP-HEADER-INFO-EXIT

LOAD-MCLPP22-MAP

LOAD-MCLPP22-MAP-EXIT

BIF

BIF

BIF

EDIT-INPUTS

MCLPP22

RECEIVE MAP 'PM41'

GET-NEXT-PROGRAMMERS

DISPLAY-PROGRAMMERS

CICS-RETURN

SECURITY-CHECK

SET-UP-WK-DATES

GET-RESOURCE-BY-NAME

SEND-MCLPP41-MAP

SET-UP-WK-DATES

BACKUP-PERIOD-ENDING

PAGE-BACKWARD

GET-PERIOD-ENDING-DSPLY

DISPLAY-TIMESHEET

SET-UP-WK-DATES

CHECK-FOR-LEAP-YEAR

ADVANCE-PERIOD-ENDING

PAGE-FOREWARD

GET-PERIOD-ENDING-DSPLY

DISPLAY-TIMESHEET

SET-UP-WK-DATES

BIF

BIF

DELETE

WRITE

PUT-TIMESHEET

BACKUP-PERIOD-ENDING

SAVE-TIME01

SET-UP-WK-DATES

BIF

BIF

PUT-TIMESHEET

BACKUP-PERIOD-ENDING

SAVE-TIME02

SET-UP-WK-DATES

BIF

BIF

PUT-TIMESHEET

BACKUP-PERIOD-ENDING

SAVE-TIME03

SET-UP-WK-DATES

BIF

BIF

PUT-TIMESHEET

BACKUP-PERIOD-ENDING

SAVE-TIME04

SET-UP-WK-DATES

BIF

BIF

PUT-TIMESHEET

BACKUP-PERIOD-ENDING

SAVE-TIME05

SAVE-TIMESHEET-PAGE

GET-PERIOD-ENDING-DSPLY

DISPLAY-TIMESHEET

GET-PERIOD-ENDING-DSPLY

DISPLAY-TIMESHEET

SELECT-MCLPP41-PROCESSING

CICS-RETURN

SET-UP-WK-DATES

GET-RESOURCE-BY-NAME

SEND-MCLPP41-MAP

PAGE-BACKWARD

GET-PERIOD-ENDING-DSPLY

DISPLAY-TIMESHEET

PAGE-FOREWARD

GET-PERIOD-ENDING-DSPLY

DISPLAY-TIMESHEET

SAVE-TIMESHEET-PAGE

GET-PERIOD-ENDING-DSPLY

DISPLAY-TIMESHEET

GET-PERIOD-ENDING-DSPLY

DISPLAY-TIMESHEET

SELECT-MCLPP41-PROCESSING

SELECT-MCLPP41-PROCESSING-EXIT

CLEAR-TIMESHEET-DISPLAY

P41-GET-ASSIGNMENTS

LOAD-MCLPP41-MAP

SEND-MCLPP41-MAP

DISPLAY-TIMESHEET

DISPLAY-TIMESHEET-EXIT

CLEAR-TIMESHEET-DISPLAY

CLEAR-TIMESHEET-DISPLAY-EXIT

SEND MAP 'PM41'

SEND-MCLPP41-MAP

SEND-MCLPP41-MAP-EXIT

LOAD-MCLPP41-MAP

LOAD-MCLPP41-MAP-EXIT

P41-BACKUP-PROGTASKS

P41-GET-NEXT-PROGRAMS

LOAD-TIMESHEET-PAGE

P41-GET-NEXT-PROGRAMS

LOAD-TIMESHEET-PAGE

P41-BROWSE-PROGS-FOREWARD

LOAD-TIMESHEET-PAGE

P41-BROWSE-PROGS-FOREWARD

LOAD-TIMESHEET-PAGE

P41-BROWSE-PROGS-FOREWARD

LOAD-TIMESHEET-PAGE

P41-GET-ASSIGNMENTS

P41-GET-ASSIGNMENTS-EXIT

P41-BROWSE-PROGS-FOREWARD

P41-GET-NEXT-PROGRAMS

P41-GET-NEXT-PROGRAMS-EXIT

STARTBR

P41-BROWSE-PROGS-FWD

ENDBR

P41-BROWSE-PROGS-FOREWARD

P41-BROWSE-PROGS-FOREWARD-EXIT

READNEXT

GET-PROJECT-BY-NUMBER

P41-BROWSE-PROGS-FWD

P41-BROWSE-PROGS-FWD-EXIT

STARTBR

P41-BROWSE-PROGS-BKWD

ENDBR

P41-BACKUP-PROGTASKS

P41-BACKUP-PROGTASKS-EXIT

READPREV

P41-BROWSE-PROGS-BKWD

P41-BROWSE-PROGS-BKWD-EXIT

SET-UP-WK-DATES

LOAD-TIME01

SET-UP-WK-DATES

LOAD-TIME02

SET-UP-WK-DATES

LOAD-TIME03

SET-UP-WK-DATES

LOAD-TIME04

SET-UP-WK-DATES

LOAD-TIME05

LOAD-TIMESHEET-PAGE

LOAD-TIMESHEET-PAGE-EXIT

GET-TIME-SHEET

BACKUP-PERIOD-ENDING

LOAD-TIME01

LOAD-TIME01-EXIT

GET-TIME-SHEET

BACKUP-PERIOD-ENDING

LOAD-TIME02

LOAD-TIME02-EXIT

GET-TIME-SHEET

BACKUP-PERIOD-ENDING

LOAD-TIME03

LOAD-TIME03-EXIT

GET-TIME-SHEET

BACKUP-PERIOD-ENDING

LOAD-TIME04

LOAD-TIME04-EXIT

GET-TIME-SHEET

BACKUP-PERIOD-ENDING

LOAD-TIME05

LOAD-TIME05-EXIT

READ

GET-TIME-SHEET

GET-TIME-SHEET-EXIT

SET-UP-WK-DATES

SAVE-TIME01

SET-UP-WK-DATES

SAVE-TIME02

SET-UP-WK-DATES

SAVE-TIME03

SET-UP-WK-DATES

SAVE-TIME04

SET-UP-WK-DATES

SAVE-TIME05

SAVE-TIMESHEET-PAGE

SAVE-TIMESHEET-PAGE-EXIT

BIF

BIF

PUT-TIMESHEET

BACKUP-PERIOD-ENDING

SAVE-TIME01

SAVE-TIME01-EXIT

BIF

BIF

PUT-TIMESHEET

BACKUP-PERIOD-ENDING

SAVE-TIME02

SAVE-TIME02-EXIT

BIF

BIF

PUT-TIMESHEET

BACKUP-PERIOD-ENDING

SAVE-TIME03

SAVE-TIME03-EXIT

BIF

BIF

PUT-TIMESHEET

BACKUP-PERIOD-ENDING

SAVE-TIME04

SAVE-TIME04-EXIT

BIF

BIF

PUT-TIMESHEET

BACKUP-PERIOD-ENDING

SAVE-TIME05

SAVE-TIME05-EXIT

DELETE

WRITE

PUT-TIMESHEET

PUT-TIMESHEET-EXIT

SET-UP-WK-DATES

LOAD-DOW-LINE

INLINE-08

GET-PERIOD-ENDING-DSPLY

GET-PERIOD-ENDING-DSPLY-EXIT

BACKUP-PERIOD-ENDING

LOAD-DOW-LINE

INLINE-08

INLINE-08-EXIT

SET-UP-WK-DATES

ADVANCE-PERIOD-ENDING

PAGE-FOREWARD

PAGE-FOREWARD-EXIT

SET-UP-WK-DATES

BACKUP-PERIOD-ENDING

PAGE-BACKWARD

PAGE-BACKWARD-EXIT

LOAD-DOW-LINE

LOAD-DOW-LINE-EXIT

CALC-DAY-OF-WEEK

SET-UP-WK-DATES

SET-UP-WK-DATES-EXIT

CHECK-FOR-LEAP-YEAR

ADVANCE-PERIOD-ENDING

ADVANCE-PERIOD-ENDING-EXIT

CHECK-FOR-LEAP-YEAR

BACKUP-PERIOD-ENDING

BACKUP-PERIOD-ENDING-EXIT

MCLPP41

RECEIVE MAP 'PM45'

SEND-MCLPP01-MAP

CICS-RETURN

SECURITY-CHECK

BIF

BIF

BIF

READ

STARTBR

READNEXT

WRITEQ TS

INLINE-10

ENDBR

GET-TIMESHEETS

READQ TS

READ

REWRITE

DELETE

WRITE

INLINE-09

POST-TIMESHEETS

PROJECT-TABLE-UPDATE

UPDATE-INSTALLATION-REC

POSTING-HANDLING

SEND-MCLPP45-MAP

SELECT-MCLPP45-PROCESSING

CICS-RETURN

BIF

BIF

BIF

POSTING-HANDLING

SEND-MCLPP45-MAP

SELECT-MCLPP45-PROCESSING

SELECT-MCLPP45-PROCESSING-EXIT

READ

GET-TIMESHEETS

POST-TIMESHEETS

PROJECT-TABLE-UPDATE

UPDATE-INSTALLATION-REC

POSTING-HANDLING

POSTING-HANDLING-EXIT

INLINE-09

POST-TIMESHEETS

POST-TIMESHEETS-EXIT

READQ TS

READ

REWRITE

DELETE

WRITE

INLINE-09

INLINE-09-EXIT

STARTBR

INLINE-10

ENDBR

GET-TIMESHEETS

GET-TIMESHEETS-EXIT

READNEXT

WRITEQ TS

INLINE-10

INLINE-10-EXIT

SEND MAP 'PM45'

SEND-MCLPP45-MAP

SEND-MCLPP45-MAP-EXIT

MCLPP45

RECEIVE MAP 'PM51'

GET-NEXT-PROJECTS

LOAD-MCLPP20-MAP

SEND-MCLPP20-MAP

CICS-RETURN

SECURITY-CHECK

SEND-MCLPP51-MAP

CALC-CURSOR-POSITION

READ

PROJECT-TABLE-UPDATE

REWRITE

TASK-SCHEDULING

DISPLAY-GANTT

CALC-CURSOR-POSITION

SELECT-TASK

DISPLAY-GANTT

DISPLAY-GANTT

SELECT-MCLPP51-PROCESSING

CICS-RETURN

SEND-MCLPP51-MAP

TASK-SCHEDULING

DISPLAY-GANTT

SELECT-TASK

DISPLAY-GANTT

DISPLAY-GANTT

SELECT-MCLPP51-PROCESSING

SELECT-MCLPP51-PROCESSING-EXIT

GET-PROJECT-BY-ALPHA

SET-UP-GANTT-DISPLAY

READ-PROGTASK-RECORD

GET-RESOURCE-BY-NUMBER

SEND-MCLPP51-MAP

DISPLAY-GANTT

DISPLAY-GANTT-EXIT

CALC-CURSOR-POSITION

READ

PROJECT-TABLE-UPDATE

REWRITE

TASK-SCHEDULING

TASK-SCHEDULING-EXIT

CALC-CURSOR-POSITION

SELECT-TASK

SELECT-TASK-EXIT

LOAD-MCLPP51-MAP

SEND MAP 'PM51'

SEND-MCLPP51-MAP

SEND-MCLPP51-MAP-EXIT

LOAD-MCLPP51-MAP

LOAD-MCLPP51-MAP-EXIT

INLINE-11

READ

GET-LAST-GANTT-PAGE

STARTBR

BROWSE-GANTT-FWD

ENDBR

STARTBR

BROWSE-GANTT-FWD

ENDBR

STARTBR

BROWSE-GANTT-FWD

ENDBR

SET-UP-GANTT-DISPLAY

SET-UP-GANTT-DISPLAY-EXIT

INLINE-11

INLINE-11-EXIT

READNEXT

GET-RESOURCE-BY-NUMBER

SET-UP-GANTT-DISPLAY-LINE

BROWSE-GANTT-FWD

BROWSE-GANTT-FWD-EXIT

6020-BACKUP-DATE

STARTBR

1520-BACKUP-GANTT-RECS

ENDBR

GET-LAST-GANTT-PAGE

GET-LAST-GANTT-PAGE-EXIT

READPREV

1520-BACKUP-GANTT-RECS

1520-EXIT

STARTBR

READNEXT

ENDBR

CHECK-FOR-EIBRCODE-ERRORS

READ-PROGTASK-RECORD

READ-PROGTASK-RECORD-EXIT

6110-CHECK-FOR-LEAP-YEAR

6200-CALC-DAY-OF-WEEK

6010-ADVANCE-DATE

6010-ADVANCE-DATE

SET-UP-GANTT-DISPLAY-LINE

SET-UP-GANTT-DISPLAY-LINE-EXIT

6115-WORK-DAY-CHECK

6110-CHECK-FOR-LEAP-YEAR

6010-ADVANCE-DATE

6010-EXIT

6110-CHECK-FOR-LEAP-YEAR

6020-BACKUP-DATE

6020-EXIT

SET-UP-LEAP-CALENDAR

SET-UP-CALENDAR

6110-CHECK-FOR-LEAP-YEAR

6110-EXIT

6120-VACATION-CHECK

6125-HOLIDAY-CHECK

6115-WORK-DAY-CHECK

6115-EXIT

6120-VACATION-CHECK

6120-EXIT

6125-HOLIDAY-CHECK

6125-EXIT

6200-CALC-DAY-OF-WEEK

6200-EXIT

MCLPP51

RECEIVE MAP 'PM90'

SEND-MCLPP01-MAP

CICS-RETURN

SECURITY-CHECK

CALC-CURSOR-POSITION

INLINE-12

INITIALIZE-ACCESS-TABLE

LOAD-MCLPP91-MAP

SET-UP-USER-ADD

LOAD-MCLPP91-MAP-HEADER

SEND MAP 'PM91'

REFRESH-MCLPP91-MAP

EDIT-USER

STARTBR

READNEXT

GET-WK-MAX-USER-SERIAL

ENDBR

GET-NEW-USER-SERIAL-NBR

INITIALIZE-ACCESS-TABLE

LOAD-USER-RECORD

LOAD-MCLPP91-MAP

WRITE

CHECK-FOR-EIBRCODE-ERRORS

ADD-USER-RECORD

EXECUTE-USER-ADD

LOAD-MCLPP91-MAP-HEADER

SEND MAP 'PM91'

SEND-MCLPP91-MAP

ADD-USER-HANDLING

READ

CHECK-FOR-EIBRCODE-ERRORS

READ-USER-RECORD

LOAD-MCLPP91-MAP

SEND-MCLPP91-MAP

DISPLAY-USER

SSUSER-MAINTENANCE

DISPLAY-USERS

SELECT-MCLPP90-PROCESSING

CICS-RETURN

SSUSER-MAINTENANCE

DISPLAY-USERS

SELECT-MCLPP90-PROCESSING

SELECT-MCLPP90-PROCESSING-EXIT

GET-USERS

LOAD-MCLPP90-MAP

SEND-MCLPP90-MAP

DISPLAY-USERS

DISPLAY-USERS-EXIT

CALC-CURSOR-POSITION

ADD-USER-HANDLING

DISPLAY-USER

SSUSER-MAINTENANCE

SSUSER-MAINTENANCE-EXIT

BACKUP-USERS

GET-NEXT-USERS

GET-NEXT-USERS

GET-USERS

GET-USERS-EXIT

STARTBR

BROWSE-USERS-FWD

ENDBR

GET-NEXT-USERS

GET-NEXT-USERS-EXIT

READNEXT

BROWSE-USERS-FWD

BROWSE-USERS-FWD-EXIT

STARTBR

BROWSE-USERS-BKWD

ENDBR

BACKUP-USERS

BACKUP-USERS-EXIT

READPREV

BROWSE-USERS-BKWD

BROWSE-USERS-BKWD-EXIT

SEND MAP 'PM90'

SEND-MCLPP90-MAP

SEND-MCLPP90-MAP-EXIT

LOAD-USER-TABLE

LOAD-MCLPP90-MAP

LOAD-MCLPP90-MAP-EXIT

LOAD-USER-TABLE

LOAD-USER-TABLE-EXIT

MCLPP90-EXIT

MCLPP90

RECEIVE MAP 'PM91'

DISPLAY-USERS

CICS-RETURN

SECURITY-CHECK

SEND-MCLPP91-MAP

DISPLAY-USER

ADD-USER-HANDLING

EDIT-USER

READ

CHECK-FOR-EIBRCODE-ERRORS

READ-USER-REC-FOR-UPDATE

PUT-ARCHIVE-RECORD

DELETE

CHECK-FOR-EIBRCODE-ERRORS

DELETE-USER-RECORD

LOAD-USER-RECORD

ADD-USER-RECORD

LOAD-MCLPP91-MAP

EXECUTE-USER-CHANGE

READ-USER-RECORD

LOAD-MCLPP91-MAP

SET-UP-USER-CHANGE

SEND-MCLPP91-MAP

CHANGE-USER-HANDLING

READ-USER-RECORD

SET-UP-USER-DELETE

LOAD-MCLPP91-MAP

SEND-MCLPP91-MAP

DELETE

CHECK-FOR-EIBRCODE-ERRORS

DELETE-USER-WITH-KEY

DISPLAY-USERS

EXECUTE-USER-DELETE

DELETE-USER-HANDLING

DISPLAY-USER

DISPLAY-USER

DISPLAY-USER

SELECT-MCLPP91-PROCESSING

CICS-RETURN

SEND-MCLPP91-MAP

DISPLAY-USER

ADD-USER-HANDLING

CHANGE-USER-HANDLING

DELETE-USER-HANDLING

DISPLAY-USER

DISPLAY-USER

DISPLAY-USER

SELECT-MCLPP91-PROCESSING

SELECT-MCLPP91-PROCESSING-EXIT

READ-USER-RECORD

LOAD-MCLPP91-MAP

SEND-MCLPP91-MAP

DISPLAY-USER

DISPLAY-USER-EXIT

SET-UP-USER-ADD

REFRESH-MCLPP91-MAP

EXECUTE-USER-ADD

SEND-MCLPP91-MAP

ADD-USER-HANDLING

ADD-USER-HANDLING-EXIT

INITIALIZE-ACCESS-TABLE

LOAD-MCLPP91-MAP

SET-UP-USER-ADD

SET-UP-USER-ADD-EXIT

EDIT-USER

GET-NEW-USER-SERIAL-NBR

INITIALIZE-ACCESS-TABLE

LOAD-USER-RECORD

LOAD-MCLPP91-MAP

ADD-USER-RECORD

EXECUTE-USER-ADD

EXECUTE-USER-ADD-EXIT

EXECUTE-USER-CHANGE

SET-UP-USER-CHANGE

SEND-MCLPP91-MAP

CHANGE-USER-HANDLING

CHANGE-USER-HANDLING-EXIT

READ-USER-RECORD

LOAD-MCLPP91-MAP

SET-UP-USER-CHANGE

SET-UP-USER-CHANGE-EXIT

EDIT-USER

READ-USER-REC-FOR-UPDATE

DELETE-USER-RECORD

LOAD-USER-RECORD

ADD-USER-RECORD

LOAD-MCLPP91-MAP

EXECUTE-USER-CHANGE

EXECUTE-USER-CHANGE-EXIT

SET-UP-USER-DELETE

LOAD-MCLPP91-MAP

SEND-MCLPP91-MAP

EXECUTE-USER-DELETE

DELETE-USER-HANDLING

DELETE-USER-HANDLING-EXIT

READ-USER-RECORD

SET-UP-USER-DELETE

SET-UP-USER-DELETE-EXIT

DELETE-USER-WITH-KEY

DISPLAY-USERS

EXECUTE-USER-DELETE

EXECUTE-USER-DELETE-EXIT

LOAD-MCLPP91-MAP-HEADER

SEND MAP 'PM91'

SEND-MCLPP91-MAP

SEND-MCLPP91-MAP-EXIT

LOAD-MCLPP91-MAP-HEADER

SEND MAP 'PM91'

REFRESH-MCLPP91-MAP

REFRESH-MCLPP91-MAP-EXIT

LOAD-MCLPP91-MAP-HEADER

LOAD-MCLPP91-MAP-HEADER-EXIT

LOAD-MCLPP91-MAP

LOAD-MCLPP91-MAP-EXIT

EDIT-USER

MCLPP91

MAIN LINE

