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

Package: Nursing Service

Routine: NURSUT1


Information

NURSUT1 ;HIRMFO/RM,MD-NURS POSITION CONTROL FILE EDIT UTILITY (CONT) ; 5/16/03 5:10pm

Source Information

Source file <NURSUT1.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 4 NOW^%DTC  ^DIC  IX1^DIK  ^DIR  
Nursing Service 3 EN1^NURSAPE0  $$EN1^NURSUT0  ($$LOCSTAT,ENDPG)^NURSUT1  
Kernel 1 ^%ZISC  

Caller Graph

Caller Graph Total: 96

Package Total Caller Graph
Nursing Service 96 NURA5A  NURA5B  NURA5C  NURA6A1  NURA6B1  NURA6B2  NURA6C1  NURA6C2  
NURA6D1  NURA6D2  NURA6E1  NURA6F1  NURA6G  NURA6H1  NURA6I1  NURA6I2  
NURA6J1  NURA6K1  NURA6K2  NURA7A  NURA7B  NURA7C  NURA9A1  NURA9B1  
NURA9B2  NURA9C1  NURA9C2  NURA9D1  NURA9D2  NURA9E1  NURA9F1  NURA9G  
NURA9H1  NURA9I  NURA9J1  NURA9K  NURAAU2  NURADEG  NURAED6  NURAFSD  
NURAGEN  NURAMH9  NURAMU3  NURAR110  NURAR11A  NURAR1A  NURARCR0  NURARCR1  
NURARCRW  NURARMH0  NURARMH1  NURARNCT  NURARPC0  NURARPC2  NURARWL1  NURARWL3  
NURARWL4  NURARWL8  NURARWL9  NURCAS0  NURCCP1  NURCCP4  NURCES0  NURCEVP0  
NURCRL0  NURCROP0  NURCROP1  NURQRPT0  NURSAL0  NURSAMSG  NURSAWL0  NURSCEP  
NURSCEP1  NURSCPLC  NURSCUTL  NURSDD  NURSDFFS  NURSEP31  NURSEP3I  NURSEPC1  
NURSEPCA  NURSEPCP  NURSEPD0  NURSEPD1  NURSEPD2  NURSEPD3  NURSEPIN  NURSEPL1  
NURSEPML  NURSEXP  NURSHIGH  NURSUT1  NURSXECP  ^NURSF(211.4  ^NURSF(211.8  OCCUPANCY/TRANSFERRED DATE  

Entry Points

Name Comments DBIA/ICR reference
EN1 ; ENTRY FROM ASD1 FROM 211.82,.01, ASD2 FROM 211.82,3 AND ASD3 FROM
; 211.82,5 CROSSREFERENCES. THE VARIABLE NUR WILL BE SET TO THE
; FOLLOWING: FIELD NUMBER CALLING XREF^$S(0:KILL LOGIC,1:SET LOGIC)
EN1B ; ENTRY POINT TO KILL "ASD" X-REF AFTER ADDED TO 213.5 DURING ACT/SEP BATCH JOB
EMP
STTUPD ; CHECK IF UPDATE OF STATUS FIELD IN FILE 210 IS NECESSARY
QSU
SETST ; CHANGE STATUS FIELD OF FILE 210
EN4(NACT,NASK) ; ENTRY POINT FOR BEDSIDE TERMINAL PATIENT LOOK-UP
QUIT
DBL ;CHECK FOR ROOM-BED DUPLICATE ENTRIES
CLOSE ; CLOSE DEVICE
ENDPG ; HANDLE EOP
LOCSTAT(NURLOC) ; CHECK FOR ACTIVE EMPLOYEES ON NURS LOCATION
CHKSTAT ; INPUT TRANSFORM FOR STATUS FIELD OF NURS LOCATION FILE
BUDCAT(D0) ; COMPUTE BUDGET CATEGORY FTEE FOR A LOCATION
NODATA ; NO DATA ROUTINE FOR LOCATION REPORTS

External References

Name Field # of Occurrence
NOW^%DTC STTUPD+1
^%ZISC CLOSE+3
^DIC EN4+6
IX1^DIK SETST+3
^DIR ENDPG+2
EN1^NURSAPE0 EMP
$$EN1^NURSUT0 STTUPD+3, STTUPD+4
$$LOCSTAT^NURSUT1 CHKSTAT+1
ENDPG^NURSUT1 CHKSTAT+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,?5,"Room-Bed: ",ROOMBED,!,?6,"Patient: ",PATIENT
  • Line Location: EN4+3
Function Call: WRITE
  • Prompt: !
  • Line Location: EN4+6
Function Call: WRITE
  • Prompt: !
  • Line Location: EN4+8
Function Call: WRITE
  • Prompt: *7,!!,?5,"That ROOM-BED is already associated with ION VALUE "_$P(^NURSC(214.8,IEN,0),U,1)_" "
  • Line Location: DBL+3
Function Call: WRITE
  • Prompt: !
  • Line Location: CLOSE+1
Function Call: WRITE
  • Prompt: $C(7),!!,NURLOC(1)," HAS ACTIVE STAFF ASSIGNED AND CANNOT BE DEACTIVATED: ",!!,"Generate an FTEE report for this location to identify active staff members",!,"who should be transferred prior to deactivation!"
  • Line Location: CHKSTAT+3
Function Call: WRITE
  • Prompt: !!,"THERE IS NO DATA FOR ",NL1
  • Line Location: NODATA+1
Routine Call
  • DIC
  • Line Location:
    • EN4+6
Routine Call
  • DIR
  • Line Location:
    • ENDPG+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls
^NURSF(210 - [#210] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] EN4+3
^DPT("RM" EN4+3
^NURSC(214.8 EN4+1, EN4+2, DBL+2, DBL+3
^NURSF(210 - [#210] STTUPD+2, SETST+1, SETST+2!, SETST+3*
^NURSF(211.4 - [#211.4] CHKSTAT+1
^NURSF(211.8 - [#211.8] EN1+4, EN1+5*!, EN1+6*!, EN1B+2, EN1B+3!, EN1B+4!, LOCSTAT+2, LOCSTAT+3, BUDCAT+2
^NURSF(211.9 - [#211.9] STTUPD+4
^NURSF(214 - [#214] EN4+7
^SC - [#44] CHKSTAT+1

Label References

Name Line Occurrences
EMP EN1+7
ENDPG CLOSE+2
QSU STTUPD+1, STTUPD+2
QUIT EN4+6, EN4+8
SETST STTUPD+3, STTUPD+4
STTUPD EMP

Naked Globals

Name Field # of Occurrence
^(0 EN1+4, EN1B+2, STTUPD+2, STTUPD+4, LOCSTAT+3, BUDCAT+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % STTUPD+1
D0 BUDCAT~, BUDCAT+2
D1 BUDCAT+1~, BUDCAT+2*
DA EN1+4, EN1+5, EN1+6, EN1B+2, EN1B+3, EN1B+4, SETST+1~*, SETST+2, SETST+3, CHKSTAT+1
DA(1 EN1+4, EN1+5, EN1+6, EN1B+2, EN1B+3, EN1B+4
>> DFN EN4+6*, EN4+8*
DIC EN4+6*!, EN4+8!
DIC("A" EN4+5*
DIC("B" EN4+4*
DIC(0 EN4+4*
DIK EN1+3~, EN1B+1~, SETST+3*
DIR ENDPG+2!
DIR(0 ENDPG+2*
DT EN1B+3, EN1B+4, LOCSTAT+3
DTOUT EN4+6, QUIT!
DUOUT EN4+6, QUIT!
IEN EN4+2*, EN4+3*, QUIT!, DBL+2*, DBL+3, DBL+4!
ION EN4+2
IOST ENDPG+1
LOOP QUIT!
NACT EN4~, EN4+7, EN4+9
NASK EN4~
>> NL1 NODATA+1
NPOSDA LOCSTAT+1~, LOCSTAT+2*, LOCSTAT+3
NUR EN1+4, EN1+5, EN1+6, EN1B+2, EN1B+3, EN1B+4, EMP, EMP+1!, STTUPD+4
NUR( EN1+4*, EN1B+2*, STTUPD+1, STTUPD+4*
NUR("NST" STTUPD+3*, STTUPD+4*, SETST+3
NUR("OST" STTUPD+2*, STTUPD+3, STTUPD+4, SETST+2
NUR("PE" EMP*
NUR("SDT" EN1+4*, EN1B+2*, EN1B+3
NUR("VDT" EN1+4*, EN1B+2*, EN1B+4
NUR(0 STTUPD+1*
NUR(200 STTUPD+1*, STTUPD+2, SETST+1
NUR(210 STTUPD+2*
>> NURACTV LOCSTAT+1*, LOCSTAT+3*, LOCSTAT+5
>> NURBEDSW EN4+1*
NURLOC LOCSTAT~, LOCSTAT+2, CHKSTAT+1~*
NURLOC(1 CHKSTAT+1*, CHKSTAT+3
>> NUROUT CLOSE+2, ENDPG+2*
NURPOS LOCSTAT+1~, LOCSTAT+2*, LOCSTAT+3
>> NURSDT STTUPD+1*, STTUPD+3, STTUPD+4
>> NURSEMP STTUPD+1*, STTUPD+3, STTUPD+4
>> NURSTAT STTUPD+4, CHKSTAT+1*, CHKSTAT+2
PATIENT EN4+2*, EN4+3*, EN4+4, QUIT!
ROOMBED EN4+2*, EN4+3, QUIT!
U EN4+2, EN4+3, DBL+3, LOCSTAT+3, BUDCAT+2
X EN1+4, EN1B+2, STTUPD+1*, STTUPD+4, SETST+1~, SETST+2*, SETST+3*, EN4+6*, EN4+9, DBL+1!
, DBL+2, DBL+3!, CHKSTAT+1, CHKSTAT+2, BUDCAT+1*, BUDCAT+2*, BUDCAT+3
>> Y EN4+6, EN4+7*, EN4+8, EN4+9, ENDPG+2
>> ZTQUEUED CLOSE+4
>> ZTREQ CLOSE+4*
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