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 |