To get a migrated dataset report from MCDS



IBM's flagship sort product DFSORT for sorting, merging, copying, data manipulation and reporting. Includes ICETOOL and ICEGENER

To get a migrated dataset report from MCDS

Postby maincen » Thu Aug 03, 2023 7:15 pm

I need to pull a migrated dataset and their details from MCDS/decollect taken from MCDS, I ran the below JCL and it is completing with C000, but the problem is I am not getting any datas in the output file. I am using ICETOOL sort.

Note: The Decollect file which I took from MCDS has all migrated files but could not get the desired output from the SORT field.

//STEP1 EXEC PGM=ICETOOL,REGION=0M
//SYSPRINT DD SYSOUT=*
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//INDD DD DSN=MCDSFILE (or) DECOLLECT FILE from MCDS,
// DISP=SHR
//OUTDD DD DSN=OUTPUT.FILE,
// DISP=(NEW,CATLG),SPACE=(CYL,(20,20),RLSE),UNIT=3390
//TEMP DD DSN=&&T1,
// DISP=(NEW,PASS),SPACE=(CYL,(20,20),RLSE),UNIT=3390
//TOOLIN DD *
SORT FROM(INDD) TO(TEMP) USING(INCL)
DISPLAY FROM(TEMP) LIST(OUTDD) BLANK TOTAL('') -
NOHEADER ON(5,44,CH) -
ON(51,4,BI) -
ON(57,4,BI)
//**
//INCLCNTL DD *
OPTION VLSHRT,VLSCMP,NOCHALT
INCLUDE COND=((9,1,CH,EQ,C'M'),AND,
(29,19,CH,EQ,C'OAA.PA.O0MMA.MASTER.'))
INREC FIELDS=(1,4,
5:29,44,
51:193,4,
57:197,4)
SORT FIELDS=(5,44,CH,A)
//*

Appreciate ur help. Thank you
maincen
 
Posts: 2
Joined: Thu Aug 03, 2023 7:01 pm
Has thanked: 0 time
Been thanked: 0 time

Re: To get a migrated dataset report from MCDS

Postby maincen » Thu Aug 03, 2023 7:30 pm

I am unable to get the migrated files details on output of the HLQ's OAA.PA.O0MMA.MASTER. via the above sort. Appreciate your help
maincen
 
Posts: 2
Joined: Thu Aug 03, 2023 7:01 pm
Has thanked: 0 time
Been thanked: 0 time

Re: To get a migrated dataset report from MCDS

Postby sergeyken » Thu Aug 03, 2023 11:14 pm

1. Please, learn to post your code in this format, if you really need any response:

//STEP1    EXEC PGM=ICETOOL,REGION=0M                                    
//SYSPRINT DD  SYSOUT=*                                                  
//TOOLMSG  DD  SYSOUT=*                                                  
//DFSMSG   DD  SYSOUT=*                                                    
//INDD     DD  DSN=MCDSFILE (or) DECOLLECT FILE from MCDS,                                        
//             DISP=SHR                                                            
//OUTDD    DD  DSN=OUTPUT.FILE,                              
//             DISP=(NEW,CATLG),SPACE=(CYL,(20,20),RLSE),UNIT=3390                  
//TEMP     DD  DSN=&&T1,                                                    
//             DISP=(NEW,PASS),SPACE=(CYL,(20,20),RLSE),UNIT=3390                  
//TOOLIN   DD  *                                                          
 SORT FROM(INDD) TO(TEMP) USING(INCL)                                  
 DISPLAY FROM(TEMP) LIST(OUTDD) BLANK TOTAL('') -                      
 NOHEADER ON(5,44,CH) -                                                
 ON(51,4,BI) -                                                          
 ON(57,4,BI)                                                            
//**                                                                    
//INCLCNTL DD  *                                                        
 OPTION VLSHRT,VLSCMP,NOCHALT                                          
 INCLUDE COND=((9,1,CH,EQ,C'M'),AND,                                    
 (29,19,CH,EQ,C'OAA.PA.O0MMA.MASTER.'))                                
 INREC FIELDS=(1,4,                                                    
    5:29,44,                                                            
    51:193,4,                                                          
    57:197,4)                                                          
 SORT FIELDS=(5,44,CH,A)                                                
//*                                                                    
 


2. Comment-out your INCLUDE conditions, one by one, or comment all of them completely. Can you get something at all?

3. Where is your full SORT log, or its important part? Did you check it at all??!!
Javas and Pythons come and go, but JCL and SORT stay forever.
User avatar
sergeyken
 
Posts: 436
Joined: Wed Jul 24, 2019 10:12 pm
Has thanked: 7 times
Been thanked: 40 times

Re: To get a migrated dataset report from MCDS

Postby sergeyken » Thu Aug 03, 2023 11:26 pm

4. First comment-out your DISPLAY statement, and verify that your SORT produces something useful? WHEN THIS IS DONE, try to debug your DISPLAY part.

5. Do not expect that others will do it for you.
Javas and Pythons come and go, but JCL and SORT stay forever.
User avatar
sergeyken
 
Posts: 436
Joined: Wed Jul 24, 2019 10:12 pm
Has thanked: 7 times
Been thanked: 40 times

Re: To get a migrated dataset report from MCDS

Postby sergeyken » Sat Aug 05, 2023 8:43 pm

maincen wrote:I am unable to get the migrated files details on output of the HLQ's OAA.PA.O0MMA.MASTER. via the above sort. Appreciate your help

The first sign of unprofessionalism:
I am unable to get the migrated files details on output

You must:
1. Explain in a clear manner - what exactly is wrong in your results?
2. Explain in details - what is your input format, what is the expected output result, and what is your actual result?
3. Specifically mention if your result is “my computer got fire, and exploded”.
Javas and Pythons come and go, but JCL and SORT stay forever.
User avatar
sergeyken
 
Posts: 436
Joined: Wed Jul 24, 2019 10:12 pm
Has thanked: 7 times
Been thanked: 40 times


Return to DFSORT/ICETOOL/ICEGENER

 


  • Related topics
    Replies
    Views
    Last post