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
 

 

Continue PARM in SYSIN DD *

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DB2
View previous topic :: :: View next topic  
Author Message
vishalbshah

New User


Joined: 01 Dec 2006
Posts: 61
Location: Pune

PostPosted: Thu Apr 19, 2012 3:23 pm    Post subject: Continue PARM in SYSIN DD *
Reply with quote

Hi,

I need to pass 92 charactes from JCL PARM to COBOL as :

Code:

//SYSTSIN  DD *                                                         
  DSN SYSTEM(TB0A)                                                     
  RUN PROGRAM(CDGU67B1) PLAN(CUDUTGBB) PARM ('FATCA     ', -           
             'REQUESTOR ID   ',' ','                          ', -     
             '1111000011','1111000011')                                 
  END                                                                   


This is not working as expected

Could someone show how can we continue parameters beyond one line under SYSTIN?
Back to top
View user's profile Send private message

Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7228

PostPosted: Thu Apr 19, 2012 3:40 pm    Post subject: Reply to: Continue PARM in SYSIN DD *
Reply with quote

That's not a JCL PARM.

You haven't shown the result you get, nor shown the result you require.

Suggest you find the documentation of the DSN command processor and see if that tells you what you need to know, or where to look.

I seem to remember some previous discussion about PARM vs PARMS, but it seems to be documented as PARMS for the usage you show.
Back to top
View user's profile Send private message
vishalbshah

New User


Joined: 01 Dec 2006
Posts: 61
Location: Pune

PostPosted: Thu Apr 19, 2012 3:52 pm    Post subject:
Reply with quote

Hi Bill,

Yes that's DSN PARM as opposed to JCL PARM.

I passed in JCL as




Code:

//SYSTSIN DD *                                                         
  DSN SYSTEM(TB0A)                                                     
  RUN PROGRAM(CDGU67B1) PLAN(CUDUTGBB) PARM ('FATCA     REQUESTOR ID   
                         11110000111111000011)                         
/*                                                                     




I got in program as


Code:

1 01 LS-PARM-DATA                                             
  02 LS-PARM-LEN            +00022                           
  02 LS-TAX-CLASS-REGIME-CODE                                 
                           'FATCA     '                       
  02 LS-REQUESTOR-ID       'REQUESTOR ID...'                 
  02 LS-MSG-STATUS-CODE    '.'                               
  02 LS-INDICIA-SRCH-RQST-TS                                 
                           '..........................'       
  02 LS-START-CUST-NUM-X                                     
  03 LS-START-CUST-NUM      ..........                       
  02 LS-END-CUST-NUM-X                                       
  03 LS-END-CUST-NUM        ..........                       


seems DSN is not taking PARMS passed beyond one line

I want to continue it to next line
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Thu Apr 19, 2012 4:18 pm    Post subject:
Reply with quote

had he TS bothered to google,
he would have found a link to a 2010 post in this forum.

but we know that questions asked here are by people
who have no desire to work, only have someone else provide
the answer.

http://ibmmainframes.com/about46620.html
Back to top
View user's profile Send private message
vishalbshah

New User


Joined: 01 Dec 2006
Posts: 61
Location: Pune

PostPosted: Thu Apr 19, 2012 4:22 pm    Post subject:
Reply with quote

Hello sir,

Thanks for the reply.

I was testing of various ways out,

and you would be surpised to hear that i could get the solution before your last post ,

Posting on mainframe was "one of the things" i was doing to solve the problem.
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7228

PostPosted: Thu Apr 19, 2012 5:17 pm    Post subject: Reply to: Continue PARM in SYSIN DD *
Reply with quote

vishalbshah,

If you are doing other things to deal with your problem, how are we to know? Unless you tell us, you just look like a "tell me the answer" person, or a "[c]ould someone show how" person. If you were to have told us where you were looking, what you had tried, etc, you'd have saved people from duplicating your efforts.

If you'd googled, you'd have got your answer, as dbz did, in less time than it took to write your post.

You've been on here for six years, but it seems you are still unclear about what is JCL and what is not.

JCL (and JECL) starts with // in column 1. Anything else that is in a JOB is not JCL.

You might think this is just picky of me, but if you look through the thread you'll see that you have caused a kind moderator extra effort, in moving your post to a reasonable forum and editing the subject.

This is a fairly "exact" discipline we are practising. Just try convincing any compiler (or command processor) that "what everybody knows it means" is what you have written, not something that is ambiguous at best.

Then to complain....
Back to top
View user's profile Send private message
vishalbshah

New User


Joined: 01 Dec 2006
Posts: 61
Location: Pune

PostPosted: Thu Apr 19, 2012 5:34 pm    Post subject:
Reply with quote

Hi Bill,

I understand where you are coming from....

But I thought dbz could just provide the solution if he knows....rather then commenting on the questioner who might be beginer in perticular subject or have came across the situation first time.

To be honest I have already goggled before posting here but i have not got clear answer , may be the "words" I was using for searching were not routing me to the right page....

from Dbz reply it seems I am not putting any effort for my question , so I had to say that I am using forum as a "one of the sources".....

After this search I came to know about continuation in DSN PARM is different from that of PARM at EXEC and even continuation in COBOL....

My intention is not to offend anyone just that I was on my way to get the solution and hearing something like below doesn't feel good.

Quote:

but we know that questions asked here are by people
who have no desire to work, only have someone else provide
the answer.


I am doing my job and so others !

Thanks for reply , I really appreciate your help , I have learnt many things from this forum and would like have continued support.

Cheers!
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7228

PostPosted: Thu Apr 19, 2012 5:45 pm    Post subject: Reply to: Continue PARM in SYSIN DD *
Reply with quote

I think you can take a lot from this topic if you want to.

Dbz did show you the answer. It was just a click away. Then you get to a really excellent "discovery class" from Marso, which similar technique can have myriad applications in our work.

The more you think about something, the more likely you are to remember the outcome. The more you have to work on finding something, the better you will remember what you find, and remember how to apply the research technique another time.

If we just "give give give" and you just "take take take" then there's not much you'll "learn learn learn". I started on mainframes "a while ago" now, and I'm still learning all the time. The learning is much easier with time, but the day I stop learning about these things, I'll be either sad, or dead :-)
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Thu Apr 19, 2012 6:35 pm    Post subject:
Reply with quote

My reaction to this question was,
WTF is this guy going to do when he has something complicated to do?

If you search the forums (other websites,also)
you don't see this type of question posed very often.

why?
either because thru
  • trial-and-error
  • searching for and finding an example
  • asking WTH do i need all these parms for?

the first two indicating that the individual has something on the ball,
other than ability to justify his existence
thru Politically Correct bullshit arguements
and just having to have the last word.

the last leading to a control file being built and accessed by the invoked module.
at some point, it seems obvious the parm thing is being overused
and may be better served
as a control file, maintainable without the required modification of a JOB script or PROC.
(and then leading to all the questions about how to override a parm)
Back to top
View user's profile Send private message
don.leahy

Active Member


Joined: 06 Jul 2010
Posts: 641
Location: Whitby, ON, Canada

PostPosted: Thu Apr 19, 2012 8:14 pm    Post subject:
Reply with quote

dbzTHEdinosauer wrote:

the last leading to a control file being built and accessed by the invoked module.
at some point, it seems obvious the parm thing is being overused
and may be better served
as a control file, maintainable without the required modification of a JOB script or PROC.
(and then leading to all the questions about how to override a parm)

YES! PARMs have so many limitations I do not understand why so many people choose to use them over a control file. Is it really that much trouble to add an FD and a Read statement to your Cobol program?

Using a control file makes it so much easier to reuse parameters that may be common to many programs, and has zero impact on your JCL in the event of a parameter change.
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 -> DB2 All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. Job to wait and continue based on reply yugendran COBOL Programming 5 Wed Oct 05, 2016 1:46 pm
No new posts Not enough virtual memory is availabl... Vinay Pushpala IBM Tools 16 Tue Sep 13, 2016 4:37 pm
No new posts Using 'parm' to vary SORTOUT record v... Sysaron DFSORT/ICETOOL 13 Wed Sep 07, 2016 9:24 pm
No new posts Need to know what sysin for DFHTU690 ... pkmurali CICS 3 Mon Jul 25, 2016 1:36 pm
No new posts Symbolic Parameters in SYSIN DD state... madishpa DFSORT/ICETOOL 3 Mon Jun 27, 2016 6:23 pm


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