NURQKILL.m

NURQKILL ;HIRMFO/MD-CLEAN-UP ;11/23/94 12:32

 ;;4.0;NURSING SERVICE;**8**;Apr 25, 1997

 ;

 K ARRAY,ASER,CHAR,D,D0,D1,D2,D3,DA,DD,DIC,DIE,DIK,DISP,DLAYGO,DIU,DIX,DR,GX7,GX9,IOP,J,ND1,NDA2,POP

 K NDA,NURFLAG,NURHOSP,NUROUT,NPWARD,NURQUIT,NURDFLT,NURDICS,NURQ,NURQAR,NURQBYR,NURQDATE,NURQDC,NURQDDT,NURQDDT1,NURQDT,NURQEOA,NURQFREQ,NURQFRQ,NURQKOI,NURQLN,NURQLOC,NURQND,NURQPG,NURQPO,NURQRIND,NURQSC,NURQSITE,NURQSP,NURQSRVC

 K NURQSVN,NURQSW,NURQTOI,NURQSURV,NURQWRD1,NURQX,NURSZAP,NURQVER,NURQ,NURSZDA,NURSZLO,NURSZSP,NY,NW,NWRD,NX,QAPA2,QAPXX,QFIN,QSTA,QSUR,QUES,QX,NUREQWRD,SUB,TAB,XT1,XT2,XT3,XT4,XX,X,Y,Z,ZTREQ

 ; *** Kernel variables

 K %,%1,%2,%3,%DT,%X,%Y,%ZIS,Z,ZTDESC,ZTDTH,ZTIO,ZTRTN,ZTSAVE,ZTSK

 Q

NURQKILL  ;HIRMFO/MD-CLEAN-UP ;11/23/94 12:32

 +1       ;;4.0;NURSING SERVICE;**8**;Apr 25, 1997

 +2       ;

 +3        KILL ARRAY,ASER,CHAR,D,D0,D1,D2,D3,DA,DD,DIC,DIE,DIK,DISP,DLAYGO,DIU,DIX,DR,GX7,GX9,IOP,J,ND1,NDA2,POP

 +4        KILL NDA,NURFLAG,NURHOSP,NUROUT,NPWARD,NURQUIT,NURDFLT,NURDICS,NURQ,NURQAR,NURQBYR,NURQDATE,NURQDC,NURQDDT,NURQDDT1,NURQDT,NURQEOA,NURQFREQ,NURQFRQ,NURQKOI,NURQLN,NURQLOC,NURQND,NURQPG,NURQPO,NURQRIND,NURQSC,NURQSITE,NURQSP,NURQSRVC

 +5        KILL NURQSVN,NURQSW,NURQTOI,NURQSURV,NURQWRD1,NURQX,NURSZAP,NURQVER,NURQ,NURSZDA,NURSZLO,NURSZSP,NY,NW,NWRD,NX,QAPA2,QAPXX,QFIN,QSTA,QSUR,QUES,QX,NUREQWRD,SUB,TAB,XT1,XT2,XT3,XT4,XX,X,Y,Z,ZTREQ

 +6       ; *** Kernel variables

 +7        KILL %,%1,%2,%3,%DT,%X,%Y,%ZIS,Z,ZTDESC,ZTDTH,ZTIO,ZTRTN,ZTSAVE,ZTSK

 +8        QUIT