|
|
| Author |
Message |
Shivashankar Biradar
New User
Joined: 07 Jul 2008
Posts: 2
Location: Pune
|
|
|
|
Hi,
Please let me know the syntax for omit a record depending on the comp-3 value using DFSORT/ICETOOL.
Thanks,
Shivashankar |
|
| Back to top |
|
 |
References
|
|
 |
karthikr44
Active User
Joined: 25 Aug 2007
Posts: 172
Location: Chennai
|
|
|
|
HI,
It is very simple.
Just use the sort card
| Code: |
OMIT COND=(24,3,PD,EQ,NUM)
|
Records will be omitted from the application if the first field (byte 24 to byte 26) is identified as packed decimal numeric.
regards
R KARTHIK |
|
| Back to top |
|
|
Frank Yaeger
DFSORT Moderator
Joined: 15 Feb 2005
Posts: 4613
Location: San Jose, CA
|
|
|
|
Shivashankar,
Assuming you want to check a PD field for a particular value, the general format for the DFSORT control statements would be:
| Code: |
OPTION COPY
OMIT COND=(p,m,PD,op,value)
|
p is the starting position of the PD field. m is the length of the PD field. op is the comparison operator (EQ, NE, LT, LE, GT, GE) and value is a decimal number (n, +n, -n). So for example, if you wanted to OMIT records with a 2-byte PD value in positions 21-22 equal to +12, you would use:
| Code: |
OPTION COPY
OMIT COND=(21,2,PD,EQ,+12)
|
If you need more specific help, explain in more detail what you want to do.
If you're not familiar with DFSORT and DFSORT's ICETOOL, I'd suggest reading 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 it online, along with all of the other DFSORT books, from:
www.ibm.com/servers/storage/support/software/sort/mvs/srtmpub.html |
|
| Back to top |
|
|
Shivashankar Biradar
New User
Joined: 07 Jul 2008
Posts: 2
Location: Pune
|
|
|
|
Sorry, forgot to mention info about the field and file.
Actually that field is defined as PIC S9(03) COMP-3 and in the VB file. It is the first field in the file. |
|
| Back to top |
|
|
Frank Yaeger
DFSORT Moderator
Joined: 15 Feb 2005
Posts: 4613
Location: San Jose, CA
|
|
|
|
| Since it's a VB file, the first field in the file starts at position 5 after the RDW. PIC S9(03) COMP-3 is a 2-byte PD value. So use 5 for p and 2 for m in the OMIT statement as shown in my previous post. |
|
| Back to top |
|
|
|
|
|
