source: WorldVistAEHR/trunk/r/MEDICINE-MC/MCDIEDIE.m@ 1639

Last change on this file since 1639 was 613, checked in by George Lilly, 15 years ago

initial load of WorldVistAEHR

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