Sub-Field: 9002270.07

Parent File	Name	Number	Package
AO PVT-INS ACCOUNT(#9002270.02)	OTHER NAME USED	9002270.07	Third Party Tracking

Parent File

Name

Number

Package

OTHER NAME USED

9002270.07

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	OTHER NAME USED	0;1	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<3) X` LAST EDITED: `JUN 21, 1990` EXECUTABLE HELP: `D ^%AUCLS S XQH="ABPA/PATIENT/ALIAS" D EN^XQH` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9002270.07^B` 1)= S ^ABPVAO(DA(1),"AKA","B",$E(X,1,30),DA)="" 2)= K ^ABPVAO(DA(1),"AKA","B",$E(X,1,30),DA) CROSS-REFERENCE: `9002270.02^E` 1)= S ^ABPVAO("E",$E(X,1,30),DA(1),DA)="" 2)= K ^ABPVAO("E",$E(X,1,30),DA(1),DA)
1	HOW USED?	0;2	SET	**********************REQUIRED FIELD********************** '1' FOR ALIAS; '2' FOR LOOK-UP ONLY; LAST EDITED: `JUN 18, 1990`

OTHER NAME USED

0;1

FREE TEXT

CROSS-REFERENCE: 9002270.07^B

1)= S ^ABPVAO(DA(1),"AKA","B",$E(X,1,30),DA)=""

2)= K ^ABPVAO(DA(1),"AKA","B",$E(X,1,30),DA)

CROSS-REFERENCE: 9002270.02^E

1)= S ^ABPVAO("E",$E(X,1,30),DA(1),DA)=""

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

HOW USED?

0;2

SET

************************REQUIRED FIELD************************