IBM Mainframe Forum

I have a query in CICS,

Can someone please explain how to pass a value along with CICS transaction ID from terminal to a COBOL program when we are invoking the Tran id for the first time?

E.g : TRN1 123456578915

This TRN1 will invoke a program from PCT, inside that program I would like to receive the value '123456578915' and continue the process based on this value.

Have you tried clearing the screen, typing TRN1 123456578915 and then having the CICS program TRN1 points to issue an EXEC CICS RECEIVE INTO (or SET) ?

Hi Robert

Sure I will try. In this case the EIBCALEN will be zero?

Yes, it will be zero since this is the initial transaction invocation so you could not have passed a DFHCOMMAREA to the program. Note that RECEIVE does not involve any maps -- it reads the data from the screen and passes it to the program.

Totally irrelevant reply removed.