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.
