NURAAU1 ;HIRMFO/RM/MD-DRIVER FOR ACUITY COUNTS...(cont.) ;2/27/98 14:20
Source file <NURAAU1.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| A | ||
| AGAIN | ; CHECK PATIENT RECORD IS TO SEE IF VALID | |
| B | ||
| ANYCLASS | ; CHECK TO SEE PATIENT HAS BEEN CLASSIFIED THAT DAY | |
| MID | ||
| WRITE | ; WRITE EXCEPTION LINE | |
| EN1 | ; ENTRY TO CALCULATE PATIENT ACUITY FOR NURSING WARD NWARD. | |
| B0 | ||
| B1 | ||
| B2 | ||
| NOCLASS | ; ADD PATIENT CLASSIFICATION TO ACUITY COUNTS | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DIC(213.9 - [#213.9] | EN1+2*, EN1+3*, MID+1*, MID+2* | 
| ^NURSA(214.6 - [#214.6] | B1+1, B1+3, B, B0+1, B2!, B2+1!, ANYCLASS+1 | 
| ^NURSF(211.4 - [#211.4] | AGAIN+3, NOCLASS+4 | 
| ^NURSF(213.3 - [#213.3] | AGAIN+2 | 
| ^NURSF(214 - [#214] | AGAIN+5 | 
| ^TMP($J | EN1+2, MID+1 | 
| Name | Line Occurrences | 
|---|---|
| A | ANYCLASS+3 | 
| AGAIN | EN1+2, MID+1 | 
| B | B, B2+1 | 
| B0 | B | 
| B1 | ANYCLASS+4 | 
| B2 | B1+1, B1+2 | 
| MID | EN1+1 | 
| WRITE | AGAIN+5, B1, B1+3, B1+4, B0, B0+1, B2+2, ANYCLASS+4, A | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | B2 | 
| ^("DATE" | EN1+3*, MID+2* | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> BEDSECT | AGAIN+2*, AGAIN+3, ANYCLASS+5*, A, NOCLASS+1* | 
| >> CHGSW | AGAIN+4*, B1+5* | 
| >> CHKVAR | B2* | 
| CLASDT | AGAIN+1!, B1+1*, B1+2, B1+4, B1+5, B*, B0, B0+1, B2, B2+1 , B2+2 | 
| >> CLASS | ANYCLASS+5*, A, NOCLASS+3 | 
| >> CLSDATE | AGAIN+5*, B1*, B1+3*, B1+4*, B0*, B0+1*, B2+2*, ANYCLASS+2* | 
| >> DATECL | ANYCLASS+1*, ANYCLASS+2, ANYCLASS+3, ANYCLASS+5 | 
| >> DFN | EN1+2*, MID+1*, AGAIN+5, B, B0+1, B2, B2+1 | 
| >> DFN(0 | EN1+2 | 
| >> DFN(1 | MID+1 | 
| >> I | NOCLASS+2* | 
| >> NBEDSECT | AGAIN+3* | 
| >> NCLASS( | NOCLASS+2*, NOCLASS+3* | 
| NCWARD | AGAIN+1!, AGAIN+3*, ANYCLASS+3*, ANYCLASS+4, A, NOCLASS+2*, NOCLASS+4 | 
| NERR | AGAIN+5*, B1*, B1+3*, B1+4*, B0*, B0+1*, B2+2*, ANYCLASS+4*, A*, WRITE+2! | 
| NERR(1 | AGAIN+5*, B1*, B1+3*, B1+4*, B0*, B0+1*, B2+2*, ANYCLASS+4*, A* | 
| NMESS | AGAIN+5*, B1*, B1+3*, B1+4*, B2+2*, ANYCLASS+4*, A*, WRITE+2! | 
| >> NURCENDT | MID* | 
| >> NURCUTDT | MID* | 
| >> NURSADM | AGAIN+4*, AGAIN+5*, B1+3 | 
| >> NURSCLAS | B1, B1+1, B1+3, B0+1*, B2*, B2+1, B2+2, ANYCLASS+1, ANYCLASS+4 | 
| >> NURSCLAS("CL" | AGAIN+4*, ANYCLASS+4* | 
| >> NURSCLAS("DATE" | ANYCLASS+4* | 
| >> NURSCLAS("WARD" | ANYCLASS+4* | 
| >> NURSLCS | B1+5*, B0, B0+1 | 
| >> NURTYPE | EN1+2*, MID*, AGAIN+3, AGAIN+5, B1, B1+1, B1+2, B1+3, B1+4, B0 , B0+1, B2+2, ANYCLASS+4, A, NOCLASS+2 | 
| >> NWARD | EN1+2*, MID+1*, AGAIN+3, B0+1, ANYCLASS+4, NOCLASS+2 | 
| >> NWARD(0 | EN1+2 | 
| >> NWARD(1 | MID+1 | 
| >> OUTSW | EN1+1 | 
| >> OUTSW(1 | MID | 
| >> RPTDATE | MID, B1+1, B1+2, B1+4, B, B0, ANYCLASS+4 | 
| >> SHIFT | EN1+3*, MID+2*, AGAIN+3*, NOCLASS+2* | 
| U | EN1+2, EN1+3, MID+1, MID+2, AGAIN+4, AGAIN+5, B1+1, B1+3, B0+1, ANYCLASS+2 , ANYCLASS+3, ANYCLASS+5, NOCLASS+4 | 
| >> VAIN(1 | AGAIN+4 | 
| >> VAIN(7 | AGAIN+4 | 
| >> X | B2* | 
| >> ZTQUEUED | EN1+2, MID+1 |