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

Package: Patient Care Component Reports

Routine: APCLT1


Information

APCLT1 ; IHS/CMI/LAB - TOP T POVS ;

Source Information

Source file <APCLT1.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA Fileman 4 DD^%DT  C^%DTC  ^DIC  ^DIR  
Patient Care Component Reports 3 XTMP^APCLOSUT  ($$DEMO,DEMOCHK)^APCLUTL  $$PRIMPROV^APCLV  
IHS VA Utilities 1 ^XBDBQUE  
Kernel 1 ($$FMDIFF,$$FMTE)^XLFDT  
PCC Medical Query 1 PEP^AMQQGTX0  

Entry Points

Name Comments DBIA/ICR reference
BD ;get beginning date
SET
END ;
ZIS ;
APWI ;ask appt or walk ins ;IHS/TUCSON/LAB - added this subroutine patch 1 05/01/97
ED ;get ending date
CLINIC1 ;
V ; Run by visit date
PROC1 ;
V1 ;
CLINIC ;
GETDATES ;
EXIT ;
DEMO ;
CALC ;calculate # mins waiting, use appt or arr, whichever is later
PROC ;EP - called from xbdbque

External References

Name Field # of Occurrence
DD^%DT ED+1, ED+6
C^%DTC ED+5
PEP^AMQQGTX0 CLINIC1+2
XTMP^APCLOSUT PROC+4
$$DEMO^APCLUTL PROC1+2
DEMOCHK^APCLUTL DEMO+1
$$PRIMPROV^APCLV PROC1+4
^DIC CLINIC1+1
^DIR BD+1, ED+1, CLINIC+2, APWI+2
^XBDBQUE DEMO+4
$$FMDIFF^XLFDT CALC+2, SET+6
$$FMTE^XLFDT CALC+5, CALC+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?20,"***** WAITING TIMES BY CLINIC AND PROVIDER *****",!!
  • Line Location: APCLT1+7
Function Call: WRITE
  • Prompt: !,"This report will display minimum, maximum and mean waiting times by provider,",!,"and clinic. In order to have any data for this report, you must be entering",!,"the time the primary provider saw the patient.",!!
  • Line Location: APCLT1+8
Function Call: WRITE
  • Prompt: !
  • Line Location: BD+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ED+1
Function Call: WRITE
  • Prompt: !
  • Line Location: CLINIC+2
Function Call: WRITE
  • Prompt: "OOPS - QMAN NOT CURRENT - QUITTING"
  • Line Location: CLINIC1+1
Routine Call
  • DIC
  • Line Location:
    • CLINIC1+1
Routine Call
  • DIR
  • Line Location:
    • BD+1
    • ED+1
    • CLINIC+2
    • APWI+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AMQQ(5 - [#9009075] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVPRV - [#9000010.06] PROC1+12
^AUPNVPRV("AD" PROC1+3, PROC1+12
^AUPNVSIT - [#9000010] V1+1
^AUPNVSIT("B" V+1, V1+1
^DPT - [#2] CALC+5, CALC+7
^XTMP("APCLT1" PROC+3!, V+2, V+3, V+4*, PROC1+13, PROC1+14, CALC+5*, CALC+7*, CALC+9, CALC+10
, SET, SET+1, SET+2*, SET+3*, SET+4*, SET+5*, SET+7, SET+8, SET+9, SET+10
, SET+11, SET+12

Label References

Name Line Occurrences
APWI CLINIC+4, DEMO+2
BD ED+2, ED+3, CLINIC+3
CLINIC CLINIC1+3, APWI+3
EXIT APCLT1+9, BD+2, CLINIC1+1, DEMO+5
PROC1 V1+1
V1 V+1

Naked Globals

Name Field # of Occurrence
^( PROC1+13*, PROC1+14*, CALC+9*, CALC+10*, SET*, SET+1*, SET+2*, SET+3*, SET+7*, SET+8*
, SET+9*, SET+10*, SET+11*, SET+12*
^(0 V1+1, PROC1+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
APCDT EXIT+1!
APCLAPPT EXIT+1!, PROC1+10*, PROC1+16, CALC+1, SET+6
APCLAPWI APWI+1*, APWI+4*, EXIT+1!, PROC1+9, PROC1+16
APCLBD BD+3*, ED+1, ED+5, ED+6, EXIT+1!
APCLBDD ED+6*, EXIT+1!
>> APCLBT PROC+2*
APCLBTH EXIT+1!, PROC+2*, PROC+3, V+2, V+3, V+4, PROC1+13, PROC1+14, CALC+5, CALC+7
, CALC+9, CALC+10, SET, SET+1, SET+2, SET+3, SET+4, SET+5, SET+7, SET+8
, SET+9, SET+10, SET+11, SET+12
APCLCI EXIT+1!, PROC1+11*, PROC1+17, CALC+1, SET+6
>> APCLCLN PROC1+6*, PROC1+7, PROC1+13, PROC1+14, CALC+9, CALC+10, SET, SET+1, SET+2, SET+3
, SET+4, SET+5, SET+7, SET+8, SET+9, SET+10, SET+11, SET+12
APCLCLNT CLINIC+1!, CLINIC1+3, CLINIC1+4!, EXIT+1!, PROC1+7
APCLCLNT( PROC1+7
APCLCLNT("*" CLINIC1+4
APCLCN EXIT+1!
>> APCLDEMO DEMO+1, DEMO+2, PROC1+2
APCLED ED+4*, ED+6, EXIT+1!, V+1
APCLEDD ED+6*, EXIT+1!
>> APCLET END+1*
APCLJOB EXIT+2!, PROC+2*, PROC+3, V+2, V+3, V+4, PROC1+13, PROC1+14, CALC+5, CALC+7
, CALC+9, CALC+10, SET, SET+1, SET+2, SET+3, SET+4, SET+5, SET+7, SET+8
, SET+9, SET+10, SET+11, SET+12
APCLLENG EXIT+2!
APCLLOCT EXIT+2!
APCLODAT EXIT+2!, V+1*, V1+1
APCLPG EXIT+2!
APCLPP EXIT+2!, PROC1+4*, PROC1+5, PROC1+12, PROC1+13, CALC+9, SET, SET+2, SET+4, SET+7
, SET+9, SET+11
APCLPPS EXIT+2!, PROC1+12*, PROC1+18, PROC1+19, CALC+2, CALC+5, CALC+7
APCLQUIT EXIT+2!
APCLSD ED+5*, EXIT+1!, EXIT+2!, V+1
APCLSEC EXIT+2!, CALC+2*, CALC+5, CALC+7, SET, SET+1, SET+2, SET+3, SET+4, SET+5
, SET+11, SET+12
APCLTOT EXIT+2!
APCLTOTV EXIT+2!, PROC+1*
APCLVIEN EXIT+2!, V1+1*, PROC1+3, PROC1+4, PROC1+12, CALC+5, CALC+7
APCLVREC EXIT+2!, V1+1*, PROC1+1, PROC1+2, PROC1+6, PROC1+9, PROC1+10, PROC1+11, CALC+5, CALC+7
APCLVT EXIT+1!
APCLX EXIT+2!, CALC+1*, CALC+2
>> C V+2*, V+3, V+4
DA CLINIC1+1!, APWI+2!
DIC CLINIC1+1*!
DIC("S" CLINIC1+1*
DIC(0 CLINIC1+1*
DIR BD+1!, ED+1!, CLINIC+2!, APWI+2!
DIR("A" BD+1*, ED+1*, CLINIC+2*, APWI+2*
DIR("B" APWI+2*
DIR(0 BD+1*, ED+1*, CLINIC+2*, APWI+2*
>> DIRUT BD+1*, BD+2, ED+1*, ED+3, CLINIC+2*, CLINIC+3, APWI+3
>> DUOUT BD+1, ED+1, CLINIC+2
>> P V+3*, V+4
>> S V+4*
U V1+1, PROC1+1, PROC1+2, PROC1+6, PROC1+9, PROC1+10, PROC1+11, PROC1+12, PROC1+13, PROC1+14
, CALC+5, CALC+7, CALC+9, CALC+10, SET, SET+1, SET+2, SET+3, SET+4, SET+5
, SET+7, SET+8, SET+9, SET+10, SET+11, SET+12
>> X ED+5, CLINIC1+1*, V+4*, PROC1+12*, SET+6*, SET+7, SET+8, SET+9, SET+10
>> X1 ED+5*
>> X2 ED+5*
>> XBNS DEMO+3*
>> XBRC DEMO+3*
>> XBRP DEMO+3*
>> XBRX DEMO+3*
>> Y BD+3, ED+1*, ED+2, ED+4, ED+6*, CLINIC+4, CLINIC1+1, CLINIC1+2, APWI+4
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All