* @ABTERM  MAKPO - OâPAýEHéE K ABTERM                                   TERM0001
* * * ðOCìEäHññ KOPPEKTéPOBKA:  äATA 20.10.89   BPEMñ 20.08   *  æOKõC  TERM0002
* @ABTERM TCB=<AäPEC CìOBA C AäPECOM TCB>/(<PEçéCTP>),                  TERM0003
*         CODE=<AäPEC CìOBA C KOäOM>/(<PEçéCTP>)                        TERM0004
*    MK CìEäõET éCðOìøúOBATø C MODE=SUPR,KEY=0 !                        TERM0005
*  ìEHéHçPAä éBã çõT  OTä. 07 ìATùûKO                   T: 310-98-12    TERM0006
         MACRO                                                          TERM0007
&NAME    @ABTERM &TCB=,&CODE=                                           TERM0008
&NAME    IHBLOAD 0,&TCB,F,'TCB'                                         TERM0009
         IHBLOAD 1,&CODE,F,'CODE'                                       TERM0010
         L     15,16                                                    TERM0011
         L     15,52(15)                                                TERM0012
         BALR  14,15                                                    TERM0013
         MEND                                                           TERM0014