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

Package: Dietetics

Routine: FHORD91


Information

FHORD91 ; HISC/REL/NCA/RVD - Diet Census Cont. ;1/23/98 16:08

Source Information

Source file <FHORD91.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Dietetics 1 DTP^FH  
VA Fileman 1 DOW^%DTC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Dietetics 1 FHORD9  

Entry Points

Name Comments DBIA/ICR reference
LST
P1
PRO
STR

External References

Name Field # of Occurrence
DOW^%DTC LST+2
DTP^FH LST, LST+1, LST+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $E(IOST,1,2)="C-"
  • Line Location: LST+0
Function Call: WRITE
  • Prompt: !,DTP,?(L1-35\2),"A C T U A L D I E T C E N S U S"
  • Line Location: LST+0
Function Call: WRITE
  • Prompt: !,FHSITENM
  • Line Location: LST+3
Function Call: WRITE
  • Prompt: !,?(L1-$L(Z)\2),Z,!!?(L1-$L(X)\2),X
  • Line Location: LST+4
Function Call: WRITE
  • Prompt: !!?(L1-31\2),"P R O D U C T I O N D I E T S",!!
  • Line Location: LST+5
Function Call: WRITE
  • Prompt: ?FHSP1
  • Line Location: LST+19
Function Call: WRITE
  • Prompt: $P(S(X,K),"^",1)
  • Line Location: LST+20
Function Call: WRITE
  • Prompt: " Tray Cafe Total",!
  • Line Location: LST+21
Function Call: WRITE
  • Prompt: !?3,"N P O",?FHSP2
  • Line Location: LST+23
Function Call: WRITE
  • Prompt: !?3,"P A S S",?FHSP2
  • Line Location: LST+24
Function Call: WRITE
  • Prompt: !?3,"TF Only",?FHSP2
  • Line Location: LST+25
Function Call: WRITE
  • Prompt: !?3,"No Order",?FHSP2
  • Line Location: LST+27
Function Call: WRITE
  • Prompt: !!,"TOTAL MEALS",?FHSP2
  • Line Location: LST+28
Function Call: WRITE
  • Prompt: !
  • Line Location: LST+28
Function Call: WRITE
  • Prompt: !,$E($P($G(^FH(116.2,K,0)),"^",1),1,21),?FHSP2
  • Line Location: PRO+0
Function Call: WRITE
  • Prompt: $S(Z:$J(Z,6),1:$J("",6))," "
  • Line Location: P1+1
Function Call: WRITE
  • Prompt: $J(N("T"),6),$J(N("C"),6),$J(N("T")+N("C"),7)
  • Line Location: P1+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(116.2 - [#116.2] LST+22, PRO
^FH(119.71 - [#119.71] LST+1
^FH(119.72 - [#119.72] STR

Label References

Name Line Occurrences
P1 LST+23, LST+24, LST+25, LST+27, LST+28
PRO LST+22

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> D( STR
>> DOW LST+2*
>> DTP LST*, LST+1*, LST+2, LST+3*
>> FHCNTX LST+6*, LST+8, LST+9, LST+10, LST+11, LST+12, LST+14, LST+15, LST+16, LST+17
, LST+18
>> FHP LST+1
>> FHSITENM LST+3
>> FHSP1 LST+7*, LST+8*, LST+9*, LST+10*, LST+11*, LST+12*, LST+19
>> FHSP2 LST+13*, LST+14*, LST+15*, LST+16*, LST+17*, LST+18*, LST+23, LST+24, LST+25, LST+27
, LST+28, PRO
IOF LST
IOST LST
>> K STR*, LST+20*, LST+22*, LST+23*, LST+24*, LST+25*, LST+27*, LST+28*, PRO, P1+1
>> K1 P1+1*
>> L1 FHORD91+3*, STR*, STR+1*, LST, LST+4, LST+5
>> N( P1+1*
>> N("C" P1*, P1+2
>> N("D" P1*, P1+2
>> N("G" P1*
>> N("T" P1*, P1+2*
>> N1 STR*
>> N2 STR*
>> N3 STR*
>> NOW LST
>> P( LST+22, LST+23!, LST+24!, LST+25!, LST+26*, LST+27!, P1+1
>> P(0 STR*, LST+26, LST+28!, P1+1*
>> P1 LST+22*
S FHORD91+3!
S( STR*, LST+6, LST+20, P1+1
>> TIM LST+1, LST+2, LST+3
>> TYP P1+1*
>> X STR*, LST+2*, LST+4, LST+6*, LST+20*, LST+26*, P1+1*
>> Y LST+2
>> Z LST+1*, LST+4, P1+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All