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

Package: Patient Care Component Reports

Routine: APCLDP1


Information

APCLDP1 ; IHS/CMI/LAB - ACTIVE CLIENT LIST ;

Source Information

Source file <APCLDP1.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA Fileman 4 DD^%DT  C^%DTC  ^DIC  ^DIR  
IHS VA Utilities 2 ^XBDBQUE  EN^XBVK  
Patient Care Component Reports 2 XTMP^APCLOSUT  ($$DEMO,DEMOCHK)^APCLUTL  
Kernel 1 HOME^%ZIS  

Entry Points

Name Comments DBIA/ICR reference
BD ;get beginning date
VSTS ; process visits
PROC1 ;
ZIS ;
PROV ;
START ;
PROC ;EP - entry point for processing
GETDATES ;
XIT
ED ;get ending date
ASK ;
DEMO ;
PROC0 ;

External References

Name Field # of Occurrence
DD^%DT ED+1, ED+4
C^%DTC ED+4
HOME^%ZIS START+2
XTMP^APCLOSUT PROC+2
$$DEMO^APCLUTL PROC1+1
DEMOCHK^APCLUTL DEMO+1
^DIC PROV+2
^DIR BD+2, ED+1, ASK+2
^XBDBQUE DEMO+4
EN^XBVK XIT+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @(IOF),!!
  • Line Location: START+3
Function Call: WRITE
  • Prompt: "** PATIENTS BY DESIGNATED PRIMARY CARE PROVIDER, WITH VISIT COUNTS, DX'S **",!
  • Line Location: START+4
Function Call: WRITE
  • Prompt: "This report will produce a list of patients by their Designated Primary ",!,"Care Provider. It will include the patient's name, chart #, age, "
  • Line Location: START+5
Function Call: WRITE
  • Prompt: !,"number of times seen by the Designated Primary Care Provider, number of times "
  • Line Location: START+6
Function Call: WRITE
  • Prompt: !,"seen by other primary providers and diagnoses.",!
  • Line Location: START+7
Function Call: WRITE
  • Prompt: !,"Please enter the date range during which the patient should have been seen.",!
  • Line Location: BD+1
Function Call: WRITE
  • Prompt: !
  • Line Location: BD+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ED+1
Routine Call
  • %ZIS
  • Line Location:
    • START+2
Routine Call
  • DIC
  • Line Location:
    • PROV+2
Routine Call
  • DIR
  • Line Location:
    • BD+2
    • ED+1
    • ASK+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPAT("AK" PROC+4, PROC0+1
^AUPNVSIT - [#9000010] VSTS+4, VSTS+5, VSTS+6
^AUPNVSIT("AA" VSTS+2, VSTS+3
^DD(9000010.06 PROV+2, PROV+5
^DIC(16 - [#16] PROV+5
^VA(200 - [#200] PROV+5
^XTMP("APCLDP1" PROC1+2*, VSTS+9*

Label References

Name Line Occurrences
ASK PROV+3, DEMO+2
BD ED+2
GETDATES ASK+3
PROC0 PROC+3, PROC+4
PROC1 PROC0+1
XIT START+1, BD+3
ZIS ASK+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% XIT+2!
APCL80D XIT!
APCLAGE XIT+2!
APCLBD BD+4*, ED+1, ED+4, XIT!, VSTS+1
APCLBDD ED+4*, XIT+1!
APCLBDO XIT+1!, VSTS+1*, VSTS+2
APCLBT XIT+1!, PROC+1*
APCLBTH XIT!, PROC+1*, PROC1+2, VSTS+9
>> APCLDEMO DEMO+1, DEMO+2, PROC1+1
APCLED ED+3*, ED+4, XIT!, VSTS+1
APCLEDD ED+4*, XIT+1!
APCLEDO XIT+1!, VSTS+1*
APCLET XIT+1!, PROC+5*
APCLFOUN XIT+1!
APCLHIT XIT+1!
APCLHRCN XIT!
APCLID XIT+1!
APCLJOB XIT!, PROC+1*, PROC1+2, VSTS+9
APCLLENG XIT!
APCLLINE XIT+1!
APCLNUM XIT!, VSTS+9
APCLP XIT+1!
APCLPCNT XIT!
APCLPG XIT!
APCLPRNM XIT+1!
APCLPRNT XIT+1!
APCLPROB XIT+1!
APCLPROV ASK+1*, PROV+4*, XIT+2!, PROC+3, PROC+4*, PROC0+1, PROC1+2
APCLPRV PROV+5*, XIT+1!
APCLQ XIT+1!
APCLR XIT+1!, VSTS+1*, VSTS+3*, VSTS+4, VSTS+5, VSTS+6
APCLRCNT XIT+1!, VSTS+1*, VSTS+7*, VSTS+9
APCLRLOC XIT+1!
APCLSD ED+4*, XIT+1!, VSTS+1*, VSTS+2*, VSTS+3
APCLTOT XIT+1!, PROC+1*
APCLX XIT!
C XIT+2!
D XIT!
D0 XIT+2!
DA XIT+2!
DDH XIT+2!
DFN XIT!, XIT+2!, PROC+1*, PROC+6!, PROC0+1*, PROC1+1, PROC1+2, VSTS+2, VSTS+3, VSTS+9
DIC PROV+2*!, XIT!, XIT+2!
DIC("A" PROV+2*
DIC(0 PROV+2*
DIG XIT+2!
DIQ XIT+2!
DIR BD+2!, ED+1!, ASK+2!, XIT!
DIR("A" BD+2*, ED+1*, ASK+2*
DIR("B" ASK+2*
DIR(0 BD+2*, ED+1*, ASK+2*
DIRUT BD+2*, BD+3, ED+1*, ED+2, ASK+2*, ASK+3, XIT!
DIU XIT+2!
DIV XIT+2!
DIW XIT+2!
DR XIT+2!
DTOUT XIT!
DUOUT BD+2, ED+1, ASK+2, XIT!
I XIT+2!
IO("Q" XIT!
IOF START+2, START+3
J XIT+2!
K XIT+2!
P XIT+2!
U PROV+2, PROV+5, VSTS+4, VSTS+5, VSTS+6
X ED+4, XIT+2!
>> X1 ED+4*
>> X2 ED+4*
XBNS DEMO+3*, XIT!
XBRC DEMO+3*, XIT!
XBRP DEMO+3*, XIT!
>> XBRX DEMO+3*
XBTX XIT!
Y BD+4, ED+1*, ED+3, ED+4*, ASK+4, PROV+3, PROV+4, PROV+5, XIT!, XIT+2!
Z XIT+2!
ZTSK XIT!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All