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

Package: Dietetics

Routine: FHMASE


Information

FHMASE ; HISC/AAC - Multidivisional Dietetic Encounters ;10/14/03 13:17

Source Information

Source file <FHMASE.m>

Call Graph

Call Graph

Call Graph Total: 11

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

Package Total Caller Graph
Dietetics 1 FHASE  

Entry Points

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

External References

Name Field # of Occurrence
^%DT EN31+1, EN4+2
^%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+1, A0
TR^FH ASK+1, E5+1
^FHDPA PAT+1
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+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EN31+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EN4+2
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
  • Timeout: DTIME
  • Variable: X
  • 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
  • Prompt: "Is this correct? Y// "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: YN
  • 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
  • Prompt: "Want to delete encounter? N// "
  • Formatting: !
  • Timeout: DTIME
  • Variable: YN
  • 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
  • DIE
  • Line Location:
    • EN1+2
    • EDIT
Routine Call
  • DIC
  • Line Location:
    • EN1+1
    • A1
Routine Call
  • DIR
  • Line Location:
    • EN3+1
    • 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
^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+2!, 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+2, A0, A1
KIL EN1+1, EN1+2, EN3+1, EN30+1, EN4+2, 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+2!*
%DT("A" EN31+1*, EN4+2*
%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+2*, 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+1!, A0!
DIR("A" EN3+1*, A0*
DIR(0 EN3+1*, A0*
DIROUT EN3+1!, A0
DIRUT EN3+1!, 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+2, A1
DUZ EN1+2, ASK+4
>> E1 R1+1*
>> EDT EN4+2*, PAT+4
>> FHCLK PR+5*, ASK+4
>> FHN EN3+1*, EN3+2*, 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+2*, PAT+4
>> TO EN2+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+2*, CLIN+1*, R1
>> X2 EN4+2*, CLIN+1
Y EN1+1, EN1+2, EN3+2, EN30+1, EN31+1*, A+1, EN4+2*, 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