BLRDPT30 ; IHS/DIR/FJE - Current Inpatient Variables ;
Source file <BLRDPT30.m>
| Package | Total | Caller Graph |
|---|---|---|
| IHS Changes To Lab | 3 | BLRDPT2 BLRDPT3 BLRDPT31 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| A | ;return current admission or last admission for patient
|
|
| MVQ | ||
| SET | ; -- set variables if null
|
|
| VARQ | ||
| GET | ; -- get variables and quit when all set(Y=1)
|
|
| PROV | ; -- get provider info
|
|
| TS | ; set VADX, VATS and VAPP via VACA x-refs
|
|
| AQ | ||
| MV | ; -- get latest mv for pt before VAID and not ASIH mv
|
|
| DIS | ; check for ASIH discharges
|
|
| VAR | ; -- inpatient demographics variables
; input: DFN, VATD = inverse date ; VACN = ; VAPRC = ; VAPRT = |
|
| GETQ | ||
| KVAR | ||
| TS1 | ; set VATS and VAPP
|
|
| TSQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(405.4 - [#405.4] | SET+2 |
| ^DGPM - [#405] | GET+3, TS+2, TS1+1, MV+2, MV+3, A+1, A+3, DIS+1 |
| ^DGPM("APID" | MV+2 |
| ^DGPM("APMV" | GET+3 |
| ^DGPM("ATID1" | A+3 |
| ^DGPM("ATS" | TS+3 |
| ^DIC(16 - [#16] | PROV+2 |
| ^DIC(42 - [#42] | SET+2 |
| ^DIC(45.7 - [#45.7] | TS1+4 |
| ^DPT - [#2] | A+1 |
| ^VA(200 - [#200] | TS1+3, PROV+2 |
| Name | Line Occurrences |
|---|---|
| AQ | A+1, A+3 |
| DIS | A+3 |
| GET | VAR+14 |
| GETQ | GET+2, GET+3 |
| MV | VAR+9 |
| MVQ | MV+2 |
| SET | GET+2, GET+3 |
| TS | GET+2 |
| TS1 | TS+3 |
| TSQ | TS+3 |
| VARQ | VAR+9, VAR+11, VAR+12, VAR+13 |
| Name | Field # of Occurrence |
|---|---|
| ^( | A+1 |
| ^("A3" | PROV+2 |
| ^(0 | GET+3, SET+2, TS+2, TS1+1, TS1+4, MV+2, A+3, DIS+1, PROV+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> DFN | GET+3, TS+3, MV+2, A+1, A+3 |
| >> DGPMDDF | SET+4 |
| U | TS1+3, DIS+1 |
| VABO | VAR+14*, KVAR! |
| VACA | GET+1*, GET+3, GETQ!, TS+2, TS+3 |
| VACN | KVAR!, SET+3, SET+4, SET+5 |
| VADX | VAR+7*, KVAR!, SET+5, TS+2* |
| VAID | VAR+7*, VARQ!, GET+3*, GETQ!, TS+3*, MV+2*, A+2~, A+3* |
| VAIFN | GET+3*, GETQ!, SET+2, TS+3*, TSQ!, TS1+1 |
| VAMT | VAR+12, VAR+13, VAR+14, VARQ!, MV+2* |
| VAMV | VAR+7*, KVAR!, SET+2, SET+4, SET+5, MV+1*, MV+2*, MV+3, A+2~, A+3* , DIS+1 |
| VAMV0 | VAR+9, VAR+11, VARQ!, GET+1, GET+3*, SET+2, TS+1~, TS1+1*, TS1+3, TS1+4 , MV+1*, MV+3*, A+2~, A+3*, DIS+1 |
| VAPP | VAR+7*, KVAR!, TS+3, TS1+3* |
| VAPRC | VAR+12, VAR+13, VAR+14, KVAR! |
| VAPRT | KVAR!, SET+4, SET+5 |
| VARM | VAR+7*, KVAR!, SET+2* |
| VAT | TS+3*, TSQ! |
| VATD | VAR+7, GET+3, KVAR!, TS+3 |
| VATS | VAR+7*, KVAR!, TS+3, TS1+4* |
| VAWD | VAR+7*, KVAR!, SET+2*, SET+3, SET+5 |
| VAWDA | VAR+7*, KVAR!, SET+2* |
| X | PROV+1*, PROV+2*, PROV+4! |
| >> Y | GET+2, GET+3, SET+1*, SET+3*, SET+4*, SET+5*, TS1+3*, A+1*, A+3, A+4* , DIS+1*, PROV+1*, PROV+2* |