Global: ^FBAA(161.99

Information

FileMan FileNo	FileMan Filename	Package
161.99	FEE BASIS PAYMENT REJECT CODE	Fee Basis

This file holds reject codes that are applicable to payment line items. This file will be exported with data. The data must not be locally modified. VistA Fee Basis has four logical files/sub-files that contain payment line items: 1. SERVICE PROVIDED (#162.03) multiple within the FEE BASIS PAYMENT (#162) file. 2. TRAVEL PAYMENT DATE (#162.04) multiple within the FEE BASIS PAYMENT (#162) file. 3. PRESCRIPTION NUMBER (#162.11) multiple within the FEE BASIS PHARMACY INVOICE (#162.1) file. 4. FEE BASIS INVOICE (#162.5) file. Each of these four logical files has a free-text REJECT CODE field within a REJECT CODE multiple. The value stored in the REJECT CODE field is normally expected to have a matching record in the FEE BASIS PAYMENT REJECT CODE file so a description of the reject code can be displayed on appropriate outputs. In the event the FEE BASIS PAYMENT REJECT CODE file data is out-of-date and does not contain a code that is stored with a payment, a description similar to "Reject reason code not currently defined in list" will be used as the code description until the code is added to file #161.99 by a patch.

Package	Total	Routines
Fee Basis	2	^FBAA(161.99 ^FBAA(163.98
Kernel	1	FILE

Package	Total	Routines
Fee Basis	1	FBAARJP

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	CODE	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>4!($L(X)<1)!'(X'?1P.E) X` LAST EDITED: `DEC 13, 2011` HELP-PROMPT: `Answer must be 1-4 characters in length.` DESCRIPTION: `The field contains a reject reason code.` CROSS-REFERENCE: `161.99^B` `1)= S ^FBAA(161.99,"B",$E(X,1,30),DA)=""` `2)= K ^FBAA(161.99,"B",$E(X,1,30),DA)`
1	DESCRIPTION	1;0	WORD-PROCESSING #161.991	DESCRIPTION: `This field contains a description of the reject reason code.` LAST EDITED: `DEC 14, 2011` HELP-PROMPT: `Enter a description for the code.` DESCRIPTION: `This field contains a description of the reject reason code.`

CODE

0;1

FREE TEXT

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

INPUT TRANSFORM: K:$L(X)>4!($L(X)<1)!'(X'?1P.E) X
LAST EDITED: DEC 13, 2011
HELP-PROMPT: Answer must be 1-4 characters in length.
DESCRIPTION:
The field contains a reject reason code.
CROSS-REFERENCE: 161.99^B
1)= S ^FBAA(161.99,"B",$E(X,1,30),DA)=""
2)= K ^FBAA(161.99,"B",$E(X,1,30),DA)

DESCRIPTION

1;0

WORD-PROCESSING #161.991

Name	Line Occurrences (* Changed, ! Killed)
^FBAA(161.99 - [#161.99]	.01(XREF 1S), .01(XREF 1K)

Name	Field # of Occurrence
>> DA	.01(XREF 1S), .01(XREF 1K)
X	.01+1!, .01(XREF 1S), .01(XREF 1K)