NURAKILL ;HIRMFO/MD,FT-CLEAN-UP ;8/9/96 09:28
;;4.0;NURSING SERVICE;;Apr 25, 1997
;
K A,ABORTSW,AN,ANS,ANS1,ANS2,ATD,B,BED,BEDSECT,BUDCK,BUDCK1,BY,CAT,CATL,CHANGESW,CHGSW,CHKVAR,CK,CLASDT,CLASS,CLASSREV,CLASSX,CLSDATE,CNDATE,CNWARD,COMMENTX,CONFIGX,PDA,SDA,NURSTRN,NOTBAL,NURA,NURAVER,DEFAULT,HDRDT,NRI
K D,D0,D1,DA,DAFTEE,DATA,DATECL,DATENODE,DATETABL,DATEX,DAY,DD,DDH,DEG,DFLT,DFN,DHD,DI,DIC,DIE,DIFQ,DIK,DIR,DIWF,DIWR,DIZ,DLAYGO,DO,DQ,DR,DTC,DTCEN,DTL,DTOUT,DUOUT,DZ,NADMT
K EAFTEE,ENTR,F1,F2,FACT,FACT1,FACTORS,FACTX,FCK,FLDS,FOUND,FR,FT,FY,G,HDATE,HEAD1,HEAD2,HRSW,I,ID,IFN,II,INX,J,K,L,LINE,LOOK,LPNTL,M,MNCHKDTE,MON,MONTH,MQSW,MSG
K NBD,N,N1,N1E,N1EN,N2,NACT,NAD,NADATA,NADMDATE,NADMDT,NADT,NAFTE,NAFTEE,NAMIS,NAPROD,NARR,NASK,NATL,NAVG,NAX,NB,NBAD,NBCEN,NBDSECT,NBED,NBEDS,NBEDSECT
K NBFTE,NBFTEE,NBK,NBPC,NBPROD,NBR,NBREQ,NBRK,NBSEC,NBUDCK,NBUDCK1,NBVAR,NURCAT,NCATPOS,NCDT
K NCEN,NCFT,NCK,NCLAS,NCLASS,NCNT,NCPC,NCPCC,NCPROD,NCR,NCRQ,NCRT,NCT,NURCTA,NCVAR,NCWARD,NCX,NDA,NDAT,NDATA,NDATE,NDATED,NDATEX,NDD,NDFLT,NDFTEE,NDG
K NURDOB,NDPC,NDPCC,NDPROD,NDREQ,NDT,NDVAR,NURNEN,NERR,NEV,NEWREV,NEWSW,NEXC,NEXCDA,NF1,NF2,NFC,NFCEN
K NFCNT,NFI,NURFLAG,NFTE,NFTEE,NGR,NGRADE,NHCFT,NHCPC,NHCPCC,NHCPRD,NHCRQ,NHCVR,NHFTEE,NHIT,NURHOSP,NHOSPSW,NHPC,NHPCC,NHPROD,NHREQ,NHVAR,NI,NID,NIE
K NJ,NK,NL,NL1,NL1BKSW,NLDT,NLDTPR,NLO,NLOC,NLOCN,NMCLASS,NMCNT,NMESS,NN,NNM,NNURSX,NO,NOD
K NT,NOD1,NOD2,NURNODE4,NURNODE5,NODATSW,NODE,NODET,NOPATSW,NOREVSW,NOSW,NDTBAL,NUROUTSW,NPC1,NPC2,NPC3,NPC4,NPC5,NPC6,NPC7,NPC8,NPCC,NPERC,NPERCEN,NUROUT
K NPLOC,NPO,NPODA,NPOS,NPR2,NPR3,NPR4,NPR5,NPR6,NPREV,NPRI,NPROD,NPSPOS,NPTCEN,NPTR,NPWARD,NURQUEUE
K NQSW,NURQUIT,NQUIT,NREQ,NRET,NRMBD,NRNLPN,NRNS,NURROU,NRPT,NRPTDAT,NRX,NS1,NS2,NURSCAT,NURSCATY,NSEC,NSEL,NURSER,NSET,NSHFT,NURSORT,NSP,NSPC,NSPEC,NSPN,NSPO
K NSPOS,NSPOSN,NSSN,NST,NSUB,NSUBC,NSUBM,NSUBT,NURMDSW,NURSW1,NSX,NTAA,NTAAB,NTAAT,NTAB,NTAV,NTC,NTCA,NURPAGE
D ^NURAKIL1
Q
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HNURAKILL 1949 printed Sep 15, 2024@21:43:33 Page 2
NURAKILL ;HIRMFO/MD,FT-CLEAN-UP ;8/9/96 09:28
+1 ;;4.0;NURSING SERVICE;;Apr 25, 1997
+2 ;
+3 KILL A,ABORTSW,AN,ANS,ANS1,ANS2,ATD,B,BED,BEDSECT,BUDCK,BUDCK1,BY,CAT,CATL,CHANGESW,CHGSW,CHKVAR,CK,CLASDT,CLASS,CLASSREV,CLASSX,CLSDATE,CNDATE,CNWARD,COMMENTX,CONFIGX,PDA,SDA,NURSTRN,NOTBAL,NURA,NURAVER,DEFAULT,HDRDT,NRI
+4 KILL D,D0,D1,DA,DAFTEE,DATA,DATECL,DATENODE,DATETABL,DATEX,DAY,DD,DDH,DEG,DFLT,DFN,DHD,DI,DIC,DIE,DIFQ,DIK,DIR,DIWF,DIWR,DIZ,DLAYGO,DO,DQ,DR,DTC,DTCEN,DTL,DTOUT,DUOUT,DZ,NADMT
+5 KILL EAFTEE,ENTR,F1,F2,FACT,FACT1,FACTORS,FACTX,FCK,FLDS,FOUND,FR,FT,FY,G,HDATE,HEAD1,HEAD2,HRSW,I,ID,IFN,II,INX,J,K,L,LINE,LOOK,LPNTL,M,MNCHKDTE,MON,MONTH,MQSW,MSG
+6 KILL NBD,N,N1,N1E,N1EN,N2,NACT,NAD,NADATA,NADMDATE,NADMDT,NADT,NAFTE,NAFTEE,NAMIS,NAPROD,NARR,NASK,NATL,NAVG,NAX,NB,NBAD,NBCEN,NBDSECT,NBED,NBEDS,NBEDSECT
+7 KILL NBFTE,NBFTEE,NBK,NBPC,NBPROD,NBR,NBREQ,NBRK,NBSEC,NBUDCK,NBUDCK1,NBVAR,NURCAT,NCATPOS,NCDT
+8 KILL NCEN,NCFT,NCK,NCLAS,NCLASS,NCNT,NCPC,NCPCC,NCPROD,NCR,NCRQ,NCRT,NCT,NURCTA,NCVAR,NCWARD,NCX,NDA,NDAT,NDATA,NDATE,NDATED,NDATEX,NDD,NDFLT,NDFTEE,NDG
+9 KILL NURDOB,NDPC,NDPCC,NDPROD,NDREQ,NDT,NDVAR,NURNEN,NERR,NEV,NEWREV,NEWSW,NEXC,NEXCDA,NF1,NF2,NFC,NFCEN
+10 KILL NFCNT,NFI,NURFLAG,NFTE,NFTEE,NGR,NGRADE,NHCFT,NHCPC,NHCPCC,NHCPRD,NHCRQ,NHCVR,NHFTEE,NHIT,NURHOSP,NHOSPSW,NHPC,NHPCC,NHPROD,NHREQ,NHVAR,NI,NID,NIE
+11 KILL NJ,NK,NL,NL1,NL1BKSW,NLDT,NLDTPR,NLO,NLOC,NLOCN,NMCLASS,NMCNT,NMESS,NN,NNM,NNURSX,NO,NOD
+12 KILL NT,NOD1,NOD2,NURNODE4,NURNODE5,NODATSW,NODE,NODET,NOPATSW,NOREVSW,NOSW,NDTBAL,NUROUTSW,NPC1,NPC2,NPC3,NPC4,NPC5,NPC6,NPC7,NPC8,NPCC,NPERC,NPERCEN,NUROUT
+13 KILL NPLOC,NPO,NPODA,NPOS,NPR2,NPR3,NPR4,NPR5,NPR6,NPREV,NPRI,NPROD,NPSPOS,NPTCEN,NPTR,NPWARD,NURQUEUE
+14 KILL NQSW,NURQUIT,NQUIT,NREQ,NRET,NRMBD,NRNLPN,NRNS,NURROU,NRPT,NRPTDAT,NRX,NS1,NS2,NURSCAT,NURSCATY,NSEC,NSEL,NURSER,NSET,NSHFT,NURSORT,NSP,NSPC,NSPEC,NSPN,NSPO
+15 KILL NSPOS,NSPOSN,NSSN,NST,NSUB,NSUBC,NSUBM,NSUBT,NURMDSW,NURSW1,NSX,NTAA,NTAAB,NTAAT,NTAB,NTAV,NTC,NTCA,NURPAGE
+16 DO ^NURAKIL1
+17 QUIT