Author: RahulG31
Subject: Reply to: Identify error records
Posted: Fri Apr 29, 2016 1:18 am (GMT 5.5)
Considering FB LRECL 30 record:
This should be close enough.
.
Subject: Reply to: Identify error records
Posted: Fri Apr 29, 2016 1:18 am (GMT 5.5)
Considering FB LRECL 30 record:
Code: |
INCLUDE COND=(1,1,CH,EQ,C'P',OR,1,30,SS,EQ,C'*') INREC IFTHEN=(WHEN=GROUP,BEGIN=(1,1,CH,EQ,C'P'),PUSH=(31:1,30)) OUTFIL INCLUDE=(1,30,SS,EQ,C'*'),BUILD=(31,30,/,1,30) OPTION COPY |
This should be close enough.
.