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

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: 155

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: 8797
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: 155

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

Superior Member


Joined: 14 Mar 2007
Posts: 10873
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
www-01.ibm.com/support/docview.wss?uid=isg3T7000097
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

 


Similar Topics
Topic Forum Replies
No new posts Compile Several JCL JOB Through one r... CLIST & REXX 4
No new posts Running REXX through JOB CLIST & REXX 13
No new posts Error to read log with rexx CLIST & REXX 11
No new posts isfline didnt work in rexx at z/OS ve... CLIST & REXX 7
No new posts run rexx code with jcl CLIST & REXX 15
Search our Forums:

Back to Top