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

Package: Dietetics

Routine: FHORX1A


Information

FHORX1A ; HISC/REL/NCA/RVD - Diet Activity Report (cont) ;3/17/95 10:06

Source Information

Source file <FHORX1A.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Dietetics 4 ALG^FHCLN  PATNAME^FHOMUTL  HDR^FHORX1A  (,LNE)^FHORX1C  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Dietetics 3 FHORX1  FHORX1A  FHORX1C  

Entry Points

Name Comments DBIA/ICR reference
HDR ;W:'($E(IOST,1,2)'="C-"&'PG) @IOF S PG=PG+1 W !?20,"D I E T A C T I V I T Y R E P O R T",?72,"Page ",PG
LST1
T1 ; Process outpatient event
LST
L2
EX
L1 ; Process event
LNE ; Break line if longer than 58 chars
N1
NEWP

External References

Name Field # of Occurrence
ALG^FHCLN L2+7, T1+27, NEWP
PATNAME^FHOMUTL L2+1
HDR^FHORX1A LNE+1
^FHORX1C L2+8
LNE^FHORX1C NEWP

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$E(W1_" "_R1,1,20),?22,N1,?50,BID,?63,$S(SF:"SF",1:""),?66,$S(SO:"SO",1:""),?73,TC
  • Line Location: L2+6
Function Call: WRITE
  • Prompt: !,"Allergies: ",$S(ALG="":"None on file",1:ALG),!
  • Line Location: L2+7
Function Call: WRITE
  • Prompt: !!,$E(W1,1,20),?22,FHDPTN,?50,BID,?73,FHTC
  • Line Location: T1+27
Function Call: WRITE
  • Prompt: !,"Allergies: ",$S(ALG="":"None on file",1:ALG),!
  • Line Location: T1+27
Function Call: WRITE
  • Prompt: !?20,"D I E T A C T I V I T Y R E P O R T",?72,"Page ",PG
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !?20,"D I E T A C T I V I T Y R E P O R T",?72,"Page ",PG
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !!?(80-$L(H1)\2),H1
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?30,FHPIO
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !!,"Location",?22,"Patient",?50,"ID#",?62,"Sup/Std Service"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !?12,X1
  • Line Location: N1+1
Function Call: WRITE
  • Prompt: !
  • Line Location: LNE+1
Function Call: WRITE
  • Prompt: !?5,$E(EVT,1,58)
  • Line Location: LNE+4
Function Call: WRITE
  • Prompt: !?5,$E(EVT,1,KK-1)
  • Line Location: LNE+5
Function Call: WRITE
  • Prompt: !?5,EVT
  • Line Location: EX+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] L2+2
^FH(111 - [#111] T1+15, T1+16
^FH(115.2 - [#115.2] N1
^FH(119.73 - [#119.73] FHORX1A+10*, FHORX1A+11*
^FH(119.8 - [#119.8] T1+21
^FHPT - [#115] L2+5, NEWP+1, NEWP+2
^FHPT("ASP" L2+5
^TMP($J FHORX1A+5, FHORX1A+9, LST, LST1, T1+1
^VA(200 - [#200] T1+21

Label References

Name Line Occurrences
EX LNE+2
HDR FHORX1A+4, FHORX1A+8, L2+6, T1+26
L1 LST
L2 LST+1
LNE T1+29, LNE+6
LST FHORX1A+5
LST1 FHORX1A+9
N1 NEWP+2
NEWP L2+8
T1 LST1

Naked Globals

Name Field # of Occurrence
^( LST, NEWP+2
^(0 L2+5, T1+21

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ACT L1+1*, L1+5, L1+6, L1+8, L1+9, L1+10
>> ADM L1+1*, L1+5, L1+6, L1+8, L1+9, L1+10, L2+5
ALG L2+7, T1+27, NEWP!
>> BID L2+6, T1+4*, T1+27
>> CLK L1+1*, L1+6, L1+9, L1+10
>> DA LST*, LST1*, T1+1, T1+21
>> DFN L2+1, L2+2, T1+1*, NEWP
>> DTP T1+3*
>> EVT T1+25*, NEWP*, LNE+2, LNE+3, LNE+4, LNE+5, LNE+6*, EX
>> FHACTI T1+2*
>> FHBRK FHORX1A+9*
>> FHDES1 T1+13*, T1+14
>> FHDESC T1+5*, T1+13, T1+23*, T1+24*, T1+25
>> FHDFN L2*, L2+5, NEWP+1, NEWP+2
>> FHDIDA T1+15*, T1+16
>> FHDIET T1+14*, T1+15, T1+16*, T1+17*, T1+18
>> FHDPTN T1+19*, T1+27
>> FHEVE FHORX1A+9*
>> FHII FHORX1A+11*
>> FHNMSV FHORX1A+9*, T1+27, T1+28*
>> FHNON FHORX1A+9*
>> FHORD L1+1*, L1+2*, L1+4, L1+5, L1+6, L1+8, L1+9, L1+10
>> FHP FHORX1A+10, FHORX1A+11
>> FHPIO FHORX1A+4*, FHORX1A+8*, HDR+3
>> FHSF1 T1+24*
>> FHSO1 T1+23*
>> FHTC T1+6*, T1+27
>> FHTDAT T1+1*, T1+2, T1+3, T1+4, T1+5, T1+6
>> FHUSER T1+21*
>> FHUSERN T1+21*
>> FHUSERNM FHORX1A+9*
>> H1 HDR+2
IOF HDR+1
IOSL L2+6, T1+26, LNE+1
>> K NEWP+2*
>> KK LNE+3*, LNE+4*, LNE+5, LNE+6
>> N1 L2+3*, L2+6, T1+19*
>> NN FHORX1A+5*, FHORX1A+9*, L1+2*
>> NOW FHORX1A+10, FHORX1A+11
>> NP LST*, LST1*, L1+4*, L2+8
>> P0 FHORX1A+5*, FHORX1A+9*, LST, LST1, L2, T1+1, T1+19, T1+27, T1+28
>> PG FHORX1A+4*, HDR+1*
PP LST!, LST1!
PP( L1+5!, L1+6!*, L1+8!, L1+9*, L1+10*
>> R1 L2*, L2+6, T1+19*
>> SF L2+5*, L2+6
>> SO L2+5*, L2+6
>> TC L2+5*, L2+6
>> TXT L1+1*, L1+6, L1+9, L1+10
>> TYP L1+1*, L1+3, L1+4, L1+5, L1+6, L1+7, L1+8, L1+9, L1+10, NEWP*
U T1+16, T1+21
>> W1 L2*, L2+6, T1+19*, T1+27
>> X NEWP+2*, N1, N1+1
>> X1 NEWP+2*, NEWP+3, N1+1*, N1+2*
>> Y T1+18*, N1*, N1+1*, N1+2
>> Y0 L2+2*, L2+3
>> Z LST*, L1+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All