Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: NURAAU2

Package: Nursing Service

Routine: NURAAU2


Information

NURAAU2 ;HIRMFO/RM/MD-BACKUP IF NURAAU0 NOT RUN...AMIS 1106a ;6/5/97

Source Information

Source file <NURAAU2.m>

Call Graph

Call Graph Total: 17

Package Total Call Graph
Nursing Service 9 (EN1,FINALLY)^NURAAU0  ($$ABSENCE,$$REASON)^NURAAU2  (EN8,EN9)^NURSAGSP  ^NURSAPCH  EN6^NURSAUTL  EN7^NURSUT0  ENDPG^NURSUT1  $$CNTR^NURSUT2  
$$EN12^NURSUT3  
Kernel 4 ^%ZIS  ^%ZISC  ^%ZTLOAD  $$REPEAT^XLFSTR  
VA Fileman 3 ^%DT  ^DIC  D^DIQ  
Registration 1 OERR^VADPT  

Caller Graph

Caller Graph Total: 8

Package Total Caller Graph
Nursing Service 8 NURAAM-ACUMAN  NURAAM-MD-UNC  NURAAM-MD-UNCBAT  NURAAM-UNC  NURAAM-UNCBAT  NURAAU1  NURAAU2  NURAMB1  

Entry Points

Name Comments DBIA/ICR reference
DOMRECNT ;
SORT ;
HEADER ;HEAD ROUTINE
START2
ABSENCE(NURPARM) ; PATIENT ABSENCE CODES
HSKEEP ;EXPLAIN WHAT TO DO WITH THIS ROUTINE
START1
KILLVAR ;KILL LOCAL VARIABLES
EN2 ; PRINT PATIENT NOT CLASSIFIED REPORT FROM OPTIONS NURAAM-UNC/NURAAM-MD-UNC
START
HSKEEP1 ;SET ACUITY RUN SWITCH, AND RUN NURAAU0
EN3 ; ENTRY FROM OPTION NURAAM-UNCBAT QUEUED AMIS UNCLASSIFIED REPORT AND
; OPTION NURAAM-MD-UNCBAT QUEUED MIDNIGHT ACUITY UNCLASSIFIED REPORT
KILL ;
REASON(NURPARM) ; REASON FOR PATIENT NOT BEING INCLUDED IN AMIS COUNT
PRINT ;
HEADER1

External References

Name Field # of Occurrence
^%DT EN2+1, EN3+2
^%ZIS HSKEEP+2
^%ZISC KILL+2
^%ZTLOAD EN3+6
^DIC EN2+2, EN3+3
D^DIQ EN2+3, EN3+4, PRINT+7, PRINT+9
EN1^NURAAU0 START
FINALLY^NURAAU0 DOMRECNT+6
$$ABSENCE^NURAAU2 PRINT+7
$$REASON^NURAAU2 PRINT+7
EN8^NURSAGSP EN2+3
EN9^NURSAGSP EN2+3, EN3+4
^NURSAPCH DOMRECNT+1
EN6^NURSAUTL SORT+3
EN7^NURSUT0 EN2+4, EN3+7
ENDPG^NURSUT1 HEADER+1
$$CNTR^NURSUT2 HEADER+3
$$EN12^NURSUT3 SORT+2
OERR^VADPT PRINT+6
$$REPEAT^XLFSTR HSKEEP+3, HSKEEP+15, HEADER+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("*",80)
  • Line Location: HSKEEP+3
Function Call: WRITE
  • Prompt: !,$C(7),"*****",?$X+70,"*****"
  • Line Location: HSKEEP+4
Function Call: WRITE
  • Prompt: !,"*****",?$X+19,"** WARNING -- SPECIAL RUNNING **",?$X+19,"*****"
  • Line Location: HSKEEP+5
Function Call: WRITE
  • Prompt: !,$C(7),"*****",?$X+70,"*****"
  • Line Location: HSKEEP+6
Function Call: WRITE
  • Prompt: !,"*****",?$X+11,"THE PURPOSE OF THIS OPTION IS TO UPDATE THE NURSING",?$X+8,"*****"
  • Line Location: HSKEEP+7
Function Call: WRITE
  • Prompt: !,"*****",?$X+11,"PACKAGE ACUITY-EMPLOYEE ACTIVATION/SEPARATION COUNTS ",?$X+6,"*****"
  • Line Location: HSKEEP+8
Function Call: WRITE
  • Prompt: !,"*****",?$X+11,"THIS ROUTINE SHOULD BE RUN IF TASKMAN IS INOPERABLE",?$X+8,"*****"
  • Line Location: HSKEEP+9
Function Call: WRITE
  • Prompt: !,$C(7),"*****",?$X+70,"*****"
  • Line Location: HSKEEP+10
Function Call: WRITE
  • Prompt: !,"*****",?$X+11,"CONTACT THE NURSING ADP COORDINATOR TO CONFIRM THAT THE",?$X+4,"*****"
  • Line Location: HSKEEP+11
Function Call: WRITE
  • Prompt: !,"*****",?$X+11,"ACUITY (AMIS 1106) UPDATE WILL BE RUN TONIGHT VIA",?$X+10,"*****"
  • Line Location: HSKEEP+12
Function Call: WRITE
  • Prompt: !,"*****",?$X+11,"TASKMAN.",?$X+51,"*****"
  • Line Location: HSKEEP+13
Function Call: WRITE
  • Prompt: !,$C(7),"*****",?$X+70,"*****"
  • Line Location: HSKEEP+14
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("*",80)
  • Line Location: HSKEEP+15
Function Call: WRITE
  • Prompt: @IOF,!!,"... BACKUP/NURSING ACUITY - EMPLOYEE SEP/ACT RUN"
  • Line Location: START+0
Function Call: WRITE
  • Prompt: !
  • Line Location: EN2+3
Function Call: WRITE
  • Prompt: !
  • Line Location: EN2+4
Function Call: WRITE
  • Prompt: !
  • Line Location: EN3+7
Function Call: WRITE
  • Prompt: !!,"THERE IS NO DATA FOR THIS REPORT"
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: ?1,$E(VADM(1),1,20)_" -"_$P($G(VADM(2)),"-",3)
  • Line Location: PRINT+6
Function Call: WRITE
  • Prompt: ?31,$$REASON^NURAAU2(Y)
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: ?53,$$ABSENCE^NURAAU2(Z)
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: ?53,$$ABSENCE^NURAAU2(Z)
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: ?62,$E(Y,1,18)
  • Line Location: PRINT+9
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !,?$$CNTR^NURSUT2(NURFAC),$S($G(NURFAC)=" BLANK":"NO FACILITY",1:$G(NURFAC))
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !,$E(DT,4,5)_"/"_$E(DT,6,7)_"/"_$E(DT,2,3),?14,"UNCLASSIFIED "_$S(NURTYPE=0:"AMIS 1106 ",1:"MIDNIGHT ")_"PATIENTS FOR "_NURSDATE,?71,"PAGE: ",NURPAGE
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !!,?65,"LAST",!,"PATIENT NAME -SSN LAST FOUR",?33,"ERROR",?51,"ABSENCE",?62,"CLASSIFIED",!,$$REPEAT^XLFSTR("-",80)
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: !!,?10,"UNIT: ",NPWARD,!
  • Line Location: HEADER1+0
Routine Call
  • DIC
  • Line Location:
    • EN2+2
    • EN3+3
Routine Call
  • %ZIS
  • Line Location:
    • HSKEEP+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^NURSA(213.5 - [#213.5] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(213.9 - [#213.9] HSKEEP+1
^NURSA(213.5 - [#213.5] SORT+1, SORT+2, PRINT+7, PRINT+9
^NURSF(211.4 - [#211.4] DOMRECNT+6
^TMP($J START2!, KILL+1!, START1!, SORT+5*, PRINT+2, PRINT+3, PRINT+4

Label References

Name Line Occurrences
HEADER PRINT+2, PRINT+3, PRINT+5
HEADER1 PRINT+3, PRINT+5
HSKEEP1 HSKEEP1+3
KILL EN2+1, EN2+2, EN2+3, EN2+4, EN3+2, EN3+3, EN3+7, START1+2
KILLVAR HSKEEP1+2
PRINT START2, START1
SORT START2, START1

Naked Globals

Name Field # of Occurrence
^(0 PRINT+7, PRINT+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT EN2+1*!, KILL+1!, EN3+2*
%DT("A" EN2+1*
%DT("B" EN2+1*
%DT(0 EN2+1*
BEDSECT DOMRECNT+2*, DOMRECNT+3*, KILL+1!
CLASS DOMRECNT+2*, DOMRECNT+5, KILL+1!
D KILLVAR+1!
D1 KILL+1!, SORT+1*, SORT+2, SORT+5, PRINT+4*, PRINT+7, PRINT+9
DA EN2+3*, KILL+1!, EN3+4*, SORT+1, SORT+2, SORT+5, PRINT+4*, PRINT+7, PRINT+9
DATENODE KILLVAR+1!, KILL+1!
DFN KILL+1!, SORT+2*, SORT+5, PRINT+3*, PRINT+4
DI KILLVAR+1!
DIC EN2+2*!, KILL+1!, EN3+3*!
DIC("S" EN2+2*, EN3+3*
DIC(0 EN2+2*, EN2+3*, EN3+3*
DO KILLVAR+1!
DQ KILLVAR+1!
DT EN2+1, HEADER+4
DTIME HSKEEP1+1
>> I DOMRECNT+4*
IO START, PRINT+1
IOF START, HEADER+3
ION HSKEEP+2
IOP HSKEEP+2*!
IOSL PRINT+5
IOST SORT+5, HEADER+1
LASTRUN KILLVAR+1!
NBEDSECT DOMRECNT+2, KILL+1!
>> NCLASS( DOMRECNT+4*, DOMRECNT+5*
>> NCWARD DOMRECNT+2*, DOMRECNT+3, DOMRECNT+4*, DOMRECNT+6
NDAT KILLVAR+1!
NDATA KILL+1!, SORT+2*
NDATE KILLVAR+1!
NPWARD KILL+1!, SORT+2*, SORT+3, SORT+5, PRINT+3*, PRINT+4, HEADER1
NURABSNC KILL+1!, ABSENCE+1*, ABSENCE+2
NURASTER KILLVAR+1!
NUREASON KILL+1!, REASON+1*, REASON+2*, REASON+3
NURFAC KILL+1!, EN3+4*, SORT+4, PRINT+2*, PRINT+3*, PRINT+4, HEADER+3
NURFAC(1 SORT+4
NURFAC(2 SORT+2*, SORT+4, SORT+5
NURI KILLVAR+1!
NURMDSW EN2+3*, KILL+1!, EN3+4*, SORT+4, HEADER+3
>> NUROUT EN2+3*, EN3+4*, PRINT+3, PRINT+4, PRINT+5, HEADER+1
NURPAGE EN2+3*, KILL+1!, EN3+4*, HEADER+2*, HEADER+4
NURPARM KILL+1!, REASON~, REASON+2, ABSENCE~, ABSENCE+1
NURPLSW KILL+1!, EN3+4*
NURQUEUE KILLVAR+1!, KILL+1!
NURSDATE EN2+3*, KILL+1!, EN3+4*, HEADER+4
NURSI KILLVAR+1!
NURSJ HSKEEP+3*, HSKEEP+4*, HSKEEP+14*, HSKEEP+15*, KILLVAR+1!
>> NURSW1 EN2+3*, EN3+4*, HEADER+1, HEADER+6*
>> NURSX DOMRECNT+1
NURSZAP KILL+1!
NURSZDA KILL+1!
NURSZSP KILL+1!
NURTYPE EN2+1, KILL+1!, EN3+5, HEADER+4
>> NWARD DOMRECNT+4
NX KILLVAR+1!
>> POP EN2+4, EN3+7
U HSKEEP1+2, DOMRECNT+6, EN2+3, EN3+4, SORT+2, PRINT+7, PRINT+9
VA KILL+1!
VADM KILL+1!
VADM(1 PRINT+6
VADM(2 PRINT+6
VAERR KILL+1!
VAIN KILL+1!
>> WARD DOMRECNT+2
X HSKEEP+1*, HSKEEP1+1*, HSKEEP1+2, HSKEEP1+3, KILLVAR+1!, EN2+2*, EN3+2*, EN3+3*, PRINT+9*
XXX KILL+1!
Y EN2+1, EN2+2, EN2+3*, KILL+1!, EN3+2, EN3+3, EN3+4*, PRINT+7*, PRINT+9
YSTRDAY KILLVAR+1!
>> Z PRINT+7*, PRINT+9*
ZSTAVE KILL+1!
>> ZTDESC EN3+5*
>> ZTQUEUED EN3+6
ZTRTN EN2+4*, KILL+1!, EN3+5*
ZTSAVE KILL+1!
ZTSAVE("DA" EN3+6*
ZTSAVE("N*" EN3+6*
>> ZTSK EN2+4, EN3+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All