MCDIE003 ;HIRMFO/DAD-KILL ALL VARIABLES ;7/26/96 10:37
;;2.3;Medicine;;09/13/1996
K O,O2HB,OBI,OBR,OBX,OCC,OFFSET,OID,OIEN,OKTOGO,OLD,OLDNAM,OLDNODE
K OLDOCCS,OLDPIECE,OLDPTR,OLDREC,OLDSUB,OPT,OPTION,ORACTION,ORD
K ORDER,OREND,ORG,ORIFN,ORSTS,OSI,ORTKG,ORVP,OT,OTEMP,OUT,OUT01
K P,P1,P2,PAAO2,PAC,PACKAGE,PACO2,PAO2,PARAMS,PART,PARTREF,PATID
K PATN,PC,PCE,PCI,PD1,PD11,PD2,PD21,PDATE,PDLCOSB,PDUZ,PE,PER,PERIOD
K PERSON,PF,PFEF2575,PFEV1,PFIL,PFILE,PFRC,PFVC,PG,PGE,PGM,PH,PHYS
K PI,PID,PIECE,PJ,PKG,PKGVER,PLS,PMVV,PNTR,POINT,POINTER,POP,POST
K PPF,PR,PRE,PREC,PRED,PREFIX,PRID,PRIDSCD,PRNAME,PRO,PROC,PROV,PRV
K PSDIV,PSIUDA,PSIUX,PSODTCT,PSOION,PSOPAR,PSRT,PT,PTDNM,PTDNO,PTDTO
K PTER,PTLC,PTMP,PTN,PTNAM,PTR16,PTR200,PVC,PY
K Q,QDT,QFC,QID,QLR,QP,QRD,QSQT,QUIT
K R,RACE,RAP,RDATE,RDATE1,RDATE2,REC,REC2,RECC,RECN,RECORD,RECS
K REDO,REF,RELDATE,RELEASE,RELSTAT,RENAMED,REQVER,RESULT,RET
K RH,RIGHT,RM,RMFD,RN,RNF,RNG,RNV,ROOT,ROUTINE,ROV,RPT,RPTLIN1
K RPTLIN2,RST,RSTT,RTN,RUN,RV,RX,RX0,RX2,RX3,RXD,RXF
K S,S1,S1CNT,S2,S4,S5,S6,SAP,SCD,SCNT,SCRAMBLE,SCREEN,SDA,SDATE
K SDRAFT,SDUZ,SENDATE,SERVER,SETFLAG,SETLOC,SEX,SFIELD,SFIELD1,SFILE
K SFILE1,SFLD,SHOW,SITE,SIZE,SKIP,SL0,SL1,SL2,SNF,SNODE,SNODE1
K SNOMED,SNOWMED,SP,SPACE,SPC,SPELL,SPIECE,SREC,SREC1,SRELEASE,SS
K SSN,ST,ST0,STA,START,STAT,STATUS,STATUS2,STDATE,STEMP,STR,STRING
K SUB,SUBENTRY,SUBFILE,SUBFILE1,SUBNAME,SUBNM,SUBNO,SUBNODE,SUBREC
K SUBREC1,SUP,SUP1,SUP2,SUPD,SUPNUM,SUPV,SWITCH,SWS
K T,TA,TAB,TASK,TD,TDATE,TECH,TEMP,TEMP1,TEMP2,TEP,TEST,TEXT,TFILE
K TLC,TMP,TMP2,TMPDR,TN,TO,TOTAL,TOTS,TOTU,TP,TRAP,TRIES,TRUE,TSK
K TST,TSUP2,TT,TTFLAG,TVER,TXT,TY,TYPE
K UNIT,UNITS,UNSIGNED,UNT,UPFIL,UPFILNAM,UPFLDNAM,UPFLDNU,USER,USEREND
K V,VA,VAL,VALUE,VAR,VC,VDATE,VE,VER,VERDATE,VERSION,VERTEXT,VES,VID
K VIEW,VISOV,VNAME,VT1,VTI
K W,WARD,WH,WORD,WT,WT1
K X,X1,X2,XBACK,XCOUNT,XDAT,XDATE,XDR,XDUP,XDUZ,XERROR,XEXT,XFILE
K XFLD,XFLDN,XHLD,XHOLD,XINT,XLOOP,XNODE,XPDABORT,XPDENV,XPDNM
K XPLACE,XREC,XREF,XSFILE,XSTR,XTEMP,XTFILE,XTMP,XTMP2,XTOTAL
K XTRANAME,XTYP,XTYPE,XX,XY
K Y,Y0,Y1,YES,YMLH,YS,YY
K Z,Z1,Z2,Z3,ZI,ZIP,ZREF,ZTDESC,ZTDTH,ZTIO,ZTPRI,ZTRTN,ZTSAVE,ZTSK
K ZTSTOP,ZX,ZY,ZZ
Q
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HMCDIE003 2226 printed Oct 16, 2024@18:15:28 Page 2
MCDIE003 ;HIRMFO/DAD-KILL ALL VARIABLES ;7/26/96 10:37
+1 ;;2.3;Medicine;;09/13/1996
+2 KILL O,O2HB,OBI,OBR,OBX,OCC,OFFSET,OID,OIEN,OKTOGO,OLD,OLDNAM,OLDNODE
+3 KILL OLDOCCS,OLDPIECE,OLDPTR,OLDREC,OLDSUB,OPT,OPTION,ORACTION,ORD
+4 KILL ORDER,OREND,ORG,ORIFN,ORSTS,OSI,ORTKG,ORVP,OT,OTEMP,OUT,OUT01
+5 KILL P,P1,P2,PAAO2,PAC,PACKAGE,PACO2,PAO2,PARAMS,PART,PARTREF,PATID
+6 KILL PATN,PC,PCE,PCI,PD1,PD11,PD2,PD21,PDATE,PDLCOSB,PDUZ,PE,PER,PERIOD
+7 KILL PERSON,PF,PFEF2575,PFEV1,PFIL,PFILE,PFRC,PFVC,PG,PGE,PGM,PH,PHYS
+8 KILL PI,PID,PIECE,PJ,PKG,PKGVER,PLS,PMVV,PNTR,POINT,POINTER,POP,POST
+9 KILL PPF,PR,PRE,PREC,PRED,PREFIX,PRID,PRIDSCD,PRNAME,PRO,PROC,PROV,PRV
+10 KILL PSDIV,PSIUDA,PSIUX,PSODTCT,PSOION,PSOPAR,PSRT,PT,PTDNM,PTDNO,PTDTO
+11 KILL PTER,PTLC,PTMP,PTN,PTNAM,PTR16,PTR200,PVC,PY
+12 KILL Q,QDT,QFC,QID,QLR,QP,QRD,QSQT,QUIT
+13 KILL R,RACE,RAP,RDATE,RDATE1,RDATE2,REC,REC2,RECC,RECN,RECORD,RECS
+14 KILL REDO,REF,RELDATE,RELEASE,RELSTAT,RENAMED,REQVER,RESULT,RET
+15 KILL RH,RIGHT,RM,RMFD,RN,RNF,RNG,RNV,ROOT,ROUTINE,ROV,RPT,RPTLIN1
+16 KILL RPTLIN2,RST,RSTT,RTN,RUN,RV,RX,RX0,RX2,RX3,RXD,RXF
+17 KILL S,S1,S1CNT,S2,S4,S5,S6,SAP,SCD,SCNT,SCRAMBLE,SCREEN,SDA,SDATE
+18 KILL SDRAFT,SDUZ,SENDATE,SERVER,SETFLAG,SETLOC,SEX,SFIELD,SFIELD1,SFILE
+19 KILL SFILE1,SFLD,SHOW,SITE,SIZE,SKIP,SL0,SL1,SL2,SNF,SNODE,SNODE1
+20 KILL SNOMED,SNOWMED,SP,SPACE,SPC,SPELL,SPIECE,SREC,SREC1,SRELEASE,SS
+21 KILL SSN,ST,ST0,STA,START,STAT,STATUS,STATUS2,STDATE,STEMP,STR,STRING
+22 KILL SUB,SUBENTRY,SUBFILE,SUBFILE1,SUBNAME,SUBNM,SUBNO,SUBNODE,SUBREC
+23 KILL SUBREC1,SUP,SUP1,SUP2,SUPD,SUPNUM,SUPV,SWITCH,SWS
+24 KILL T,TA,TAB,TASK,TD,TDATE,TECH,TEMP,TEMP1,TEMP2,TEP,TEST,TEXT,TFILE
+25 KILL TLC,TMP,TMP2,TMPDR,TN,TO,TOTAL,TOTS,TOTU,TP,TRAP,TRIES,TRUE,TSK
+26 KILL TST,TSUP2,TT,TTFLAG,TVER,TXT,TY,TYPE
+27 KILL UNIT,UNITS,UNSIGNED,UNT,UPFIL,UPFILNAM,UPFLDNAM,UPFLDNU,USER,USEREND
+28 KILL V,VA,VAL,VALUE,VAR,VC,VDATE,VE,VER,VERDATE,VERSION,VERTEXT,VES,VID
+29 KILL VIEW,VISOV,VNAME,VT1,VTI
+30 KILL W,WARD,WH,WORD,WT,WT1
+31 KILL X,X1,X2,XBACK,XCOUNT,XDAT,XDATE,XDR,XDUP,XDUZ,XERROR,XEXT,XFILE
+32 KILL XFLD,XFLDN,XHLD,XHOLD,XINT,XLOOP,XNODE,XPDABORT,XPDENV,XPDNM
+33 KILL XPLACE,XREC,XREF,XSFILE,XSTR,XTEMP,XTFILE,XTMP,XTMP2,XTOTAL
+34 KILL XTRANAME,XTYP,XTYPE,XX,XY
+35 KILL Y,Y0,Y1,YES,YMLH,YS,YY
+36 KILL Z,Z1,Z2,Z3,ZI,ZIP,ZREF,ZTDESC,ZTDTH,ZTIO,ZTPRI,ZTRTN,ZTSAVE,ZTSK
+37 KILL ZTSTOP,ZX,ZY,ZZ
+38 QUIT