Setting Sort Code (GETSCODE)
The GETSCODE program is responsible for setting a sort code in the DFHCOMMAREA and then returning control to CICS. This is achieved by initiating the PREMIERE section, moving the literal sort code to the SORTCODE field, and executing the EXEC CICS RETURN command.
The flow starts by initiating the PREMIERE section, which marks the beginning of the logic. Then, the literal sort code is moved to the SORTCODE field of the DFHCOMMAREA. Finally, the EXEC CICS RETURN command is executed to return control back to CICS, indicating that the task is complete.
Lets' zoom into the flow:
Start PREMIERE Section
First, the PREMIERE
PREMIERE SECTION.
A010.
Set Sort Code
Next, the literal sort code is moved to the SORTCODE
DFHCOMMAREA
MOVE LITERAL-SORTCODE
TO SORTCODE OF DFHCOMMAREA.
Return to CICS
Then, the EXEC CICS RETURN
EXEC CICS RETURN
END-EXEC.
This is an auto-generated document by Swimm 🌊 and has not yet been verified by a human