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
 

 

[Solved]Passing values from JCL.

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
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    Post subject: Passing values from JCL.
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    Post subject:
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    Post subject:
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    Post subject:
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    IBMMAINFRAMES.com Support Forums -> COBOL Programming 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 setting new limit Key values for inde... srilata83 DB2 1 Fri Feb 10, 2017 9:24 pm
No new posts Remove junk values in a file and rite... KP1125 DFSORT/ICETOOL 2 Wed Jan 25, 2017 9:58 pm


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