Search found 805 matches
- Thu Dec 22, 2011 10:39 pm
- Forum: JCL
- Topic: Delete a column from a file
- Replies: 2
- Views: 7600
- Thu Dec 22, 2011 2:40 am
- Forum: JCL
- Topic: STARBAT utility in JCL
- Replies: 3
- Views: 6632
- Thu Dec 22, 2011 2:31 am
- Forum: DFSORT , ICETOOL & Utilities
- Topic: Variable Field Length
- Replies: 1
- Views: 3257
- Fri Dec 16, 2011 6:44 am
- Forum: DFSORT , ICETOOL & Utilities
- Topic: ICETOOL Subsetting
- Replies: 1
- Views: 3126
SUBSET is not the right approach. SUBSET is for selecting by relative record number and you seem to be selecting by a compare field. The only trick with a VB file is that the first data byte starts in position 5 after the RDW. I'd need to know more about exactly what you're doing before I could tell...
- Thu Dec 15, 2011 2:53 am
- Forum: DFSORT , ICETOOL & Utilities
- Topic: header and trailer records
- Replies: 2
- Views: 4274
- Tue Dec 13, 2011 12:22 am
- Forum: DFSORT , ICETOOL & Utilities
- Topic: Is it possibile to do it with DFSORT?
- Replies: 2
- Views: 3767
You can use a DFSORT job like the following to do what you asked for. I assumed your input file has RECFM=FB and LRECL=80, but the job can be changed appropriately for other attributes. //S1 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //SORTIN DD * ab_dd99_rjiedc ab_dd88_nshe ab_dd33_mandh ab_dd33_majfzr //S...
- Sat Dec 10, 2011 9:52 pm
- Forum: DFSORT , ICETOOL & Utilities
- Topic: COUNT of records based on distinct field value(ICETOOL/SORT)
- Replies: 6
- Views: 17482
You can use this DFSORT/ICETOOL job to set RC=4 when the input file is empty and RC=0 if it's not empty. Then you can do a conditional test in the next step to use or bypass the DFSORT step that writes the count. //S1 EXEC PGM=ICETOOL //TOOLMSG DD SYSOUT=* //DFSMSG DD SYSOUT=* //IN DD * RECORD //OUT...
- Fri Dec 09, 2011 10:41 pm
- Forum: JCL
- Topic: JCL to get only selected records from a ds --- without key
- Replies: 6
- Views: 9074
syed wasim, If this does actually have something to do with the job you quoted, and you want to extract the first 40 bytes of each selected FB record, you can use a DFSORT/ICETOOL job like the following: //S1 EXEC PGM=ICETOOL //TOOLMSG DD SYSOUT=* //DFSMSG DD SYSOUT=* //IN DD DSN=... input file //OU...
- Fri Dec 09, 2011 10:36 pm
- Forum: DFSORT , ICETOOL & Utilities
- Topic: COUNT of records based on distinct field value(ICETOOL/SORT)
- Replies: 6
- Views: 17482
- Thu Dec 08, 2011 10:01 pm
- Forum: DFSORT , ICETOOL & Utilities
- Topic: DFSORT - process array
- Replies: 3
- Views: 5589
Here's a DFSORT job that will do what you asked for. I assumed you always have 4 occurrences of the array although this can be extended. I also assumed your input file has RECFM=FB and LRECL=80, but the job can be changed appropriately for other attributes. //S1 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //...
- Wed Dec 07, 2011 10:00 pm
- Forum: DFSORT , ICETOOL & Utilities
- Topic: DFSORT - process array
- Replies: 3
- Views: 5589
I don't speak COBOL. I need you to describe what you want to do in DFSORT terms. Please show an example of the records in your input file (relevant fields only) and what you expect for output. Show all possible variations you have to deal with. Explain the "rules" for getting from input to output. G...
- Tue Dec 06, 2011 11:25 pm
- Forum: DFSORT , ICETOOL & Utilities
- Topic: reformat comparism results
- Replies: 2
- Views: 4145
Based on the little bit of information you've given and assuming that you have two records for each key in positions 1-3, you can use a DFSORT/ICETOOL job like the following to get the output you requested from the input you showed: //S1 EXEC PGM=ICETOOL //TOOLMSG DD SYSOUT=* //DFSMSG DD SYSOUT=* //...
- Tue Dec 06, 2011 11:19 pm
- Forum: DFSORT , ICETOOL & Utilities
- Topic: DFSORT: Reformat data
- Replies: 2
- Views: 3874
You can use a DFSORT job like the following to produce the output you requested from the input you show. //S1 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //SORTIN DD * AAA.BBBBB.DDDDDD.EE.IN01.CDEASE.GxxxxV00 AAA.BBBBB.DDDDDD.EE.IN02.ZUEW.GxxxxV00 AAA.BBBBB.DDDDDD.EE.IN03.BHDGS.GxxxxV00 AAA.BBBBB.DDDDDD.EE.I...
- Mon Dec 05, 2011 11:24 pm
- Forum: JCL
- Topic: Assign numeric value of count to a variable
- Replies: 4
- Views: 6913
- Mon Dec 05, 2011 11:12 pm
- Forum: DFSORT , ICETOOL & Utilities
- Topic: COUNT of records based on distinct field value(ICETOOL/SORT)
- Replies: 6
- Views: 17482
You have several errors in your job. The one that resulted in the syntax error is using TOT=(1,6,CH,TO=CH which makes no sense and is invalid - but even if you fix that, your job won't work the way you coded it because 120,9,ZD is beyond the end of your records. You can get what you say you want for...