The transaction initiated should be in a position to retrieve information pertaining to which transaction has initiated it and from which terminal. (Code the required CICS commands)

EXEC CICS START

INTERVAL(hhmmss)/TIME(hhmmss)

TRANSID('TRAN')

TERMID('TRM1)

FROM(data-area)

LENGTH(data-value)

RTRANSID(EIBTRNID)

RTERMID(EIBTRMID)

END-EXEC

EXEC CICS RETRIEVE

INTO(data-area)

LENGTH(data-value)

RTRANSID(data-name)

RTERMID(data-name)

END-EXEC