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

How to pass the PARM value to my target program


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

New User


Joined: 28 Oct 2021
Posts: 6
Location: India

PostPosted: Mon Aug 21, 2023 9:42 pm
Reply with quote

Hello,

I have a vendor program which generally runs as a batch program with EXEC PGM=xxxx,PARM=(xxx). For some specific requirement, I am calling this program through a COBOL program after creating a dynamic TSO environment through IKJTSOEV and allocate all the required files by using TSO ALLOC and pass the control through CALL *(xxxxx). This runs fine. But there are some control paameters which is sent through the PARM. I am not able to figure out how to pass this parms to the target program. Could you please share any direction or advice which I can explore further? Thanks for your guidance in advance.

Regards,
AP
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2453
Location: Silicon Valley

PostPosted: Mon Aug 21, 2023 10:48 pm
Reply with quote

re: generally runs as a batch program with EXEC PGM=xxxx,PARM=(yyy)

I think you use the TSO CALL command:
Code:
Addres TSO "CALL *(xxxx)  yyy"
Back to top
View user's profile Send private message
@shim

New User


Joined: 28 Oct 2021
Posts: 6
Location: India

PostPosted: Tue Aug 22, 2023 9:18 am
Reply with quote

Pedro wrote:
re: generally runs as a batch program with EXEC PGM=xxxx,PARM=(yyy)

I think you use the TSO CALL command:
Code:
Addres TSO "CALL *(xxxx)  yyy"



Thank you Pedro. I will test this as per your suggestion.

Regards,
AP
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2453
Location: Silicon Valley

PostPosted: Tue Aug 22, 2023 11:03 am
Reply with quote

I have not done it for some time, if it does not work try also using single quotes:
Code:
Address TSO "CALL *(xxxx) 'yyy'"
Back to top
View user's profile Send private message
@shim

New User


Joined: 28 Oct 2021
Posts: 6
Location: India

PostPosted: Thu Aug 24, 2023 3:04 pm
Reply with quote

Pedro wrote:
I have not done it for some time, if it does not work try also using single quotes:
Code:
Address TSO "CALL *(xxxx) 'yyy'"


Just to update and thanks Pedro it works fine with single quotes.

Regards,
AP
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 Need to specify PARM='POSIX(ON) Java & MQSeries 3
No new posts DB2 Event passed to the Application P... DB2 1
No new posts Dynamically pass table name to a sele... DB2 2
No new posts REXX code to expand copybook in a cob... CLIST & REXX 2
No new posts EZT program to build a flat file with... All Other Mainframe Topics 9
Search our Forums:

Back to Top