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

Package: Patient Care Component Reports

Routine: APCLDP1P


Information

APCLDP1P ; IHS/CMI/LAB - print active client list ;

Source Information

Source file <APCLDP1P.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 3 DD^%DT  EN^DIQ1  ^DIR  
DRG Grouper 1 $$ICDDX^ICDEX  
IHS VA Utilities 1 $$VAL^XBDIQ1  
Patient Care Component Reports 1 DONE^APCLOSUT  

Entry Points

Name Comments DBIA/ICR reference
PIH ;
VSTS ; process visits
HEAD1 ;
HEAD
START ;
DFN ;
DONE
PRINT ;
LINE ;

External References

Name Field # of Occurrence
DD^%DT START+2
DONE^APCLOSUT DONE
EN^DIQ1 DFN+6
^DIR HEAD+1
$$ICDDX^ICDEX VSTS+13
$$VAL^XBDIQ1 START+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"NO PATIENTS TO REPORT"
  • Line Location: START+4
Function Call: WRITE
  • Prompt: !,$E($P(^DPT(DFN,0),U),1,15)
  • Line Location: DFN+3
Function Call: WRITE
  • Prompt: ?17,$J(APCLHRCN,7)
  • Line Location: DFN+5
Function Call: WRITE
  • Prompt: ?26,APCLAGE
  • Line Location: DFN+8
Function Call: WRITE
  • Prompt: ?38,APCLLINE(X),!
  • Line Location: VSTS+22
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: $P(^VA(200,DUZ,0),U,2),?72,"Page ",APCLPG,!
  • Line Location: HEAD1+2
Function Call: WRITE
  • Prompt: ?(80-$L($P(^DIC(4,DUZ(2),0),U))/2),$P(^DIC(4,DUZ(2),0),U),!
  • Line Location: HEAD1+3
Function Call: WRITE
  • Prompt: ?5,"PATIENTS BY DESIGNATED PRIMARY CARE PROVIDER, WITH VISIT COUNTS",!
  • Line Location: HEAD1+4
Function Call: WRITE
  • Prompt: ?(80-(L+35)/2),"DESIGNATED PRIMARY CARE PROVIDER: ",P,!
  • Line Location: HEAD1+5
Function Call: WRITE
  • Prompt: ?17,"VISIT DATES: ",APCLBDD," TO ",APCLEDD,!
  • Line Location: HEAD1+6
Function Call: WRITE
  • Prompt: !!?31,"TIMES",?38,"OTHER"
  • Line Location: PIH+1
Function Call: WRITE
  • Prompt: !?31,"SEEN",?38,"PROVIDERS",!
  • Line Location: PIH+2
Function Call: WRITE
  • Prompt: "PATIENT NAME",?17,"CHART #",?26,"AGE",?31,"BY DP",?38,"SEEN",?54,"ICD DIAGNOSES",!,APCL80D
  • Line Location: PIH+3
Routine Call
  • DIR
  • Line Location:
    • HEAD+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPAT - [#9000001] DFN+4
^AUPNVPOV - [#9000010.07] VSTS+13
^AUPNVPOV("AD" VSTS+13
^AUPNVPRV - [#9000010.06] VSTS+7
^AUPNVPRV("AD" VSTS+7
^AUPNVSIT("AA" VSTS+4, VSTS+5
^DD(9000010.06 VSTS+9, VSTS+10, HEAD1+5
^DIC(16 - [#16] VSTS+9, VSTS+10, HEAD1+5
^DIC(4 - [#4] HEAD1+3
^DPT - [#2] DFN+3
^UTILITY("DIQ1" DFN+6!, DFN+7!
^VA(200 - [#200] VSTS+9, VSTS+10, HEAD1+2, HEAD1+5
^XTMP("APCLDP1" START+4, START+5, START+8, DONE+1!

Label References

Name Line Occurrences
DFN START+8
DONE START+4, START+12
HEAD START+4, START+8, START+10, DFN+2
HEAD1 HEAD
LINE VSTS+19, VSTS+21

Naked Globals

Name Field # of Occurrence
^(0 DFN+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> APCL80D START+1*, PIH+3
>> APCLAGE DFN+7*, DFN+8
>> APCLBD START+2, VSTS+3
>> APCLBDD START+2*, HEAD1+6
>> APCLBDO VSTS+3*, VSTS+4
APCLBTH START+4, START+5, START+8, DONE+1!
>> APCLED START+2, VSTS+3
>> APCLEDD START+2*, HEAD1+6
>> APCLEDO VSTS+3*
>> APCLHRCN DFN+4*, DFN+5
APCLJOB START+4, START+5, START+8, DONE+1!
APCLLINE VSTS+16!
APCLLINE( VSTS+22, LINE+9*, LINE+10*, LINE+11*
APCLLINE(1 VSTS+17*, LINE+3*, LINE+7*, LINE+9, LINE+11
>> APCLP VSTS+7*, VSTS+13*
APCLPCNT VSTS+16!
>> APCLPG START+3*, HEAD, HEAD1+1*, HEAD1+2
APCLPRNM VSTS+16!, VSTS+18!, VSTS+20!, LINE+1
APCLPRNM( VSTS+18*, VSTS+20*, LINE+4, LINE+8
APCLPRNM(1 LINE+6
APCLPRNT VSTS+16!, LINE+1*, LINE+2*, LINE+3, LINE+6*, LINE+7, LINE+8*, LINE+10
APCLPROB VSTS+2!
APCLPROB( VSTS+13*, VSTS+20
>> APCLPROV START+5*, START+8, START+11, VSTS+8, HEAD1+5
APCLPRV VSTS+2!
APCLPRV( VSTS+9*, VSTS+10*, VSTS+18
APCLQ START+5, START+6!, START+8, START+9, START+10, START+12, DFN+2, HEAD+1*
>> APCLR VSTS+3*, VSTS+5*, VSTS+7, VSTS+13
>> APCLRCNT VSTS+1*, VSTS+3*, VSTS+8*, VSTS+22*
APCLRLOC VSTS+2!
>> APCLSD VSTS+3*, VSTS+4*, VSTS+5
>> APCLSUB START+7*, START+11, DFN+1*
>> C VSTS+18*, VSTS+20*
>> DA DFN+6*
>> DFN START+6*, START+8*, DFN+3, DFN+4, DFN+6, DFN+7, VSTS+4, VSTS+5
>> DIC DFN+6*
DIR HEAD+1!
DIR(0 HEAD+1*
>> DR DFN+6*
>> DTOUT HEAD+1
DUZ HEAD1+2
DUZ(2 DFN+4, HEAD1+3
>> I LINE+3*, LINE+7*, LINE+10*, LINE+11*
IO HEAD+1
IO(0 HEAD+1
IOF HEAD1+1
IOSL START+10, DFN+2
IOST HEAD+1
>> J LINE+3*, LINE+7*, LINE+10*, LINE+11*
>> K VSTS+18*, VSTS+20*, LINE+2, LINE+3, LINE+6, LINE+7, LINE+8, LINE+9, LINE+10, LINE+11*
>> L HEAD1+5*
>> P VSTS+7*, VSTS+8, VSTS+9, VSTS+10, VSTS+13*, HEAD1+5*
U DFN+3, DFN+4, VSTS+7, VSTS+9, VSTS+10, VSTS+13, HEAD1+2, HEAD1+3, HEAD1+5
>> X VSTS+18*, VSTS+20*, VSTS+22*, LINE+4*, LINE+5, LINE+8, LINE+9, LINE+10, LINE+11*
>> Y START+2*, HEAD+1
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All