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

Package: Patient Care Component Reports

Routine: APCLHCT


Information

APCLHCT ; IHS/CMI/LAB - DRIVER FOR ACTIVE POP ;

Source Information

Source file <APCLHCT.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 3 ^%DT  ^DIC  ^DIR  
IHS VA Utilities 2 ^XBDBQUE  EN^XBVK  
Patient Care Component Reports 1 DEMOCHK^APCLUTL  

Entry Points

Name Comments DBIA/ICR reference
ZIS ;
SBT ;subtotal by tribe?
F ;
ED
SBC ;subtotal by community
START ;
INIT ;
EOJ
DEMO ;
IND ;
SD ;

External References

Name Field # of Occurrence
^%DT SD+3, ED
DEMOCHK^APCLUTL DEMO+1
^DIC F+2
^DIR IND+1, SBT+2, SBC+1
^XBDBQUE DEMO+4
EN^XBVK EOJ+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"For which Hospital (Location of Encounter) should the report be run?",!
  • Line Location: F+1
Function Call: WRITE
  • Prompt: !
  • Line Location: IND+1
Function Call: WRITE
  • Prompt: !
  • Line Location: SD+1
Function Call: WRITE
  • Prompt: !
  • Line Location: SD+3
Function Call: WRITE
  • Prompt: !
  • Line Location: ED+0
Function Call: WRITE
  • Prompt: !!,"Ending Date cannot be before Starting Date! Please reenter.",!
  • Line Location: ED+3
Function Call: WRITE
  • Prompt: !
  • Line Location: SBT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: SBC+1
Function Call: WRITE
  • Prompt: !!!,"THIS REPORT WILL SEARCH THE ENTIRE PATIENT AND VISIT FILES!",!!,"IT IS STRONGLY RECOMMENDED THAT YOU QUEUE THIS REPORT FOR A TIME WHEN THE",!,"SYSTEM IS NOT IN HEAVY USE!",!
  • Line Location: SBC+4
Function Call: WRITE
  • Prompt: $C(7),$C(7),!!,"Report Type Missing!!",!
  • Line Location: INIT+1
Function Call: WRITE
  • Prompt: !!,"This Option will search the Patient file for all patients registered",!,"at the Service Unit or the facility that you select.",!
  • Line Location: INIT+3
Function Call: WRITE
  • Prompt: "A Report will result which will give the following counts:",!
  • Line Location: INIT+4
Function Call: WRITE
  • Prompt: ?5,"- The Number of ADULT/PEDIATRIC Discharges in the date range specified",!
  • Line Location: INIT+6
Function Call: WRITE
  • Prompt: ?5,"- Total number of Inpatient Days by Adult/Peds",!
  • Line Location: INIT+7
Function Call: WRITE
  • Prompt: ?5,"- The Number of NEWBORN discharges",!
  • Line Location: INIT+8
Function Call: WRITE
  • Prompt: ?5,"- The number of NEWBORN Days",!
  • Line Location: INIT+9
Function Call: WRITE
  • Prompt: ?5,"- The number of transfers in",!
  • Line Location: INIT+10
Function Call: WRITE
  • Prompt: ?5,"- The number with MCR/MCD/PI on the date of admission",!
  • Line Location: INIT+11
Function Call: WRITE
  • Prompt: "The report will be sorted by ",$S(APCLSORT="C":"COMMUNITY OF RESIDENCE",APCLSORT="T":"TRIBE OF MEMBERSHIP",1:"SERVICE UNIT OF RESIDENCE"),".",!!
  • Line Location: INIT+12
Routine Call
  • DIC
  • Line Location:
    • F+2
Routine Call
  • DIR
  • Line Location:
    • IND+1
    • SBT+2
    • SBC+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUTTLOC - [#9999999.06] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" SD+2, SD+5, ED+2

Label References

Name Line Occurrences
EOJ START+2, F+2, DEMO+5
F IND+2
IND SD+4
INIT START+1
SBC SBT+1
SD ED+1, ED+3, SBT+3, SBC+2, DEMO+2
ZIS SBT+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT SD+3*, ED!, EOJ!
%DT("A" SD+3*, ED*
>> APCLDEMO DEMO+1, DEMO+2
>> APCLDTP SD+2*
>> APCLED ED+2*, ED+3
>> APCLEDY ED+2*
>> APCLEOJ START+2
>> APCLIND IND+1*, IND+3*
>> APCLLOC F+3*
>> APCLQUIT INIT+1*
>> APCLSD SD+5*, ED+3
>> APCLSDY SD+5*
>> APCLSORT SBT+1, INIT+1, INIT+12
>> APCLSUB SBT+2*, SBT+4*, SBC+1*, SBC+3*
DA F+2!
DIC F+2*!, EOJ!
DIC("A" F+2*
DIC(0 F+2*
DIR IND+1!, SBT+2!, SBC+1!
DIR("?" IND+1*, SBT+2*, SBC+1*
DIR("A" IND+1*, SBT+2*, SBC+1*
DIR(0 IND+1*, SBT+2*, SBC+1*
DIRUT IND+2, SBT+3, SBC+2, EOJ!
DT SD+2
H EOJ!
I EOJ!
IO("Q" EOJ!
IOF INIT+2
J EOJ!
JK EOJ!
K EOJ!
M EOJ!
POP EOJ!
S EOJ!
TS EOJ!
X EOJ!
>> XBNS DEMO+3*
>> XBRC DEMO+3*
>> XBRP DEMO+3*
>> XBRX DEMO+3*
Y F+2, F+3, IND+3, SD+2*, SD+4, SD+5, ED+1, ED+2, SBT+4, SBC+3
, EOJ!
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