IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search Log in to check your private messages Log in
 

Rexx to differentiate migrated datasets


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

Active User


Joined: 29 Jun 2005
Posts: 141

PostPosted: Thu Mar 28, 2013 3:36 pm
Reply with quote

Hi ,

I have written sample rexx code to check whether the given dataset is migrated or not , but i want to differentiate between 'PDS' & 'PS'.
When i test the code for any dataset whether it is "PS" & "PDS" or "TAPE file" , SYSDSORG parameter doesn't populate wih any values .
Is there any way to identify the DSORG for a migrated datasets.

(i,e) need to add to check one more variable along with ZDLMIGR ?

Code:

  DS='AA.BB.CC'                                                         
  "ISPEXEC LMDINIT LISTID(IDV) LEVEL(&DS)"                             
                                                                       
"ISPEXEC LMDLIST LISTID("IDV") OPTION(LIST) DATASET(DSVAR) STATS(YES)" 
                                                                       
   IF RC = 0   &  ZDLMIGR =  ' ' THEN                                   
     DO                                                                 
       SAY 'NO MIGRATED DATASETS EXIST TRY OTHER OPTIONS'               
     END                                                               
                                                                       
   IF RC = 0  &  ZDLMIGR = 'YES' THEN DO                               
           SAY "ITS MIGRATED DATASET"                                   
     END                                                               
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8793
Location: Welsh Wales

PostPosted: Thu Mar 28, 2013 4:08 pm
Reply with quote

DCOLLECT M records should tell you.
Back to top
View user's profile Send private message
balaji81_k

Active User


Joined: 29 Jun 2005
Posts: 141

PostPosted: Sat Mar 30, 2013 11:26 am
Reply with quote

Hi,

Can you please explain with any rexx code sample. Iam also referring manual for the same.

Thanks
Balaji K
Back to top
View user's profile Send private message
enrico-sorichetti

Senior Member


Joined: 14 Mar 2007
Posts: 10697
Location: italy

PostPosted: Sat Mar 30, 2013 12:30 pm
Reply with quote

loog at Use [URL] BBCode for External Links for a nice example on how to process DCOLLECT data with rexx,
( file 206 )

or start from here
Use [URL] BBCode for Links
for examples of how to process the same using DFSORT
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

 

Search our Forum:

Similar Topics
Topic Forum Replies
No new posts Calling Assembler from REXX PL/I & Assembler 5
No new posts REXX/CLIST tool for BCSR and EDSR CLIST & REXX 2
No new posts Calling Rexx program from Cobol CLIST & REXX 12
No new posts REXX script to beautify XML CLIST & REXX 1
No new posts TWS PIF (EQQYCOM) Rexx - Occurrence S... IBM Tools 0

Back to Top