©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
BLRDPT3 ; IHS/DIR/FJE - PATIENT VARIABLES ;
Source file <BLRDPT3.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Changes To Lab | 2 | (KVAR,VAR)^BLRDPT30 ^BLRDPT31 |
| VA Fileman | 1 | NOW^%DTC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| OK1 | ||
| LODGER | ;
|
|
| OK | ||
| SCAN | ; -- determine is d/c while in other fac(Y=1 returned if so.)
|
|
| 47 | ; -- check to see if d/c from nhcu while asih in other fac
; If y returned high then mvt is good. |
|
| LLDCHK | ; -- last lodger mvt checking ; build array of inverse dates and chk
|
|
| CHK | ;
|
|
| 42 | ; -- check to see if this mvt can be used; for 'while asih' d/c category
; If Y returned high then mvt is good |
|
| LODGERQ | ||
| Q | ||
| Q42 | ||
| ASIHOF | ; -- is last mvt asih oth fac
|
|
| LASTQ | ||
| 6 | ;
|
|
| GO | ||
| LAST | ;
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGPM - [#405] | 6+3, 6+11, 6+15, 6+16, OK1+1, LAST+3, LODGER+5, LLDCHK+4, ASIHOF+2, SCAN+3 |
| ^DGPM("APID" | 6+14, 6+15, OK1, LAST+1, LAST+3, ASIHOF+1 |
| ^DGPM("APMV" | SCAN+3 |
| ^DGPM("ATID4" | LODGER+4, LLDCHK+2 |
| ^DGPM("ATID5" | LLDCHK+3 |
| ^DPT - [#2] | 6+11, LODGER+2 |
| ^DPT("LD" | LODGER+2 |
| ^UTILITY("BLRDPTZ" | Q! |
| Name | Line Occurrences |
|---|---|
| 42 | OK+2 |
| 47 | OK+3 |
| ASIHOF | 6+11 |
| GO | 6+3, 6+5, 6+11, 6+14, 6+15, 6+16 |
| LAST | 6+5 |
| LASTQ | LAST+2 |
| LLDCHK | LAST+2 |
| LODGER | 6+11, 6+14, 6+15, 6+16 |
| LODGERQ | LODGER+1, LODGER+2 |
| OK | 6+16, OK+1, OK+2, OK+3, LAST+3 |
| OK1 | OK+1, OK+2, OK+3 |
| Q | 6+5, 6+8, 6+11, 6+14, 6+15, 6+16 |
| Q42 | 42+3, 42+4 |
| SCAN | 42+5, 47+2 |
| Name | Field # of Occurrence |
|---|---|
| ^( | 6+11, OK1, LODGER+2, LLDCHK+2, LLDCHK+3, ASIHOF+1, SCAN+3 |
| ^(0 | 6+3, OK1+1, LAST+3, LODGER+5, ASIHOF+2, SCAN+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | 6+1 |
| >> DFN | 6+11, 6+14, 6+15, Q, OK1, LAST+1, LAST+3, LODGER+2, LODGER+4, LLDCHK+2 , LLDCHK+3, ASIHOF+1, SCAN+3 |
| E | 6+3*, 6+5, 6+11*, 6+14, 6+15, 6+16, Q!, OK*, OK+5*, LAST+1* , LAST+2, LODGER+1*, LODGER+2*, LODGER+4*, LODGER+5*, LLDCHK+4*, ASIHOF+1*, ASIHOF+2* |
| IDT | LLDCHK+1~, LLDCHK+2*, LLDCHK+3*, LLDCHK+4* |
| IDT( | LLDCHK+1*, LLDCHK+2*, LLDCHK+3*, LLDCHK+4 |
| IDT(0 | LLDCHK+4 |
| M | SCAN+2~, SCAN+3* |
| NOW | 6+1*, 6+10, GO, Q!, LASTQ |
| NOWI | 6+1*, Q!, LAST+1, LLDCHK+2, LLDCHK+3, ASIHOF+1 |
| VACA | SCAN+2~*, SCAN+3 |
| VACC | Q! |
| VAID | SCAN+2~*, SCAN+3* |
| >> VAINDT | 6+7 |
| >> VAIP("D" | 6+5, 6+7 |
| >> VAIP("E" | 6+3 |
| >> VAIP("L" | LAST+2, LODGER+1 |
| VANN | Q! |
| VAQ | Q! |
| VASET | Q! |
| VAX | 6+7*, 6+8, 6+14*, 6+15*, 6+16, Q!, OK+1, OK+2, OK+3, OK+5 , OK1*, OK1+1, LAST+1*, LAST+3*, LODGER+2*, LODGER+4*, LLDCHK+1, ASIHOF+1*, ASIHOF+2 |
| VAX("DAT" | 6+1*, 6+11, LODGER+2, 42+3 |
| VAX("DT" | 6+3*, 6+8*, 6+10*, 6+11, 6+14, GO*, OK+4, LASTQ*, LODGER+2, LODGER+4 , LODGER+5 |
| VAZ | 6+16*, Q!, OK, OK+4, OK1, OK1+1*, LAST+3*, 42+3, 42+4, SCAN+2 |
| VAZ2 | Q!, OK*, OK+1, OK+2, OK+3 |
| >> Y | OK+2, OK+3, 42+3*, 42+4*, SCAN+2*, SCAN+3* |