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

Usage of PARM in PL/1 - IMS DB program


IBM Mainframe Forums -> PL/I & Assembler
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
donateeye
Warnings : 2

New User


Joined: 01 Jun 2007
Posts: 62
Location: chennai

PostPosted: Thu May 13, 2010 4:42 pm
Reply with quote

If I am using a PL/1 - IMS DB program, and if my PL/1 program strictly needs one value through the PARM, which it will use it somewhere in the program.

Now, Please let me know where do I enter the PARM parameters for DFSRRC00?
Back to top
View user's profile Send private message
donateeye
Warnings : 2

New User


Joined: 01 Jun 2007
Posts: 62
Location: chennai

PostPosted: Fri May 14, 2010 2:27 pm
Reply with quote

Heloo... Could anyone help me on this... please...
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2481
Location: Netherlands, Amstelveen

PostPosted: Fri May 14, 2010 3:02 pm
Reply with quote

DFSRRC00 is a stand-alone program. Why would one call that from
a PL/1 program. Or do you have a PL/1 program (DLI,BMP) to be
executed by DFSRRC00?

So you could use something like :

//STEP EXEC PGM=DFSRRC00,PARM='DLI,progname,psb-name'
Back to top
View user's profile Send private message
donateeye
Warnings : 2

New User


Joined: 01 Jun 2007
Posts: 62
Location: chennai

PostPosted: Fri May 14, 2010 5:42 pm
Reply with quote

Yes, I am running a PL/1 - IMS DB program, which includes DL/I calls. Your EXEC statement is perfect when I am executing my PL/1-IMS DB program.
But my question is that, in this case, if I also have the need to pass some values through PARM for my program (just any value, where we use get that in the PL/1 procedure statement and then declare it as char varying), In this case, how would I manage to code my PARM parameter in the JCL?
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Fri May 14, 2010 8:50 pm
Reply with quote

Hello,

Suggest you consider using SYSIN for the data to be provided to the program. As this is new, it should not cause any problem to change the source of the value.
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2481
Location: Netherlands, Amstelveen

PostPosted: Fri May 14, 2010 10:30 pm
Reply with quote

Yes, i agree with Mr. Scherrer.

I (we, my IT pals) used something like :

Code:

//INPIS200 DD  *                                                        00470001
/DIS TRAN ALL.C03                                                       00480001
ID(T02,004,003)                                                         00490013
TRAN(T02,008,008)                                                       00500001
CLASS(T02,017,003)                                                      00510004
PSB(T07,021,008)                                                        00520001
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2481
Location: Netherlands, Amstelveen

PostPosted: Sat May 15, 2010 12:59 pm
Reply with quote

Maybe the following is usefull for you :

Code:

//G      EXEC PGM=DFSRRC00,REGION=&RGN,
//            PARM=(DLI,&MBR,&PSB,&BUF,
//            &SPIE&TEST&EXCPVR&RST,&PRLD,
//            &SRCH,&CKPTID,&MON,&LOGA,&FMTO,
//            &IMSID,&SWAP,&DBRC,&IRLM,&IRLMNM,
//            &BKO,&IOB,&SSM,'&APARM',
//            &LOCKMAX,&GSGNAME,&TMINAME,
//            &RRS,&IMSPLEX,&RGSUF,
//            '&PARM1','&PARM2')


APARM=
Specifies the 1 to 32-character parameter that is passed to the application program as part of the information returned in the INQY call with the ENVIRON subfunction. The parameter must be enclosed in single-quotes (') if special characters are used. Embedded commas (,) are not allowed.
Back to top
View user's profile Send private message
donateeye
Warnings : 2

New User


Joined: 01 Jun 2007
Posts: 62
Location: chennai

PostPosted: Mon May 17, 2010 10:20 am
Reply with quote

Thanks a lot
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 -> PL/I & Assembler

 


Similar Topics
Topic Forum Replies
No new posts Using API Gateway from CICS program CICS 0
No new posts JCL EXEC PARM data in C Java & MQSeries 2
No new posts Need to specify PARM='POSIX(ON) Java & MQSeries 4
No new posts DB2 Event passed to the Application P... DB2 1
No new posts How to pass the PARM value to my targ... COBOL Programming 8
Search our Forums:

Back to Top