MCDIEDIE ;HIRMFO/DAD-KILL ALL VARIABLES ;7/29/96 12:54 ;;2.3;Medicine;;09/13/1996 D KVAR^VADPT D KILL^XM K %,%DT,%H,%I,%T,%X,%Y,%ZIS K A,AA,AANAM,ABORT,ACT,AGE,AL,ALL,ARBLGNO,ARR,ARRAY,ASTM,ASTME K ATYPE,AV,AZ K B,B1C,B2C,B3C,B4C,B5C,B6C,B7C,B8C,BACK,BAD,BASE,BB,BBNAM,BDATE K BE,BEG,BEGDATE,BINDX,BS,BY K C,CAO2,CD,CDATE,CDLCOSB,CDUZ,CFEF2575,CFEV1,CFILE,CFRC,CFVC K CHANGE,CHAR,CHECK,CHR,CI95,CK,CLIN,CMVV,CNT,CO,CODE,CODE2,COHB K COL,CONT,CORSPEL,COUNT,COUNT2,CPF,CPT,CPTIEN,CR,CREAT,CREATION K CROSS,CRV,CT,CTLC,CV,CVC,CVIX,CVO2,CVTL,CVVC K D,D0,D1,D2,DA,DALL,DASH,DATA,DATE,DATE1,DATE2,DATESAME,DB K DBZZ,DC,DCL,DD,DDER,DDR,DDRZREF,DE,DEVICE,DF,DFAST,DFN,DFNUM K DFOUT,DG,DGO,DH,DHD,DHIT,DI,DIADD,DIASKHD,DIC,DICMX,DICR,DICRS K DICS,DICSS,DICW,DID,DIDEL,DIE,DIEDT,DIEL,DIEX,DIEZ,DIFLD,DIFQ K DIFROM,DIG,DIH,DIJ,DIK,DIL,DINAME,DINUM,DIOBEG,DIOEND,DIP,DIPGM K DIPZ,DIQ,DIQUIET,DIR,DIROUR,DIROUT,DIRUT,DIS,DISMN,DISTOP,DISTP K DIU,DIV,DIVA,DIVDIC,DIVDO,DIVDR,DIVDS,DIVP,DIVP1,DIVPDIC K DIVS,DIVV,DIVY,DIW,DIWF,DIWI,DIWL,DIWR,DIWT,DIWTC,DIWX,DIX,DIXX K DIY,DIYS,DIZ,DJ,DJ0,DJ01,DJ1,DJ11,DJ14,DJ16,DJ2,DJ3,DJ4,DJ44 K DJ5,DJ6,DJ7,DJ8,DJ9,DJA,DJAD,DJAT,DJBD,DJBHOLD,DJBITEM,DJBITEM1 K DJBLO,DJBNO,DJC,DJCHO,DJCL,DJCP,DJD,DJD0,DJDA,DJDB,DJDD,DJDD1 K DJDDS,DJDIC,DJDICS,DJDIS,DJDN,DJDNM,DJDP,DJDPL,DJDUZ,DJEOP,DJERR K DJF,DJFF,DJFLAG,DJHIN,DJI,DJJ,DJJ0,DJK,DJK1,DJKEY,DJKL,DJKV,DJL K DJLG,DJLIN,DJLK,DJLSTN,DJM1,DJM2,DJM3,DJMD0,DJMD1,DJMU,DJMUL,DJN K DJNM,DJNN,DJNO,DJNODE,DJNX,DJOP,DJP,DJP1,DJP2,DJP8,DJPEDT,DJQ K DJQ1,DJR,DJRJ,DJRNM,DJS,DJSC,DJSM,DJST,DJSV,DJSW1,DJSW2,DJT K DJTOGGLE,DJVV,DJW,DJW1,DJW2,DJWR,DJX,DJX1,DJX3,DJXL,DJXT,DJXX K DJY,DJZ,DJZ1,DK,DL,DLAYGO,DLB,DLCOSB,DM,DMAX,DN,DNM,DO,DOB K DONE,DOTS,DOW,DP,DPDTO,DPP,DPQ,DQ,DQI,DR,DRAFT,DRUG,DRX,DS K DSC,DSOU,DSOV,DT1,DTEMP,DTI,DTL,DTOUT,DTT,DU,DUOUT,DV,DW,DW1 K DWLW,DX,DXS,DY,DZ,DZ1 K E,EDATE,EDATE1,EDATE2,EE,EES,ENAME,END,ENDAT,ENDATE,ENDDATE K ENDVEN,ENT,ENTRY,ER,ER1,ER2,ERORR,ERR,ERRCOUNT,ERRNAM,ERROR K ESCAPE,EST,EST1,EST2,EX,EXC,EXDAY,EXIT,EXPRESS G ^MCDIE001