Portal | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Task and Tran ID for a CICS program

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
View previous topic :: :: View next topic  
Author Message
tecnokrat
Warnings : 1

Active User


Joined: 22 May 2009
Posts: 160
Location: Bangalore

PostPosted: Thu Jan 27, 2011 3:10 pm    Post subject: Task and Tran ID for a CICS program
Reply with quote

Hi,
I have a Program B which is being called from the other programs.

At first instance when called from Program-A it gets the EIBTRNID and EIBTASKN as the Program-B is LINKed from Program-A.

But the Subsequent calls from other Programs like Program-C the program-B is called in the CALL mode and hence no values being passed in EIBTASKN and EIBTRNID.

Is there any way that i can get the EIBTRANID and EIBTASKN from the Program-B.

Can the CEE3INF query enclave information be called to get the same.
Back to top
View user's profile Send private message

Garry Carroll

Senior Member


Joined: 08 May 2006
Posts: 1088
Location: Dublin, Ireland

PostPosted: Thu Jan 27, 2011 4:13 pm    Post subject:
Reply with quote

EXEC CICS ADDRESS EIB in order to get this info in Prog-B.

Garry.
Back to top
View user's profile Send private message
tecnokrat
Warnings : 1

Active User


Joined: 22 May 2009
Posts: 160
Location: Bangalore

PostPosted: Thu Jan 27, 2011 6:11 pm    Post subject:
Reply with quote

Thanks Garry It worked fine. icon_smile.gif
Back to top
View user's profile Send private message
Garry Carroll

Senior Member


Joined: 08 May 2006
Posts: 1088
Location: Dublin, Ireland

PostPosted: Thu Jan 27, 2011 7:25 pm    Post subject:
Reply with quote

Glad to be of help.

Garry
Back to top
View user's profile Send private message
Mr Swann

New User


Joined: 09 Jul 2020
Posts: 6
Location: France

PostPosted: Thu Jul 09, 2020 4:03 pm    Post subject:
Reply with quote

Garry Carroll wrote:
EXEC CICS ADDRESS EIB in order to get this info in Prog-B.

Garry.


Very helpfull Gary !

i am in a CICS program but called by a non CICS program


DFHEIBLK was lost ...

and now born again !!!
Back to top
View user's profile Send private message
Mr Swann

New User


Joined: 09 Jul 2020
Posts: 6
Location: France

PostPosted: Thu Jul 09, 2020 5:21 pm    Post subject:
Reply with quote

And - If I may -

how to use it :
Code:

WORKING STORAGE SECTION.

      01 PTRN-EIB   POINTER.


PROCEDURE DIVISION USING XXXXX.

    IF EIBTRNID =<  SPACES
       
        EXEC  CICS
           ADDRESS EIB ( PTRN-EIB  )
       END-EXEC

      SET ADDRESS OF DFHEIBLK TO PTRN-EIB



It works
Back to top
View user's profile Send private message
Garry Carroll

Senior Member


Joined: 08 May 2006
Posts: 1088
Location: Dublin, Ireland

PostPosted: Thu Jul 09, 2020 8:59 pm    Post subject:
Reply with quote

A little over 9 years on ! ... and still here..

Garry
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Call Natural program with rexx shahaf CLIST & REXX 2 Tue Sep 08, 2020 11:22 am
No new posts parmeter existence bit for URIMAP in ... ashokkumar.selvaraj CICS 2 Mon Sep 07, 2020 2:14 pm
No new posts How to use CICS command CEBR on sdsf ... wang_f_y1 CICS 1 Fri Aug 28, 2020 10:35 pm
No new posts CICS file processing using applicatio... Satish_gsv CICS 3 Sat Jul 11, 2020 4:18 am
No new posts CICS Web services Assistant - Handlin... Kadhir A CICS 3 Thu Jun 25, 2020 6:33 pm

Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us