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

Package: Dietetics

Routine: FHASE1


Information

FHASE1 ; HISC/REL/NCA - Encounter Statistics ;3/6/95 11:57

Source Information

Source file <FHASE1.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Dietetics 3 (EN2,TR)^FH  Q1^FHASE1A  (,IND)^FHMASE1  
Kernel 3 ^%ZIS  ^%ZISC  KILL^XUSCLEAN  
VA Fileman 2 ^%DT  ^DIC  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Dietetics 2 FHASE4  FHASE7  

Entry Points

Name Comments DBIA/ICR reference
F0
F1
F2
A1
A0
KIL
IND ; List Encounters for a clinician
; Check for multidivisional site
DT ; Get From/To Dates
D2
D1

External References

Name Field # of Occurrence
^%DT D1, D2
^%ZIS F2+1
^%ZISC F2+3
^DIC A1
EN2^FH F2+2
TR^FH A0, F0, F1
Q1^FHASE1A F2+3
^FHMASE1 FHASE1+3
IND^FHMASE1 IND+2
KILL^XUSCLEAN KIL

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Prompt: "Statistics for ALL Clinicians? Y// "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: X
  • Line Location: A0+0
Function Call: WRITE
  • Prompt: *7," Answer YES or NO"
  • Line Location: A0+0
Function Call: WRITE
  • Prompt: !
  • Line Location: A1+0
Function Call: READ
  • Prompt: "Break-down by Clinician? Y// "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: X
  • Line Location: F0+0
Function Call: WRITE
  • Prompt: *7," Answer YES or NO"
  • Line Location: F0+0
Function Call: READ
  • Prompt: "List Individual Patient Encounters? N// "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: X
  • Line Location: F1+0
Function Call: WRITE
  • Prompt: *7," Answer YES or NO"
  • Line Location: F1+0
Function Call: WRITE
  • Prompt: !!,"The report requires a 132 column printer.",!
  • Line Location: F2+0
Function Call: WRITE
  • Prompt: !
  • Line Location: F2+1
Function Call: WRITE
  • Prompt: !
  • Line Location: D1+0
Function Call: WRITE
  • Prompt: *7," [Cannot Start after Today!] "
  • Line Location: D1+1
Function Call: WRITE
  • Prompt: *7," [End before Start?] "
  • Line Location: D2+1
Function Call: WRITE
  • Prompt: *7," [Must Not enter date greater than Today!] "
  • Line Location: D2+2
Routine Call
  • DIC
  • Line Location:
    • A1
Routine Call
  • %ZIS
  • Line Location:
    • F2+1

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)
^FH(119.9 - [#119.9] FHASE1+3, IND+2
^TMP($J KIL!

Label References

Name Line Occurrences
A0 FHASE1+4, A0
A1 A1
D1 D1, D1+1, D2+1, D2+2
D2 D2
DT FHASE1+4, IND+3
F0 A0+1, F0
F1 IND+3, F1
F2 A1
KIL FHASE1+4, IND+3, A0, A1, F0, F1, F2+1, F2+2, F2+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT D1*, D2*
>> %DT("A" D1*, D2*
%ZIS F2+1!*, F2+3!
%ZIS("A" F2+1*
DIC A1!*
DIC("A" A1*
DIC(0 A1*
DT D1+1, D2+2
DTIME A0, F0, F1
>> DTOUT A1, D1, D2
DUZ IND+3
>> EDT D2*, D2+1, D2+2
>> FHLST F2+2*
>> FHPGM F2+2*
>> FHX1 IND+3*, A1*, F0+1*, F1, F1+1
>> FHX2 IND+3*, A1*, F0+1*, F1+1*
IO F2+3
IO("Q" F2+2
IOP F2+1!, F2+3!
>> POP F2+1
>> SDT D1*, D1+1, D2+1
U FHASE1+3, FHASE1+4, IND+2, IND+3, F0, F1, D1, D2
>> X FHASE1+4, IND+3, A0*, A0+1, A1, F0*, F0+1, F1*, F1+1, D1*
, D2*
>> Y A1, D1, D2
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