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.
How to pass a value along with CICS transaction ID ??
-
- Posts: 3
- Joined: Tue Jul 11, 2017 11:15 pm
- Skillset: Cobol , cics, db2 , vsam , rexx
- Referer: Through google.com
-
- Global moderator
- Posts: 3720
- Joined: Sat Dec 19, 2009 8:32 pm
- Skillset: Systems programming, SAS, COBOL, CICS, JCL, SMS, VSAM, etc.
- Referer: other forum
- Location: Dubuque, Iowa, USA
Re: How to pass a value along with CICS transaction ID ??
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) ?
-
- Posts: 3
- Joined: Tue Jul 11, 2017 11:15 pm
- Skillset: Cobol , cics, db2 , vsam , rexx
- Referer: Through google.com
Re: How to pass a value along with CICS transaction ID ??
Hi Robert
Sure I will try. In this case the EIBCALEN will be zero?
Sure I will try. In this case the EIBCALEN will be zero?
-
- Global moderator
- Posts: 3720
- Joined: Sat Dec 19, 2009 8:32 pm
- Skillset: Systems programming, SAS, COBOL, CICS, JCL, SMS, VSAM, etc.
- Referer: other forum
- Location: Dubuque, Iowa, USA
Re: How to pass a value along with CICS transaction ID ??
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.
-
- Posts: 41
- Joined: Fri Oct 01, 2010 9:43 pm
- Skillset: Assembler, COBOL, CICS, DB2, Pl/I, JCL and tableBASE
- Referer: google search
Re: How to pass a value along with CICS transaction ID ??
Totally irrelevant reply removed.
-
- Similar Topics
- Replies
- Views
- Last post
-
- 0
- 1200
-
by dran17
View the latest post
Thu Nov 03, 2022 12:49 am
-
- 4
- 5616
-
by NicC
View the latest post
Mon Oct 19, 2020 1:17 am
-
- 4
- 2881
-
by Pedro
View the latest post
Sat May 15, 2021 3:39 am
-
-
Pass PARM from JCL to Easytrieve SQL WHERE clause
by MemoPerez » Tue Oct 24, 2023 8:32 am » in CA-Easytrieve - 2
- 3112
-
by MemoPerez
View the latest post
Fri Oct 27, 2023 1:13 am
-
-
- 1
- 2042
-
by prino
View the latest post
Mon Sep 05, 2022 2:12 am