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
 
Usage of PARM in PL/1 - IMS DB program

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler
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    Post subject: Usage of PARM in PL/1 - IMS DB program
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    Post subject:
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: 2442
Location: Netherlands, Amstelveen

PostPosted: Fri May 14, 2010 3:02 pm    Post subject:
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    Post subject:
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

Site Director


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

PostPosted: Fri May 14, 2010 8:50 pm    Post subject:
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: 2442
Location: Netherlands, Amstelveen

PostPosted: Fri May 14, 2010 10:30 pm    Post subject:
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: 2442
Location: Netherlands, Amstelveen

PostPosted: Sat May 15, 2010 12:59 pm    Post subject:
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    Post subject:
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    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How to write Rexx program to size and... sreejeshcs CLIST & REXX 14 Thu Oct 12, 2017 7:26 am
No new posts Accessing CICS tran with map from JCL... navdeepaggarwal CICS 5 Tue Oct 03, 2017 6:15 pm
No new posts Where is output from PARM ABEXIT (SNA... packerm CA Products 3 Thu Sep 28, 2017 4:06 pm
No new posts Writing a file using online program grvtomar PL/I & Assembler 3 Fri Jun 30, 2017 1:06 pm
No new posts pre-compiler for program in an HFS Pedro DB2 0 Fri Jun 23, 2017 11:13 pm

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