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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: FHOMDMP

Package: Dietetics

Routine: FHOMDMP


Information

FHOMDMP ; HISC/REL/NCA/JH/RK/FAI - Patient Data Log ;10/19/04 13:26

Source Information

Source file <FHOMDMP.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Dietetics 5 (DTP,EN2)^FH  ALG^FHCLN  ^FHDMP1  ^FHOMDPA  (ENDATE,STDATE)^FHOMUTL  
Kernel 3 ^%ZIS  ^%ZISC  KILL^XUSCLEAN  
VA Fileman 1 NOW^%DTC  

Entry Points

Name Comments DBIA/ICR reference
F0
BEGIN
HDR ; Print Header
SP1
SP
P0
KIL ; Final variable kill
W1
W0
LNE ; Break Line if longer than 65 chars
DTP ; Printable Date/Time
OP

External References

Name Field # of Occurrence
NOW^%DTC F0
^%ZIS P0
^%ZISC P0+2
DTP^FH F0, F0+7, F0+8
EN2^FH P0+1
ALG^FHCLN F0+13
^FHDMP1 F0+19, F0+20
^FHOMDPA BEGIN
ENDATE^FHOMUTL BEGIN+2
STDATE^FHOMUTL BEGIN+1
KILL^XUSCLEAN KIL+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"OUPT "_OP
  • Line Location: OP+0
Function Call: WRITE
  • Prompt: !
  • Line Location: P0+0
Function Call: WRITE
  • Prompt: !!,"Allergies: "
  • Line Location: F0+13
Function Call: WRITE
  • Prompt: !!,"Food Preferences Currently on file:",!!?26,"Likes",?58,"Dislikes",!
  • Line Location: F0+14
Function Call: WRITE
  • Prompt: !
  • Line Location: F0+16
Function Call: WRITE
  • Prompt: $P(M1,"~",2)
  • Line Location: F0+16
Function Call: WRITE
  • Prompt: !!,"No Food Preferences on file",!
  • Line Location: F0+19
Function Call: WRITE
  • Prompt: !
  • Line Location: F0+20
Function Call: WRITE
  • Prompt: ?12
  • Line Location: W0+0
Function Call: WRITE
  • Prompt: ?46
  • Line Location: W0+1
Function Call: WRITE
  • Prompt: !
  • Line Location: W0+2
Function Call: WRITE
  • Prompt: !
  • Condition for execution: L
  • Line Location: W0+2
Function Call: WRITE
  • Prompt: X
  • Line Location: W1+0
Function Call: WRITE
  • Prompt: $E(X,1,KK-2)
  • Line Location: W1+2
Function Call: WRITE
  • Prompt: ALG
  • Line Location: LNE+1
Function Call: WRITE
  • Prompt: $E(ALG,1,L-2)
  • Line Location: LNE+3
Function Call: WRITE
  • Prompt: !?11
  • Line Location: LNE+5
Function Call: READ
  • Timeout: DTIME
  • Variable: QT
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,?20,"P A T I E N T D A T A L O G",!
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"Date Range: ",PRTFM,?62,NOW,!!,PID,?17,NAM,?49,$S(SEX="M":"Male",SEX="F":"Female",1:""),?58,"Age ",AGE,?72,"Page ",PG
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: $J(+$E(Y,6,7),2)_"-"_$P("Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec"," ",+$E(Y,4,5))_"-"_$E(Y,2,3)
  • Line Location: DTP+1
Function Call: WRITE
  • Prompt: $J($S(%>12:%-12,1:%),3)_":"_$E(Y_"000",11,12)_$S(%<12:"am",%<24:"pm",1:"m")
  • Line Location: DTP+2
Routine Call
  • %ZIS
  • Line Location:
    • P0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] F0+1
^FH(115.2 - [#115.2] SP
^FHPT - [#115] OP, F0+15

Label References

Name Line Occurrences
F0 P0+2
FHOMDMP P0+2
HDR F0+11, W0+2
KIL BEGIN, P0, P0+1, W0+2
LNE F0+13, LNE+6
P0 BEGIN+3
SP F0+15
SP1 SP+2
W0 F0+17, W0+2
W1 W0, W0+1

Naked Globals

Name Field # of Occurrence
^( F0+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% F0, DTP+2*, DTP+3!
%ZIS P0*!, P0+2!
%ZIS("B" P0*
>> AGE F0+2*, HDR+4
>> ALG F0+13*, LNE+1, LNE+2, LNE+3, LNE+4*, LNE+5
>> DAS SP*, SP1, SP1+1
>> DFN BEGIN, F0+1
>> DOB F0+1*, F0+2
DT F0*, F0+2
DTIME HDR+1
>> DTP F0*, F0+7*, F0+8*
>> EDT1 F0+8*, F0+9
>> ENDT BEGIN+2, F0+2, F0+8
>> FHALL BEGIN*
>> FHDFN BEGIN, OP, F0+15
>> FHLST P0+1*
>> FHPGM P0+1*
IO P0+2
IO("Q" P0+1
IOF HDR+2
IOP P0!, P0+2!
IOSL F0
IOST F0, HDR+1, HDR+2
>> K F0+15*, SP1+1
>> KK W1+1*, W1+2, SP*, SP+1, SP1, SP1+1
L F0+16*, F0+20!, W0+2*, LNE+2*, LNE+3, LNE+4
>> L1 SP*, SP+1*, SP1, SP1+1
>> LN F0+10*
M F0+20!, SP*, SP+2, SP+3, SP+4
M1 F0+16*, F0+17, F0+20!, SP*, SP+2*, SP+3*, SP+4*, SP1, SP1+1
M2 F0+20!
>> MM F0+16*, F0+17
N F0+15!, F0+20!
N( F0+16, F0+17, SP1*, SP1+1*
N("" F0+19
>> NAM F0+1*, HDR+4
>> NOW F0*, HDR+4
>> OP OP*
>> P1 F0+15*, F0+17*, SP1, SP1+1*
>> P2 F0+17*
>> PG F0+2*, HDR+1, HDR+2*, HDR+4
>> PID F0+1*, HDR+4
>> POP P0
>> PRTFM F0+2*, F0+9*, HDR+4
>> Q SP+1*
>> QT F0+2*, W0+2, HDR+1*
>> S1 F0*, W0+2
>> SDT BEGIN+1*
>> SDT1 F0+7*, F0+9
>> SEX F0+1*, HDR+4
>> STDT BEGIN+1, F0+2, F0+7
>> X F0+15*, W0*, W0+1*, W1*, W1+1, W1+2*, SP, SP+1
>> X1 F0+17*, W0*, W0+2
>> X2 F0+17*, W0+1*, W0+2
>> Y DTP+1, DTP+2
>> Y(0 F0+1*
>> Z SP*
>> Z1 SP+3*, SP+4*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All