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

Package: Dietetics

Routine: FHOMRL1


Information

FHOMRL1 ;Hines OIFO/RTK OUTPATIENT MEALS RECURRING MEALS LIST ;1/25/05 11:35

Source Information

Source file <FHOMRL1.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Dietetics 3 DTP^FH  DIETPAT^FHOMRR1  (ENDATE,OUTLOC,PATNAME,STDATE)^FHOMUTL  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA Fileman 3 C^%DTC  ^DIC  ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Dietetics 1 FHOMRL  

Entry Points

Name Comments DBIA/ICR reference
DISP ; First build data in ^TMP global
END ;
HDR ;
DEV ;get device and set up queue
START
PG ;

External References

Name Field # of Occurrence
C^%DTC START+15
^%ZIS DEV+1
^%ZISC DEV+2, DEV+7
^%ZTLOAD DEV+6
^DIC START+7, START+11
^DIR START+2, PG+1
DTP^FH DISP+28
DIETPAT^FHOMRR1 DISP+35
ENDATE^FHOMUTL START+14
OUTLOC^FHOMUTL START+4
PATNAME^FHOMUTL DISP+6
STDATE^FHOMUTL START+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!?20,"R E C U R R I N G M E A L S L I S T"
  • Line Location: FHOMRL1+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: START+1
Function Call: WRITE
  • Prompt: !
  • Line Location: START+4
Function Call: WRITE
  • Prompt: !
  • Line Location: START+13
Function Call: WRITE
  • Prompt: !
  • Line Location: START+14
Function Call: WRITE
  • Prompt: !
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: DTP
  • Line Location: DISP+28
Function Call: WRITE
  • Prompt: ?64,$E(FHDIETP,1,16)
  • Line Location: DISP+35
Function Call: WRITE
  • Prompt: ?64,$E($P($G(^FH(111,FHDPTR,0)),U,1),1,16)
  • Line Location: DISP+36
Function Call: WRITE
  • Prompt: !?25,"R E C U R R I N G M E A L L I S T"
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!?5,"LOCATION: ",$P(FHLSRT,"~",2)
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !!,"Date",?11,"Patient Name",?31,"Meal",?36,"Service Pnt"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: ?48,"Room-Bed",?64,"Diet Ordered"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !,"=========",?11,"===================",?31,"===="
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: ?36,"===========",?48,"==============",?64,"================"
  • Line Location: HDR+7
Routine Call
  • DIC
  • Line Location:
    • START+7
    • START+11
Routine Call
  • DIR
  • Line Location:
    • START+2
    • PG+1
Routine Call
  • %ZIS
  • Line Location:
    • DEV+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(405.4 - [#405.4] DISP+26
^FH(111 - [#111] DISP+36
^FH(119.6 - [#119.6] DISP+8, DISP+10, DISP+12, DISP+24, DISP+35, DISP+36
^FH(119.72 - [#119.72] DISP+33
^FH(119.73 - [#119.73] DISP+9
^FHPT - [#115] DISP+5
^FHPT("RM" DISP+2, DISP+3, DISP+4
^TMP($J DISP+1!, DISP+13*, DISP+18, DISP+21, DISP+22, DISP+23

Label References

Name Line Occurrences
DEV START+16
DISP DEV+2
END DEV+2, DEV+8
HDR DISP+20, PG+2
PG DISP+19, DISP+37
START START+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DEV+1!*, DEV+7!
DIC START+6!*, START+10!*
DIC("A" START+6*, START+10*
DIC(0 START+7*, START+11*
DIR START+1!, PG+1!
DIR("A" START+1*
DIR(0 START+2*, PG+1*
>> DIRUT START+3
>> DTP DISP+28*
>> DUOUT START+7, START+11
ENDT START+14, DISP+2, END+1!
>> EX DISP+1*, DISP+2, DISP+3, DISP+4, DISP+18, DISP+19, DISP+21, DISP+22, DISP+37, PG+1*
>> FHCOMM DISP+8*, DISP+9
>> FHDFN DISP+3*, DISP+4, DISP+5, DISP+13, DISP+27*
>> FHDIETP DISP+35
>> FHDPTR DISP+36*
>> FHLBY START+3*, START+4, START+5, START+9, DISP+7, DISP+8, DISP+9
>> FHLOC START+4*, DISP+7*, DISP+8, DISP+10, DISP+12, DISP+23*, DISP+24, DISP+35, DISP+36
>> FHLOCNM DISP+12*, DISP+13
>> FHLOCZN DISP+24*, DISP+31, DISP+32
>> FHLSRT DISP+18*, DISP+21, DISP+22, DISP+23, HDR+3
>> FHPG DISP+1*, DISP+19, DISP+20*
>> FHPRD DISP+9*
>> FHPRORD DISP+10*, DISP+11*, DISP+13
>> FHPTN DISP+22*, DISP+23, DISP+24, DISP+27, DISP+29
>> FHPTNM DISP+13
FHRM DISP+4*, DISP+5, DISP+13, END+1!
>> FHRMBD DISP+25*, DISP+26
>> FHRMBNM DISP+25*, DISP+26*, DISP+34
>> FHRNUM DISP+24*
>> FHSELOC START*, START+4*, DISP+7
FHSLCOM START*, START+5, START+7*, START+8*, DISP+8, END+1!
FHSLPRO START*, START+9, START+11*, START+12*, DISP+9, END+1!
>> FHSPT DISP+32*, DISP+33
>> FHSRV DISP+31*, DISP+32
>> FHSRVPT DISP+33*, DISP+34
FHST DISP+5*, END+1!
FHXRDT DISP+2*, DISP+3, DISP+4, DISP+13, DISP+21*, DISP+22, DISP+23, DISP+28, END+1!
FHZN DISP+5*, DISP+7, DISP+13, DISP+23*, DISP+25, DISP+30, DISP+36, END+1!
IO DEV+2
IO("Q" DEV+2
IOF FHOMRL1+3, HDR+1
IOP DEV+1!, DEV+7!
IOSL DISP+37
IOST DISP+19, PG+1
>> POP DEV+1
STDT START+13, START+15*, DISP+2, END+1!
U DISP+2, DISP+3, DISP+4, DISP+5, DISP+7, DISP+8, DISP+9, DISP+10, DISP+12, DISP+18
, DISP+19, DISP+21, DISP+22, DISP+23, DISP+25, DISP+26, DISP+30, DISP+31, DISP+32, DISP+33
, DISP+35, DISP+36, DISP+37, PG+1
>> X START+15
>> X1 START+15*
>> X2 START+15*
>> Y START+3, START+7, START+8, START+11, START+12, PG+1
>> ZTDESC DEV+6*
>> ZTRTN DEV+3*
>> ZTSAVE("ENDT" DEV+4*
>> ZTSAVE("FHDFN" DEV+4*
>> ZTSAVE("FHLBY" DEV+5*
>> ZTSAVE("FHSELOC" DEV+5*
>> ZTSAVE("FHSLCOM" DEV+5*
>> ZTSAVE("FHSLPRO" DEV+5*
>> ZTSAVE("STDT" DEV+4*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All