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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: FHOMPP

Package: Dietetics

Routine: FHOMPP


Information

FHOMPP ; OIFO/RTK - Patient Profile for Outpatients ;7/2/2007

Source Information

Source file <FHOMPP.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Dietetics 5 ALG^FHCLN  CHECK^FHOMDPA  (,PAD)^FHOMPP1  DISP^FHOMRR1  PATNAME^FHOMUTL  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Dietetics 3 FHOMPP1  FHORD6  FHWOR71  

Entry Points

Name Comments DBIA/ICR reference
DISP ;
END ;
HDR ;
NEWL ;New line before next line of text in ^TMP global
DEV ;get device and set up queue
PG ;
CPRS ; Call from FHWOR71 to get outpatient profile for CPRS
; Data is returned in ^TMP($J,"FHPROF",DFN,FHX)

External References

Name Field # of Occurrence
^%ZIS DEV+1
^%ZISC DEV+2, DEV+6
^%ZTLOAD DEV+5
^DIR DISP+24, PG+1
ALG^FHCLN DISP+2, CPRS+7
CHECK^FHOMDPA CPRS+2
^FHOMPP1 CPRS+27
PAD^FHOMPP1 CPRS+6
DISP^FHOMRR1 DISP+23
PATNAME^FHOMUTL HDR+2, CPRS+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: !!,"Allergies: ",ALG
  • Line Location: DISP+2
Function Call: WRITE
  • Prompt: !!,"Food Preferences Currently on file: "
  • Line Location: DISP+13
Function Call: WRITE
  • Prompt: !!?20,"Likes"
  • Line Location: DISP+14
Function Call: WRITE
  • Prompt: !!,^TMP($J,"L",FHM,FHP)
  • Line Location: DISP+16
Function Call: WRITE
  • Prompt: !!?20,"Dislikes"
  • Line Location: DISP+17
Function Call: WRITE
  • Prompt: !!,^TMP($J,"D",FHM,FHP)
  • Line Location: DISP+19
Function Call: WRITE
  • Prompt: !!,"Isolation/Precaution type is ",$P($G(^FH(119.4,FHIPX,0)),"^",1)
  • Line Location: DISP+21
Function Call: WRITE
  • Prompt: !!,"Recurring Meals on File: "
  • Line Location: DISP+22
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+23
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+24
Function Call: WRITE
  • Prompt: !!,"OUTPATIENT NAME: "
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: FHPTNM," ",FHSSN
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: ?65,FHSEX," Age ",FHAGE
  • Line Location: HDR+3
Routine Call
  • DIR
  • Line Location:
    • DISP+24
    • PG+1
Routine Call
  • %ZIS
  • Line Location:
    • DEV+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(115.2 - [#115.2] DISP+9, DISP+10, CPRS+14, CPRS+15
^FH(119.4 - [#119.4] DISP+21
^FHPT - [#115] DISP+3, DISP+4, DISP+21, CPRS+8, CPRS+9
^TMP($J DISP+3!, DISP+11*, DISP+14, DISP+15, DISP+16, DISP+17, DISP+18, DISP+19, CPRS+3!, CPRS+5*
, CPRS+6*, CPRS+7*, CPRS+16*, CPRS+18*, CPRS+19*, CPRS+20, CPRS+21*, CPRS+22*, CPRS+23, CPRS+24*
, CPRS+26*, NEWL+1*

Label References

Name Line Occurrences
DEV FHOMPP+2
DISP DEV+2
END DEV+2, DEV+7
HDR DISP+1, PG+2
NEWL CPRS+7, CPRS+18, CPRS+19, CPRS+21, CPRS+22, CPRS+24, CPRS+26
PG DISP+16, DISP+19, DISP+21, DISP+22

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DEV+1!*, DEV+6!
>> ALG DISP+2, CPRS+7
>> DFN CPRS+2, CPRS+5, CPRS+6, CPRS+7, CPRS+18, CPRS+19, CPRS+21, CPRS+22, CPRS+24, CPRS+26
, NEWL+1
DIR DISP+24!, PG+1!
DIR(0 DISP+24*, PG+1*
DT DISP+23, CPRS+27
>> EX DISP+1*, DISP+15, DISP+16, DISP+18, DISP+19, DISP+21, DISP+22, DISP+24, PG+1*
>> FHAGE HDR+3, CPRS+6
>> FHB CPRS+4*
>> FHDFN DISP+3, DISP+4, DISP+21, CPRS+2, CPRS+8, CPRS+9
>> FHFP DISP+3*, DISP+4, CPRS+8*, CPRS+9
>> FHFPIEN DISP+5*, DISP+6, DISP+9, DISP+10, DISP+11, CPRS+10*, CPRS+11, CPRS+14, CPRS+15, CPRS+16
>> FHFPLD DISP+9*, DISP+11, CPRS+14*, CPRS+16
>> FHFPNM DISP+10*, DISP+11, CPRS+15*, CPRS+16
>> FHFPZN DISP+4*, DISP+5, CPRS+9*, CPRS+10
>> FHIPX DISP+21*
>> FHJ CPRS+6*
FHM DISP+15*, DISP+16, DISP+18*, DISP+19, END+1!, CPRS+20*, CPRS+21, CPRS+23*, CPRS+24
>> FHMEAL DISP+5*, DISP+7, DISP+8*, DISP+11, CPRS+10*, CPRS+12, CPRS+13*, CPRS+16
>> FHNORD DISP+7*, DISP+8, CPRS+12*, CPRS+13
FHP DISP+16*, DISP+19*, END+1!, CPRS+21*, CPRS+24*
FHPP DISP+23*!
>> FHPTNM HDR+2, CPRS+5
>> FHQTY DISP+5*, DISP+11, CPRS+10*, CPRS+16
>> FHSEX HDR+3, CPRS+6
>> FHSSN HDR+2, CPRS+5
FHT END+1!
>> FHX CPRS+3*, CPRS+5, CPRS+6, CPRS+7, CPRS+18, CPRS+19, CPRS+21, CPRS+22, CPRS+24, CPRS+26
, NEWL+1*, NEWL+2*
>> FHZ115 CPRS+2*
>> I CPRS+4*
IO DEV+2
IO("Q" DEV+2
IOF HDR+1
IOP DEV+1!, DEV+6!
IOSL DISP+16, DISP+19, DISP+21, DISP+22
IOST DISP+24, PG+1
>> N CPRS+3*, CPRS+7*, CPRS+18*, CPRS+19*, CPRS+21*, CPRS+22*, CPRS+24*, CPRS+26*, NEWL+1
>> PAD CPRS+6
>> POP DEV+1
>> STDT DISP+23*, CPRS+27*
U DISP+5, DISP+9, DISP+10, DISP+15, DISP+16, DISP+18, DISP+19, DISP+21, DISP+22, DISP+24
, PG+1, CPRS+10, CPRS+14, CPRS+15
>> Y PG+1
>> ZTDESC DEV+5*
>> ZTRTN DEV+3*
>> ZTSAVE("FHDFN" DEV+4*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All