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

[Solved]Passing values from JCL.


IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
t1nt1n

New User


Joined: 08 Jul 2005
Posts: 31

PostPosted: Thu Aug 04, 2005 7:25 pm
Reply with quote

Hello

We generally pass values from JCL to COBOL program thru either PARM or SYSIN card. If we pass through PARM, we receive thru LINKAGE section. How do we receive DATA in a COBOL program if we send thru' SYSIN card.

Also, for COBOL-DB2 program, we send it thru PARMS("values") in the SYSTSIN card using PGM=IKJEFT01. In this case we can receive through Linkage section am i corect in saying this ?

Thanks in advance.

Cheers
T1nT1n
Back to top
View user's profile Send private message
notonly4u

New User


Joined: 26 Apr 2005
Posts: 87
Location: Hyderabad

PostPosted: Thu Aug 04, 2005 8:53 pm
Reply with quote

HI Tintin,

If you are passing through SYSIN, You have to receive in the Cobol Program through ACCEPT statements.

Regards
Tanden
Back to top
View user's profile Send private message
shobam

New User


Joined: 18 Jul 2005
Posts: 34
Location: CN

PostPosted: Fri Aug 05, 2005 10:48 am
Reply with quote

Quote:
PARMS("values") in the SYSTSIN card using PGM=IKJEFT01


Yes , we have to define a linkage section to receive the PARMS.
Back to top
View user's profile Send private message
t1nt1n

New User


Joined: 08 Jul 2005
Posts: 31

PostPosted: Fri Aug 05, 2005 1:46 pm
Reply with quote

Thanks Notonly4u & Shobam.
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 -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts INCLUDE OMIT COND for Multiple values... DFSORT/ICETOOL 5
No new posts Replace Multiple Field values to Othe... DFSORT/ICETOOL 12
No new posts Null values are considered in Total c... DFSORT/ICETOOL 6
No new posts Passing Parameters to Programs Invoke... PL/I & Assembler 5
No new posts Passing SYSPRINT to Invoked Program PL/I & Assembler 9
Search our Forums:

Back to Top