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

Package: Dietetics

Routine: FHMTK3


Information

FHMTK3 ; HISC/NCA - Enter/Edit Patient Diet Pattern ;2/21/96 07:59

Source Information

Source file <FHMTK3.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Dietetics 4 TR^FH  ^FHDPA  (LIS,LIST,SORT)^FHMTK4  CUR^FHORD7  
VA FileMan 2 NOW^%DTC  ^DIC  
Kernel 1 KILL^XUSCLEAN  

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 FHMTKE  

Entry Points

Name Comments DBIA/ICR reference
EN1 ; Enter/Edit patient Diet Pattern
R1
R2
R2A
R3
R4
R5
KIL
RET ; Returns a selected Pattern

External References

Name Field # of Occurrence
NOW^%DTC EN1+1
^DIC R2+2, RET+1
TR^FH R1, R4, R5
^FHDPA EN1+1
LIS^FHMTK4 EN1+10
LIST^FHMTK4 R2
SORT^FHMTK4 R2A+1, R3+2
CUR^FHORD7 EN1+2
KILL^XUSCLEAN KIL

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Production Diet: ",$P($G(^FH(116.2,+PD,0)),"^",1)
  • Line Location: EN1+9
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+10
Function Call: READ
  • Timeout: DTIME
  • Line Location: R1+0
Function Call: WRITE
  • Prompt: *7,!,"Select B for Breakfast, N for Noon, or E for Evening"
  • Line Location: R1+1
Function Call: WRITE
  • Prompt: !
  • Line Location: R2+0
Function Call: WRITE
  • Prompt: !!,$P($G(^FH(114.1,RC,0)),"^",1)," added",!
  • Line Location: R2+6
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: R2A+0
Function Call: WRITE
  • Prompt: " ...Done"
  • Line Location: R2A+1
Function Call: WRITE
  • Prompt: *7,!,"Press Return to take Default or ""@"" to Delete"
  • Line Location: R2A+2
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: R3+0
Function Call: WRITE
  • Prompt: *7," Enter a number between 0-9.99."
  • Line Location: R3+1
Function Call: READ
  • Formatting: !!
  • Prompt: "Enter/Edit More? Y// "
  • Variable: Y
  • Timeout: DTIME
  • Line Location: R4+0
Function Call: WRITE
  • Prompt: *7,!," Answer YES to continue modifying Diet Pattern; NO to continue and store patient's pattern"
  • Line Location: R4+1
Function Call: READ
  • Formatting: !!
  • Prompt: "Is this Correct to store? Y// "
  • Variable: Y
  • Timeout: DTIME
  • Line Location: R5+0
Function Call: WRITE
  • Prompt: *7,!," Answer YES to accept patient's Diet Pattern; NO to modify again"
  • Line Location: R5+1
Function Call: WRITE
  • Prompt: !!,"Storing Patient's Diet Pattern ..."
  • Line Location: R5+2
Function Call: WRITE
  • Prompt: !
  • Line Location: RET+1
Routine Call
  • DIC
  • Line Location:
    • R2+2
    • RET+1

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(111.1 - [#111.1] EN1+4, EN1+7
^FH(114.1 - [#114.1] R2+3, R2+6, R2A
^FH(116.2 - [#116.2] EN1+9
^FHPT - [#115] EN1+2, EN1+5, EN1+8*, R5+11*, R5+12*
^TMP($J EN1+10!, R2+7*, R2A+1!, R5+4, KIL!

Label References

Name Line Occurrences
KIL EN1+1, EN1+2, EN1+3, EN1+5, EN1+9, R1, R2A, R3, R4, R5
R1 R1+1, R4+2, R5+2
R2 R2+2
R2A R2+5, R2A+2
R3 R3+1
R4 R2+2, R2A+1, R4+1
R5 R1, R5+1
RET EN1+5, RET+3

Naked Globals

Name Field # of Occurrence
^( R5+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EN1+1
>> ADM EN1+2, EN1+5, EN1+8, R5+11, R5+12
>> ALL EN1+1*
>> C1 R2+3*
>> DFN EN1+1
DIC R2!*, R2+2!, RET+1!*
DIC("A" R2*
DIC(0 R2*, RET+1*
DTIME R1, R2A, R3, R4, R5
>> DTOUT R2+2, RET+2
DUZ R5+12
>> FHDFN EN1+1, EN1+2, EN1+5, EN1+8, R5+11, R5+12
>> FHLD EN1+2
>> FHOR EN1+4
>> FHORD EN1+2, EN1+5, EN1+8, R5+11, R5+12
>> K1 R2+3*, R2+4*, R2+7, R2A+1
>> LN R5+10*
>> M1 R5+3*, R5+5
>> M3 R2+7*, R5+3*, R5+4
>> MEAL R1*, R1+1, R1+2*, R2+5, R2+6, R2+7, R2A+1, R3+2
>> MP EN1+4*, EN1+5, EN1+6*, EN1+7, R2+7, R2A+1, R5+4, RET+2*, RET+3*
>> NAM R2+3*, R2+4
>> NX R5+4*, R5+5
>> P( R2+5, R2+6*, R2A+1!, R3+2*, R5+5
>> PD EN1+2*, EN1+7*, EN1+8, EN1+9
>> QTY R2+2*, R2+5*, R3, R3+2*
>> RC R2+2*, R2+3, R2+5, R2+6, R2+7, R2A, R2A+1, R3+2
>> S1 R2+5*
>> STR R5+3*, R5+5*, R5+7*, R5+9*, R5+10*, R5+11
>> TIM EN1+1*, R5+12
>> X R1*, R2+2, R2A*, R2A+1, R2A+2, R3*, R3+1, R3+2, R4*, R5*
, RET+2
>> Y EN1+3, R2+2, R4*, R4+1, R4+2, R5*, R5+1, R5+2, RET+3
>> Z R5+5*
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 |  Naked Globals |  Local Variables  | All