Global: ^ABMRLABS

Information

FileMan FileNo	FileMan Filename	Package
9002274.35	3P REFERENCE LAB LOCATIONS	Third Party Billing

Package	Total	Routines
Third Party Billing	14	ABMDE301 ABMDE3C ABMDEML ABMDF14B ABMDF27B ABMDF35B ABMDF3B ABME5N3 ABME5N4 ABME5REF ABME8N3 ABME8N4 ABME8NM1 ABME8REF

Package	Total	Routines
Third Party Billing	2	ABMDEMLE ABMRLABS

Package	Total	FileMan Files
Third Party Billing	3	3P BILL(#9002274.4)[.923, #9002274.4037(.14), #9002274.4043(.14), #9002274.4047(.14)] 3P CLAIM DATA(#9002274.3)[.923, #9002274.3037(.14), #9002274.3043(.14), #9002274.3047(.14)] 3P PARAMETERS(#9002274.5)[.412]

Package	Total	FileMan Files
Utility Tables	1	VENDOR(#9999999.11)[.01]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	VENDOR NAME	0;1	POINTER TO VENDOR FILE (#9999999.11)	**********************REQUIRED FIELD********************** VENDOR(#9999999.11) LAST EDITED: `JUN 01, 2006` CROSS-REFERENCE: `9002274.35^B` 1)= S ^ABMRLABS("B",$E(X,1,30),DA)="" 2)= K ^ABMRLABS("B",$E(X,1,30),DA)
.02	CLIA#	0;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>10!($L(X)<10)!'(X?2N1U7N) X` LAST EDITED: `JUN 01, 2006` HELP-PROMPT: `Answer must be 10 characters in length with a format of ##A#######.` CROSS-REFERENCE: `9002274.35^C` 1)= S ^ABMRLABS("C",$E(X,1,30),DA)="" 2)= K ^ABMRLABS("C",$E(X,1,30),DA)

VENDOR NAME

0;1

POINTER TO VENDOR FILE (#9999999.11)

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

CROSS-REFERENCE: 9002274.35^B

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

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

CLIA#

0;2

FREE TEXT

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

INPUT TRANSFORM: K:$L(X)>10!($L(X)<10)!'(X?2N1U7N) X
LAST EDITED: JUN 01, 2006
HELP-PROMPT: Answer must be 10 characters in length with a format of ##A#######.

CROSS-REFERENCE: 9002274.35^C

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

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