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

Package: Dietetics

Routine: FHOMGP1


Information

FHOMGP1 ;Hines OIFO/RTK PRINT GUEST MEALS LIST ; 8/27/19 3:09pm

Source Information

Source file <FHOMGP1.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 4 ^%ZIS  ^%ZISC  ^%ZTLOAD  $$FMTE^XLFDT  
VA FileMan 2 ^DIC  ^DIR  
Dietetics 1 (ENDATE,OUTLOC,PATNAME,STDATE)^FHOMUTL  

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

Package Total Caller Graph
Dietetics 1 FHOMGP  

Entry Points

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

External References

Name Field # of Occurrence
^%ZIS DEV+1
^%ZISC DEV+2, DEV+7
^%ZTLOAD DEV+6
^DIC EN+8, EN+13
^DIR EN+2, PG+2
ENDATE^FHOMUTL EN+16
OUTLOC^FHOMUTL EN+4
PATNAME^FHOMUTL LIST+5, LIST+32
STDATE^FHOMUTL EN+15
$$FMTE^XLFDT LIST+33

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!?20,"G U E S T M E A L S L I S T"
  • Line Location: FHOMGP1+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+15
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+16
Function Call: WRITE
  • Prompt: !
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: !!,"THERE ARE CURRENTLY NO GUEST MEALS TO PRINT"
  • Line Location: LIST+16
Function Call: WRITE
  • Prompt: !,PAD,NUM
  • Line Location: LIST+31
Function Call: WRITE
  • Prompt: !,$E(FHPTNM,1,22)
  • Line Location: LIST+32
Function Call: WRITE
  • Prompt: ?22,$E(FHD,1,12)
  • Line Location: LIST+33
Function Call: WRITE
  • Prompt: !?5,"G U E S T 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: !!,"Name",?22,"Date",?36,"Location",?49,"Room-Bed",?61,"Meal"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: ?67,"Class",?74,"Charge"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !,"====================",?22,"============"
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: ?36,"============ ===========",?61,"====",?67,"=====",?74,"======"
  • Line Location: HDR+7
Routine Call
  • %ZIS
  • Line Location:
    • DEV+1
Routine Call
  • DIC
  • Line Location:
    • EN+8
    • EN+13
Routine Call
  • DIR
  • Line Location:
    • EN+2
    • PG+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(405.4 - [#405.4] LIST+25
^FH(119.6 - [#119.6] LIST+7, LIST+9, LIST+11, LIST+23, LIST+30
^FH(119.73 - [#119.73] LIST+8
^FHPT - [#115] LIST+4
^FHPT("GM" LIST+2, LIST+3
^TMP($J LIST+1!, LIST+12*, LIST+16, LIST+17, LIST+20, LIST+21, LIST+22

Label References

Name Line Occurrences
DEV EN+18
EN EN+18
END DEV+2, DEV+8
HDR LIST+19, PG+3
LIST DEV+2
PG LIST+18, LIST+36

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DEV+1!*, DEV+7!
DIC EN+7!*, EN+12!*
DIC("A" EN+7*, EN+12*
DIC(0 EN+8*, EN+13*
DIR EN+1!, END+1!, PG+2!
DIR("A" EN+1*
DIR(0 EN+2*, PG+2*
>> DIRUT EN+3
>> DUOUT EN+8, EN+13
ENDT EN+16, EN+17*, LIST+2, END+1!
>> EX LIST+1*, LIST+17, LIST+18, LIST+20, LIST+21, LIST+36, PG+2*
FHCH LIST+27*, LIST+34, END+1!
FHCL LIST+27*, LIST+29*, LIST+34, END+1!
>> FHCOMM LIST+7*, LIST+8
>> FHD LIST+33*
>> FHDFN LIST+3*, LIST+4, LIST+12, LIST+26*, LIST+35
FHGMDT LIST+2*, LIST+3, LIST+4, LIST+12, LIST+20*, LIST+21, LIST+22, LIST+33, LIST+35, END+1!
>> FHLBY EN+3*, EN+4, EN+5, EN+10, LIST+6, LIST+7, LIST+8
>> FHLIST( LIST+35*
>> FHLOC EN+4*, LIST+6*, LIST+7, LIST+9, LIST+11, LIST+22*, LIST+23, LIST+30*, LIST+34
>> FHLOCNM LIST+11*, LIST+12
>> FHLOCZN LIST+23*
>> FHLSRT LIST+17*, LIST+20, LIST+21, LIST+22, HDR+3
FHML LIST+27*, LIST+34, END+1!
FHNODE LIST+22*, LIST+24, LIST+27, LIST+28, END+1!
>> FHPG LIST+1*, LIST+18, LIST+19*
FHPRD LIST+8*, END+2!
>> FHPRORD LIST+9*, LIST+10*, LIST+12
>> FHPTN LIST+21*, LIST+22, LIST+26
>> FHPTNM LIST+12, LIST+32
>> FHRMBD LIST+24*, LIST+25
>> FHRMBNM LIST+24*, LIST+25*, LIST+34
FHSELOC EN+4*, LIST+6, END+1!
FHSLCOM EN+5, EN+6*, EN+8*, EN+9*, LIST+7, END+1!
FHSLPRO EN+10, EN+11*, EN+13*, EN+14*, LIST+8, END+2!
>> FHST LIST+4*
>> FHSTAT LIST+28*
FHZN LIST+4*, LIST+6, LIST+12, END+1!
IO DEV+2
IO("Q" DEV+2
IOF FHOMGP1+3, HDR+1
IOP DEV+1!, DEV+7!
IOSL LIST+36
IOST LIST+18, PG+2
>> NUM LIST+1*, LIST+28*, LIST+35
>> POP DEV+1
STDT EN+15, LIST+2, END+1!
U LIST+4, LIST+6, LIST+7, LIST+8, LIST+9, LIST+11, LIST+17, LIST+18, LIST+20, LIST+21
, LIST+22, LIST+24, LIST+25, LIST+27, LIST+28, LIST+30, LIST+36, PG+2
>> Y EN+3, EN+8, EN+9, EN+13, EN+14, PG+2
>> 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