ICETOOL : Summarize DCOLLECT data for HLQ's
Greetings, I have created a report from DCOLLECT data with dataset_name volume_serial creation_date space (in kb) and various other fields. I am looking for a way to scan this report and summarise the space used by each HLQ. Could someone help me out with this requirement please. The input record layout is something like : SYS1.VVDS.VPROD46 PROD46 2011123 10 ABC.DATASET.SOMETHING XYZA41 2008101 80 XYZ.SOMETHING.ELSE YXZA44 2007114 90 ABCXYZ.SOMETHING.ELSE ABC123 2006762 100 ABC.SOME.OTHER.DATASET AAA111 2005092 20 SYS1.VTOCIX.PROD46 ZZZ123 2005123 20 I would like the output to be something like this: SYS130 ABC 100 XYZ 90 ABCXYZ 100 I am looking at the IFTHEN and PARSE statements as of now, however, I haven't had much success yet. Any help or pointers would be appreciated. CSC • This is a PRIVATE message. If you are not the intended recipient, please delete without copying and kindly advise us by e-mail of the mistake in delivery. NOTE: Regardless of content, this e-mail shall not operate to bind CSC to any order or other contract unless pursuant to explicit written agreement or government initiative expressly permitting the use of e-mail for such purpose • Computer Sciences Corporation India Pvt Ltd • 7th, Floor, Block 1B, DLF IT Park, Sivaji Garden, Nandambakkam Post, Ramapuram, Chennai-600 089.
Re: ICETOOL : Summarize DCOLLECT data for HLQ's
This isn't what you asked for but I just want to make sure you're aware of it. If you go into ISPF option 3.4 (or SimpList) and set the field called 'Initial View' to SPACE and enter a slash in the field called 'Display Total Tracks', you can then enter a high level qualifier and the DSLIST will show you the total tracks occupied. HTH, Dave Salt SimpList(tm) - try it; you'll get it! http://www.mackinney.com/products/program-development/simplist.html Date: Tue, 7 Jun 2011 21:28:57 +0530 From: vmanoc...@csc.com Subject: ICETOOL : Summarize DCOLLECT data for HLQ's To: IBM-MAIN@bama.ua.edu Greetings, I have created a report from DCOLLECT data with dataset_name volume_serial creation_date space (in kb) and various other fields. I am looking for a way to scan this report and summarise the space used by each HLQ. Could someone help me out with this requirement please. The input record layout is something like : SYS1.VVDS.VPROD46 PROD46 2011123 10 ABC.DATASET.SOMETHING XYZA41 2008101 80 XYZ.SOMETHING.ELSE YXZA44 2007114 90 ABCXYZ.SOMETHING.ELSE ABC123 2006762 100 ABC.SOME.OTHER.DATASET AAA111 2005092 20 SYS1.VTOCIX.PROD46 ZZZ123 2005123 20 I would like the output to be something like this: SYS130 ABC 100 XYZ 90 ABCXYZ 100 I am looking at the IFTHEN and PARSE statements as of now, however, I haven't had much success yet. Any help or pointers would be appreciated. CSC • This is a PRIVATE message. If you are not the intended recipient, please delete without copying and kindly advise us by e-mail of the mistake in delivery. NOTE: Regardless of content, this e-mail shall not operate to bind CSC to any order or other contract unless pursuant to explicit written agreement or government initiative expressly permitting the use of e-mail for such purpose • Computer Sciences Corporation India Pvt Ltd • 7th, Floor, Block 1B, DLF IT Park, Sivaji Garden, Nandambakkam Post, Ramapuram, Chennai-600 089. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: ICETOOL : Summarize DCOLLECT data for HLQ's
There may be a cleaner way of doing it, but this should work. This assumes that dsn starts position 1 and the space starts position 88 length 10 OPTION COPY INREC IFTHEN=(WHEN=(2,1,CH,EQ,C'.'), BUILD=(1,1,8X,88,10)), IFTHEN=(WHEN=(3,1,CH,EQ,C'.'), BUILD=(1,2,7X,88,10)), IFTHEN=(WHEN=(4,1,CH,EQ,C'.'), BUILD=(1,3,6X,88,10)), IFTHEN=(WHEN=(5,1,CH,EQ,C'.'), BUILD=(1,4,5X,88,10)), IFTHEN=(WHEN=(6,1,CH,EQ,C'.'), BUILD=(1,5,4X,88,10)), IFTHEN=(WHEN=(7,1,CH,EQ,C'.'), BUILD=(1,6,3X,88,10)), IFTHEN=(WHEN=(8,1,CH,EQ,C'.'), BUILD=(1,7,2X,88,10)), IFTHEN=(WHEN=(9,1,CH,EQ,C'.'), BUILD=(1,8,1X,88,10)) On Wed, Jun 8, 2011 at 12:23 AM, Dave Salt ds...@hotmail.com wrote: This isn't what you asked for but I just want to make sure you're aware of it. If you go into ISPF option 3.4 (or SimpList) and set the field called 'Initial View' to SPACE and enter a slash in the field called 'Display Total Tracks', you can then enter a high level qualifier and the DSLIST will show you the total tracks occupied. HTH, Dave Salt SimpList(tm) - try it; you'll get it! http://www.mackinney.com/products/program-development/simplist.html Date: Tue, 7 Jun 2011 21:28:57 +0530 From: vmanoc...@csc.com Subject: ICETOOL : Summarize DCOLLECT data for HLQ's To: IBM-MAIN@bama.ua.edu Greetings, I have created a report from DCOLLECT data with dataset_name volume_serial creation_date space (in kb) and various other fields. I am looking for a way to scan this report and summarise the space used by each HLQ. Could someone help me out with this requirement please. The input record layout is something like : SYS1.VVDS.VPROD46 PROD46 2011123 10 ABC.DATASET.SOMETHING XYZA41 2008101 80 XYZ.SOMETHING.ELSE YXZA44 2007114 90 ABCXYZ.SOMETHING.ELSE ABC123 2006762 100 ABC.SOME.OTHER.DATASET AAA111 2005092 20 SYS1.VTOCIX.PROD46 ZZZ123 2005123 20 I would like the output to be something like this: SYS1 30 ABC 100 XYZ 90 ABCXYZ 100 I am looking at the IFTHEN and PARSE statements as of now, however, I haven't had much success yet. Any help or pointers would be appreciated. CSC • This is a PRIVATE message. If you are not the intended recipient, please delete without copying and kindly advise us by e-mail of the mistake in delivery. NOTE: Regardless of content, this e-mail shall not operate to bind CSC to any order or other contract unless pursuant to explicit written agreement or government initiative expressly permitting the use of e-mail for such purpose • Computer Sciences Corporation India Pvt Ltd • 7th, Floor, Block 1B, DLF IT Park, Sivaji Garden, Nandambakkam Post, Ramapuram, Chennai-600 089. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: ICETOOL : Summarize DCOLLECT data for HLQ's
Date: Tue, 7 Jun 2011 21:28:57 +0530 From: vmanoc...@csc.com Subject: ICETOOL : Summarize DCOLLECT data for HLQ's To: IBM-MAIN@bama.ua.edu Greetings, I have created a report from DCOLLECT data with dataset_name volume_serial creation_date space (in kb) and various other fields. I am looking for a way to scan this report and summarise the space used by each HLQ. Could someone help me out with this requirement please. snip I would like the output to be something like this: SYS130 ABC 100 XYZ 90 ABCXYZ 100 There may be something on the CBT for dcollect. But if you have access to the CBT VTOC command I have exactly what you are looking for - the VTOCTOT program. This program processes the output of the CBT VTOC command and produces totals by high level qualifier. The VTOC command can be found on file 112 of the CBT tape ... VTOCTOT is in the programs section of my web site (URL below) or on CBT file 434. Sample output: APL2 - 2946 Tracks allocated 196 Cylinders allocated78 Data sets ASM - 1830 Tracks allocated 122 Cylinders allocated44 Data sets CATALOG - 301 Tracks allocated20 Cylinders allocated 2 Data sets CBC -32139 Tracks allocated 2143 Cylinders allocated90 Data sets CEE - 174180 Tracks allocated 11612 Cylinders allocated 218 Data sets CIM - 18 Tracks allocated 1 Cylinders allocated 6 Data sets CSF - 1746 Tracks allocated 116 Cylinders allocated54 Data sets DB2 - 8256 Tracks allocated 550 Cylinders allocated25 Data sets Cheers, Mark -- Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS mailto:m...@mzelden.com Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html Systems Programming expert at http://expertanswercenter.techtarget.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: ICETOOL : Summarize DCOLLECT data for HLQ's
Varun Manocha wrote on 06/07/2011 08:58:57 AM: I have created a report from DCOLLECT data with dataset_name volume_serial creation_date space (in kb) and various other fields. I am looking for a way to scan this report and summarise the space used by each HLQ. Could someone help me out with this requirement please. The input record layout is something like : SYS1.VVDS.VPROD46 PROD46 2011123 10 ABC.DATASET.SOMETHING XYZA41 2008101 80 XYZ.SOMETHING.ELSE YXZA44 2007114 90 ABCXYZ.SOMETHING.ELSE ABC123 2006762 100 ABC.SOME.OTHER.DATASET AAA111 2005092 20 SYS1.VTOCIX.PROD46 ZZZ123 2005123 20 I would like the output to be something like this: SYS130 ABC 100 XYZ 90 ABCXYZ 100 You can use a DFSORT job like the following to do what you asked for. I couldn't tell the position, length and format of your fields or the RECFM of your input data set. I assumed it's RECFM=FB and just guessed at the positions - adjust as necessary. //S1 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //SORTIN DD * SYS1.VVDS.VPROD46 PROD46 2011123 10 ABC.DATASET.SOMETHING XYZA41 2008101 80 XYZ.SOMETHING.ELSEYXZA44 2007114 90 ABCXYZ.SOMETHING.ELSE ABC123 2006762100 ABC.SOME.OTHER.DATASETAAA111 2005092 20 SYS1.VTOCIX.PROD46ZZZ123 2005123 20 //SORTOUT DD SYSOUT=* //SYSIN DD * INREC PARSE=(%01=(ENDBEFR=C'.',FIXLEN=8)), BUILD=(%01,11:61,8) SORT FIELDS=(1,8,CH,A) OUTFIL REMOVECC,NODETAIL, SECTIONS=(1,8, TRAILER3=(1,8,11:TOT=(11,8,ZD,M10,LENGTH=8))) /* SORTOUT would have: ABC100 ABCXYZ 100 SYS130 XYZ 90 If you need more specific help, feel free to e-mail me directly with the details of your input file (yae...@us.ibm.com). Frank Yaeger - DFSORT Development Team (IBM) - yae...@us.ibm.com Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration = DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: ICETOOL : Summarize DCOLLECT data for HLQ's
Thanks, Dave, Brian, Mark and Frank! I was looking for what Frank finally suggested. I want this report to be generated on a system where I may not be able to use utilities from CBT, hence, I was looking for a more standard approach based on standard IBM utilities. Thanks once again. Varun Manocha wrote on 06/07/2011 08:58:57 AM: I have created a report from DCOLLECT data with dataset_name volume_serial creation_date space (in kb) and various other fields. I am looking for a way to scan this report and summarise the space used by each HLQ. Could someone help me out with this requirement please. The input record layout is something like : SYS1.VVDS.VPROD46 PROD46 2011123 10 ABC.DATASET.SOMETHING XYZA41 2008101 80 XYZ.SOMETHING.ELSE YXZA44 2007114 90 ABCXYZ.SOMETHING.ELSE ABC123 2006762 100 ABC.SOME.OTHER.DATASET AAA111 2005092 20 SYS1.VTOCIX.PROD46 ZZZ123 2005123 20 I would like the output to be something like this: SYS130 ABC 100 XYZ 90 ABCXYZ 100 You can use a DFSORT job like the following to do what you asked for. I couldn't tell the position, length and format of your fields or the RECFM of your input data set. I assumed it's RECFM=FB and just guessed at the positions - adjust as necessary. //S1 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //SORTIN DD * SYS1.VVDS.VPROD46 PROD46 2011123 10 ABC.DATASET.SOMETHING XYZA41 2008101 80 XYZ.SOMETHING.ELSEYXZA44 2007114 90 ABCXYZ.SOMETHING.ELSE ABC123 2006762100 ABC.SOME.OTHER.DATASETAAA111 2005092 20 SYS1.VTOCIX.PROD46ZZZ123 2005123 20 //SORTOUT DD SYSOUT=* //SYSIN DD * INREC PARSE=(%01=(ENDBEFR=C'.',FIXLEN=8)), BUILD=(%01,11:61,8) SORT FIELDS=(1,8,CH,A) OUTFIL REMOVECC,NODETAIL, SECTIONS=(1,8, TRAILER3=(1,8,11:TOT=(11,8,ZD,M10,LENGTH=8))) /* SORTOUT would have: ABC100 ABCXYZ 100 SYS130 XYZ 90 If you need more specific help, feel free to e-mail me directly with the details of your input file (yae...@us.ibm.com). Frank Yaeger - DFSORT Development Team (IBM) - yae...@us.ibm.com Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration = DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
