AQALDG50 ; IHS/ORDC/LJF - AUTOLINK ADT OCC CONT. ;
Source file <AQALDG50.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DSSRV(X) | ; >> find day surgery service | |
| IDATE(X) | ; >> inverse date | |
| IVDTP(X) | ; >> convert inverse date to readable date | |
| RICU | ;EP >> get extra data for return to icu | |
| READM | ;EP >> get extra data for readmissions | |
| WDP(X) | ; >> ward name | |
| SRV(X) | ; >> hospital service ifn for movement | |
| DSCH | ;EP >> get extra data for discharges | |
| TI | ;EP >> get extra data for transfer in | |
| DSADM | ;EP >> get extra data for admit after day surgery | |
| SRVP(X) | ; >> hospital service name | |
| ICU | ;EP >> get extra data for icu transfers | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^ADGDS - [#9009012] | DSADM+2 | 
| ^ADGDS("APID" | DSADM+1 | 
| ^DD(405 | TI+1, DSCH+3 | 
| ^DGPM - [#405] | READM+1, READM+5, ICU+1, ICU+3, RICU+2, DSCH+1, SRV+2 | 
| ^DGPM("APHY" | SRV+1 | 
| ^DGPM("APMV" | ICU+1 | 
| ^DGPM("ATID3" | READM+1 | 
| ^DIC(42 - [#42] | WDP+1 | 
| ^DIC(45.7 - [#45.7] | SRV+3, DSSRV+1 | 
| ^DIC(49 - [#49] | SRVP+1, DSSRV+1 | 
| Name | Line Occurrences | 
|---|---|
| $$DSSRV | DSADM+4 | 
| $$IDATE | IVDTP+1 | 
| $$SRV | SRVP+1 | 
| $$SRVP | READM+4 | 
| $$WDP | ICU+2 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> AQALCA | READM+2*, READM+5 | 
| >> AQALDC | READM+2*, READM+3 | 
| >> AQALEV | DSCH+2 | 
| >> AQALST | READM+1, DSADM+1, ICU+1, RICU+1 | 
| >> AQALX | READM+1*, READM+2, READM+4, DSADM+1*, DSADM+2*, DSADM+3, DSADM+4, DSADM+5, ICU+1*, ICU+2 , DSSRV+1 | 
| >> AQALXTR(1 | TI+2*, READM+3*, DSADM+3*, ICU+2*, RICU+1*, DSCH+1* | 
| >> AQALXTR(2 | READM+4*, DSADM+4*, ICU+3*, RICU+2*, DSCH+4* | 
| >> AQALXTR(3 | READM+5*, DSADM+5* | 
| >> AQALXTR(4 | READM+6*, DSADM+6* | 
| >> C | TI+1*, DSCH+3* | 
| >> DFN | READM+1, DSADM+1, DSADM+2, ICU+1 | 
| >> DGPMA | TI+1, READM+6, DSADM+6, DSCH+3 | 
| >> DGPMCA | ICU+1, ICU+3, RICU+2, DSCH+1 | 
| U | TI+1, READM+2, READM+4, READM+5, READM+6, DSADM+5, DSADM+6, ICU+3, RICU+2, DSCH+1 , DSCH+3, SRV+2, SRV+3, SRVP+1, WDP+1, DSSRV+1 | 
| X | ICU+1*, SRV~, SRV+1, SRVP~, SRVP+1, WDP~, WDP+1, IVDTP~, IVDTP+1, IDATE~ , IDATE+1, DSSRV~ | 
| Y | TI+1*, TI+2, DSCH+3*, DSCH+4, SRV+1~*, SRV+2*, SRV+3*, SRV+4 |