John, Look at the Smart DFSORT trick "Create DFSORT Symbols from COBOL Copybook" here.
http://www.ibm.com/support/docview.wss?rs=114&uid=isg3T7000094 Thanks, Sri Hari Kolusu DFSORT Development IBM Mainframe Discussion List <[email protected]> wrote on 01/10/2013 08:35:01 AM: > From: John McKown <[email protected]> > To: [email protected], > Date: 01/10/2013 08:36 AM > Subject: Processing a COBOL COPY book > Sent by: IBM Mainframe Discussion List <[email protected]> > > I am more curious about this, rather than having an actual need. But I > know many products, such as FileAid, can process COBOL COPY code to > allow a programmer to use the variable names that they are accustomed > to using. Unfortunately, some product, such as ICETOOL, use their own > format for the same. So I was thinking it would be nice to be able to > process a COBOL COPYBOOK and produce something more like ICETOOL's > SYMNAME format. Mainly because the SYMNAME is easy to parse. Does > anybody know of any FREE software which does this? > > If not, I guess that I could write something. What I was considering > was reading the directory of a PDS which is supposed to contain COBOL > COPY code. For each member, create a skeleton COBOL source program > which does a COPY on the member in the WORKING-STORAGE section write > this to a temporary data set. Then dynamically call the COBOL compiler > with the ADATA compiler option. If the RC is 4 or less, assume the > compile was good and look through the ADATA for the data related to > the COPY member. Use that to create records in SYMNAME style format > and write those to a different DD using the same member name as the > input member name. What say you? > > -- > Maranatha! <>< > John McKown > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [email protected] with the message: INFO IBM-MAIN > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
