Are those macros still around somewhere?  There is someone here I would
like to show them to.

I believe we have CS code written in multiple languages to write Cobol
programs and copybooks for special cases where either the whole program
can be determined by a copybook or the "frame" of the program is standard
depending on copybooks and a few parameters.  I can't be more specific
because of proprietary nature of the code.



From:   John P Kalinich <[email protected]>
To:     [email protected]
Date:   03/10/2011 09:58 AM
Subject:        Re: Macros
Sent by:        IBM Mainframe Assembler List
<[email protected]>



We used a product called GENASYS about 30 years ago.  Assembler macro
calls
generated a COBOL program.  It was touted as a third generation language
(3GL).

Regards,
John K

<sample code>

         XDPGM NAME=LCXAB,
               TITLE=SOLID_DICTIONARY_EDIT,
               USRNAME=ADE02B,
               TYPE=UTILITY,
               ENTRY=PDIV,
               PARMS=(LCGLK-DATAMNGR-PARM-FILE),
               IP=(LCGAB,,,,,,VOPT#Y,,LCGLK,,,,,
               TYPIO#NO%NOJ#Y%DATALOC#JB,USE#LINK),
               RP=(LCHAB,,),
               OP=(LCGAC,,,,,,,,LCGAH,,,,,,,,LCGAD)
*
         XDREC LCWAA,GZ,IOPT=V
         XDFLD 10,MOD-NAME,X,8,VAL="ADE02B__"
         XDFLD 10,COMP-CODE,B,4,VAL=+1000
         XDFLD 10,SUB-1,9,2,VAL=+1
         XDFLD 10,SUB-2,9,2,VAL=+1
         XDFLD 10,EXAM-SUB,9,3,VAL=ZERO
         XDFLD 10,ALIAS-NAME-SUB,9,3,VAL=ZERO
         XDFLD 10,LINE-CNTR,9,5,VAL=ZERO
         XDFLD 10,LGTH-TYPE-SUB,9,2,VAL=ZERO
         XDFLD 10,BAH-SUB,9,3,VAL=ZERO
         XDFLD 10,WRITE-IND,X,1,VAL=SPACE
         XDFLD 10,HOLD-TYPE,X,1,VAL=SPACE
         XDSEG 10,BUILD-PRO
*        XDFLD 15,,X,4,VAL="PRO-"
         XDFLD 15,PRO-OFC-SYM,X,13,VAL=SPACE
         XDSEG 10,BUILD-DBA
*        XDFLD 15,,X,4,VAL="DBA-"
         XDFLD 15,DBA-OFC-SYM,X,13,VAL=SPACE



  From:       Lindy Mayfield <[email protected]>

  To:         [email protected]

  Date:       03/10/2011 08:14 AM

  Subject:    Re: Macros






Some  years ago I ran into the code some guy wrote where he created a
complete high level language using macros.  I'm trying to remember it, but
if anyone else remembers I'd like to take a look at it again.

Possibly it is somewhere on CBT, but I didn't remember enough to find it.

Lindy
Kirkkonummi, Finland

-----Original Message-----
From: IBM Mainframe Assembler List [mailto:[email protected]
]
On Behalf Of john gilmore
Sent: Tuesday, March 08, 2011 11:59 PM
To: [email protected]
Subject: Re: Macros


There is nothing 'obscure' about the macro language.  It is a
statement-level  procedural language embedded in an assembler, and its
syntax is very like that of other SLPLs.  It is every bit as easy to learn
and use as C or Java.



-----------------------------------------
The information contained in this communication (including any
attachments hereto) is confidential and is intended solely for the
personal and confidential use of the individual or entity to whom
it is addressed. If the reader of this message is not the intended
recipient or an agent responsible for delivering it to the intended
recipient, you are hereby notified that you have received this
communication in error and that any review, dissemination, copying,
or unauthorized use of this information, or the taking of any
action in reliance on the contents of this information is strictly
prohibited. If you have received this communication in error,
please notify us immediately by e-mail, and delete the original
message. Thank you

Reply via email to