VAFHLFNC ;ALB/MLI - Generic functions for MAS HL7 Interface ; 27 Feb 93
Source file <VAFHLFNC.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
INSQ | ||
INS(DFN,VAFDT) | ; call to see if pt has active insurance
|
|
YN(X) | ; extrinsic function to convert YES/NO responses to 1/0
; (format of MAS-HL7 table VA01) |
|
ADDR(VAFADDR,VAFCOUNT) | ; returns address in HL7 format
|
|
STATION(INSTPTR) | ;
|
Name | Field # of Occurrence |
---|---|
$$INSURED^IBCNS1 | INSQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(4 - [#4] | STATION+9 |
^DIC(5 - [#5] | ADDR+18, ADDR+20 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DFN | INS~, INSQ |
>> HLECH | ADDR+14 |
>> HLFS | ADDR+20, ADDR+21, ADDR+22 |
>> HLQ | ADDR+21, ADDR+22, YN+8 |
INSTPTR | STATION~, STATION+8, STATION+9 |
VAFADDR | ADDR~, ADDR+15, ADDR+16, ADDR+17, ADDR+18, ADDR+20 |
VAFCOUNT | ADDR~, ADDR+19, ADDR+20 |
VAFDT | INS~, INSQ |
X | ADDR+13~, ADDR+14*, ADDR+15, ADDR+16, ADDR+17, ADDR+18, ADDR+22, YN~, YN+7*, YN+8 |
Y | ADDR+13~, ADDR+15*, ADDR+16*, ADDR+17*, ADDR+18*, ADDR+20*, ADDR+21*, ADDR+22*, ADDR+23 |