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 |  Local Variables |  All
Print Page as PDF
Routine: FHADR2

Package: Dietetics

Routine: FHADR2


Information

FHADR2 ; HISC/NCA/JH - Type of Service ;2/15/95 16:02

Source Information

Source file <FHADR2.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Dietetics 3 (S1,SET,YR)^FHADR1  HDR2^FHADR3A  HDR^FHADRPT  
VA Fileman 2 (C,NOW)^%DTC  ^DIE  
Kernel 1 KILL^XUSCLEAN  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Dietetics 2 FHADR2  FHADRPT  

Entry Points

Name Comments DBIA/ICR reference
Q1 ; Bedside Tray, Cafeteria, and Dining Room Tray
; Enter/Edit the Type of Service
F1
SET ; Set all three quarters with the Type of Service
S1
EN2 ; Print out the Type of Service
KIL
MSG

External References

Name Field # of Occurrence
C^%DTC Q1+6
NOW^%DTC Q1+2
^DIE F1+8
S1^FHADR1 Q1+7
SET^FHADR1 Q1+7
YR^FHADR1 Q1+3
HDR2^FHADR3A EN2+1
HDR^FHADRPT EN2+1
KILL^XUSCLEAN KIL

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: F1+0
Function Call: WRITE
  • Prompt: !?5,"Another user is editing this entry."
  • Line Location: F1+1
Function Call: WRITE
  • Prompt: !!,$C(7)," *** SITE NOT FOUND IN ^XMB GLOBAL ***"
  • Line Location: MSG+0
Function Call: WRITE
  • Prompt: !!!!!,?13,"TYPE OF SERVICE SUMMARY"
  • Line Location: EN2+2
Function Call: WRITE
  • Prompt: !?65,"Average Daily Meals Served",!?68,"By Type of Service",?93,"% of Workload"
  • Line Location: EN2+4
Function Call: WRITE
  • Prompt: !,?15,"Bedside Tray",?80
  • Line Location: EN2+7
Function Call: WRITE
  • Prompt: $J($S(N1:N1,1:""),6),?100,$S(X2:$J(N1/X2*100,6,0),1:$J("",6))
  • Line Location: EN2+7
Function Call: WRITE
  • Prompt: !?15,"Cafeteria",?80
  • Line Location: EN2+8
Function Call: WRITE
  • Prompt: $J($S(N2:N2,1:""),6),?100,$S(X2:$J(N2/X2*100,6,0),1:$J("",6))
  • Line Location: EN2+8
Function Call: WRITE
  • Prompt: !?15,"Dining Room Tray",?80
  • Line Location: EN2+9
Function Call: WRITE
  • Prompt: $J($S(N3:N3,1:""),6),?100,$S(X2:$J(N3/X2*100,6,0),1:$J("",6))
  • Line Location: EN2+9
Function Call: WRITE
  • Prompt: !,?15,"Total",?80
  • Line Location: EN2+10
Function Call: WRITE
  • Prompt: $J($S(X2:X2,1:""),6)
  • Line Location: EN2+10
Routine Call
  • DIE
  • Line Location:
    • F1+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FH(117.3 - [#117.3] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] Q1+5, F1+5
^FH(117.3 - [#117.3] Q1+7, F1+1, F1+2, F1+3*, F1+4*, F1+6*, F1+8, S1, S1+1*, S1+2*
, EN2+5
^XMB(1 - [#4.3] Q1+4

Label References

Name Line Occurrences
F1 Q1+7
KIL Q1+3, F1+1, MSG
MSG Q1+4
S1 SET+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% Q1+2!
DA F1*, F1+8!
DIC F1!, F1+8!
DIE F1!*, F1+8!
>> DP Q1+2*
DR F1+8*!
>> FHX1 Q1+4*, Q1+5, F1+5
>> FHYR EN2+5
>> LIN EN2+1
N1 EN2+3*, EN2+6*, EN2+7, EN2+11!
N2 EN2+3*, EN2+6*, EN2+8, EN2+11!
N3 EN2+3*, EN2+6*, EN2+9, EN2+11!
>> NOW Q1+2*
>> OLD Q1+6*, Q1+7*, Q1+8*, SET+1, S1, S1+2
>> PRE Q1+3, Q1+6, Q1+7*, Q1+8, F1, F1+1, F1+2, F1+3, F1+4, F1+6
, F1+8, SET+1*, S1+1, S1+2, EN2+5*
>> QR EN2+5*
>> QTR SET+1*, EN2+5*
>> ST Q1+5*, F1+5
>> X Q1+4*, Q1+6, EN2+5*, EN2+6
>> X1 Q1+6*
X2 Q1+6*, EN2+3*, EN2+6*, EN2+7, EN2+8, EN2+9, EN2+10, EN2+11!
X3 EN2+3*, EN2+5*, EN2+11!
>> Z F1+4*, S1+1*
>> ZZ F1+5*, F1+6
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 |  Local Variables |  All