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

Package: Patient Care Component Reports

Routine: APCLCP1


Information

APCLCP1 ; IHS/CMI/LAB - DISC tally activity time ;

Source Information

Source file <APCLCP1.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA Fileman 5 DD^%DT  C^%DTC  ^DIC  EN^DIQ  ^DIR  
IHS VA Utilities 1 ^XBDBQUE  
PCC Medical Query 1 PEP^AMQQGTX0  
Patient Care Component Reports 1 DEMOCHK^APCLUTL  

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
Patient Care Component Reports 5 APCLCP3  APCLCP5  APCLCP6  APCLCP8  APCLCP9  

Entry Points

Name Comments DBIA/ICR reference
BD ;get beginning date
LOC ;get location
ZIS ;
ERR
INFORM ;
ED ;get ending date
OC ;EP one location
O ;EP one location
TC ;EP taxonomy
START ;
CLINIC ;
GETDATES ;
XIT ;
T ;EP taxonomy
DEMO ;
GETGROUP ;

External References

Name Field # of Occurrence
DD^%DT ED+1
C^%DTC ED+4
PEP^AMQQGTX0 T+4, TC+4
DEMOCHK^APCLUTL DEMO+1
^DIC GETGROUP+1, O+2, T+3, OC+2, TC+3
EN^DIQ GETGROUP+5
^DIR BD+1, ED+1, LOC+3, CLINIC+3
^XBDBQUE DEMO+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),$C(7),!!,"SITE NOT SET IN DUZ(2) - NOTIFY SITE MANAGER!!",!!
  • Line Location: START+1
Function Call: WRITE
  • Prompt: !
  • Line Location: GETGROUP+1
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: $C(7),$C(7),!,"Must be a valid date and be Today or earlier. Time not allowed!"
  • Line Location: ERR+0
Function Call: WRITE
  • Prompt: !,"Time and Services Report by Provider a Group of Provider Disciplines",!,"that you select.",!
  • Line Location: INFORM+2
Function Call: WRITE
  • Prompt: !,"This report displays by ",APCLSORT,", the number of patient",!,"contacts and the total activity and travel time for each provider",!,"with a discipline in the provider discipline group that you select."
  • Line Location: INFORM+3
Function Call: WRITE
  • Prompt: !
  • Line Location: INFORM+4
Function Call: WRITE
  • Prompt: "OOPS - QMAN NOT CURRENT - QUITTING"
  • Line Location: T+3
Function Call: WRITE
  • Prompt: !!,$C(7),$C(7),"ALL locations is NOT an option with this choice",!
  • Line Location: T+6
Function Call: WRITE
  • Prompt: "OOPS - QMAN NOT CURRENT - QUITTING"
  • Line Location: TC+3
Function Call: WRITE
  • Prompt: !!,$C(7),$C(7),"ALL CLINICs is NOT an option with this choice",!
  • Line Location: TC+6
Routine Call
  • DIC
  • Line Location:
    • GETGROUP+1
    • O+2
    • T+3
    • OC+2
    • TC+3
Routine Call
  • DIR
  • Line Location:
    • BD+1
    • ED+1
    • LOC+3
    • CLINIC+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(40.7 - [#40.7] Classic Fileman Calls
^APCLACTG - [#9001003.6] Classic Fileman Calls
^AMQQ(5 - [#9009075] Classic Fileman Calls
^AUTTLOC - [#9999999.06] Classic Fileman Calls

Label References

Name Line Occurrences
BD ED+2, LOC+4
CLINIC LOC+5, CLINIC+6, CLINIC+7, DEMO+2
GETGROUP BD+2
INFORM START+5
LOC LOC+6, LOC+7, CLINIC+4
O LOC+6
OC CLINIC+6
T LOC+7, T+6
TC CLINIC+7, TC+6
XIT GETGROUP+2, DEMO+5
ZIS CLINIC+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% XIT+3!
APCL1 XIT+1!
APCL2 XIT+1!
APCL80S XIT+1!
APCLACTG GETGROUP+3*, XIT+2!
APCLAP XIT+1!
APCLBD BD+3*, ED+1, ED+4, XIT+1!
APCLBDD XIT+1!
APCLBT XIT+1!
APCLCLN CLINIC+1!, CLINIC+5!, TC+2!, TC+5, TC+6!
APCLCLN( OC+4*, TC+7*
APCLCLN("*" TC+6
>> APCLDEMO DEMO+1, DEMO+2
APCLDISC XIT+1!
APCLDT XIT+1!
APCLED ED+3*, XIT+1!
APCLEDD XIT+1!
APCLGLOB XIT+2!
APCLJOB XIT+2!
APCLLENG XIT+1!
APCLLOC LOC+1!, LOC+5!, XIT+1!, T+2!, T+5, T+6!
APCLLOC( O+4*, T+7*
APCLLOC("*" T+6
APCLNSP START+3*, START+4*, XIT+3!
APCLODAT XIT+1!
APCLPG XIT+1!
APCLPIEC XIT+2!
APCLPRIM XIT+1!
APCLQ LOC+6, LOC+7, CLINIC+6, CLINIC+7, O+1!, O+3*, T+1!, T+3*, T+5*, OC+1!
, OC+3*, TC+1!, TC+3*, TC+5*
APCLQUIT XIT+1!
APCLRRTN XIT+2!
APCLSD ED+4*, XIT+1!
APCLSITE START+2*, XIT+1!
APCLSKIP XIT+1!
APCLSORT START+3*, START+4*, XIT+3!, INFORM+3
APCLSORV START+3, START+4, XIT+3!
APCLSUB XIT+3!
APCLVACT XIT+1!
APCLVAL XIT+3!
APCLVDFN XIT+1!
APCLVLOC XIT+1!
APCLVREC XIT+1!
APCLVTM XIT+1!
APCLVTT XIT+1!
APCLX XIT+1!
APCLY XIT+1!
APCLZ XIT+3!
DA GETGROUP+5*!, LOC+3!, CLINIC+3!, T+3!, TC+3!
DIC GETGROUP+1*, GETGROUP+5*!, O+2*!, T+3*!, OC+2*!, TC+3*!
DIC("A" GETGROUP+1*, O+2*, OC+2*
DIC("S" T+3*, TC+3*
DIC(0 GETGROUP+1*, O+2*, T+3*, OC+2*, TC+3*
DIR BD+1!, ED+1!, LOC+3!, CLINIC+3!, XIT+3!
DIR("A" BD+1*, ED+1*, LOC+3*, CLINIC+3*
DIR("B" LOC+3*, CLINIC+3*
DIR(0 BD+1*, ED+1*, LOC+2*, CLINIC+2*
DIRUT BD+1*, BD+2, ED+1*, ED+2, LOC+4, CLINIC+4, XIT+3!
DLOUT XIT+3!
DTOUT XIT+3!
DUOUT BD+1, ED+1, XIT+3!
DUZ(2 START+1, START+2
H XIT+3!
IO("Q" XIT+3!
IOF INFORM+1
M XIT+3!
POP XIT+3!
S XIT+3!
T XIT+3!
TS XIT+3!
U GETGROUP+4
X ED+4, XIT+3!, T+3*, T+7*, TC+3*, TC+7*
X1 ED+4*, XIT+3!
X2 ED+4*, XIT+3!
>> XBNS DEMO+3*
>> XBRC DEMO+3*
>> XBRP DEMO+3*
>> XBRX DEMO+3*
Y 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, XIT+3!, O+3, O+4, T+3, T+4, OC+3, OC+4
, TC+3, TC+4
Z XIT+3!
ZTQUEUED XIT+3!
ZTSK XIT+3!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables |  All