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

Package: Dietetics

Routine: FHPRO6


Information

FHPRO6 ; HISC/REL - Storeroom Requisition ;4/25/93 15:59

Source Information

Source file <FHPRO6.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
Dietetics 1 EN2^FHREC1  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Dietetics 2 FHPRO2  FHPRO5  

Entry Points

Name Comments DBIA/ICR reference
Q1 ; sets Storeroom scratch global for AFP
P3
AS1
AS0
HDR
G1
P5 ;Q:FHP4'="Y"
P4
S2
S1
STO
S5
S4
AST
AS4
AS5
AHDR
AFP ;print advance food prep storeroom requesition (grand total)
AS2

External References

Name Field # of Occurrence
EN2^FHREC1 S5, AS5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: S1+0
Function Call: WRITE
  • Prompt: ?60,I1," ",$P(Y(0),"^",6)
  • Line Location: S4+2
Function Call: WRITE
  • Prompt: ?80,$P($G(^FH(114,K1,0)),"^",1),?112,$E(Y,1,19)
  • Line Location: S5+0
Function Call: WRITE
  • Prompt: @IOF,!,DTP,?45,"S T O R E R O O M R E Q U I S I T I O N",?125,"Page ",PG
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !,FHRETYP,?(131-$L(FHP6)),FHP6
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: ?(132-$L(TIM)\2),TIM
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!,"Ingredient",?60,"Storeroom Amount",?80,"Recipe",?112,"Quantity"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDR+4
Function Call: READ
  • Timeout: 0
  • Variable: S K4="" F K=0
  • Line Location: Q1+1
Function Call: WRITE
  • Prompt: ?51,I1," ",$P(Y(0),"^",6)
  • Line Location: AS4+6
Function Call: WRITE
  • Prompt: ?76,$P($G(^FH(114,K1,0)),"^",1)
  • Line Location: AS5+2
Function Call: WRITE
  • Prompt: ?105,$J(FHYQU,6,0),?111,FHYQUNA
  • Line Location: AS5+3
Function Call: WRITE
  • Prompt: @IOF,!,DTP,?40,"A F P S T O R E R O O M R E Q U I S I T I O N",?125,"Page ",PG
  • Line Location: AHDR+0
Function Call: WRITE
  • Prompt: !,FHRETYP,?(131-$L(FHP6)),FHP6
  • Line Location: AHDR+1
Function Call: WRITE
  • Prompt: !,FH1
  • Line Location: AHDR+2
Function Call: WRITE
  • Prompt: ?(132-$L(TIM)\2),TIM
  • Line Location: AHDR+3
Function Call: WRITE
  • Prompt: ?(132-$L(TIMAFP)\2),TIMAFP
  • Line Location: AHDR+4
Function Call: WRITE
  • Prompt: !!,"Ingredient",?56,"Storeroom Amount",?76,"Recipe",?108,"Quantity"
  • Line Location: AHDR+5
Function Call: WRITE
  • Prompt: !
  • Line Location: AHDR+6
Function Call: WRITE
  • Prompt: "-"
  • Line Location: AHDR+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(113.1 - [#113.1] S4, STO, P4+3, P4+4
^FH(114 - [#114] S5, P3, P3+4, P3+5, AS5+2
^FH(114.2 - [#114.2] P3+1
^FHING - [#113] S2, P4+1, AS2
^TMP($J S1, S1+1, S2+2, S2+3, Q1+1, P3+3*, P4+6*, P5+1*, AST, AST+1
, AS1, AS1+1, AS2+2, AS2+3

Label References

Name Line Occurrences
AHDR AST, AS4
AS0 AFP+1
AS1 AS1+2
AS2 AST+1, AS1+1
AS4 AS2+3
AS5 AS4, AS4+2
AST AS1
G1 G1+1
HDR FHPRO6+3, S2+1, S4
P3 G1
P4 P3+4
P5 P3+5
Q1 AFP+1
S1 S1+2
S2 S1+1
S4 S2+3
S5 S4, S4+1
STO HDR+2

Naked Globals

Name Field # of Occurrence
^( S2+2, S2+3, Q1+1, P3+3*, P3+4, P3+5, P4+6*, P5+1*, AS2+2, AS2+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DTP HDR, AHDR
>> FH1 AS0*, AST*, AST+1, AS2+2, AS2+3, AHDR+2
>> FH2 AST*, AST+1, AS2+2, AS2+3
>> FH3 AST+1*, AS2, AS2+2, AS2+3
>> FHP6 HDR+1, AHDR+1
>> FHPAR FHPRO6+3, S2+1, S4, HDR+2
>> FHRETYP HDR+1, AHDR+1
>> FHS1 AS1+1
>> FHSTR P4+2*, P4+3*, P5+1
>> FHYQU AS5+1*, AS5+3
>> FHYQUNA AS5+1*, AS5+3
>> FLG S2*, S4*, AS2*, AS4*
>> I1 S4+1*, S4+2*, AS4+2*, AS4+3*, AS4+4*, AS4+5*, AS4+6
>> I2 S4+1*, AS4+2*
IOF HDR, AHDR
IOSL S4, AS4
>> K HDR+4*, STO*, STO+1, Q1+1*, AHDR+6*
>> K1 S2+2*, S2+3*, S5, G1*, P3, P3+3, P3+4, P3+5, P4+6, P5+1
, AS2+2*, AS2+3*, AS5+2
>> K4 S2+2*, S2+3*, Q1+1*, AS2+2*, AS2+3*
>> KK P3+4*, P3+5*
>> L1 Q1+1*
>> MUL P3*, P4
>> OLD FHPRO6+3*, S2+1*
>> P1 P3*, P3+3
>> PG FHPRO6+3*, S2+1*, HDR*, AS0*, AST, AHDR*
>> Q P4*, P4+6, P5+1
R Q1+1!
R( Q1+1*, G1, P3!
R("" G1+1
>> R1 S2+2*, S2+3*, AS2+2*, AS2+3*
>> R2 FHPRO6+3*, S1*, S1+1, S2+1, S2+2, S2+3, S4, AS0*, AS1*, AS1+1
>> S1 P3+1*, P3+2*, P3+3, P4+6, P5+1
>> S2 P4+4*, P4+5*, P4+6, P5+1
>> TIM HDR+2
>> TIMAFP AHDR+4
>> TOT S2*, S2+2*, S4+1, AS2*, AS2+2*, AS4+2
>> UNT S2*, AS2*
>> X0 P3*, P3+1, P3+2
>> X1 S1+1*, S2, S2+2, S2+3, P4*, P4+1, P4+6, P5+1, AS1+1*
>> Y S2+3*, S5, P3+4*, P3+5*, P4, AS2+3*, AS5+1
>> Y(0 S2*, S4, S4+1, S4+2, STO, AS2*, AS4, AS4+2, AS4+6
>> Y0 P4+1*, P4+3, P4+4, P4+5
>> Z S4*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All