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
To get a migrated dataset report from MCDS
Re: To get a migrated dataset report from MCDS
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
- sergeyken
- Posts: 458
- Joined: Wed Jul 24, 2019 10:12 pm
- Skillset: Assembler, JCL, Utilities, PL/I, C/C++, DB2, SQL, REXX, COBOL, etc. etc. etc.
- Referer: Internet search
Re: To get a migrated dataset report from MCDS
1. Please, learn to post your code in this format, if you really need any response:
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??!!
Code: Select all
//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.
- sergeyken
- Posts: 458
- Joined: Wed Jul 24, 2019 10:12 pm
- Skillset: Assembler, JCL, Utilities, PL/I, C/C++, DB2, SQL, REXX, COBOL, etc. etc. etc.
- Referer: Internet search
Re: To get a migrated dataset report from MCDS
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.
5. Do not expect that others will do it for you.
Javas and Pythons come and go, but JCL and SORT stay forever.
- sergeyken
- Posts: 458
- Joined: Wed Jul 24, 2019 10:12 pm
- Skillset: Assembler, JCL, Utilities, PL/I, C/C++, DB2, SQL, REXX, COBOL, etc. etc. etc.
- Referer: Internet search
Re: To get a migrated dataset report from MCDS
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.
-
- Similar Topics
- Replies
- Views
- Last post
-
- 1
- 1609
-
by willy jensen
View the latest post
Fri Aug 04, 2023 12:52 pm
-
-
Continuation of report in ICETOOL
by schintala » Sat Dec 24, 2022 10:32 pm » in DFSORT/ICETOOL/ICEGENER - 7
- 2612
-
by sergeyken
View the latest post
Fri Dec 30, 2022 12:27 am
-
-
- 0
- 986
-
by biswajit
View the latest post
Mon Mar 03, 2025 8:54 pm
-
- 11
- 5539
-
by Misha786
View the latest post
Wed Mar 10, 2021 11:56 pm
-
- 12
- 3779
-
by RalphEagle
View the latest post
Fri Jul 30, 2021 1:00 pm