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

Reply via email to