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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: NURA7C

Package: Nursing Service

Routine: NURA7C


Information

NURA7C ;HIRMFO/MD,FT-INDIVIDUAL PHONE NUMBER ;8/8/96 13:50

Source Information

Source file <NURA7C.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Nursing Service 5 ^NURAKILL  EN3^NURSAGP1  EN1^NURSAUTL  (EN2,EN7)^NURSUT0  (CLOSE,ENDPG)^NURSUT1  
VA Fileman 2 ^%DT  D^DIQ  
Kernel 1 $$REPEAT^XLFSTR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Nursing Service 1 NURAPR-PHONE-IND  

Entry Points

Name Comments DBIA/ICR reference
WRITE
START ;
HEADER
QUIT

External References

Name Field # of Occurrence
^%DT HEADER+2
D^DIQ HEADER+2
^NURAKILL QUIT
EN3^NURSAGP1 NURA7C+6
EN1^NURSAUTL NURA7C+4
EN2^NURSUT0 WRITE+3
EN7^NURSUT0 NURA7C+7
CLOSE^NURSUT1 QUIT
ENDPG^NURSUT1 HEADER
$$REPEAT^XLFSTR HEADER+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: NURA7C+3
Function Call: WRITE
  • Prompt: !
  • Line Location: NURA7C+7
Function Call: WRITE
  • Prompt: ?36,NPSPOS
  • Line Location: WRITE+3
Function Call: WRITE
  • Prompt: ?51,$P(^(0),"^",1)
  • Condition for execution: $D(^NURSF(210,N1,2,NS2,0))
  • Line Location: WRITE+4
Function Call: WRITE
  • Prompt: ?66,$S(NO="S":"SELF",NO="R":"RELATIVE",NO="N":"NEIGHBOR",NO="O":"OTHER",1:"")
  • Line Location: WRITE+4
Function Call: WRITE
  • Prompt: !
  • Line Location: WRITE+4
Function Call: WRITE
  • Prompt: !!,"TELEPHONE NUMBERS OF NURSING EMPLOYEES"
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: ?44,Y,?59,"PAGE: ",NURPAGE
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: !!,"EMPLOYEE",?36,"SERVICE",?51,"TELEPHONE",?66,"OWNER OF"
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !,"NAME",?36,"POSITION",?51,"NUMBER",?66,"PHONE NO."
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("-",80),!
  • Line Location: HEADER+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(213.9 - [#213.9] NURA7C+2
^NURSF(210 - [#210] WRITE+4
^TMP($J START+1!, QUIT!
^VA(200 - [#200] WRITE+2

Label References

Name Line Occurrences
HEADER START+2, WRITE
QUIT NURA7C+4, NURA7C+6, NURA7C+7
WRITE START+2

Naked Globals

Name Field # of Occurrence
^(0 WRITE+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DIC("S" NURA7C+5*
IO START+2
IOF HEADER+1
IOSL WRITE
IOST HEADER, HEADER+1
>> N1 WRITE+4
>> N2 WRITE+2
>> NO WRITE+4*
>> NPSPOS WRITE+3
>> NS2 WRITE+4*
>> NUROUT NURA7C+3*, NURA7C+4, NURA7C+6, HEADER
>> NURPAGE START+2*, HEADER+1*, HEADER+2
>> NURQUEUE NURA7C+3*, HEADER
>> NURQUIT NURA7C+3*, WRITE, HEADER*
>> NURSW1 START+2*, WRITE+1*, HEADER
>> POP NURA7C+7
>> X HEADER+2*
>> Y HEADER+2
>> ZTDESC NURA7C+7*
>> ZTRTN NURA7C+7*
>> ZTSK NURA7C+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All