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

Package: Dietetics

Routine: FHORC1


Information

FHORC1 ; HISC/REL - Review Active Consults ;4/26/93 14:48

Source Information

Source file <FHORC1.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Dietetics 3 (DTP,EN2,TR)^FH  PID^FHDPA  PATNAME^FHOMUTL  
Kernel 3 ^%ZIS  ^%ZISC  KILL^XUSCLEAN  
VA Fileman 1 ^DIC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Dietetics 1 FHORC2  

Entry Points

Name Comments DBIA/ICR reference
Q1
Q0 ; Display Active Consults
Q3
Q2
Q5
Q4
Q10
KIL
E1
E2

External References

Name Field # of Occurrence
^%ZIS E2
^%ZISC E2+2
^DIC E1+1
DTP^FH Q5+9
EN2^FH E2+1
TR^FH E1
PID^FHDPA Q5+5
PATNAME^FHOMUTL Q5+1
KILL^XUSCLEAN KIL

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Prompt: "Select CLINICIAN (or ALL): "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: X
  • Line Location: E1+0
Function Call: WRITE
  • Prompt: !
  • Line Location: E2+0
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $E(IOST,1,2)="C-"
  • Line Location: Q0+1
Function Call: WRITE
  • Prompt: !?25,"A C T I V E C O N S U L T S"
  • Line Location: Q0+1
Function Call: WRITE
  • Prompt: !!?(80-$L(X)\2),X
  • Line Location: Q0+2
Function Call: WRITE
  • Prompt: !!,"Date/Time Ordered",?19,"Request",?31,"ID#",?40,"Patient",?62,$S(FHDZ:"Ward",1:"Clinician"),!
  • Line Location: Q0+3
Function Call: WRITE
  • Prompt: !,DTP,?19,REQ,?31,BID,?40,$E(PNAM,1,20),?62,$E(WARD,1,17)
  • Line Location: Q5+10
Function Call: READ
  • Prompt: "Press RETURN to Continue "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: X
  • Line Location: Q10+0
Function Call: WRITE
  • Prompt: !
  • Line Location: Q10+1
Routine Call
  • DIC
  • Line Location:
    • E1+1
Routine Call
  • %ZIS
  • Line Location:
    • E2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPM - [#405] Q5+4, Q5+6
^DPT - [#2] Q5+5
^FH(119.5 - [#119.5] Q5+8
^FH(119.6 - [#119.6] Q5+6
^FHPT - [#115] Q5+2, Q5+4*, Q5+5
^FHPT("ADRU" Q2, Q3, Q4, Q5, Q5+4!
^VA(200 - [#200] Q0+2, Q5+7

Label References

Name Line Occurrences
E1 E1+1, E2+1, E2+2
KIL E1, E2, E2+1, E2+2
Q0 E2+2
Q10 Q2, Q3
Q2 Q3
Q3 Q1, Q4
Q4 Q5
Q5 Q5+4, Q5+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS E2!*, E2+2!
%ZIS("A" E2*
>> ADM Q3*, Q4*, Q5, Q5+2, Q5+4, Q5+5, Q5+6
>> BID Q5+10
>> DFN Q5+1, Q5+5
DIC E1+1!*
DIC(0 E1+1*
>> DIET Q5+3*, Q5+7
>> DR Q4*, Q5*, Q5+2, Q5+4
>> DTE Q5+3*, Q5+9
DTIME E1, Q10
>> DTP Q5+9*, Q5+10
>> FHDFN Q1*, Q2*, Q3*, Q4, Q5, Q5+2, Q5+4, Q5+5
>> FHDZ E1*, E1+1*, E2+1, E2+2, Q0+2, Q0+3, Q1, Q3, Q5+6, Q5+7
>> FHLST E2+1*
>> FHPGM E2+1*
>> FHWRD Q5+5*, Q5+6
IO E2+2
IO("Q" E2+1
IOF Q0+1
IOP E2!, E2+2!
IOST Q0+1, Q10
>> PNAM Q5+5*, Q5+10
>> POP E2
>> REQ Q5+3*, Q5+8*, Q5+10
>> WARD Q5+6*, Q5+7*, Q5+10
>> X E1*, Q0+2*, Q10*
>> X1 Q1*, Q2*, Q3, Q4, Q5, Q5+4
>> Y E1+1, Q5+2*, Q5+3, Q5+5*
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