Posted: Fri Apr 01, 2005 10:18 am Post subject: JCL With a break key
Hi,
Im a novice of jcls, i want to know if is possible to do a jcl that do a sum of one variable in data set that its comp. I need to do this sum for al key so i need a break key.
Joined: 02 Dec 2002 Posts: 1618 Topics: 31 Location: San Jose
Posted: Fri Apr 01, 2005 11:15 am Post subject:
If the 22222, 33333, 55555 and 55555 values are COMP, then they're the equivalent of 4-byte BI values as far as DFSORT is concerned (e.g. 2222 = X'000008AE'), so you can use a job like the following to get what you want. I'm assuming that your key in bytes 1-7 is CH format, but if not just change the SORT statement appropriately.
For more on the DFSORT equivalents of COBOL data types, see the "What are the equivalent DFSORT formats for various COBOL data types?" Ask Professor Sort item at:
If you're not familiar with DFSORT and DFSORT's ICETOOL, I'd suggest going through "z/OS DFSORT: Getting Started". It's an excellent tutorial, with lots of examples, that will show you how to use DFSORT, DFSORT's ICETOOL and DFSORT Symbols. You can access this book, and all of the other DFSORT books, at:
I have another question for all of you, anyone can tell me where i can find a simple manual for do simple reports?
If a have a data set with 100 register and i want to print all registers how can i do??
for example:
Joined: 02 Dec 2002 Posts: 1618 Topics: 31 Location: San Jose
Posted: Fri Apr 01, 2005 1:35 pm Post subject:
You can use the DISPLAY operator of DFSORT's ICETOOL to do simple (and not so simple reports). For complete details on DFSORT's ICETOOL, see Chapter 6 of "z/OS DFSORT Application Programming Guide". You can access it from:
_________________ Frank Yaeger - DFSORT Development Team (IBM)
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
DFSORT is on the Web at:
www.ibm.com/storage/dfsort
Joined: 02 Dec 2002 Posts: 1618 Topics: 31 Location: San Jose
Posted: Fri Apr 01, 2005 1:45 pm Post subject:
Quote:
Another question, if u want to print a PIC S9(4) USAGE COMP. and a
PIC S9(15)V9(2) USAGE COMP-3. whats the format?
Look at the link I gave you for the DFSORT equivalents of COBOL data types in my previous post. It shows that PIC S9(4) USAGE COMP is a 2-byte FI field and PIC S9(15)V9(2) USAGE COMP-3 is a 9-byte PD field.
If you want to print those as decimal values, you can use DFSORT/ICETOOL DISPLAY ON fields like this: ON(x,2,FI) ON(y,9,PD) where x and y are the starting positions of the respective fields. Note that you'll need z/OS DFSORT V1R5 PTF UQ95214 or DFSORT R14 PTF UQ95213 (Dec, 2004) to handle the 9-byte PD field. You can also do some editing on the output fields (e.g. add a decimal point) using the ON field formatting capabilities of DISPLAY as described in the DFSORT book. _________________ Frank Yaeger - DFSORT Development Team (IBM)
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
DFSORT is on the Web at:
www.ibm.com/storage/dfsort
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum
FAQ
Search
Quick Manuals
Register
Profile
Log in to check your private messages
Log in
