IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Query on nested LINK


IBM Mainframe Forums -> CICS
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
dejunzhu

Active User


Joined: 08 May 2008
Posts: 390
Location: China

PostPosted: Tue Apr 09, 2013 5:00 pm
Reply with quote

I have 2 programs, let's say, pgma, pgmb.
pgma LINK pgmb,
pgmb LINK pgma.

as pgma is linked by pgmb conditionally, there will no chance of dead loop.

my quesiton is: does pgma need some special parameter for compiling?
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Tue Apr 09, 2013 5:10 pm
Reply with quote

Not necessarily true. PGMA and PGMB would both have to know not to do it, potentially. Depends on what you've coded.
Back to top
View user's profile Send private message
dejunzhu

Active User


Joined: 08 May 2008
Posts: 390
Location: China

PostPosted: Wed Apr 10, 2013 9:15 am
Reply with quote

It's not about necessity.
the design is inevitable, so, I'm trying to make sure there is no potential danger of doing this, such as, special compile parameter for the nested linked program.
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Wed Apr 10, 2013 11:51 am
Reply with quote

dejunzhu wrote:
It's not about necessity.
the design is inevitable, so, I'm trying to make sure there is no potential danger of doing this, such as, special compile parameter for the nested linked program.


OK, so there can be something of the "language barrier"... (up to "inevitable" it sounds like it is the Criminal Mastermind talking to the Captured and Soon to be Deceased (CM Thinks) James Bond), but what if there is no "special compile parameter" given that we have no clue what would make it "special" for you.

Can you show your "ordinary" compile parameters, please?
Back to top
View user's profile Send private message
dejunzhu

Active User


Joined: 08 May 2008
Posts: 390
Location: China

PostPosted: Wed Apr 10, 2013 4:43 pm
Reply with quote

compile parameters used by common programs are shown as below:
Code:
PP 5655-S71 IBM Enterprise COBOL for z/OS  4.2.0                         Date 04
Invocation parameters:                                                         
 SSRANGE,LIB,RENT,MAP,LIST,TEST(NONE,SYM,SEP),NOXREF,DBCS,NOSEQ,TRUNC(OPT)     
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Wed Apr 10, 2013 4:51 pm
Reply with quote

Sorry, need to see the values of all the ones which affect object generation (you can exclude OUTDD), as your installation defaults need not be those that IBM supplies.
Back to top
View user's profile Send private message
sentoganesh

New User


Joined: 08 Aug 2013
Posts: 3
Location: India

PostPosted: Fri Aug 23, 2013 8:39 pm
Reply with quote

I dont think nested LINKs will need any specific compile options...each LINK creates new run unit meaning new (fresh) working storage...so you will not know if it is a first / second invocation by looking at working storage values...
Back to top
View user's profile Send private message
colin777

New User


Joined: 06 Jun 2013
Posts: 19
Location: Singapore

PostPosted: Wed Aug 28, 2013 3:16 pm
Reply with quote

Hi,

If you are in any doubt, you can issue an EXEC CICS ASSIGN INVOKINGPROG(data-area), in the Linked to program, to ascertain which program issued the LINK or XCTL.

If you get back 8 blanks in the data-area, then you are in the top program.

HTH

Colin777
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CICS

 


Similar Topics
Topic Forum Replies
No new posts RC query -Time column CA Products 3
No new posts Dynamically pass table name to a sele... DB2 2
No new posts Query on edit primary command CLIST & REXX 5
No new posts Query on edit primary command CLIST & REXX 1
No new posts Issue with EXEC CICS QUERY SECURITY c... CICS 6
Search our Forums:

Back to Top