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: NURACEW0

Package: Nursing Service

Routine: NURACEW0


Information

NURACEW0 ;HIRMFO/RM,MD,FT-DRIVER CHECK FOR PATIENTS NOT CLASSIFIED BY WARD ;8/14/96 09:59

Source Information

Source file <NURACEW0.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Nursing Service 5 (EN1,QUIT2,SORTTABL)^NURACEW1  ^NURSAPCH  EN6^NURSAUTL  (EN2,EN6)^NURSCUTL  EN7^NURSUT0  
VA Fileman 3 ^DIC  WAIT^DICD  D^DIQ  
Kernel 1 ^%ZISC  
Registration 1 (1,KVAR)^VADPT  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Nursing Service 2 NURAPC-UNCWRD  NURAPP-UNCLOC  

Entry Points

Name Comments DBIA/ICR reference
PR ;
Q
ENDIT ; EDIT PATIENTS NOT CLASSIFIED BY WARD
HEADER ; PRINT REPORT HEADER
EDIT ; SELECT WARD TO SEARCH
SORT ; CHECK TO SEE IF EACH PATIENT ON WARD IS VALID
BGNVIEW ;
CHKCONT ;
QUEUE ; QUEUE REPORT TO TASKMAN
EN1 ; ENTER ROUTINE FROM MENU OPTION NURAPP-UNCLOC
EN2 ; ENTRY FROM OPTION NURAPC-UNCWRD
QUIT ;KILL LOCAL VARIABLES
PRINT ; PRINT REPORT FOR PTS. NOT CLASSIFIED BY WARD
FILLTABL ; ADD PATIENT TO LIST OF PATIENTS ON WARD IF VALID

External References

Name Field # of Occurrence
^%ZISC ENDIT+1
^DIC EDIT+2
WAIT^DICD EN2+4
D^DIQ CHKCONT+2
EN1^NURACEW1 ENDIT+1
QUIT2^NURACEW1 Q+1
SORTTABL^NURACEW1 PRINT+3
^NURSAPCH CHKCONT+3
EN6^NURSAUTL EDIT+6, HEADER+3
EN2^NURSCUTL BGNVIEW+4
EN6^NURSCUTL BGNVIEW+4
EN7^NURSUT0 EN1+4
1^VADPT BGNVIEW+3
KVAR^VADPT QUIT+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+4
Function Call: WRITE
  • Prompt: !
  • Line Location: EDIT+2
Function Call: WRITE
  • Prompt: !,*7,"**** NO PATIENTS REGISTERED ON UNIT ",NPWARD," ****"
  • Line Location: EDIT+6
Function Call: WRITE
  • Prompt: !!,"ALL PATIENTS ON THIS UNIT ARE CLASSIFIED",!!
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !,ROOMTABL(TCNT),?17,$E($P(NURSTABL(TCNT),"^",2),1,20)
  • Line Location: CHKCONT+1
Function Call: WRITE
  • Prompt: ?45,Y
  • Line Location: CHKCONT+2
Function Call: WRITE
  • Prompt: ?70,NURSX
  • Line Location: CHKCONT+3
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: HEADER+1
Function Call: WRITE
  • Prompt: @IOF,$E(DT,4,5),"/",$E(DT,6,7),"/",$E(DT,2,3),?17,"CURRENT UNCLASSIFIED PATIENT REPORT FOR LOCATION "
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: NPWARD,?73,"PAGE: ",PAGE
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !!,"ROOM-BED",?17,"PATIENT",?45,"LAST CLASSIFIED",?68,"ABSENCE",!
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: NURSXX
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+6
Routine Call
  • DIC
  • Line Location:
    • EDIT+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^NURSF(211.4 - [#211.4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(213.9 - [#213.9] EN1+1, EN2+1
^NURSA(214.6 - [#214.6] BGNVIEW+6
^NURSF(213.3 - [#213.3] BGNVIEW+1
^NURSF(214 - [#214] EDIT+6, SORT+1, BGNVIEW+1

Label References

Name Line Occurrences
BGNVIEW SORT+1
CHKCONT PRINT+3
EDIT EN1+3, EN2+3
ENDIT SORT+2
FILLTABL BGNVIEW+5
HEADER PRINT+1, CHKCONT+4
PRINT ENDIT+1
Q PRINT+2
QUEUE EN1+4
QUIT EN1+3, EN1+4, EN2+3, ENDIT+2
SORT PR+1, EN2+4

Naked Globals

Name Field # of Occurrence
^(0 BGNVIEW+1, BGNVIEW+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CHKVAR QUIT+1!
DATETABL QUIT+1!
DATETABL( CHKCONT+2, FILLTABL+1*
DATEX BGNVIEW+5*, BGNVIEW+6*, FILLTABL+1, QUIT+1!
DFN CHKCONT+3*, SORT+1*, BGNVIEW+1, FILLTABL+1, QUIT+1!
DIC EDIT+1*, EDIT+2!, QUIT+1!
DIC("A" EDIT+1*
DIC("S" EDIT+1*
DIC(0 EDIT+1*
DT HEADER+3, FILLTABL+1
DTIME Q, HEADER+1
G QUIT+1!
IO PRINT+1, Q
IOF HEADER+3
IOSL CHKCONT+4
IOST Q, HEADER+1
LINE QUIT+1!
NBED BGNVIEW+1*, QUIT+1!
NBED(0 BGNVIEW+1*, BGNVIEW+2
NPWARD EDIT+6*, HEADER+3*, QUIT+1!
NURQUEUE EN1+2*, EN2+2*, Q, HEADER+1, QUIT+1!
NURQUIT PR+1*, PRINT+3, Q, HEADER+1*, QUIT+1!
NURSADM QUIT+1!
NURSCLAS BGNVIEW+5, BGNVIEW+6, QUIT+1!
NURSCLAS("CL" BGNVIEW+4*
NURSCNT FILLTABL+1*, QUIT+1!
NURSDTSW CHKCONT+2, QUIT+1!
NURSTABL EDIT+7!
NURSTABL( PRINT+3, CHKCONT+1, CHKCONT+3, FILLTABL+1*
NURSTABL(1 PRINT+2
NURSW1 PR+1*, HEADER+1, HEADER+2*, QUIT+1!
NURSWHO QUIT+1!
NURSX CHKCONT+3, QUIT+1!
NURSXX HEADER+5*, QUIT+1!
NURSY QUIT+1!
NURSZ QUIT+1!
NWRDVAR BGNVIEW+5*, BGNVIEW+6*, FILLTABL+1, QUIT+1!
OUTSW EN1+2*, EN1+3, EN2+2*, EN2+3, EDIT+3*, EDIT+6*, QUIT+1!
PAGE PRINT+1*, HEADER+2*, HEADER+3, QUIT+1!
>> POP EN1+4
PRTSW EN1+2*, EN2+2*, ENDIT+1, QUIT+1!
ROOMTABL QUIT+1!
ROOMTABL( CHKCONT+1, FILLTABL+1*
TCNT EDIT+7*, PRINT+3*, CHKCONT+1, CHKCONT+2, CHKCONT+3, FILLTABL+1*, QUIT+1!
VA QUIT+1!
>> VADM(1 FILLTABL+1
>> VAIN(5 BGNVIEW+3
VAROOT QUIT+1!
WARDNAM EDIT+4*, EDIT+6, HEADER+3, SORT+1, FILLTABL+1, QUIT+1!
>> X EDIT+3, Q*, HEADER+1*
XRMBD BGNVIEW+3*, FILLTABL+1, QUIT+1!
>> Y EDIT+3, EDIT+4, CHKCONT+2*
>> ZTRTN QUEUE+1*
ZTSK EN1+4, QUIT+1!
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