Global: ^FBAA(161.81

FileMan FileNo	FileMan Filename	Package
161.81	FEE BASIS PARTICIPATION CODE	Fee Basis

FileMan FileNo

FileMan Filename

Package

161.81

FEE BASIS PARTICIPATION CODE

Package	Total	Routines
Fee Basis	2	FBAAUVC FBPRE35

Package	Total	FileMan Files
Fee Basis	1	FEE BASIS VENDOR(#161.2)[7]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.001	NUMBER		NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `JAN 17, 1986` HELP-PROMPT: `TYPE A WHOLE NUMBER BETWEEN 1 AND 9999999` DESCRIPTION: `The internal entry number of the Participation Code in this file.`
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>46!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X` HELP-PROMPT: `ANSWER MUST BE 3-46 CHARACTERS IN LENGTH` DESCRIPTION: `The name for this Participation code. Each vendor must have a participation code.` CROSS-REFERENCE: `161.81^B` `1)= S ^FBAA(161.81,"B",$E(X,1,30),DA)=""` `2)= K ^FBAA(161.81,"B",$E(X,1,30),DA)`
1	CODE REPORTED TO AUSTIN	0;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>2!($L(X)<2) X` LAST EDITED: `SEP 09, 1993` HELP-PROMPT: `ANSWER MUST BE 2 CHARACTERS IN LENGTH` DESCRIPTION: `The acceptable code the Austin Central system expects for this participation code.` CROSS-REFERENCE: `161.81^C` `1)= S ^FBAA(161.81,"C",$E(X,1,30),DA)=""` `2)= K ^FBAA(161.81,"C",$E(X,1,30),DA)` `Used to get internal entry number in the server routines.`

NUMBER

INPUT TRANSFORM: K:+X'=X!(X>9999999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: JAN 17, 1986
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 9999999
DESCRIPTION:
The internal entry number of the Participation Code in this file.

NAME

0;1

FREE TEXT

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

INPUT TRANSFORM: K:$L(X)>46!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X
HELP-PROMPT: ANSWER MUST BE 3-46 CHARACTERS IN LENGTH
DESCRIPTION:
The name for this Participation code. Each vendor must have a participation code.
CROSS-REFERENCE: 161.81^B
1)= S ^FBAA(161.81,"B",$E(X,1,30),DA)=""
2)= K ^FBAA(161.81,"B",$E(X,1,30),DA)

CODE REPORTED TO AUSTIN

0;2

FREE TEXT

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

INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>2!($L(X)<2) X
LAST EDITED: SEP 09, 1993
HELP-PROMPT: ANSWER MUST BE 2 CHARACTERS IN LENGTH
DESCRIPTION:
The acceptable code the Austin Central system expects for this participation code.
CROSS-REFERENCE: 161.81^C
1)= S ^FBAA(161.81,"C",$E(X,1,30),DA)=""
2)= K ^FBAA(161.81,"C",$E(X,1,30),DA)
Used to get internal entry number in the server routines.

NAME: DOCTOR OF MEDICINE	NAME: DOCTOR OF OSTEOPATHY	NAME: HOME NURSING CARE	NAME: DENTIST	NAME: COMMUNITY NURSING HOME	NAME: NON-VA HOSPITAL	NAME: CONTRACT READJUSTMENT COUNSELING	NAME: CONTRACT HALFWAY HOUSES
NAME: HOME IMPROVEMENT AND STRUCTURAL ALTERATION	NAME: HOME HEALTH SERVICES	NAME: DIALYSIS	NAME: ALL OTHER INDIVIDUAL PARTICIPANTS	NAME: ALL OTHER PARTICIPANTS, NOT INDIVIDUALS	NAME: PHARMACY	NAME: DOCTOR OF CHIROPRACTIC

Information