©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
VADPT3 ;ALB/MRL - PATIENT VARIABLES
Source file <VADPT3.m>
| Package | Total | Call Graph |
|---|---|---|
| Registration | 2 | (KVAR,VAR)^VADPT30 ^VADPT31 |
| Kernel | 1 | $$NOW^XLFDT |
| Package | Total | Caller Graph |
|---|---|---|
| Registration | 3 | DGPMV1 DGPMV10 VADPT0 |
| IHS Changes To Lab | 1 | BLRAG04 |
| 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 | ; returns last movement for patient
; called by bed control and pt inquiry |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGPM - [#405] | 6+3, 6+11, 6+15, 6+16, OK+11, OK+12, OK1+1, LAST+4, LODGER+5, LLDCHK+4 , ASIHOF+2, SCAN+3 |
| ^DGPM("APID" | 6+14, 6+15, OK1, LAST+2, LAST+4, 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("VADPTZ" | Q! |
| Name | Line Occurrences |
|---|---|
| 42 | OK+3 |
| 47 | OK+4 |
| ASIHOF | 6+11 |
| GO | 6+3, 6+5, 6+11, 6+14, 6+15, 6+16 |
| LAST | 6+5 |
| LASTQ | LAST+3 |
| LLDCHK | LAST+3 |
| LODGER | 6+11, 6+14, 6+15, 6+16 |
| LODGERQ | LODGER+1, LODGER+2 |
| OK | 6+16, OK+2, OK+3, OK+4, LAST+4 |
| OK1 | OK+2, OK+3, OK+4 |
| 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+4, LODGER+5, ASIHOF+2, SCAN+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> DFN | 6+11, 6+14, 6+15, Q, OK1, LAST+2, LAST+4, 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+1*, OK+13*, LAST+2* , LAST+3, 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+2, LLDCHK+2, LLDCHK+3, ASIHOF+1 |
| VAADT | OK~, OK+10*, OK+11, OK+12 |
| VACA | SCAN+2~*, SCAN+3 |
| VACC | Q! |
| VADDT | OK~, OK+11*, OK+12* |
| VAID | SCAN+2~*, SCAN+3* |
| >> VAINDT | 6+7 |
| >> VAIP("D" | 6+5, 6+7 |
| >> VAIP("E" | 6+3 |
| >> VAIP("L" | LAST+3, LODGER+1 |
| VANN | Q! |
| VAQ | Q! |
| VAQUIT | OK~, OK+9*, OK+12* |
| VASET | Q! |
| VAX | 6+7*, 6+8, 6+14*, 6+15*, 6+16, Q!, OK+2, OK+3, OK+4, OK+13 , OK1*, OK1+1, LAST+2*, LAST+4*, 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+5, OK+9, OK+12, LASTQ* , LODGER+2, LODGER+4, LODGER+5 |
| VAZ | 6+16*, Q!, OK+1, OK+5, OK+9, OK+10, OK+12, OK1, OK1+1*, LAST+4* , 42+3, 42+4, SCAN+2 |
| VAZ2 | Q!, OK+1*, OK+2, OK+3, OK+4 |
| >> Y | OK+3, OK+4, 42+3*, 42+4*, SCAN+2*, SCAN+3* |