>> But I do not know how to count the number of occurrences of each msgid and
>> eliminate duplicates.
Jason,
Assuming the msgid is at position 58 for a length of 7 bytes, you can use the
following control cards that would give you the desired results.
//SYSIN DD *
INCLUDE COND=((58,7,SS,NE,C' ',AND,
65,1,CH,EQ,C' ',AND,
(63,1,SS,EQ,C'0,1,2,3,4,5,6,7,8,9'),AND,
(64,1,SS,EQ,C'ABCDEFGHIJKLMNOPQRSTUVWXYZ')),OR,
(58,8,SS,NE,C' ',AND,
66,1,CH,EQ,C' ',AND,
(64,1,SS,EQ,C'0,1,2,3,4,5,6,7,8,9'),AND,
(65,1,SS,EQ,C'ABCDEFGHIJKLMNOPQRSTUVWXYZ')),OR,
(58,9,SS,NE,C' ',AND,
67,1,CH,EQ,C' ',AND,
(65,1,SS,EQ,C'0,1,2,3,4,5,6,7,8,9'),AND,
(66,1,SS,EQ,C'ABCDEFGHIJKLMNOPQRSTUVWXYZ')),OR,
(58,10,SS,NE,C' ',AND,
68,1,CH,EQ,C' ',AND,
(66,1,SS,EQ,C'0,1,2,3,4,5,6,7,8,9'),AND,
(67,1,SS,EQ,C'ABCDEFGHIJKLMNOPQRSTUVWXYZ')))
SORT FIELDS=(58,7,CH,A)
SUM FIELDS=NONE
OUTFIL REMOVECC,
TRAILER1=('COUNT OF UNIQUE MSGID IS :',COUNT)
/*
Thanks,
Kolusu
DFSORT Development
IBM Corporation
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
