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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: APCLCH2

Package: Patient Care Component Reports

Routine: APCLCH2


Information

APCLCH2 ; IHS/CMI/LAB - DX BY COMMUNITY LOCAL,SECONDARY,TERTIARY ;

Source Information

Source file <APCLCH2.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA Fileman 3 C^%DTC  ^DIC  ^DIR  
IHS VA Utilities 2 ^XBDBQUE  ^XBFMK  
Patient Care Component Reports 2 XTMP^APCLOSUT  DEMOCHK^APCLUTL  
IHS Patient 1 KILL^AUPNPAT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Patient Care Component Reports 1 APCLCH21  

Entry Points

Name Comments DBIA/ICR reference
BD ;
PAUSE ;
SET ;EP - ENTRY POINT
ZIS ;
T ;taxonomy - call qman interface
INFORM ;tell user what is going on
ED ;
SET1 ;
SU
START ;
S ;all communities within APCLSU su
GETDATES ;
COMM ;
O ;one community
DEMO ;
ASK ; Get community name or cohort
XIT ;
CHECK ;check each community entry for existence of facility identification
CHECK1 ;

External References

Name Field # of Occurrence
C^%DTC ED+5
XTMP^APCLOSUT START+3
DEMOCHK^APCLUTL DEMO+1
KILL^AUPNPAT XIT+4
^DIC SU+1, O+1, ASK+10
^DIR BD+1, ED+1, COMM+3, PAUSE+1
^XBDBQUE DEMO+4
^XBFMK XIT+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: SU+1
Function Call: WRITE
  • Prompt: !!,"Enter the time frame of interest.",!
  • Line Location: BD+1
Function Call: WRITE
  • Prompt: !,"Ending date must be greater than or equal to beginning date!"
  • Line Location: ED+3
Function Call: WRITE
  • Prompt: !!,"Checking community table for required items..."
  • Line Location: CHECK+2
Function Call: WRITE
  • Prompt: !,"ALL are okay.",!!,"Be sure to utilize a printer with 132 margin print capability.",!
  • Line Location: CHECK+12
Function Call: WRITE
  • Prompt: !!,"Since some of the community entries are missing data, I cannot continue.",!,"See your site manager about fixing the community entries.",!,"You may now select other communities or exit the report.",!
  • Line Location: CHECK1+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: DEMO+3
Function Call: WRITE
  • Prompt: !!,$C(7),$C(7),"No communities selected!!",!
  • Line Location: ASK+4
Function Call: WRITE
  • Prompt: !!,"Okay - exiting....try again later"
  • Line Location: ASK+6
Function Call: WRITE
  • Prompt: !!?5,"DIAGNOSES BY A COMMUNITY'S LOCAL, SECONDARY AND TERTIARY FACILITIES"
  • Line Location: INFORM+3
Function Call: WRITE
  • Prompt: !!,"This report will present a tally of all diagnoses for patients in a community",!,"or communities you select. The report will tally the diagnoses for"
  • Line Location: INFORM+4
Function Call: WRITE
  • Prompt: !,"the community's local, secondary and tertiary facilities. Each community's",!,"report will be 2 pages long, 1 page for outpatient diagnoses and 1 for ",!,"inpatient diagnoses.",!!
  • Line Location: INFORM+5
Routine Call
  • DIC
  • Line Location:
    • SU+1
    • O+1
    • ASK+10
Routine Call
  • DIR
  • Line Location:
    • BD+1
    • ED+1
    • COMM+3
    • PAUSE+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUTTCOM - [#9999999.05] Classic Fileman Calls
^AUTTSU - [#9999999.22] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ATXAX - [#9002226] ASK+13
^AUTTCOM - [#9999999.05] CHECK+4, CHECK+5, CHECK+6, CHECK+10, S+1
^AUTTCOM("B" ASK+13
^AUTTLOC - [#9999999.06] SU
^AUTTSU - [#9999999.22] SU, COMM+2
^XTMP("APCLCH2" START+2!, COMM+1!, CHECK+3, O+3*, S+1*, T+1!, ASK+2, ASK+3, ASK+4, ASK+6!
, ASK+12*, ASK+13*, SET+1, SET+2, SET1+2*

Label References

Name Line Occurrences
@( COMM+6
ASK ASK+11, ASK+15
COMM COMM+7, CHECK1+1, DEMO+2
ED ED+3
GETDATES SU+3, SU+4, COMM+4
INFORM START+4
PAUSE CHECK+9
SET1 SET+3, SET+4, SET+5, SET+6
XIT SU+2, BD+2, ED+2, DEMO+5
ZIS CHECK+12

Naked Globals

Name Field # of Occurrence
^( SET1+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % SET1+2*
APCL1 XIT+1!, SET+3*, SET+4*, SET+5*, SET+6*, SET1+2
APCL2 XIT+1!, SET1+1*, SET1+2
APCL3 XIT+1!, SET+3*, SET+4*, SET+5*, SET+6*, SET1+1
APCLBD BD+3*, ED+3, ED+5, XIT+1!
APCLBDO XIT+1!
APCLBT XIT+1!
APCLBTH START+1*, START+2, COMM+1, CHECK+3, XIT+1!, O+3, S+1, T+1, ASK+2, ASK+3
, ASK+4, ASK+6, ASK+12, ASK+13, SET+1, SET+2, SET1+2
APCLC XIT+1!, SET+1*, SET+2, SET1+2
APCLCOM XIT+1!
APCLCOMI XIT+1!
APCLCOMM ASK+1!, ASK+7*, ASK+9, ASK+10, ASK+12, ASK+14!
APCLCOMT COMM+1*, COMM+5*, COMM+6, XIT+1!
>> APCLDEMO DEMO+1, DEMO+2
APCLDFN XIT+1!
APCLDX XIT+2!
APCLED ED+4*, XIT+1!
APCLEDO XIT+2!
APCLER XIT+1!
APCLET XIT+2!
APCLF XIT+2!, SET+2*, SET1+2
APCLI XIT+2!
APCLJOB START+1*, START+2, COMM+1, CHECK+3, XIT+2!, O+3, S+1, T+1, ASK+2, ASK+3
, ASK+4, ASK+6, ASK+12, ASK+13, SET+1, SET+2, SET1+2
APCLLFAC XIT+2!
APCLLOC XIT+1!
APCLP XIT+2!
APCLPG XIT+2!
APCLQUIT COMM+1!, COMM+7, CHECK+1!, CHECK+3, CHECK+9, PAUSE+2*, XIT+1!, O+2*, ASK+4*, ASK+6*
APCLSD ED+5*, XIT+1!
APCLSFAC XIT+2!
APCLSU SU+3*, SU+5*, COMM+2, XIT+2!, S+1
APCLSUF SU+3*, SU+5*, XIT+2!
APCLTFAC XIT+2!
APCLTYPE XIT+1!
APCLV XIT+2!
APCLVCNT XIT+2!
APCLVLOC XIT+2!
APCLX CHECK+3*, CHECK+4, CHECK+5, CHECK+6, CHECK+10, XIT+1!
APCLY XIT+1!
B SU*, SU+3, XIT+3!
>> C CHECK+3*, CHECK+8*, CHECK+12
DA ED+1!, COMM+3!, PAUSE+1!
DIC SU+1*!, O+1*!, ASK+10*!
DIC("A" SU*, O+1*
DIC("S" ASK+9*
DIC(0 SU+1*, O+1*, ASK+10*
DIR BD+1!, ED+1!, COMM+2!, COMM+3!, PAUSE+1!
DIR("?" BD+1*
DIR("A" BD+1*, ED+1*, COMM+3*, PAUSE+1*
DIR("B" COMM+3*
DIR(0 BD+1*, ED+1*, COMM+2*, PAUSE+1*
>> DIRUT BD+1*, BD+2, ED+1*, ED+2, COMM+4, PAUSE+2
DTIME ASK+2, ASK+3
>> DUOUT BD+1, ED+1
DUZ(2 SU
IOF PAUSE+3, INFORM+2
IOSL CHECK+9
L CHECK+4*, CHECK+7, XIT+3!
M XIT+3!
S SU*, CHECK+4*, CHECK+5*, CHECK+7, XIT+3!
T CHECK+4*, CHECK+6*, CHECK+7, XIT+3!
U SU, COMM+2, CHECK+4, CHECK+5, CHECK+6, CHECK+10, S+1, ASK+13
X SU+2, SU+3, ED+5, XIT+3!, S+1*, ASK+2*, ASK+3*, ASK+4, ASK+5, ASK+6
, ASK+7, ASK+8*, ASK+13*, SET1+2*
X1 ED+5*, XIT+3!
X2 ED+5*, XIT+3!
>> XBNS DEMO+3*
>> XBRC DEMO+3*
>> XBRP DEMO+3*
>> XBRX DEMO+3*
Y SU+4, SU+5, BD+3, ED+3, ED+4, COMM+5, XIT+3!, O+2, O+3, ASK+11
, ASK+12, ASK+13
Z XIT+3!, ASK+13*
Info |  Source |  Call Graph |  Caller 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