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

Package: Quality Assurance

Routine: AQALDG5


Information

AQALDG5 ; IHS/ORDC/LJF - AUTOLINK ADT OCCURRENCES ;

Source Information

Source file <AQALDG5.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Quality Assurance 4 (DSADM,DSCH,ICU,READM,RICU,TI)^AQALDG50  ^AQALDG51  ^AQALDG53  ^AQALKILL  
VA Fileman 2 ^%DTC  EN^DIQ1  

Entry Points

Name Comments DBIA/ICR reference
ICU(X) ; >> see if ward is an ICU
LINKEND
DSRV() ; >> find disch srv
IDATE(X) ; >> inverse date
LINK() ; >> find if link turned on
TYP() ; >> find type of movemnt for last movemnt
LSRV() ; >> find last time srv was transferred
SRV(X) ; >> hospital srv ifn for movement
1 ; >> admission events
; find admit type & srv; check if transfer in
3 ;>> discharge events
2 ; >> ward transfer events
; check for icu transfer
DWD() ; >> find disch ward
ICU1() ; >> was last ward ICU?
TIME() ; >> check time limit against dates

External References

Name Field # of Occurrence
^%DTC TIME+4
DSADM^AQALDG50 1+21
DSCH^AQALDG50 3+12
ICU^AQALDG50 2+7
READM^AQALDG50 1+15
RICU^AQALDG50 2+15
TI^AQALDG50 1+8
^AQALDG51 1+8, 1+15, 1+21, 2+7, 2+15, 3+12
^AQALDG53 AQALDG5+17
^AQALKILL AQALDG5+14, AQALDG5+16, AQALDG5+17
EN^DIQ1 1+4, 3+4, LINK+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AQAGP - [#9002166.4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ADGDS("APID" 1+18
^AQAGP - [#9002166.4] LINK+2, LINK+9, LINK+10, TIME+3
^AQAOC("AE" AQALDG5+16
^DGPM - [#405] AQALDG5+15, 2+6, SRV+4, ICU1+3, TYP+3, DSRV+1, DSRV+4, DWD+1, DWD+3, DWD+6
^DGPM("APHY" SRV+2
^DGPM("APMV" 2+4, 2+11, ICU1+2, TYP+2
^DGPM("APTT2" 2+12
^DGPM("ATID2" DWD+2, DWD+4
^DGPM("ATID3" 1+12
^DGPM("ATID6" LSRV+2, DSRV+2
^DIC(42 - [#42] ICU+1
^DIC(45.7 - [#45.7] SRV+5, DSRV+4
^UTILITY("DIQ1" 1+2!, 1+4, 3+2!, 3+4, LINK+3!, LINK+6, LINK+7

Label References

Name Line Occurrences
$$DSRV 3+10
$$DWD 3+10
$$ICU 2+2, ICU1+4
$$ICU1 2+11
$$IDATE 1+11, 2+3, 2+6, 2+10, 2+12, TIME+4, LSRV+1, DWD+1, DWD+3
$$LINK 1+7, 1+14, 1+20, 2+7, 2+14, 3+11
$$LSRV SRV+3
$$SRV 1+7, 1+14, 1+20, 2+5, 2+14
$$TIME LINK+11
$$TYP 2+4, ICU1+1
@( AQALDG5+14, AQALDG5+16
LINKEND LINK+2, LINK+6, LINK+7, LINK+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> AQALCUR 1+11*, 1+13, 1+19
>> AQALEV 1+7*, 1+14*, 1+20*, 2+5*, 2+14*, 3+7*, 3+8, LINK+4, LINK+6, LINK+7
, TIME+2
>> AQALF 1+3*, 1+4, 3+3*, 3+4, LINK+3*, LINK+6, LINK+7
>> AQALIVDT 1+11*, 1+12, 1+18
AQALNUM TIME+1~, TIME+3*, TIME+5
AQALON LINK+1~*, LINK+12*, LINKEND
>> AQALST 1+12*, 1+13, 1+18*, 1+19, 2+3*, 2+4*, 2+6*, 2+10*, 2+11*, 2+12*
, 2+13, TIME+4, ICU1+2, TYP+2
>> AQALSV 1+7*, 1+14*, 1+20*, 2+5*, 2+14*, 3+10*, LINK+8, LINK+9
>> AQALSVI 1+7*, 1+14*, 1+20*, 2+5*, 2+14*, 3+9*, LINK+10, TIME+3
AQALVST AQALDG5+15*!, AQALDG5+16
>> AQALWD 3+10*
>> AQALX 1+4*, 1+6, 3+4*, 3+7, 3+9, LINK+8*, LINK+9*, LINK+10, TIME+3
AQALYES TIME+1~*, TIME+5*, TIME+6
DA 1+3*, 1+4, 3+3*, 3+4, LINK+1~, LINK+3*
>> DFN AQALDG5+9, AQALDG5+16, 1+12, 1+18, 2+4, 2+11, 2+12, LSRV+2, ICU1+2, TYP+2
, DSRV+2, DWD+2, DWD+4
>> DGPMA AQALDG5+10, AQALDG5+13, AQALDG5+16, 1+3, 1+11, 2+2, 2+3, 2+10, 2+13, 3+3
, TIME+4, LSRV+1
>> DGPMCA AQALDG5+13*, AQALDG5+15, 1+7, 1+14, 1+20, 2+4, 2+6, 2+11, LSRV+3, ICU1+2
, TYP+2, DSRV+1, DSRV+3, DWD+1, DWD+3, DWD+5
>> DGPMDA AQALDG5+9, 2+5, 2+14
>> DGPMP AQALDG5+13, AQALDG5+14
>> DGPMT AQALDG5+10, AQALDG5+12, AQALDG5+14, AQALDG5+16
DIC 1+3*, 3+3*, LINK+1~, LINK+3*
DR 1+3*, 3+3*, LINK+1~, LINK+4*
DUZ(2 AQALDG5+10, LINK+2, LINK+3, LINK+6, LINK+7, LINK+9, LINK+10, TIME+3
>> I LINK+4*
U AQALDG5+13, AQALDG5+15, 1+3, 2+2, 3+3, LINK+10, TIME+3, SRV+4, SRV+5, ICU+1
, ICU1+3, TYP+3, DSRV+1, DSRV+4, DWD+1, DWD+6
X 2+2*, TIME+5, SRV~, SRV+2, LSRV+1~, LSRV+2*, LSRV+3*, LSRV+4, ICU~, ICU+1
, ICU1+1~, ICU1+2*, ICU1+3*, ICU1+4, TYP+1~, TYP+2*, TYP+3, DSRV+1~, DSRV+2*, DSRV+3*
, DSRV+4, DWD+1~, DWD+2*, DWD+3, DWD+4, DWD+5, IDATE~, IDATE+1
>> X1 TIME+4*
>> X2 TIME+4*
Y SRV+1~, SRV+2*, SRV+3*, SRV+4*, SRV+5*, SRV+6, LSRV+1~*, LSRV+2, ICU1+1~, ICU1+4*
, ICU1+5, TYP+1~, TYP+3*, TYP+4, DSRV+1~*, DSRV+2, DWD+1~*, DWD+2
Z DWD+1~, DWD+3*, DWD+4*, DWD+5*, DWD+6
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All