NURSKIL1.m

NURSKIL1 ;HIRMFO/MD-CLEAN-UP ;1/15/96

 ;;4.0;NURSING SERVICE;**2,3**;Apr 25, 1997

 ;

 K Q,SW,TXT,NURCORD,NURSUP,PCNT,PHRS,PRSECORD,PRSESUP,PRSETRN,RCNT,RHRS,SCNT,COSTDA,DEFAULT,NURSDONE,NURSTRT,OPT,YRSW,YY,ZX,NURDONE,NURACTV,NURFAC,NURPLSW,NURPOS,PD1,NURDT,NURMDSW,NURPLSCR,NURPROG,NURSFAC,NURSPROG,NP,NPDA,NSW1,NURTYPE

 K NUR2114D,NURPFAC,NURPPROD,NURS2,NURSZFAC,SC44DA,NLOCN,NURNEN,NURSCATY,NURSPEC,PIECE,%,%1,%2,%3,%DT,%TG,%W,%X,%XD1,%H,%Y,%Y1,%I,%ZIS

 K XMDUZ,XMSUB,XMTEXT,XMY

 K XQA,XQAMSG,X,Y,Z

 K ZTDESC,ZTDTH,ZTIO,ZTRTN,ZTSAVE,ZTSK

 Q

--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---NURSKIL1   552     printed  Feb 18, 2025@23:48:40                                                                                                                                                                                                     Page 2

NURSKIL1  ;HIRMFO/MD-CLEAN-UP ;1/15/96

 +1       ;;4.0;NURSING SERVICE;**2,3**;Apr 25, 1997

 +2       ;

 +3        KILL Q,SW,TXT,NURCORD,NURSUP,PCNT,PHRS,PRSECORD,PRSESUP,PRSETRN,RCNT,RHRS,SCNT,COSTDA,DEFAULT,NURSDONE,NURSTRT,OPT,YRSW,YY,ZX,NURDONE,NURACTV,NURFAC,NURPLSW,NURPOS,PD1,NURDT,NURMDSW,NURPLSCR,NURPROG,NURSFAC,NURSPROG,NP,NPDA,NSW1,NURTYPE

 +4        KILL NUR2114D,NURPFAC,NURPPROD,NURS2,NURSZFAC,SC44DA,NLOCN,NURNEN,NURSCATY,NURSPEC,PIECE,%,%1,%2,%3,%DT,%TG,%W,%X,%XD1,%H,%Y,%Y1,%I,%ZIS

 +5        KILL XMDUZ,XMSUB,XMTEXT,XMY

 +6        KILL XQA,XQAMSG,X,Y,Z

 +7        KILL ZTDESC,ZTDTH,ZTIO,ZTRTN,ZTSAVE,ZTSK

 +8        QUIT