©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
BLRDPT0 ; IHS/DIR/FJE - PATIENT VARIABLE ROUTINE DRIVER, CONT. ; [ 06/16/98 11:25 AM ]
Source file <BLRDPT0.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Changes To Lab | 6 | (1,2,3,4)^BLRDPT1 5^BLRDPT2 6^BLRDPT3 (7,8,9)^BLRDPT4 (10,11,12)^BLRDPT5 13^BLRDPT6 |
| VA Fileman | 1 | DT^DICRW |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| C9 | ||
| C13 | ||
| C12 | ||
| C11 | ||
| C10 | ||
| C8 | ||
| INIT | ; -- determine #'s or names then init array
|
|
| 1 | ; -- [DEM] demos
|
|
| 3 | ; -- [ADD] current address
|
|
| 2 | ; -- [OPD] other pt vars
|
|
| 5 | ; -- [INP] inpt data -v5
|
|
| 4 | ; -- [OAD] other pt vars
|
|
| 7 | ; -- [ELIG] elig data
|
|
| 6 | ; -- [IN5] inpt data v5
|
|
| C3 | ||
| C2 | ||
| C1 | ||
| C7 | ||
| C6 | ||
| C5 | ||
| C4 | ||
| Q | ||
| 9 | ; -- [SVC] service data
|
|
| 8 | ; -- [MB] $ benefits
|
|
| 11 | ; -- [SDE] clinic enrollment data
|
|
| 10 | ; -- [REG] registration data
|
|
| 13 | ; -- [PID] pt id's
|
|
| 12 | ; -- [SDA] appt data
|
|
| SS | ; 1^ 2^ 3^ 4^ 5^ 6^ 7^ 8^ 9^10^11^12^13^14^15^16^17
|
|
| KVAR | ; kill all vadpt data
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | BLRDPT0+8 |
| ^UTILITY( | C6+1! |
| ^UTILITY("VADM" | C1! |
| ^UTILITY("VAEL" | C7! |
| ^UTILITY("VAEN" | C11! |
| ^UTILITY("VAIN" | C5! |
| ^UTILITY("VAMB" | C8! |
| ^UTILITY("VAOA" | C4+1! |
| ^UTILITY("VAPA" | C3+1! |
| ^UTILITY("VAPD" | C2! |
| ^UTILITY("VARP" | C10! |
| ^UTILITY("VASD" | C12! |
| ^UTILITY("VASV" | C9! |
| Name | Line Occurrences |
|---|---|
| 13 | 1+1 |
| @( | BLRDPT0+11 |
| C1 | 1+1 |
| C10 | 10+1 |
| C11 | 11+1 |
| C12 | 12+1 |
| C2 | 2+1 |
| C3 | 3+1 |
| C4 | 4+1 |
| C5 | 5+1 |
| C6 | 6+1 |
| C7 | 7+1 |
| C8 | 8+1 |
| C9 | 9+1 |
| INIT | 1+1, 2+1, 3+1, 4+1, 5+1, 6+1, 7+1, 8+1, 9+1, 10+1 , 11+1, 12+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> DFN | BLRDPT0+8 |
| DT | BLRDPT0+7 |
| I | Q!, INIT+4*, 6+1*, 7+1*, 9+1*, 9+3*, C6*, C6+2* |
| I1 | BLRDPT0+6~, Q!, 6+1*, 9+3* |
| U | BLRDPT0+7* |
| >> VA("BID" | 13+1* |
| >> VA("PID" | 13+1* |
| VAC | Q! |
| VADM | C1! |
| VAEL | C7! |
| >> VAERR | BLRDPT0+8*, 1+1, 2+1, 3+1, 4+1, 5+1, 6+2, 7+2, 8+1, 9+4 , 10+1, 11+1, 12+1, 13+1 |
| >> VAHOW | BLRDPT0+10, INIT+3 |
| VAIN | C5! |
| >> VAIP( | C6, C6+2* |
| >> VAIP("V" | C6+1 |
| VAMB | C8! |
| VAN | BLRDPT0+9, BLRDPT0+10, BLRDPT0+11, Q!, INIT+3, KVAR+1!, C1, C2, C3+2, C4+2 , C5, C6+3, C7, C8, C9, C10, C11 |
| VAN(1 | INIT+4 |
| VAOA | C4+1! |
| VAOA("A" | C4, C4+2* |
| VAPA | C3+1! |
| VAPA("P" | C3, C3+2* |
| VAPD | C2! |
| >> VAROOT | BLRDPT0+9 |
| VAS | Q!, INIT+2*, INIT+3*, INIT+4, 6+1, 7+1, 9+1, 9+2, 9+3 |
| VASV | C9! |
| VAV | BLRDPT0+9*, BLRDPT0+10*, Q!, INIT+4, 6+1, 7+1, 9+1, 9+2, 9+3 |
| VAW | Q! |
| VAX | Q! |
| VAZ | Q! |
| X | Q!, C3!, C3+2!, C4!, C4+2!, C6!, C6+3! |
| X( | C6*, C6+2 |
| X("A" | C4*, C4+2 |
| X("P" | C3*, C3+2 |
| Y | BLRDPT0+9*, BLRDPT0+10, Q!, C6+1* |
| Name | Field # of Occurrence |
|---|---|
| $T(SS+VAN | INIT+3 |