ACGSKILL.m

ACGSKILL ;IHS/OIRM/DSD/THL,AEF - KILL ALL VARIABLES; [ 03/27/2000   2:22 PM ]

 ;;2.0t1;CONTRACT INFORMATION SYSTEM;;FEB 16, 2000

 ;;ROUTINE TO KILL ALL LOCAL VARIABLES

KILL ;XEP;TO KILL ALL VARIABLES

 ;;THIS POINT IS CALLED BY ARMS DURING INTERFACE BETWEEN ARMS AND CIS

 K ACGOF,ACGON,ACGOWIN,ACGPARA,ACGPAUSE,ACGPGM,ACGRECNT,ACGREY,ACGRPT,ACGSEQ,ACGTD,ACGTI,ACGTOT,ACGTOTD,ACGTOTI,ACGW,ACGW2,ACGW3,ACGWIN,ACGWIN2,ACGWIND,ACGXEXP,ACGXEXPD,ACGXY,ACGXYW2,ACGXYWIN,ACGFY

KILL1 ;EP; TO KILL VARIABLES

 K ACG1,ACG2,ACG3,ACG4,ACG5,ACG6,ACG7,ACG8,ACG9,ACG10,ACG11,ACG12,ACG13,ACG14,ACG15,ACG16,ACG17,ACG18,ACG19,ACG20,ACG21,ACG22,ACG23,ACG24,ACG25,ACG26,ACG27,ACG28,ACG29,ACG30,ACG31,ACG32,ACG33,ACG34,ACG35,ACG36,ACG37,ACG38,ACG39,ACG40,ACGCDA

 K ACG41,ACG42,ACG43,ACG44,ACG45,ACG46,ACG47,ACG48,ACG49,ACG50,ACG51,ACG52,ACG53,ACG54,ACG55,ACG56,ACG57,ACG58,ACG59,ACG60,ACG61,ACG62,ACG63,ACG64,ACG65,ACG66,ACG67,ACGQUIT,ACGNC,ACGNCA,ACGCNO,ACG,ACG1DA,ACG5DA,ACGDATA,ACGDR,ACGI,ACGJ,ACGN

 K ACGPGM,ACGRDA,ACGX,ACGY,ACG15DA,ACG17DA,ACG18DA,ACG19DA,ACG20DA,ACG271,ACG28ST,ACGAN,ACGANO,ACGB,ACGC,ACGCA,ACGCHK,ACGCNT,ACGCOC,ACGCWIN,ACGDATA,ACGDR,ACGDW,ACGDXY,ACGE,ACGEOL,ACGEOP,ACGFLDS,ACGFLDSS,ACGIOP,ACGJ,ACGK,ACGLENG,ACGM,ACGN

 Q

ACGSKILL  ;IHS/OIRM/DSD/THL,AEF - KILL ALL VARIABLES; [ 03/27/2000   2:22 PM ]

 +1       ;;2.0t1;CONTRACT INFORMATION SYSTEM;;FEB 16, 2000

 +2       ;;ROUTINE TO KILL ALL LOCAL VARIABLES

KILL      ;XEP;TO KILL ALL VARIABLES

 +1       ;;THIS POINT IS CALLED BY ARMS DURING INTERFACE BETWEEN ARMS AND CIS

 +2        KILL ACGOF,ACGON,ACGOWIN,ACGPARA,ACGPAUSE,ACGPGM,ACGRECNT,ACGREY,ACGRPT,ACGSEQ,ACGTD,ACGTI,ACGTOT,ACGTOTD,ACGTOTI,ACGW,ACGW2,ACGW3,ACGWIN,ACGWIN2,ACGWIND,ACGXEXP,ACGXEXPD,ACGXY,ACGXYW2,ACGXYWIN,ACGFY

KILL1     ;EP; TO KILL VARIABLES

 +1        KILL ACG1,ACG2,ACG3,ACG4,ACG5,ACG6,ACG7,ACG8,ACG9,ACG10,ACG11,ACG12,ACG13,ACG14,ACG15,ACG16,ACG17,ACG18,ACG19,ACG20,ACG21,ACG22,ACG23,ACG24,ACG25,ACG26,ACG27,ACG28,ACG29,ACG30,ACG31,ACG32,ACG33,ACG34,ACG35,ACG36,ACG37,ACG38,ACG39,ACG40,ACGCDA

 +2        KILL ACG41,ACG42,ACG43,ACG44,ACG45,ACG46,ACG47,ACG48,ACG49,ACG50,ACG51,ACG52,ACG53,ACG54,ACG55,ACG56,ACG57,ACG58,ACG59,ACG60,ACG61,ACG62,ACG63,ACG64,ACG65,ACG66,ACG67,ACGQUIT,ACGNC,ACGNCA,ACGCNO,ACG,ACG1DA,ACG5DA,ACGDATA,ACGDR,ACGI,ACGJ,ACGN

 +3        KILL ACGPGM,ACGRDA,ACGX,ACGY,ACG15DA,ACG17DA,ACG18DA,ACG19DA,ACG20DA,ACG271,ACG28ST,ACGAN,ACGANO,ACGB,ACGC,ACGCA,ACGCHK,ACGCNT,ACGCOC,ACGCWIN,ACGDATA,ACGDR,ACGDW,ACGDXY,ACGE,ACGEOL,ACGEOP,ACGFLDS,ACGFLDSS,ACGIOP,ACGJ,ACGK,ACGLENG,ACGM,ACGN

 +4        QUIT