Sub-Field: 9002270.511

Parent File	Name	Number	Package
9002270.51	INSURER	9002270.511	Third Party Tracking

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	INSURER POINTER	0;1	POINTER TO INSURER FILE (#9999999.18)	INSURER(#9999999.18) INPUT TRANSFORM: `S DINUM=X Q` LAST EDITED: `AUG 07, 1991` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9002270.511^B` 1)= S ^ABPAMLBL(DA(2),"L",DA(1),"I","B",$E(X,1,30),DA)="" 2)= K ^ABPAMLBL(DA(2),"L",DA(1),"I","B",$E(X,1,30),DA) CROSS-REFERENCE: `9002270.05^AI` 1)= S ^ABPAMLBL("AI",$E(X,1,30),DA(2),DA(1),DA)="" 2)= K ^ABPAMLBL("AI",$E(X,1,30),DA(2),DA(1),DA)
1	INSURER NAME	0;2	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<3) X` LAST EDITED: `MAY 15, 1990` HELP-PROMPT: `ANSWER MUST BE 3-30 CHARACTERS IN LENGTH` CROSS-REFERENCE: `9002270.51^AC^MUMPS` 1)= S ^ABPAMLBL(DA(2),"L",DA(1),"I","AC",$E(X,1,30),DA)="" 2)= K ^ABPAMLBL(DA(2),"L",DA(1),"I","AC",$E(X,1,30),DA)

INSURER POINTER

0;1

POINTER TO INSURER FILE (#9999999.18)

CROSS-REFERENCE: 9002270.511^B

1)= S ^ABPAMLBL(DA(2),"L",DA(1),"I","B",$E(X,1,30),DA)=""

2)= K ^ABPAMLBL(DA(2),"L",DA(1),"I","B",$E(X,1,30),DA)

CROSS-REFERENCE: 9002270.05^AI

1)= S ^ABPAMLBL("AI",$E(X,1,30),DA(2),DA(1),DA)=""

2)= K ^ABPAMLBL("AI",$E(X,1,30),DA(2),DA(1),DA)

INSURER NAME

0;2

FREE TEXT

CROSS-REFERENCE: 9002270.51^AC^MUMPS

1)= S ^ABPAMLBL(DA(2),"L",DA(1),"I","AC",$E(X,1,30),DA)=""

2)= K ^ABPAMLBL(DA(2),"L",DA(1),"I","AC",$E(X,1,30),DA)