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 pass & retrieve values from cobol to clist vice v

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
View previous topic :: :: View next topic  
Author Message
veena_nagesh2002
Warnings : 1

Active User


Joined: 07 May 2005
Posts: 110
Location: hyderabad

PostPosted: Tue Nov 25, 2008 1:16 pm    Post subject: How to pass & retrieve values from cobol to clist vice v
Reply with quote

Code:
SET &JTM2  = '&STR(&STR(&JYER)&STR(&JMON)&STR(&JDAT))'  Ex : VALUE IS '20081201'
SET &WK    = 0
SET &LD    = 0


Have created cobol pgm and want to use in clist by using call statement like below

Code:
CALL 'SSR.CHGMAN.XXXX.#004522.LOD(FILSTDY(JTM2 WK LD))'


Through the clist i am passing date(JTM2 to cobol load module pgm) and have to receive the weekday and last day of the month. so could you please let me know how to pass single input and receive two outputs in clist

ERROR :
IKJ56709I INVALID DATA SET NAME, 'SSR.CHGMAN.XXXX.#004522.LOD(FILSTDY(JTM2
IKJ56712I INVALID KEYWORD, WK
IKJ56712I INVALID KEYWORD, LD
IKJ56712I INVALID KEYWORD, )
IKJ56712I INVALID KEYWORD, )'
***
Back to top
View user's profile Send private message

Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7989
Location: Bellevue, IA

PostPosted: Tue Nov 25, 2008 6:09 pm    Post subject:
Reply with quote

I'm not an expert, but you have to pass parameters separately from the call:
Code:
CALL 'DATA.SET.NAME' parameters
but I don't have the exact syntax -- use the manuals link at the top of the page to get that.
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Tue Nov 25, 2008 6:52 pm    Post subject:
Reply with quote

I think the simplest method is ISPF's VPUT & VGET.

Also, you might want to take a look at TSO's Variable Access Routine IKJCT441.

O.
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 -> CLIST & REXX All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Check Binary Values for symbols gandikk CA Products 3 Tue Mar 21, 2017 5:11 am
No new posts To display values of multiple rows in... vinu78 DB2 2 Thu Mar 09, 2017 1:20 pm
No new posts Replacing same string with different ... vickey_dw DFSORT/ICETOOL 6 Wed Feb 22, 2017 10:44 pm
No new posts SQL query not working in Cobol program. CuriousMainframer COBOL Programming 14 Wed Feb 22, 2017 5:56 pm
No new posts Execute TSO ACF commands from COBOL-I... supreethi.srid TSO/ISPF 0 Tue Feb 21, 2017 5:19 pm


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