Global: ^ABMCNDIN

Information

FileMan FileNo	FileMan Filename	Package
9002274.34	3P CONDITION INDICATORS	Third Party Billing

Package	Total	Routines
Third Party Billing	3	ABMDE31 ABME5CRC ABME8CRC

Package	Total	FileMan Files
Third Party Billing	2	3P BILL(#9002274.4)[#9002274.414(.01)] 3P CLAIM DATA(#9002274.3)[#9002274.314(.01)]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	NUMBER	0;1	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X I $D(X)&($L(X)=1) S X="0"_X` LAST EDITED: `AUG 08, 2005` HELP-PROMPT: `Type a Number between 0 and 99, 0 Decimal Digits` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9002274.34^B` 1)= S ^ABMCNDIN("B",$E(X,1,30),DA)="" 2)= K ^ABMCNDIN("B",$E(X,1,30),DA)
.02	DESCRIPTION	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>60!($L(X)<3) X` LAST EDITED: `AUG 08, 2005` HELP-PROMPT: `Answer must be 3-60 characters in length.`

NUMBER

0;1

NUMBER

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

INPUT TRANSFORM: K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X I $D(X)&($L(X)=1) S X="0"_X
LAST EDITED: AUG 08, 2005
HELP-PROMPT: Type a Number between 0 and 99, 0 Decimal Digits
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

CROSS-REFERENCE: 9002274.34^B

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

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

DESCRIPTION

0;2

FREE TEXT

NUMBER: 01	NUMBER: 02	NUMBER: 03	NUMBER: 04	NUMBER: 05	NUMBER: 06	NUMBER: 07	NUMBER: 08
NUMBER: 09	NUMBER: 12	NUMBER: 60