I have a DB2-CICS cobol program which has a below code while calling a subprogram
MOVE 'S60PBSC' TO WS-PROGRAM-NAME
CALL WS-PROGRAM-NAME USING
EXEC TP
DFHEIBLK
DFHCOMMAREA
END-EXEC
PBS1REC
END-CALL
CALL WS-PROGRAM-NAME USING
EXEC TP
DFHEIBLK
DFHCOMMAREA
END-EXEC
PBS1REC
END-CALL
Can someone tell me what is "EXEC TP " does here and why "EXEC CICS" is not used ? I have middleware in my system . Is this linked to it ?