Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

how to use skeleton in calling and called program

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
Vkp321

New User


Joined: 05 Jan 2009
Posts: 35
Location: Pune

PostPosted: Mon Jul 26, 2010 6:18 pm    Post subject: how to use skeleton in calling and called program
Reply with quote

I have requirement to use skeleton in my calling program and called program as well.. it is working fine first time but second time member i am getting as blank.. here is the flow

Program A
"ISPEXEC LIBDEF ISPSLIB DATASET ID('ADCXSNS.JCL.AUTO.SKLTON.VAR3')"
"ISPEXEC LIBDEF ISPFILE DATASET ID('ADCXSNS.TEST.JCL')"

"ISPEXEC FTOPEN"
"ISPEXEC FTINCL "SKELETON""
"ISPEXEC FTINCL "SITEID""
"ISPEXEC FTCLOSE NAME("TJCL")"

call B

"ISPEXEC LIBDEF ISPSLIB"
EXIT 0


program B

"ISPEXEC FTOPEN"
"ISPEXEC FTINCL GDGBLD"
"ISPEXEC FTINCL EXECGDG"
"ISPEXEC FTCLOSE NAME(EXECGDG)"
ADDRESS TSO
"SUBMIT 'ADCXSNS.TEST.JCL(EXECGDG)'"

return

Maybe open and close has some error.. but could not able to resolve
Back to top
View user's profile Send private message

expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Mon Jul 26, 2010 6:27 pm    Post subject:
Reply with quote

I do not use LIBDEF for ISPFILE, just the standard ALLOCATE and FREE commands.

Have you tried that
Back to top
View user's profile Send private message
Vkp321

New User


Joined: 05 Jan 2009
Posts: 35
Location: Pune

PostPosted: Mon Jul 26, 2010 7:03 pm    Post subject:
Reply with quote

Thanks, it is working fine using ALOC. Can we use different ISPFILE pds for different program.
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2422
Location: Netherlands, Amstelveen

PostPosted: Mon Jul 26, 2010 7:03 pm    Post subject:
Reply with quote

What members do 'ADCXSNS.TEST.JCL' contain?
I only do see you execute a submit for the second created member.
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 -> TSO/ISPF All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Executing OO COBOL program invoking J... Virendra Shambharkar COBOL Programming 2 Tue Jan 10, 2017 6:37 pm
No new posts Need Suggestion on COBOL program vickey_dw COBOL Programming 5 Thu Jan 05, 2017 10:55 pm
This topic is locked: you cannot edit posts or make replies. Calling REXX code from ISPF panel sanchita dey TSO/ISPF 4 Mon Jan 02, 2017 5:13 pm
No new posts I can not compile my program PL1 V3.R... Miguel Fernandez PL/I & Assembler 13 Tue Dec 06, 2016 8:30 pm
No new posts How does a called pgm know if its cal... Graeme Westerman COBOL Programming 4 Tue Nov 29, 2016 9:25 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us