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
 
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: 8165
Location: East Dubuque, Illinois, USA

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 IEW2456E error when link-editing a C ... Senthilraj JCL & VSAM 0 Fri Oct 13, 2017 3:12 pm
No new posts Extend the decimal values in DIVISION Balaryan DFSORT/ICETOOL 3 Thu Oct 05, 2017 4:05 pm
No new posts Assembler Macro Copybook converted to... Ziquilix PL/I & Assembler 4 Tue Sep 26, 2017 3:07 am
No new posts Working with hex values in Filemanage... Emile Straker IBM Tools 0 Tue Sep 12, 2017 1:42 am
No new posts DB2 NULL Values display V S Amarendra Reddy DB2 3 Thu Sep 07, 2017 6:59 pm

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