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
 
Read contents of PS file

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
scorp_rahul23

New User


Joined: 06 May 2008
Posts: 93
Location: Delhi

PostPosted: Mon Mar 28, 2016 10:28 pm    Post subject: Read contents of PS file
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: 1783
Location: Bloomington, IL

PostPosted: Mon Mar 28, 2016 10:59 pm    Post subject:
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: 93
Location: Delhi

PostPosted: Mon Mar 28, 2016 11:16 pm    Post subject: Reply to: Read contents of PS file
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: 1783
Location: Bloomington, IL

PostPosted: Mon Mar 28, 2016 11:43 pm    Post subject:
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    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Prblem with mail having MIME contents harsh.saxena579 JCL & VSAM 2 Tue Dec 12, 2017 3:48 pm
No new posts File Tailoring -- Temporary dataset i... samzee71 CLIST & REXX 3 Fri Dec 01, 2017 3:12 am
No new posts Rexx - File tailoring samzee71 CLIST & REXX 10 Thu Nov 30, 2017 10:47 pm
No new posts Moving a PS file as body of a mail! Vignesh Sid JCL & VSAM 4 Tue Nov 21, 2017 9:23 pm
No new posts unable to set RC = 4 when empty file migusd SYNCSORT 1 Tue Nov 21, 2017 1:21 am

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