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

Package: Patient Care Component Reports

Routine: APCLYV43


Information

APCLYV43 ; IHS/CMI/LAB - CLINIC VISIT COUNTS FOR 1 DAY (PRINT) ;

Source Information

Source file <APCLYV43.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Patient Care Component Reports 2 DONE^APCLOSUT  HEAD0^APCLYV42  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Patient Care Component Reports 1 APCLYV42  

Entry Points

Name Comments DBIA/ICR reference
HEAD
SET ;set up print fields
END ;
TIME
PAGE ;form feed to new page
INIT ;initialize variables
SET1
SET2
SET3
FINAL ;print grand totals

External References

Name Field # of Occurrence
DONE^APCLOSUT END+1
HEAD0^APCLYV42 INIT+1
^DIR PAGE+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?20,$E(APCLCLP,1,20)
  • Line Location: SET3+3
Function Call: WRITE
  • Prompt: " ",$S($D(^DIC(40.7,APCLCLX,0)):$P(^(0),"^",2),1:"??")
  • Line Location: SET3+4
Function Call: WRITE
  • Prompt: ?45,$J(APCLCNT,5)
  • Line Location: SET3+5
Function Call: WRITE
  • Prompt: !!?30,"TOTAL VISITS:",?45,$J(APCLTOT,5),!!
  • Line Location: FINAL+2
Function Call: WRITE
  • Prompt: !!,$P(^VA(200,DUZ,0),"^",2),?(80-$L(X)/2),X,?70,"Page ",APCLPAGE
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: !,Y,?26,"VISIT COUNTS FOR ALL CLINICS"
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: !,Y
  • Line Location: HEAD+3
Function Call: WRITE
  • Prompt: ?34,"for ",$E(APCLBD,4,5),"/",$E(APCLBD,6,7),"/",$E(APCLBD,2,3)
  • Line Location: HEAD+4
Function Call: WRITE
  • Prompt: !!?20,"CLINIC",?41,"NUMBER OF VISITS",!?20,"------",?41,"----------------",!
  • Line Location: HEAD+5
Function Call: WRITE
  • Prompt: !
  • Line Location: PAGE+2
Routine Call
  • DIR
  • Line Location:
    • PAGE+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" HEAD+3
^DIC(4 - [#4] HEAD
^DIC(40.7 - [#40.7] SET3+4
^VA(200 - [#200] HEAD+1
^XTMP("APCLYV4" INIT+1, SET1, SET2, SET3, SET3+1, END+3!

Label References

Name Line Occurrences
END INIT+1, SET3+2
FINAL SET1
HEAD SET+1, PAGE+1, PAGE+3
PAGE SET3+2, FINAL+1
SET1 SET2
SET2 SET3
SET3 SET3+5
TIME HEAD+2

Naked Globals

Name Field # of Occurrence
^(0 SET3+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%A TIME~, TIME+1*, TIME+2, TIME+3!
%B TIME~, TIME+1*, TIME+3!
%C TIME~, TIME+2*, TIME+3!
>> APCLBD HEAD+4
>> APCLBT INIT+1, SET1, SET2, SET3, SET3+1, END+3
>> APCLCLP SET+1*, SET1*, SET2, SET3, SET3+1, SET3+3
APCLCLX SET1+1*, SET2*, SET3, SET3+1, SET3+4, END+2!
APCLCNT SET3+1*, SET3+5, END+2!
APCLCTOT END+2!
>> APCLJOB INIT+1, SET1, SET2, SET3, SET3+1, END+3
APCLPAGE INIT+2*, END+2!, HEAD*, HEAD+1
APCLSTOP INIT+2*, SET3+2, END+2!, PAGE+2*, PAGE+3
APCLTOT INIT+3*, SET3+1*, FINAL+2, END+2!
APCLVDT SET2+1*, SET3*, SET3+1, END+2!
DIR PAGE+2!
DIR(0 PAGE+2*
DT HEAD+3
>> DTOUT PAGE+2
DUZ HEAD+1
DUZ(2 HEAD
IO PAGE+2
IO(0 PAGE+2
IOF HEAD
IOSL SET3+2, FINAL+1
IOST PAGE+1, PAGE+2
>> X HEAD*, HEAD+1, HEAD+2*, TIME, TIME+1
>> Y HEAD+2, HEAD+3*, PAGE+2, TIME*, TIME+3*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All