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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: APCLCP8

Package: Patient Care Component Reports

Routine: APCLCP8


Information

APCLCP8 ; IHS/CMI/LAB - GIS/TUCSON PCC REPORT WITH AGE BUCKETS ; 11 Apr 2013 10:33 AM

Source Information

Source file <APCLCP8.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA Fileman 5 DD^%DT  C^%DTC  ^DIC  EN^DIQ  ^DIR  
Patient Care Component Reports 2 (O,OC,T,TC)^APCLCP1  DEMOCHK^APCLUTL  
IHS VA Utilities 1 ^XBDBQUE  

Entry Points

Name Comments DBIA/ICR reference
BD ;get beginning date
LOC ;get location
SETBIN ;
ERR
LIST ;
AGE ;
BIN
SET
DEMO ;
CLOSE
TC ;EP taxonomy
ZIS ;
ED ;get ending date
O ;EP one location
START ;
CLINIC ;
GC ;
T ;EP taxonomy
RUN ;
OC ;EP one location
GETDATES ;
XIT ;
GETGROUP ;

External References

Name Field # of Occurrence
DD^%DT START+3, ED+1
C^%DTC ED+4
O^APCLCP1 LOC+6
OC^APCLCP1 CLINIC+6
T^APCLCP1 LOC+7
TC^APCLCP1 CLINIC+7
DEMOCHK^APCLUTL DEMO+1
^DIC GETGROUP+1, O+2, T+2, OC+2, TC+2
EN^DIQ GETGROUP+5
^DIR BD+1, ED+1, LOC+3, CLINIC+3, BIN+2, AGE+1, GC+1
^XBDBQUE DEMO+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"This report will present, for all visits on which staff members of",!,"discipline group that you select was a provider, time and patient services",!,"by age and sex.",!
  • Line Location: START+2
Function Call: WRITE
  • Prompt: !,"Bye ... "
  • Line Location: GETGROUP+2
Function Call: WRITE
  • Prompt: !!,"You have selected the ",$P(Y,U,2)," discipline group.",!
  • Line Location: GETGROUP+4
Function Call: WRITE
  • Prompt: !
  • Line Location: BD+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ED+1
Function Call: WRITE
  • Prompt: !!,"The Age Groups to be used are currently defined as:",!
  • Line Location: BIN+1
Function Call: WRITE
  • Prompt: !
  • Line Location: RUN+1
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: AGE+6
Function Call: WRITE
  • Prompt: !,"Make sure the age is higher the beginning age of the previous group.",!
  • Line Location: AGE+6
Function Call: WRITE
  • Prompt: " ??",$C(7)
  • Line Location: GC+5
Function Call: WRITE
  • Prompt: !,$P(X,":")," - ",$P(X,":",2)
  • Line Location: LIST+2
Function Call: WRITE
  • Prompt: !
  • Line Location: LIST+3
Function Call: WRITE
  • Prompt: $C(7),$C(7),!,"Must be a valid date and be Today or earlier. Time not allowed!"
  • Line Location: ERR+0
Routine Call
  • DIC
  • Line Location:
    • GETGROUP+1
    • O+2
    • T+2
    • OC+2
    • TC+2
Routine Call
  • DIR
  • Line Location:
    • BD+1
    • ED+1
    • LOC+3
    • CLINIC+3
    • BIN+2
    • AGE+1
    • GC+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(40.7 - [#40.7] Classic Fileman Calls
^APCLACTG - [#9001003.6] Classic Fileman Calls
^ATXAX - [#9002226] Classic Fileman Calls
^AUTTLOC - [#9999999.06] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ATXAX - [#9002226] T+4, TC+4

Label References

Name Line Occurrences
AGE RUN+1
BD ED+2, LOC+4
BIN CLINIC+5, RUN+1, RUN+2, DEMO+2
CLINIC LOC+5, CLINIC+6, CLINIC+7
CLOSE RUN+2, GC+5
GETDATES BIN+3
GETGROUP BD+2
LIST BIN+1, RUN+3
LOC LOC+6, LOC+7, CLINIC+4
RUN AGE+6
SET AGE+5
XIT GETGROUP+2, DEMO+5
ZIS BIN+4, RUN+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% LIST+1*, LIST+2, XIT+3!
APCL1 XIT+1!
APCL2 XIT+1!
APCL80S XIT+1!
APCLA RUN+1*, AGE+5, SET*, GC+4, XIT+2!
APCLACTG GETGROUP+3*, XIT+2!
APCLAGE XIT+2!
APCLAP XIT+1!
APCLBD BD+3*, ED+1, ED+4, XIT+1!
APCLBDD XIT+1!
APCLBIN BIN*, GC+4*, LIST+1, SETBIN+1*, XIT+2!
APCLBT XIT+1!, XIT+2!
APCLCHN XIT+2!
APCLCLN CLINIC+1!, CLINIC+5!
APCLCLN( OC+4*, TC+4*
>> APCLDEMO DEMO+1, DEMO+2
APCLDISC XIT+1!
APCLDOB XIT+2!
APCLDOBS XIT+2!
APCLDT START+3*, XIT+1!
APCLED ED+3*, XIT+1!
APCLEDD XIT+1!
APCLFOUN XIT+2!
APCLJOB XIT+2!
APCLLENG XIT+1!
APCLLOC LOC+1!, LOC+5!, XIT+1!
APCLLOC( O+4*, T+4*
APCLNN XIT+2!
APCLODAT XIT+1!
APCLPG XIT+1!
APCLPRIM XIT+1!
APCLQ LOC+6, LOC+7, CLINIC+6, CLINIC+7, O+1!, O+3*, T+1!, T+3*, OC+1!, OC+3*
, TC+1!, TC+3*
APCLQUIT RUN+1!, RUN+2, AGE+2*, GC+2*, XIT+1!
APCLSD ED+4*, XIT+1!
APCLSEX XIT+2!
APCLSITE XIT+1!
APCLSKIP XIT+1!
APCLVACT XIT+1!
APCLVDFN XIT+1!
APCLVLOC XIT+1!
APCLVREC XIT+1!
APCLVTM XIT+1!
APCLVTT XIT+1!
APCLX RUN+1, AGE+3*, AGE+5, SET, SET+1, SET+2, GC+3*, GC+4, XIT+1!
APCLY RUN+1*, AGE+1, SET+1*, SET+2*, CLOSE, GC+4*, XIT+1!
APCLZ XIT+2!
APLCFOUN XIT+2!
DA GETGROUP+5*!, LOC+3!, CLINIC+3!
DIC GETGROUP+1*!, GETGROUP+5*!, O+2*!, T+2*!, OC+2*!, TC+2*!
DIC("A" GETGROUP+1*, O+2*, T+2*, OC+2*, TC+2*
DIC("S" T+2*, TC+2*
DIC(0 GETGROUP+1*, O+2*, T+2*, OC+2*, TC+2*
DIR BD+1!, ED+1!, LOC+3!, CLINIC+3!, BIN+2!, AGE+1!, GC+1!, XIT+3!
DIR("A" BD+1*, ED+1*, LOC+3*, CLINIC+3*, BIN+2*, AGE+1*, GC+1*
DIR("B" LOC+3*, CLINIC+3*, BIN+2*
DIR(0 BD+1*, ED+1*, LOC+2*, CLINIC+2*, BIN+2*, AGE+1*, GC+1*
DIRUT BD+1*, BD+2, ED+1*, ED+2, LOC+4, CLINIC+4, BIN+3, AGE+1*, GC+1*, XIT+3!
DLOUT XIT+3!
DT START+3
DTOUT AGE+2, GC+2, XIT+3!
DUOUT BD+1, ED+1, AGE+1, AGE+2, GC+1, GC+2, XIT+3!
H XIT+3!
>> I LIST+2*
IO("Q" XIT+3!
IOF START+1
M XIT+3!
POP XIT+3!
S XIT+3!
T XIT+3!
TS XIT+3!
U GETGROUP+4
X ED+4, LIST+2*, XIT+3!, T+4*, TC+4*
X1 ED+4*, XIT+3!
X2 ED+4*, XIT+3!
>> XBNS DEMO+3*
>> XBRC DEMO+3*
>> XBRP DEMO+3*
>> XBRX DEMO+3*
Y START+3*, GETGROUP+2, GETGROUP+3, GETGROUP+4, GETGROUP+5, BD+3, ED+1*, ED+3, LOC+5, LOC+6
, LOC+7, CLINIC+5, CLINIC+6, CLINIC+7, BIN+4, AGE+3, AGE+4, GC+3, XIT+3!, O+3
, O+4, T+3, T+4, OC+3, OC+4, TC+3, TC+4
ZTQUEUED XIT+3!
ZTSK XIT+3!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All