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

Package: Dietetics

Routine: FHOMDPA


Information

FHOMDPA ;Hines OIFO/RTK OUTPATIENT LOOK-UP ;12/3/02 09:46

Source Information

Source file <FHOMDPA.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 4 ^DIC  FILE^DICN  ^DIE  ^DIR  
Dietetics 2 ENOM^FHDPA  (PATNAME,TYPE)^FHOMUTL  
Kernel 1 $$FMTE^XLFDT  

Caller Graph

Caller Graph Total: 54

Package Total Caller Graph
Dietetics 54 FHASM1  FHASMR  FHASP1  FHASXR  FHCTF1  FHCTF3  FHCTF4  FHDCR1  
FHDMP  FHDPA  FHMMBRPT  FHMMNADM  FHMMNREP  FHMNADM  FHMNBRPT  FHMNINQ  
FHMNREP  FHMTK1  FHMTK6  FHNO5  FHNO7  FHNO8  FHOMDMP  FHOMGR1  
FHOMIP  FHOMPP  FHOMRO1  FHOMSR1  FHOMUTL  FHOMWOR  FHORD11  FHORD13  
FHORD6  FHORD7  FHORX2  FHSEL1  FHSP  FHSPED  FHWADM  FHWDIS  
FHWDISD  FHWGMR  FHWHEA  FHWMAS  FHWOR  FHWOR7  FHWOR71  FHWOR8  
FHWORA  FHWORR  FHWTRN  FHXDB2  FHXIN  FHXWRD  

Entry Points

Name Comments DBIA/ICR reference
F1 ;
; FHALL=1 - Lookup INPATIENTS or OUTPATIENTS
; FHALL=0 - Lookup OUTPATIENTS only (to lookup INPATS only, use FHDPA)
; FHDFN=IEN in file #115, FHZ115=.01 in file #115 (ie P27 or N1866)
; DFN=IEN in file #2 (or NULL), IEN200=IEN in file #200 (or NULL)
VER ;
FX1
ADD ; ADD ENTRY IF NOT ALREADY IN FILE 115
DEAD ;PATIENT IS DEAD
FF11 ;
MSG ;
NOP ;
CHECK ; CHECK IF ALREADY IN FILE 115

External References

Name Field # of Occurrence
^DIC F1+10, FF11+2
FILE^DICN ADD+2
^DIE ADD+7, ADD+9
^DIR VER+1
ENOM^FHDPA FX1
PATNAME^FHOMUTL F1+9
TYPE^FHOMUTL DEAD+15
$$FMTE^XLFDT DEAD+5

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Prompt: "Select Patient (Name or SSN): "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: X
  • Line Location: F1+7
Function Call: WRITE
  • Prompt: FHPTNM
  • Line Location: F1+9
Function Call: WRITE
  • Prompt: !!,"LOOKING IN THE NEW PERSON FILE, FILE # 200.",!!
  • Line Location: FF11+1
Function Call: WRITE
  • Prompt: !!,"NOT FOUND IN 2 OR 200"
  • Line Location: FF11+5
Function Call: WRITE
  • Prompt: !
  • Line Location: VER+1
Function Call: WRITE
  • Prompt: !!,"Currently admitted as an Inpatient."
  • Line Location: MSG+1
Function Call: WRITE
  • Prompt: !!?5,"This patient, ",PTNAME,", died on ",PTDOD,"."
  • Line Location: DEAD+9
Function Call: WRITE
  • Prompt: !?5,FHMSGML," cannot be ordered for this patient."
  • Line Location: DEAD+16
Function Call: WRITE
  • Prompt: !
  • Line Location: DEAD+17
Routine Call
  • DIE
  • Line Location:
    • ADD+7
    • ADD+9
Routine Call
  • DIC
  • Line Location:
    • F1+10
    • FF11+2
Routine Call
  • DIR
  • Line Location:
    • VER+1

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DISV( F1+9, ADD+4*, CHECK+4*
^DPT - [#2] FX1, FX1+1, DEAD+3, DEAD+5, DEAD+7
^FHPT("B" ADD+3, CHECK+2, CHECK+3

Label References

Name Line Occurrences
ADD FX1+6, FF11+6
CHECK ADD+1
DEAD FX1+3
F1 FX1+5, FF11+5
FX1 F1+9
MSG FX1+1
NOP F1+7, F1+10, FX1+4, FF11+2, MSG+1, DEAD+13
VER FX1+4, FF11+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA ADD+7*, ADD+9*
DD ADD+2!
>> DFN F1+9, F1+11*, FX1, FX1+1, FX1+4, FX1+6, CHECK+5*, CHECK+6*, NOP+1*, DEAD+3
, DEAD+5, DEAD+7
DIC F1+10!*, FF11+2!*, ADD+2*
DIC(0 F1+10*, FF11+2*, ADD+2*
DIE ADD+7!*, ADD+9!*
>> DIR("A" VER+1*
>> DIR("B" VER+1*
>> DIR(0 VER+1*
DO ADD+2!
>> DR ADD+7*, ADD+9*
DTIME F1+7
DUZ F1+9, ADD+4, CHECK+4
FHALL F1+6*, F1+9!, FX1!, FX1+1!, FX1+6!, FF11+4!, FF11+5!, FF11+7!, NOP+1!
>> FHDFN F1+6*, F1+9*, FX1+3*, ADD+3*, ADD+4, ADD+7, ADD+9, CHECK+1*, CHECK+3*, CHECK+4
, NOP+1*
>> FHMSG1 F1+6*, DEAD+11
>> FHMSGML DEAD+16
>> FHPTNM F1+9
>> FHPTR ADD+5*
>> FHPTTYP ADD+5*, ADD+6, ADD+8
>> FHYIEN F1+11*, FF11+3*
>> FHZ115 F1+6*, FX1+6*, FF11+6*, ADD+2, ADD+3, ADD+5, CHECK+2, CHECK+3, CHECK+5, CHECK+6
>> FLAG ADD+1, CHECK+1*, CHECK+3*
>> IEN200 F1+6*, FF11+3*, FF11+4, FF11+5, FF11+6, CHECK+5*, CHECK+6*
PTDOD DEAD+5*, DEAD+9, DEAD+18!
PTNAME DEAD+7*, DEAD+9, DEAD+18!
U F1+7, F1+10, FF11+2, DEAD+3, DEAD+5, DEAD+7
>> X F1+7*, F1+8, F1+10, FF11+2*, ADD+2*
>> XRESP F1+8*, F1+9, FX1+5, FF11+2
>> Y F1+9*, F1+11, FX1+4, FX1+5, FX1+6, FF11+3, FF11+4, NOP+1*
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 |  Local Variables |  All