Here's what I use with LE/COBOL 2.2 to read the SMF datasets...One could
argue that the OCCURS should be from "2" and not from "1"...
FD SMF30IN
BLOCK CONTAINS 0 RECORDS
RECORD CONTAINS 0 CHARACTERS
RECORDING MODE IS S.
01 SMFREC-REC.
02 SMFREC-REC-LEN PIC S9(2) COMP.
02 SMF30IN-VARYABLE.
03 SMF30-AREA PIC X(1)
OCCURS 1 TO 32754
DEPENDING ON SMFREC-REC-LEN.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
