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
 
Rexx to differentiate migrated datasets

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
View previous topic :: :: View next topic  
Author Message
balaji81_k

Active User


Joined: 29 Jun 2005
Posts: 126

PostPosted: Thu Mar 28, 2013 3:36 pm    Post subject: Rexx to differentiate migrated datasets
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: 8763
Location: Welsh Wales

PostPosted: Thu Mar 28, 2013 4:08 pm    Post subject:
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: 126

PostPosted: Sat Mar 30, 2013 11:26 am    Post subject: Hi
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: 10562
Location: italy

PostPosted: Sat Mar 30, 2013 12:30 pm    Post subject: Reply to: Rexx to differentiate migrated datasets
Reply with quote

loog at www.cbttape.org for a nice example on how to process DCOLLECT data with rexx,
( file 206 )

or start from here
http://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    IBMMAINFRAMES.com Support Forums -> CLIST & REXX All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts use daylight logic in REXX maxsubrat CLIST & REXX 1 Wed Jan 30, 2019 5:08 pm
No new posts REXX identify the last/latest created... sivatechdrive CLIST & REXX 6 Thu Jan 24, 2019 12:15 pm
This topic is locked: you cannot edit posts or make replies. how to write a REXX to see whether da... javen777 CLIST & REXX 3 Wed Dec 19, 2018 11:36 am
No new posts Error when compiling a REXX exec with... Ricardo Viegas CLIST & REXX 2 Tue Dec 18, 2018 5:44 am
This topic is locked: you cannot edit posts or make replies. How to process gdg in rexx program wh... pkmurali CLIST & REXX 12 Thu Dec 13, 2018 10:08 am

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