Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Query on nested LINK

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
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    Post subject: Query on nested LINK
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

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7314

PostPosted: Tue Apr 09, 2013 5:10 pm    Post subject: Reply to: Query on nested LINK
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    Post subject:
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

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7314

PostPosted: Wed Apr 10, 2013 11:51 am    Post subject:
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    Post subject:
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

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7314

PostPosted: Wed Apr 10, 2013 4:51 pm    Post subject: Reply to: Query on nested LINK
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    Post subject: Reply to: Query on nested LINK
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    Post subject:
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    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 LE Modules in Link Edit John Poulakos COBOL Programming 1 Sat Apr 28, 2018 12:14 am
No new posts How to force a select query to abend neo4u DB2 7 Mon Apr 23, 2018 1:36 pm
No new posts Defining SYSLIB to USS c++ (cxx) comp... Harold Barnes All Other Mainframe Topics 2 Sat Apr 07, 2018 5:06 am
No new posts Query to compare 2 values of 1 column... Poha Eater DB2 13 Fri Mar 09, 2018 10:45 am
No new posts How to replace the below query? pkmurali DB2 12 Tue Feb 27, 2018 9:51 pm

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