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

Package: Dietetics

Routine: FHASE


Information

FHASE ; HISC/REL/NCA - Dietetic Encounters ;7/22/96 13:17

Source Information

Source file <FHASE.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
VA FileMan 7 ^%DT  ^DIC  FILE^DICN  ^DIE  ^DIK  EN1^DIP  ^DIR  
Dietetics 3 TR^FH  ^FHDPA  EN3^FHMASE  
Kernel 2 ^%ZIS  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: 5

Package Total Caller Graph
Dietetics 5 FHASE1  FHASE2  FHASE3  FHCTF3  FHORC2  

Entry Points

Name Comments DBIA/ICR reference
EN1 ; Enter/Edit Encounter Types
EN2 ; List Encounter Types
EN3 ; Enter Dietetic Encounter
; Check for multidivisional site
EN30 ; Enter/Edit a Encounter
EN31 ; Enter a Encounter
A
EN4 ; Process Edit Encounter
A0
A1
PR
EDIT
PAT ; Get Patient
CLIN ; Get Clinician
R1
ASK
E5
CNT
RSET
KIL

External References

Name Field # of Occurrence
^%DT EN31+1, EN4+1
^%ZIS RSET
^DIC EN1+1, A1
FILE^DICN A+1
^DIE EN1+2, EDIT
^DIK EDIT+2, E5+4
EN1^DIP EN2+2
^DIR EN3+3, A0
TR^FH ASK+1, E5+1
^FHDPA PAT+1
EN3^FHMASE EN3+2
KILL^XUSCLEAN KIL

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EN2+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EN3+3
Function Call: WRITE
  • Prompt: !
  • Line Location: EN31+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EN4+1
Function Call: WRITE
  • Prompt: !
  • Line Location: A1+0
Function Call: WRITE
  • Prompt: !
  • Line Location: PR+0
Function Call: WRITE
  • Prompt: !,CTR," "
  • Line Location: PR+0
Function Call: WRITE
  • Prompt: !,CTR," "
  • Line Location: PR+0
Function Call: WRITE
  • Prompt: !?5,"No encounter on file on this date"
  • Line Location: PR+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: PR+2
Function Call: WRITE
  • Prompt: *7,!!,"Select only a number no greater than ",K1," or press ""^"" or a return to exit."
  • Line Location: PR+3
Function Call: WRITE
  • Prompt: !
  • Line Location: PR+5
Function Call: WRITE
  • Prompt: *7,!,"<encounter deleted>"
  • Line Location: EDIT+2
Function Call: WRITE
  • Prompt: *7,!!?5,"Patient has expired."
  • Line Location: PAT+2
Function Call: WRITE
  • Prompt: !!,"No Encounter on file for this patient."
  • Line Location: PAT+3
Function Call: READ
  • Formatting: !!
  • Prompt: "Is this correct? Y// "
  • Variable: YN
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: *7," Answer YES or NO"
  • Line Location: ASK+2
Function Call: WRITE
  • Prompt: !!,"You can ONLY DELETE an encounter that is entered by you.",!
  • Line Location: ASK+4
Function Call: READ
  • Formatting: !
  • Prompt: "Want to delete encounter? N// "
  • Variable: YN
  • Timeout: DTIME
  • Line Location: E5+0
Function Call: WRITE
  • Prompt: *7," Answer YES or NO"
  • Line Location: E5+2
Function Call: WRITE
  • Prompt: *7,!,"<encounter deleted>"
  • Line Location: E5+4
Routine Call
  • DIC
  • Line Location:
    • EN1+1
    • A1
Routine Call
  • DIE
  • Line Location:
    • EN1+2
    • EDIT
Routine Call
  • DIR
  • Line Location:
    • EN3+3
    • A0
Routine Call
  • %ZIS
  • Line Location:
    • RSET

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FH(115.6 - [#115.6] Classic Fileman Calls
^FHEN - [#115.7] Classic Fileman Calls
^VA(200 - [#200] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" PR
^DPT - [#2] PAT+2
^FH(115.6 - [#115.6] PAT+5, R1+1
^FH(119.9 - [#119.9] EN3+2
^FHEN - [#115.7] A, PR+4, EDIT+1, PAT+4, PAT+5, R1+1, CNT, CNT+1
^FHEN("AP" PAT+3, PAT+4
^FHEN("AT" CLIN+1, R1
^FHEN(0 A*, A+1
^TMP($J EN4+1!, PR, PR+4, PR+5, PAT+5*, R1+1*, KIL!
^XUSEC("FHMGR" EN1+2

Label References

Name Line Occurrences
A A
A1 A1
ASK A0, A1, ASK+2
CLIN A1, R1
E5 E5+2
EDIT A+2, ASK+4
EN1 EN1+1, EN1+2
EN3 EN30+1
EN31 EN30+1
EN4 EN3+4, A0, A1
KIL EN1+1, EN1+2, EN3+3, EN30+1, EN4+1, A0, A1
PAT A0, PAT+2, PAT+3
PR A0, A1, PR+3
R1 R1+2
RSET EN2+2

Naked Globals

Name Field # of Occurrence
^( PR, CNT+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT EN31+1!*, EN4+1!*
%DT("A" EN31+1*, EN4+1*
%DT("B" EN31+1*
%DT(0 EN31+1*
%ZIS RSET!
>> ALL PAT+1*
>> ASE A+1*, PR+4*, EDIT, EDIT+1, PAT+4*, PAT+5, CLIN+2*, R1*, R1+1, E5+4
, CNT, CNT+1
>> BY EN2+1*
>> CTR EN4+1*, PR*, PAT+5*, R1+1*
DA EN1+2*, A*, A+1, EDIT*, EDIT+1*, EDIT+2!, E5+4*!
DD EN31+2!
>> DFN A0, PAT+1, PAT+2, PAT+3, PAT+4
>> DHD EN2+2*
DIC EN1+1*!, EN2+1*, EN31+2!*, A+1!, A1!*, EDIT!
DIC("A" A1*
DIC("DR" EN1+1*, EN31+2*
DIC(0 EN1+1*, EN31+2*, A1*
>> DIDEL EN1+2*
DIE EN1+1*, EDIT!*
DIK EDIT+2*!, E5+4*!
DINUM A+1*!
DIR EN3+3!, A0!
DIR("A" EN3+3*, A0*
DIR(0 EN3+3*, A0*
DIROUT EN3+3!, A0
DIRUT EN3+3!, A0
DLAYGO EN1+1*!, EN31+2*, A+1!
DO EN31+2!
DR EN1+2*, EDIT*!
>> DTE EN31+1*, PAT+4*, PAT+5, R1+1*
DTIME PR+2, ASK, E5
>> DTOUT EN1+1, EN31+1, EN4+1, A1
DUZ EN1+2, ASK+4
>> E1 R1+1*
>> EDT EN4+1*, PAT+4
>> FHCLK PR+5*, ASK+4
>> FHN EN3+3*, EN3+4*, EN31+1*
FHX1 EDIT~
>> FHX3 CNT*, CNT+1*
>> FHX4 A+1*, PR+4*
>> FLDS EN2+1*
>> FR EN2+2*
>> IOP RSET*
>> K1 PR*, PR+1, PR+3
>> L EN2+1*
>> LP CNT+1*
>> NAM A1*, R1+1
>> ST CNT+1*
>> TIM EN4+1*, PAT+4
>> TO EN2+2*
U EN3+2
>> X EN1+1, A+1*, A1, PR*, PR+2*, PR+3, PR+4, PR+5, EDIT+1*, EDIT+2
, ASK+1*, E5+1*
>> X1 EN4+1*, CLIN+1*, R1
>> X2 EN4+1*, CLIN+1
Y EN1+1, EN1+2, EN3+4, EN30+1, EN31+1*, A+1, EN4+1*, A0, A1, PR*!
, PR+1*, PR+2*, EDIT+3*, PAT+4*, PAT+5, R1+1*, ASK*, E5*, E5+4*
>> YN ASK*, ASK+1*, ASK+2, ASK+3, E5*, E5+1*, E5+2, E5+3
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