ANSQSS ;IHS/OIRM/DSD/CSC - CALCULATE NURSE STAFFING STATS; [ 02/25/98 10:32 AM ]
Source file <ANSQSS.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;CHECK THROUGH ALL NUSRING RECORDS BY DATE OF RECORD
|
|
| FACTORS | ;SETS ARRAY OF ADJUSTMENT FACTORS
|
|
| DC | ;SET INFO FOR EACH DISCHARGE
|
|
| EN1 | ;CHECK THROUGH EACH RECORD FOR SPECIFIED DATE
|
|
| LEVELS | ;SET ARRAYS OF CARE LEVEL INFORMATION
|
|
| B1 | ;CALCULATE THE TOTAL NURSING HOURS AVAILABLE AND TOTALS FOR EACH DAY
|
|
| B3 | ;CALCULATE NURSING HOURS AVAILABLE
|
|
| ADM | ;SET INFO FOR EACH ADMISSION
|
|
| SBADD | ;SET TEMP GLOBAL WITH INFO FOR REPORT
|
|
| SBCL | ;CALCULATE THE LEVEL OF CARE FOR THE NURSING RECORD
|
| Name | Field # of Occurrence |
|---|---|
| ^ANSQSS1 | B1+3 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ANS - [#9009053] | B3+5, B3+8 |
| ^ANS("AU" | B1+2, B3+2, B3+4 |
| ^ANSD(51.1 - [#9009051.1] | LEVELS+6, LEVELS+7 |
| ^ANSD(59 - [#9009059] | SBCL+6 |
| ^ANSD(59.3 - [#9009059.3] | FACTORS+4 |
| ^ANSR - [#9009052] | EN1+8, EN1+9, ADM+1, ADM+2, ADM+3, SBCL+5, SBCL+10 |
| ^ANSR("B" | EN+5, EN1+7 |
| ^TMP("ANS" | EN+1!, SBADD+4* |
| Name | Line Occurrences |
|---|---|
| ADM | EN1+10 |
| B1 | EN+6 |
| B3 | B1+2 |
| DC | EN1+10 |
| EN1 | EN+5 |
| FACTORS | EN+3 |
| LEVELS | EN+2 |
| SBADD | EN1+12, ADM+7, DC+2, B3+6, B3+9 |
| SBCL | EN1+11, ADM+4 |
| Name | Field # of Occurrence |
|---|---|
| ^( | B3+8, FACTORS+4 |
| ^(0 | ADM+3, B3+5, B3+8, SBCL+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> A | EN1+12*, ADM+5*, DC+1*, B3+5*, B3+9*, SBADD+4 |
| >> ANSA( | LEVELS+8* |
| >> ANSBDT | EN+4, B1+1 |
| >> ANSCL | EN1+12, ADM+1*, ADM+5, SBCL+4*, SBCL+12* |
| >> ANSD | EN+4*, EN+5*, EN1+7, B1+1*, B1+2*, B3+2, B3+4, SBADD+4 |
| >> ANSEDT | EN+5, B1+2 |
| >> ANSF( | SBCL+10, FACTORS+4* |
| >> ANSH( | LEVELS+8* |
| >> ANSL( | SBCL+11, SBCL+12, LEVELS+8* |
| >> ANSN | EN1+6*, EN1+7*, EN1+8, EN1+9, ADM+1, ADM+2, ADM+4*, B3+3*, B3+4*, B3+5 , B3+8, SBCL+5, SBCL+10 |
| >> ANSSH | EN1+9*, B3+1*, B3+2*, B3+4, SBADD+4 |
| >> ANSTY | EN1+9*, EN1+10 |
| >> ANSUNIT | EN1+8, B3+2, B3+4 |
| >> ANSX | ADM+4* |
| >> D | ADM+1*, ADM+2 |
| >> F | SBCL+10* |
| >> I | B3+8*, SBCL+5* |
| >> L | ADM+1*, ADM+3*, ADM+4, B3+7*, B3+8*, B3+9, SBCL+4*, SBCL+8*, SBCL+10*, SBCL+11* , SBCL+12, LEVELS+8* |
| >> M | ADM+1*, ADM+3* |
| >> N | ADM+2*, ADM+3, B3+7*, B3+8*, SBCL+5*, SBCL+6, SBCL+7*, SBCL+8, SBCL+9*, SBCL+10* , LEVELS+5*, LEVELS+6*, LEVELS+7, LEVELS+8, FACTORS+3*, FACTORS+4* |
| >> P | EN1+12*, ADM+5*, ADM+6*, DC+1*, B3+5*, B3+9*, SBADD+4 |
| >> S | EN1+12*, ADM+3*, ADM+5*, DC+1*, B3+5*, B3+9*, SBADD+4, FACTORS+4* |
| U | EN1+8, EN1+9, ADM+3, B3+5, B3+8, SBADD+4, SBCL+5, SBCL+7, LEVELS+8, FACTORS+4 |
| >> X | EN1+9*, SBCL+6*, SBCL+7, LEVELS+7*, LEVELS+8 |