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

Package: Nursing Service

Routine: NURSAWCK


Information

NURSAWCK ;HIRMFO/RM-CHECK SO EVERY MAS WARD HAS A NURSING LOCATION ;AUGUST 1986

Source Information

Source file <NURSAWCK.m>

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Nursing Service 2 NURSCPL  NURSCPLU  

Entry Points

Name Comments DBIA/ICR reference
EN1 ; CALLED BY ROUTINE NURSCPL & NURSCPLU, RETURNS NURSBAD (1 if MAS Ward has no
; Nursing equivalent, 0 if it does.), and BADWARD("MAS Ward") for
; the ward in question.
BADWARD ; ERROR MESSAGE IF THERE IS AN INVALID WARD

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!!!,"The following MAS Wards do not have corresponding NURSING Locations: "
  • Line Location: BADWARD+1
Function Call: WRITE
  • Prompt: !,?20,NURSWR42
  • Line Location: BADWARD+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(42 - [#42] EN1+3
^NURSF(211.4 - [#211.4] EN1+3

Naked Globals

Name Field # of Occurrence
^("I" EN1+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BADWARD( EN1+4*, BADWARD+2
>> NURSBAD EN1+3*, EN1+4
NURSWR42 BADWARD+2*, BADWARD+3!
NURSX EN1+3*, EN1+4!
NURSZ BADWARD+2*, BADWARD+3!
NURSZLOC EN1+3*, EN1+4!
>> X EN1+3, EN1+4
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All