VAFHLPI2 ;ALB/BWF - EXTENSION OF PID SEGMENT BUILDER ;23-APR-2003
Source file <VAFHLPI2.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PERMADD | ; Put permanent address into output array
|
|
CONFADD | ;Put confidential address into output array
|
|
CONFIN | ;Inactive confidential address type
|
|
SEQ11(TYPE,HLQ) | ;Patient Address (seq #11)
|
|
CONFACT | ;Active confidential address type
|
Name | Field # of Occurrence |
---|---|
$$HLDATE^HLFNC | CONFADD+4, CONFADD+5 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(5 - [#5] | PERMADD+6, PERMADD+13, CONFADD+2, CONFADD+3 |
Name | Line Occurrences |
---|---|
CONFACT | CONFADD+7 |
CONFADD | SEQ11+26 |
CONFIN | CONFADD+8 |
PERMADD | SEQ11+24, SEQ11+25 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ADDTYPE | CONFADD+1~, CONFADD+6*, CONFADD+7, CONFACT+7, CONFIN+4 |
CCOUNTY | CONFADD+1~, CONFADD+3*, CONFACT+9 |
CENDATE | CONFADD+1~, CONFADD+5*, CONFACT+13 |
CSTATE | CONFADD+1~, CONFADD+2*, CONFACT+4 |
CSTDATE | CONFADD+1~, CONFADD+4*, CONFACT+12 |
HLQ | SEQ11~, SEQ11+20*, PERMADD+2, PERMADD+3, PERMADD+4, PERMADD+5, PERMADD+7, PERMADD+8, PERMADD+12, PERMADD+14 , CONFACT+1, CONFACT+2, CONFACT+3, CONFACT+4, CONFACT+5, CONFACT+7, CONFACT+8, CONFACT+9, CONFACT+12, CONFACT+13 , CONFIN+2, CONFIN+4, CONFIN+5, CONFIN+6 |
LOOP | CONFADD+1~ |
NODE | SEQ11+18~, SEQ11+23*, PERMADD+2, PERMADD+3, PERMADD+4, PERMADD+5, PERMADD+7, PERMADD+8, PERMADD+10, PERMADD+11 , PERMADD+12, PERMADD+14, PERMADD+15*, CONFACT+1, CONFACT+2, CONFACT+3, CONFACT+4, CONFACT+5, CONFACT+6, CONFACT+7 , CONFACT+8, CONFACT+9, CONFACT+10, CONFACT+11, CONFACT+12, CONFACT+13, CONFACT+14*, CONFIN+2, CONFIN+3, CONFIN+4 , CONFIN+5, CONFIN+6, CONFIN+7* |
TYPE | SEQ11~, SEQ11+21*, SEQ11+22*, SEQ11+24, SEQ11+25, SEQ11+26, PERMADD+4, PERMADD+9 |
U | PERMADD+8 |
>> VAFY(11 | SEQ11+19!, PERMADD+2*, PERMADD+3*, PERMADD+4*, PERMADD+5*, PERMADD+7*, PERMADD+8*, PERMADD+10*, PERMADD+11*, PERMADD+12* , PERMADD+14*, CONFACT+1*, CONFACT+2*, CONFACT+3*, CONFACT+4*, CONFACT+5*, CONFACT+6*, CONFACT+7*, CONFACT+8*, CONFACT+9* , CONFACT+10*, CONFACT+11*, CONFACT+12*, CONFACT+13*, CONFIN+2*, CONFIN+3*, CONFIN+4*, CONFIN+5*, CONFIN+6* |
>> VAPA(1 | PERMADD+2 |
>> VAPA(12 | CONFADD+7 |
>> VAPA(13 | CONFACT+1 |
>> VAPA(14 | CONFACT+2 |
>> VAPA(15 | CONFACT+8 |
>> VAPA(16 | CONFACT+3 |
>> VAPA(17 | CONFADD+2, CONFADD+3 |
>> VAPA(18 | CONFACT+5 |
>> VAPA(19 | CONFADD+3 |
>> VAPA(2 | PERMADD+3, PERMADD+4 |
>> VAPA(20 | CONFADD+4 |
>> VAPA(21 | CONFADD+5 |
>> VAPA(22 | CONFADD+7 |
>> VAPA(3 | PERMADD+4, PERMADD+12 |
>> VAPA(4 | PERMADD+5 |
>> VAPA(5 | PERMADD+6, PERMADD+13 |
>> VAPA(6 | PERMADD+8 |
>> VAPA(7 | PERMADD+13 |
X | PERMADD+1~, PERMADD+4*, PERMADD+6*, PERMADD+7, PERMADD+13*, PERMADD+14, CONFACT+5*, CONFIN+1~, CONFIN+2*, CONFIN+3* |