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

Package: Dietetics

Routine: FHPRW2


Information

FHPRW2 ; HISC/REL - List Service Points ;4/25/93 14:24

Source Information

Source file <FHPRW2.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
Dietetics 1 DTP^FH  

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
Q3
Q31
P1
P2
WRD
BLD ; Build temp files
B1
HDR

External References

Name Field # of Occurrence
DTP^FH HDR

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Type of Service:",?25,$S(TYP="T":"Tray Line",TYP="C":"Cafeteria",1:"")
  • Line Location: Q3+2
Function Call: WRITE
  • Prompt: !,"Short Name:",?25,$P(X,"^",4)
  • Line Location: Q3+3
Function Call: WRITE
  • Prompt: !,"Production Facility:",?25
  • Line Location: Q3+4
Function Call: WRITE
  • Prompt: $P($G(^FH(119.71,Z,0)),"^",1)
  • Condition for execution: Z
  • Line Location: Q3+4
Function Call: WRITE
  • Prompt: !!,"Production Diet %:",?28,"Sun Mon Tue Wed Thu Fri Sat",!
  • Line Location: Q3+6
Function Call: WRITE
  • Prompt: !?3,"Total Sum",?23
  • Line Location: Q3+10
Function Call: WRITE
  • Prompt: $J(S(L),8,1)
  • Line Location: Q3+10
Function Call: WRITE
  • Prompt: !!,"Additional Meals:",?32,"Meal",?40,"Sun Mon Tue Wed Thu Fri Sat"
  • Line Location: Q31+1
Function Call: WRITE
  • Prompt: !
  • Line Location: Q31+3
Function Call: WRITE
  • Prompt: !!?3,$E(NAM,1,26)
  • Line Location: P1+0
Function Call: WRITE
  • Prompt: !?3,$E(NAM,1,18),?23
  • Line Location: P2+0
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),?27,"S E R V I C E P O I N T",?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(116.2 - [#116.2] P1, P2
^FH(119.6 - [#119.6] BLD+2
^FH(119.71 - [#119.71] Q3+4
^FH(119.72 - [#119.72] FHPRW2+2, Q3, Q3+1, Q3+5, Q3+8, Q31, Q31+2
^TMP($J WRD+1, BLD+1!, B1*

Label References

Name Line Occurrences
B1 BLD+2
BLD Q3+1
HDR Q3+1
P1 Q31+2
P2 Q3+8
Q3 FHPRW2+2
Q31 Q3+5
WRD Q3+5

Naked Globals

Name Field # of Occurrence
^( Q3+8, Q31+2, BLD+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DTP HDR*
IOF HDR
IOST HDR
>> K P1+1*, WRD+2*
>> K1 FHPRW2+2*, Q3, Q3+1, Q3+5, Q3+8, Q31, Q31+2, BLD+2
>> L Q3+7*, Q3+9*, Q3+10*, P1+1*, P2+1*
>> LL WRD+2*, BLD+2*, B1
>> N WRD+1*, WRD+2
>> NAM P1*, P2*
>> NM WRD+1*
>> NOW HDR
>> NX Q3+8*, Q31+2*, P1, P2
P WRD+1!
P( WRD+1*, WRD+2
>> PG HDR*
S Q3+7!
S( Q3+7*, Q3+9*, Q3+10, P2+1*
>> TYP Q3+1*, Q3+2, BLD+1
>> X Q3+1*, Q3+3, Q3+4, Q3+8*, Q31+2*, P1+1, P2+1, HDR+1
>> Y BLD+2*, B1, HDR+1*
>> Z Q3+4*, Q3+9*, P1+1*, P2+1*, WRD+2*, BLD+1*, BLD+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All