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

Package: Dietetics

Routine: FHSEL1


Information

FHSEL1 ; HISC/REL/NCA/JH/RTK/FAI - Patient Preferences ;10/20/04 10:19

Source Information

Source file <FHSEL1.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
VA FileMan 6 NOW^%DTC  ^DIC  ^DIE  ^DIK  EN1^DIP  ^DIR  
Dietetics 4 TR^FH  PID^FHDPA  ^FHOMDPA  ^FHORX  
Kernel 2 ^%ZIS  KILL^XUSCLEAN  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Dietetics 6 FHMTK6  FHSEL1  FHSEL2  FHSEL3  FHSEL4  FHSELA1  

Entry Points

Name Comments DBIA/ICR reference
A
DISP ; Display Food Preferences
P0
E41 ; Display Patient Header and Food Preferences
P1
EN2NEW
SP1
EN2OLD
TRAN
EN2 ; List Preference File
T1
EN1 ; Enter/Edit Preference File entries
ADD ; Add dislikes recipes from another food preference
EN3 ; Enter/Edit Patient Preferences
EN4 ; Display Patient Preferences
KIL
N31
N32
N33
SP ;Build food prefences print array
DIS

External References

Name Field # of Occurrence
NOW^%DTC E41+1
^%ZIS EN2+3, EN2OLD+2, EN2NEW+2
^DIC EN1+2, T1
^DIE EN1+3, EN1+4, DIS, EN3+3
^DIK EN3+9
EN1^DIP EN2OLD+1, EN2NEW+1
^DIR EN2+2
TR^FH TRAN+2
PID^FHDPA E41+2
^FHOMDPA EN3+1, EN4+1
^FHORX N32, N32+1
KILL^XUSCLEAN KIL+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+2
Function Call: WRITE
  • Prompt: *7,!," Answer YES or NO"
  • Line Location: TRAN+2
Function Call: WRITE
  • Prompt: !
  • Line Location: T1+0
Function Call: WRITE
  • Prompt: !
  • Line Location: EN2+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EN2OLD+0
Function Call: WRITE
  • Prompt: !
  • Line Location: EN2NEW+0
Function Call: WRITE
  • Prompt: !
  • Line Location: EN3+1
Function Call: WRITE
  • Prompt: @IOF,!,PID,?17,$P(Y(0),"^",1),?49,$S(SEX="M":"Male",SEX="F":"Female",1:""),?55,"Age ",AGE
  • Line Location: E41+4
Function Call: WRITE
  • Prompt: !!?21,"Likes",?54,"DisLikes",!
  • Line Location: DISP+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+3
Function Call: WRITE
  • Prompt: $P(M,"~",2)
  • Line Location: DISP+3
Function Call: WRITE
  • Prompt: !,"No Food Preferences on file",!
  • Line Location: DISP+6
Function Call: WRITE
  • Prompt: ?12
  • Line Location: P0+0
Function Call: WRITE
  • Prompt: ?46
  • Line Location: P0+1
Function Call: WRITE
  • Prompt: !
  • Line Location: P0+2
Function Call: WRITE
  • Prompt: X
  • Line Location: P1+0
Function Call: WRITE
  • Prompt: $E(X,1,KK-2)
  • Line Location: P1+2
Routine Call
  • DIE
  • Line Location:
    • EN1+3
    • EN1+4
    • DIS
    • EN3+3
Routine Call
  • DIC
  • Line Location:
    • EN1+2
    • T1
Routine Call
  • DIR
  • Line Location:
    • EN2+2
Routine Call
  • %ZIS
  • Line Location:
    • EN2+3
    • EN2OLD+2
    • EN2NEW+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FHPT - [#115] Classic Fileman Calls
^FH(115.2 - [#115.2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] E41+2
^FH(115.2 - [#115.2] EN1+4, EN1+6, T1+2, T1+3, ADD+1, A, A+1, A+2*, A+3, A+4*
, A+5*, A+6*, N33+6, SP+3
^FHPT - [#115] EN3+2, EN3+5, N33+3, N33+4*, DISP+2

Label References

Name Line Occurrences
A A+3
ADD T1+3
DIS TRAN+3
DISP EN3+1
E41 EN4+1
EN1 EN1+2, EN1+6, TRAN+1, DIS
EN2NEW EN2+5
EN2OLD EN2+4
EN3 EN3+12
EN4 EN4+1
KIL EN1+2, T1+1, EN2+3, EN2OLD+2, EN2NEW+2, EN3+1, EN4+1
N31 EN3+6
N32 N32+2
N33 N31
P0 DISP+4, P0+2
P1 P0, P0+1
SP DISP+2
SP1 SP+7, SP+8
T1 T1+1
TRAN TRAN+2

Naked Globals

Name Field # of Occurrence
^( T1+3, EN3+2, EN3+5, DISP+2
^(0 T1+2*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % E41+1
%ZIS EN2+3!, EN2OLD+2!, EN2NEW+2!
>> AGE E41+3*, E41+4
>> ANS TRAN+3*
>> BY EN2OLD*, EN2NEW*
>> COM N31+1*, N32, N32+1*, N32+2*
DA EN1+3*, EN1+4, EN1+5!, DIS*!, EN3+1*, EN3+8*, EN3+11!
DA(1 EN3+8*, EN3+9
>> DAS SP+4*, SP1, SP1+1
>> DFN EN4+1, E41+2
>> DHD EN2OLD+1*, EN2NEW+1*
DIC EN1+2*!, T1!*, EN2OLD*, EN2NEW*
DIC("DR" EN1+2*
DIC("S" T1*
DIC(0 EN1+2*, T1*
DIE EN1+2*, EN1+5!, DIS*!, EN3+3*!
DIE("NO^" EN3+3*
DIK EN3+9*, EN3+11!
>> DILOCKTM A
DIR EN2+1!
DIR("A" EN2+1*
DIR("B" EN2+2*
DIR(0 EN2+2*
>> DIRUT EN2+3
>> DIS T1+3*
DLAYGO EN1+2*!
>> DOB E41+2*, E41+3
DR EN1+3*, EN1+4*, EN1+5!, DIS*!, EN3+3*
DT E41+1*
DTIME TRAN
>> DTOUT EN1+2, T1+1
>> EVT N32*, N32+1*
>> FHALGMZ EN1+1, KIL
>> FHALL EN3+1*, EN4+1*
>> FHALRC EN2+4*, EN2+5
>> FHD T1+1*, T1+3
>> FHDA EN1+3*, EN1+6, T1+2, DIS, ADD+1, A, A+1, A+2, A+3, A+4
, A+5, A+6
>> FHDFN EN3+1, EN3+2, EN3+5, EN3+8, N33+3, N33+4, EN4+1, DISP+2
>> FHX1 A+1*, A+4
>> FHX2 A+1*, A+2, A+3, A+5, A+6
>> FLDS EN2OLD*, EN2NEW*
>> FLG EN3+3*, EN3+4*, EN3+7
>> FR EN2OLD+1*, EN2NEW+1*
IOF E41+4
>> IOP EN2+3*, EN2OLD+2*, EN2NEW+2*
>> K EN3+2*, EN3+5*, EN3+8*, N31*, N33, N33+3, N33+6, DISP+2*, SP1+1
>> KK N31+1*, N32*, N32+1, N32+2, P1+1*, P1+2, SP+4*, SP+6, SP1, SP1+1
>> L EN2OLD*, EN2NEW*
>> L1 T1+3*, ADD+1, A+5, A+6, SP+4*, SP+5*, SP+6*, SP1, SP1+1
>> M DISP+3*, DISP+4, SP+4*, SP+7*, SP+8*, SP+9*, SP+10*, SP1, SP1+1
>> M1 SP+2*, SP+8, SP+9, SP+10
>> MM DISP+3*, DISP+4
>> NOD N33+3*, N33+4
>> NOW E41+1*, E41+3
P DISP+2!
P( DISP+3, DISP+4, SP1*, SP1+1*
P("" DISP+6
>> P1 DISP+2*, DISP+4*, SP1, SP1+1*
>> P2 DISP+4*
>> PID E41+4
PP EN3+2!, EN3+6!
PP( EN3+2*, EN3+5*, N31, N32, N32+1, N32+2, N33!, N33+6*
>> Q N33+1*, N33+6, SP+6*
>> SEX E41+2*, E41+4
>> STR EN3+5*, EN3+7, EN3+8
>> TO EN2OLD+1*, EN2NEW+1*
U EN1+2, SP+2, SP+3, SP+5, SP+7
>> X EN1+2, TRAN*, TRAN+1, TRAN+2*, TRAN+3, T1+1, EN3+2*, EN3+5*, DISP+2*, P0*
, P0+1*, P1*, P1+1, P1+2*, SP+1, SP+2, SP+3, SP+4, SP+5, SP+6
, SP+7
>> X1 N33*, N33+1*, N33+2, N33+6, DISP+4*, P0*, P0+2
>> X2 N33*, N33+1, N33+6, DISP+4*, P0+1*, P0+2
>> Y EN1+2, EN1+3, EN1+6, T1+1, EN2+4, EN3+4
>> Y(0 E41+2*, E41+4
>> Z SP+3*, SP+4
>> Z1 SP+9*, SP+10*
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