Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

Entry Points

Name Comments DBIA/ICR reference
START ;
QUIT
WRITE
HEADER

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
Info |  Source |  Entry Points |  Interaction Calls