On 29 Jan 2008 09:47:10 -0800, [EMAIL PROTECTED] (McKown,
John) wrote:
>This is likely a strange question. But does anybody know of anything
>which can take a COBOL copy book (file defination) and create DFSORT
>symbols? Or maybe something that can post process a COBOL compile
>listing and create DFSORT symbols?
I suppose we could write a CoBOL program that read in a copybook
member:
01 BR-BILL-REC-WORK.
05 BR-BILL-SORT-KEY.
10 FILLER PIC X.
10 ZIP PIC X(5).
10 NAME PIC X(16).
10 DORM PIC X(4).
10 ROOM PIC X(6).
10 FLAG PIC X(1).
10 FILLER PIC X(5).
and write out a SYMNAMES:
FILLER,01,01,CH
ZIP,*,05,CH
NAME,*,05,CH
DORM,=,02,CH
ROOM,=,04,CH
SUFFIX,*,01,CH
FLAG,*,01,CH
It doesn't look trivial. (Note the initial Filler)
----------------------------------------------------------------------
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