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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: APCLAP2P

Package: Patient Care Component Reports

Routine: APCLAP2P


Information

APCLAP2P ; IHS/CMI/LAB - print all visit report ;

Source Information

Source file <APCLAP2P.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 3 DD^%DT  NOW^%DTC  ^DIR  
Patient Care Component Reports 1 DONE^APCLOSUT  

Entry Points

Name Comments DBIA/ICR reference
SORT ;
HEAD
HEAD1 ;
P ;
CTR(X,Y) ;EP - Center X in a field Y wide.
START ;
DONE ;

External References

Name Field # of Occurrence
DD^%DT START+2, START+3, START+15, P+5
NOW^%DTC START+2
DONE^APCLOSUT DONE+1
^DIR HEAD+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?35,$E(APCLSRT2,1,20),?60,$J(^XTMP("APCLAP2",APCLJOB,APCLBTH,"ALLLOC",APCLSORT,APCLSRT2),8)
  • Line Location: START+16
Function Call: WRITE
  • Prompt: !?60,"--------",!
  • Line Location: START+23
Function Call: WRITE
  • Prompt: ?52,"Total:",?60,$J(APCLTOT,8),!
  • Line Location: START+24
Function Call: WRITE
  • Prompt: !?60,"--------",!
  • Line Location: SORT+5
Function Call: WRITE
  • Prompt: ?50,"Subtotal:",?60,$J(^XTMP("APCLAP2",APCLJOB,APCLBTH,"SUBTOTAL",APCLVLOC),8),!
  • Line Location: SORT+6
Function Call: WRITE
  • Prompt: ?35,$E(APCLSRT2,1,20),?60,$J(^XTMP("APCLAP2",APCLJOB,APCLBTH,"LOCTOT",APCLVLOC,APCLSORT,APCLSRT2),8)
  • Line Location: P+6
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD1+2
Function Call: WRITE
  • Prompt: ?58,APCLDT,?72,"Page ",APCLPG,!
  • Line Location: HEAD1+3
Function Call: WRITE
  • Prompt: ?((80-APCLLENG)/2),"NUMBER OF AMBULATORY VISITS BY ",APCLTITL,!
  • Line Location: HEAD1+5
Function Call: WRITE
  • Prompt: ?((80-APCLLENG)/2),"LOCATION OF VISITS: ",APCLLOCT,!
  • Line Location: HEAD1+8
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: HEAD1+9
Function Call: WRITE
  • Prompt: ?18,"VISIT DATES: ",APCLBDD," TO ",APCLEDD,!
  • Line Location: HEAD1+10
Function Call: WRITE
  • Prompt: !,"LOCATION OF VISIT"
  • Line Location: HEAD1+11
Function Call: WRITE
  • Prompt: !?5,APCLHD1,?35,APCLHD2,?60,"# VISITS",!
  • Line Location: HEAD1+12
Function Call: WRITE
  • Prompt: APCL80S,!
  • Line Location: HEAD1+13
Routine Call
  • DIR
  • Line Location:
    • HEAD+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] SORT+2
^XTMP("APCLAP2" START+6, START+12, START+13, START+16, START+17, DONE+2!, SORT+3, SORT+6, P+1, P+2*
, P+6, P+7, P+8*

Label References

Name Line Occurrences
$$CTR HEAD1+9
DONE START+21, START+22
HEAD START+4, START+10, START+14, START+22, SORT+1, P+3
HEAD1 HEAD
P SORT+3
SORT START+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> APCL80S START+1*, HEAD1+13
>> APCLBD START+3
>> APCLBDD START+3*, HEAD1+10
>> APCLBTH START+6, START+12, START+13, START+16, START+17, DONE+2, SORT+3, SORT+6, P+1, P+2
, P+6, P+7, P+8
>> APCLCRYN HEAD1+9
>> APCLDT START+2*, HEAD1+3
>> APCLED START+3
>> APCLEDD START+3*, HEAD1+10
>> APCLGTOT START+8*, START+17*
>> APCLHD1 HEAD1+12
>> APCLHD2 HEAD1+12
>> APCLJOB START+6, START+12, START+13, START+16, START+17, DONE+2, SORT+3, SORT+6, P+1, P+2
, P+6, P+7, P+8
>> APCLLENG HEAD1+4*, HEAD1+5, HEAD1+7*, HEAD1+8
>> APCLLOC HEAD1+6
>> APCLLOCT HEAD1+6*, HEAD1+7, HEAD1+8
>> APCLLTT START+9*, START+11
>> APCLPG START+4*, HEAD, HEAD1+1*, HEAD1+3
>> APCLPRNT START+15*, START+16, P+5*, P+6
>> APCLPROC START+7, START+11, START+15, START+16, START+18, SORT+2, SORT+4, P+5, P+6
APCLQUIT START+5!, START+6, START+10, START+12, START+13, START+14, START+21, START+22, SORT+1, SORT+3
, P+1, P+3, HEAD+1*
>> APCLSORT START+12*, START+13, START+15, START+16, START+17, SORT+3*, P+1, P+5, P+6, P+7
, P+8
>> APCLSRT2 START+13*, START+16, START+17, P+1*, P+6, P+7, P+8
>> APCLTITL HEAD1+4, HEAD1+5
>> APCLTOT START+4*, START+24, P+7*
>> APCLTOTL START+7
>> APCLVLOC START+4*, START+6*, SORT+2, SORT+3, SORT+6, P+1, P+2, P+6, P+7, P+8
DIR HEAD+1!
DIR(0 HEAD+1*
>> DTOUT HEAD+1
IO HEAD+1
IO(0 HEAD+1
IOF HEAD1+1
IOM CTR+1
IOSL START+10, START+14, START+22, SORT+1, P+3
IOST HEAD+1
U SORT+2
X START+2, HEAD1+9*, CTR~, CTR+1
Y START+2*, START+3*, START+15*, P+5*, HEAD+1, CTR~, CTR+1
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All