VistA-WorldVistAEHR/r/MEDICINE-MC/MCDIE002.m

43 lines
2.6 KiB
Mathematica

MCDIE002 ;HIRMFO/DAD-KILL ALL VARIABLES ;7/26/96 12:57
;;2.3;Medicine;;09/13/1996
K MCESSEC,MCESSES,MCESSUP,MCESTEMP,MCEX,MCEXDT,MCEXIT,MCF,MCFF,MCFI
K MCFIELD,MCFIL,MCFIL1,MCFIL2,MCFILE,MCFILE1,MCFILENO,MCFILET,MCFL
K MCFLD,MCFLDIX,MCFLDNO,MCFLDREC,MCFLDUSE,MCFN,MCFNAM,MCFOOTER
K MCFOUND,MCFP,MCFTEXT,MCFTMP,MCG,MCGEN,MCGFILE,MCGPROC,MCGTUBE,MCH
K MCHAR,MCHB,MCHEAD,MCHEATP,MCHELP,MCHELPS2,MCHELPSW,MCHOLD,MCI
K MCIAO1,MCIAO2,MCICDSS,MCIDA,MCIDL,MCIDP,MCIEN,MCIEN2,MCIFA
K MCIFE,MCIFL,MCIFLG,MCIFLG15,MCIFV,MCII,MCIMAGE,MCINDCOM,MCINDEX
K MCINST,MCINSTL,MCIPTL,MCIRV,MCITL,MCJ,MCJTUBE,MCK,MCKEY,MCL,MCL2
K MCL3,MCLABDT,MCLAST,MCLD,MCLD0,MCLDATA,MCLDEL,MCLFILE,MCLFOUND
K MCLINE,MCLN,MCLN1,MCLN2,MCLNAM,MCLNCT,MCLNG,MCLOOP,MCLP,MCLRDA
K MCLRDFN,MCLSNO,MCLT,MCLTXT,MCLVD,MCM,MCMAIL,MCMAIN,MCMASS,MCMFLD
K MCMM,MCMU,MCMUP,MCMVVN,MCN,MCNAM,MCNAME,MCNAME2,MCNARRDX,MCND
K MCNDT,MCNEWDFN,MCNEWPRC,MCNM,MCNODE,MCNOW,MCNPI,MCNPJ,MCNT,MCNUM
K MCOEN,MCOEON,MCOFFSET,MCON,MCONSULT,MCOPT,MCOPTION,MCOR,MCOR1
K MCOR2,MCOR3,MCOR4,MCORCK,MCORSPEL,MCORSV,MCOUNT,MCOUT,MCP,MCP1
K MCP1S0,MCP1S1,MCP1S2,MCP2,MCP2S0,MCP2S1,MCP2S2,MCPAGE,MCPAIN
K MCPARAMS,MCPATFLD,MCPATNM,MCPBRIEF,MCPCT,MCPCTDIC,MCPCTW,MCPCTWW
K MCPCTX,MCPCTY,MCPCTY2,MCPCTYY,MCPCTYYY,MCPCTZ,MCPFT0,MCPFTSS
K MCPFULL,MCPH,MCPHYS,MCPI,MCPID,MCPIDT,MCPIECE,MCPIECE1,MCPOS
K MCPOSTP,MCPRC,MCPRCCNT,MCPRCD0,MCPRCSUM,MCPRCTXT,MCPRE,MCPRE005
K MCPRE08,MCPRG,MCPRNM,MCPRO,MCPROC,MCPROP,MCPROV,MCPROVID,MCPRTRTN
K MCPV,MCPWALL,MCQDEL,MCQUEUE,MCR,MCRACE,MCRC,MCRC1,MCRC2,MCRC3,MCRC4
K MCRCCHG,MCRCN,MCRCR,MCRCTOT,MCRD,MCREC,MCREC1,MCREC2,MCRECNO,MCRED
K MCRED1,MCREF,MCREL,MCREP,MCRESULT,MCRH,MCRH1,MCRHL,MCRHLP,MCRHR
K MCRHY,MCROOT,MCROUT,MCROUT2,MCRSR,MCRTYP,MCS,MCSBFILE,MCSBRIEF
K MCSCATT,MCSEL,MCSEP,MCSEX,MCSF,MCSFIND,MCSFLD,MCSFREC,MCSFULL
K MCSIGN,MCSIZ,MCSLASH,MCSM,MCSMR,MCSP,MCSPHIN,MCSREC,MCSS,MCSSN
K MCSSN2,MCSTART,MCSTAT,MCSTENT,MCSUB,MCSUBDD,MCSUBFA,MCSUBFIL
K MCSUBFLD,MCSUBFNU,MCSUMMRY,MCSUP,MCT,MCTDEC,MCTEL,MCTEMP,MCTEMP1
K MCTEST,MCTEXT,MCTIEN,MCTIME,MCTLCN,MCTMP,MCTMP1,MCTODAY,MCTOPDD
K MCTOT,MCTR,MCTXT,MCTYPE,MCTYPEP,MCUNDL,MCUP,MCUSER,MCUTOFDT,MCV
K MCV1,MCV10,MCV2,MCV3,MCV4,MCV5,MCV6,MCV7,MCV8,MCV9,MCVA,MCVAL
K MCVCN,MCVER,MCVI,MCVL,MCVN,MCVR,MCWARD,MCWP,MCX,MCXRET,MCY,MCZ
K MCZERO,MDAT1,MDAT2,MEAS,MENU,MESSNUMB,MFD,MFD2,MFDNAME,MFIELD
K MFILE,MFN,MGN,MHB,MHDX,MHDY,MHFL,MHX,MHY,MLEN,MLEN1,MLEN2,MNODE
K MODE,MODE2,MPIECE,MREC,MSE,MSG,MSH,MST,MSTR,MULTI,MV,MVV,MX
K N,NA,NAME,NAMEE,NCHANGE,ND,ND1,NE,NEW,NEWCODE,NEWCOE,NEWNAM,NEWPTR
K NEWREC,NEWST,NEWSUB,NFILE,NIEN,NM,NMFILE,NODE,NOOCCS,NOPT,NOW,NP
K NTEMP,NULL,NUM,NUMBER
G ^MCDIE003