
Executing Standard Processing Subroutines Processing Requirements for TSIDREL, TSIDLOC, and TSIDUNL
Chapter 10. Job Scheduling 10-9
Executing Standard Processing Subroutines
TSIDREL, TSIDLOC, TSIDCHK, and TSIDUNL are callable subroutines for non-CICS
programs. Standard linkage conventions apply to all four subroutines.
Processing Requirements for TSIDREL, TSIDLOC, and TSIDUNL
Step Action
1 Perform the “event” task.
2
Move the event name to the EVENT-NAME field. See "Posted Events," for
details about event name limitations.
3 Issue a call to the appropriate subroutine.
This task calls TSIDUNL. It deletes the PAY event after PAYROLL checks have been
processed.
...
WORKING-STORAGE SECTION.
01 EVENT-NAME PIC X(8) VALUE SPACES.
PROCEDURE DIVISION.
PERFORM PAYROLL-CHECKS.
MOVE 'PAY' TO EVENT-NAME.
CALL 'TSIDUNL' USING EVENT-NAME.
...
Procedure
Example
Komentarze do niniejszej Instrukcji