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

Read contents of PS file


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
scorp_rahul23

New User


Joined: 06 May 2008
Posts: 96
Location: Delhi

PostPosted: Mon Mar 28, 2016 10:28 pm
Reply with quote

1. I want to count the contents of PS file , if count is 2 process it

Code:

//IDR123   EXEC PGM=MDCAMS,REGION=0M                   
//INFILE   DD DSN=F9340T.IDR.COUNT.FILE,               
//            DISP=SHR                                 
//OUTFILE  DD DUMMY,                                   
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=0)       
//SYSIN    DD *                                       
  REPRO INFILE(INFILE) OUTFILE(OUTFILE) COUNT(2)       
/*                                                     


2. Read contents of File. File is 80- byte FB and it contains PS file names

3. Use the first record found in Step 2 as DD for next step.


I am not sure how can I achieve Step 3. Any suggestions.
Back to top
View user's profile Send private message
Akatsukami

Global Moderator


Joined: 03 Oct 2009
Posts: 1788
Location: Bloomington, IL

PostPosted: Mon Mar 28, 2016 10:59 pm
Reply with quote

In what language are you planning to implement this process?
Back to top
View user's profile Send private message
scorp_rahul23

New User


Joined: 06 May 2008
Posts: 96
Location: Delhi

PostPosted: Mon Mar 28, 2016 11:16 pm
Reply with quote

just thinking if we can do this in JCL only without COBOL or REXX
Back to top
View user's profile Send private message
Akatsukami

Global Moderator


Joined: 03 Oct 2009
Posts: 1788
Location: Bloomington, IL

PostPosted: Mon Mar 28, 2016 11:43 pm
Reply with quote

As you should know, JCL does and can do nothing except set up environments and execute programs.

Since JCL is frozen when it is submitted and interpreted, you cannot change it dynamically to use a DSN read from a data set -- or indeed any other source. Rather, you must have the program in step 3 read the data set and dynamically allocate the data set, using the TSO ALLOCATE command in Rexx or BPXWDYN in COBOL.
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 -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts Converting a file from PD to display ... SYNCSORT 4
No new posts Record count of RECFM=U tape file DFSORT/ICETOOL 17
This topic is locked: you cannot edit posts or make replies. Write Character to Hexadecimal file w... COBOL Programming 8
No new posts Checking the total counts inside a re... JCL & VSAM 5
No new posts File-aid batch how to repeat a line... Compuware & Other Tools 2
Search our Forums:

Back to Top