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

DD Name identification


IBM Mainframe Forums -> CLIST & REXX
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
rmaruri

New User


Joined: 29 Jun 2005
Posts: 13
Location: USA

PostPosted: Wed Aug 22, 2012 12:15 pm
Reply with quote

Hi, I have a requirement to verify whether DDNAME is spaces or valid values.

I will be reading each line of JCL in rexx pgm and need to validate whether DD name (start from 3 to 10 bytes - 8 bytes length) is space or valid value. If the DD Name is present, I have to do the processing. If not, I will skip the process.

Looking for verb which does this function.

Appreciate your help.

Regards,
Ravi
Back to top
View user's profile Send private message
Pandora-Box

Global Moderator


Joined: 07 Sep 2006
Posts: 1592
Location: Andromeda Galaxy

PostPosted: Wed Aug 22, 2012 12:42 pm
Reply with quote

Can you please eloborate on you requirement?

When you say processing what is that you mean??
Back to top
View user's profile Send private message
prino

Senior Member


Joined: 07 Feb 2009
Posts: 1306
Location: Vilnius, Lithuania

PostPosted: Wed Aug 22, 2012 1:02 pm
Reply with quote

You need a verb?

How about "WRITE", as in "write the code"
Back to top
View user's profile Send private message
rmaruri

New User


Joined: 29 Jun 2005
Posts: 13
Location: USA

PostPosted: Wed Aug 22, 2012 1:15 pm
Reply with quote

Code:
//SYSIN    DD  DSN=FILE1,
//             DISP=SHR


I will be reading the above lines one at a time and have to check for position 3 to 11 and see whether I have DD Name present. First line is having the DD Name, so I have to process the line.
Second line doesn't have the DD name, so I have to skip the line.

Let me know if you need additional examples.

Looking for ways of doing it.
Back to top
View user's profile Send private message
Pandora-Box

Global Moderator


Joined: 07 Sep 2006
Posts: 1592
Location: Andromeda Galaxy

PostPosted: Wed Aug 22, 2012 1:30 pm
Reply with quote

Phew you havent explained enough

Are you just trying to get the DDNAME presentt in the job ??

When you say process what does the code do
When you say process what does the code do
When you say process what does the code do

Based upon the term process the answers would vary a lot

For example just trying to understand

Code:
//SYSIN    DD  DSN=FILE1,
//             DISP=SHR


Are you going to assign some variable the value as 'FILE1' and do something or what??
Back to top
View user's profile Send private message
prino

Senior Member


Joined: 07 Feb 2009
Posts: 1306
Location: Vilnius, Lithuania

PostPosted: Wed Aug 22, 2012 1:30 pm
Reply with quote

Why don't you WRITE code to do this?

Oh, you want me to do it?

I require prepayment (as do most others on this board) and my rate is a very modest EUR 600 per day, with a minimum of two days. I also require a full complete spec in LibreOffice's ODT format.
Back to top
View user's profile Send private message
Pandora-Box

Global Moderator


Joined: 07 Sep 2006
Posts: 1592
Location: Andromeda Galaxy

PostPosted: Wed Aug 22, 2012 1:36 pm
Reply with quote

Prino,

As a stiff competition icon_wink.gif

I could charge to get done with the similar requirement at EUR 100 icon_biggrin.gif icon_biggrin.gif
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10872
Location: italy

PostPosted: Wed Aug 22, 2012 1:42 pm
Reply with quote

see here
www.ibmmainframes.com/viewtopic.php?t=32494&highlight=jcl+parser
Back to top
View user's profile Send private message
prino

Senior Member


Joined: 07 Feb 2009
Posts: 1306
Location: Vilnius, Lithuania

PostPosted: Wed Aug 22, 2012 2:19 pm
Reply with quote

Pandora-Box wrote:
Prino,

As a stiff competition icon_wink.gif

I could charge to get done with the similar requirement at EUR 100 icon_biggrin.gif icon_biggrin.gif

Probably because of the lower gravity.
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: Wed Aug 22, 2012 6:47 pm
Reply with quote

Hello,

Quote:
Second line doesn't have the DD name, so I have to skip the line.
What about concatenated datasets?

Suggest you also need to look for DD as well. . .
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA

PostPosted: Wed Aug 22, 2012 6:58 pm
Reply with quote

What if the DD name is a procedure override such as
Code:
//LKED.SYSLMOD DD ...
or something like
Code:
//*D01     DD ...
Back to top
View user's profile Send private message
Pedro

Global Moderator


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

PostPosted: Wed Aug 22, 2012 8:52 pm
Reply with quote

Use the WORD function of rexx to isolate the first blank delimited string of the line. Then check the length.

Code:
string1 = Word(mylines.x, 1)
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 -> CLIST & REXX

 


Similar Topics
Topic Forum Replies
No new posts Identification Division COBOL Programming 2
No new posts IMS DB Structural Changes Identification IMS DB/DC 4
No new posts Handling WildChar '*' for MEMBER id... CLIST & REXX 12
No new posts Zoned Decimal identification COBOL Programming 3
No new posts Query Identification- nested, subquer... Mainframe Interview Questions 1
Search our Forums:

Back to Top