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: FHPRW3

Package: Dietetics

Routine: FHPRW3


Information

FHPRW3 ; HISC/REL - List Communication Offices ;4/25/93 14:23

Source Information

Source file <FHPRW3.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Dietetics 2 DTP^FH  MIP^FHSYSP  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Dietetics 1 FHPRW1  

Entry Points

Name Comments DBIA/ICR reference
Q4
WRD
BLD ; Build temp files
B1
HDR

External References

Name Field # of Occurrence
DTP^FH HDR
MIP^FHSYSP Q4+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Provide Bagged Meals:",?25
  • Line Location: Q4+3
Function Call: WRITE
  • Prompt: $S(Z="Y":"YES",1:"NO")
  • Line Location: Q4+3
Function Call: WRITE
  • Prompt: !!?44,"Breakfast Noon Evening",!
  • Line Location: Q4+4
Function Call: WRITE
  • Prompt: !,?5,"Meal Time:"
  • Line Location: Q4+5
Function Call: WRITE
  • Prompt: ?46,$J($P(X2,"^",7),6),?57,$J($P(X2,"^",8),6),?67,$J($P(X2,"^",9),6)
  • Line Location: Q4+5
Function Call: WRITE
  • Prompt: !!,?5,"Early Time 1:"
  • Line Location: Q4+6
Function Call: WRITE
  • Prompt: ?46,$J($P(X1,"^",1),6),?57,$J($P(X1,"^",7),6),?67,$J($P(X1,"^",13),6)
  • Line Location: Q4+6
Function Call: WRITE
  • Prompt: !,?5,"Early Time 2:"
  • Line Location: Q4+7
Function Call: WRITE
  • Prompt: ?46,$J($P(X1,"^",2),6),?57,$J($P(X1,"^",8),6),?67,$J($P(X1,"^",14),6)
  • Line Location: Q4+7
Function Call: WRITE
  • Prompt: !,?5,"Early Time 3:"
  • Line Location: Q4+8
Function Call: WRITE
  • Prompt: ?46,$J($P(X1,"^",3),6),?57,$J($P(X1,"^",9),6),?67,$J($P(X1,"^",15),6)
  • Line Location: Q4+8
Function Call: WRITE
  • Prompt: !!,?5,"Late Time 1:"
  • Line Location: Q4+9
Function Call: WRITE
  • Prompt: ?46,$J($P(X1,"^",4),6),?57,$J($P(X1,"^",10),6),?67,$J($P(X1,"^",16),6)
  • Line Location: Q4+9
Function Call: WRITE
  • Prompt: !,?5,"Late Time 2:"
  • Line Location: Q4+10
Function Call: WRITE
  • Prompt: ?46,$J($P(X1,"^",5),6),?57,$J($P(X1,"^",11),6),?67,$J($P(X1,"^",17),6)
  • Line Location: Q4+10
Function Call: WRITE
  • Prompt: !,?5,"Late Time 3:"
  • Line Location: Q4+11
Function Call: WRITE
  • Prompt: ?46,$J($P(X1,"^",6),6),?57,$J($P(X1,"^",12),6),?67,$J($P(X1,"^",18),6)
  • Line Location: Q4+11
Function Call: WRITE
  • Prompt: !!,?5,"Late Alarm Begin:"
  • Line Location: Q4+12
Function Call: WRITE
  • Prompt: ?46,$J($P(X2,"^",1),6),?57,$J($P(X2,"^",3),6),?67,$J($P(X2,"^",5),6)
  • Line Location: Q4+12
Function Call: WRITE
  • Prompt: !,?5,"Late Alarm End:"
  • Line Location: Q4+13
Function Call: WRITE
  • Prompt: ?46,$J($P(X2,"^",2),6),?57,$J($P(X2,"^",4),6),?67,$J($P(X2,"^",6),6)
  • Line Location: Q4+13
Function Call: WRITE
  • Prompt: !
  • Line Location: Q4+14
Function Call: WRITE
  • Prompt: !!,"Associated Dietetic Wards:",!
  • Line Location: WRD+0
Function Call: WRITE
  • Prompt: !?5,P(LL)
  • Line Location: WRD+2
Function Call: WRITE
  • Prompt: ?45,P(K)
  • Line Location: WRD+2
Function Call: WRITE
  • Prompt: !,$E(DTP,1,9),?20,"C O M M U N I C A T I O N O F F I C E",?73,"Page ",PG
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !!?(78-$L(Y)\2),Y
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,"-------------------------------------------------------------------------------",!
  • Line Location: HDR+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(119.6 - [#119.6] BLD+2
^FH(119.73 - [#119.73] FHPRW3+2, Q4Q4+1
^TMP($J WRD+1, BLD+1!, B1*

Label References

Name Line Occurrences
B1 BLD+2
BLD Q4
HDR Q4
Q4 FHPRW3+2
WRD Q4+14

Naked Globals

Name Field # of Occurrence
^( BLD+2
^(2 Q4+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DTP HDR*
IOF HDR
IOST HDR
>> K WRD+2*
>> K1 FHPRW3+2*, Q4Q4+1, BLD+2
>> LL Q4+2*, WRD+2*, BLD+2*, B1
>> N WRD+1*, WRD+2
>> NM WRD+1*
>> NOW HDR
P WRD+1!
P( WRD+1*, WRD+2
>> PG HDR*
>> X Q4*, HDR+1
>> X1 Q4+1*, Q4+6, Q4+7, Q4+8, Q4+9, Q4+10, Q4+11
>> X2 Q4+1*, Q4+2*, Q4+3, Q4+5, Q4+12, Q4+13
>> Y Q4+2*, BLD+2*, B1HDR+1*
>> Z Q4+3*, WRD+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All