Global: ^ABSPF(9002313.93

Information

FileMan FileNo	FileMan Filename	Package
9002313.93	ABSP NCPDP REJECT CODES	Pharmacy Point of Sale

Rejection codes as defined by NCPDP. Never ever edit. Installation overwrites this file, totally.

Package	Total	Routines
Pharmacy Point of Sale	11	ABSPECFM ABSPECP1 ABSPECZA ABSPER10 ABSPOS03 ABSPOS57 ABSPOSBF ABSPOSQ4 ABSPOSQL ABSPOSRT ABSPOSRZ

Package	Total	Routines
IHS Accounts Receivable	5	BAR50P02 BAR50PA1 BAREDP02 BAREDPA1 BARNCPDP
Outpatient Pharmacy	3	PSOBPSSP PSOREJP3 PSOREJP4

Package	Total	FileMan Files
IHS Accounts Receivable	2	A/R EDI IMPORT(#90056.02)[#90056.0212(.03)] A/R TRANSACTIONS/IHS(#90050.03)[108]
Outpatient Pharmacy	1	EPHARMACY SITE PARAMETERS(#52.86)[#52.8651(.01)]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	Code	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>3!($L(X)<2)!'(X'?1P.E) X` LAST EDITED: `DEC 19, 2012` HELP-PROMPT: `Answer must be 2-3 characters in length` CROSS-REFERENCE: `9002313.93^B` 1)= S ^ABSPF(9002313.93,"B",$E(X,1,30),DA)="" 2)= K ^ABSPF(9002313.93,"B",$E(X,1,30),DA)
.02	Explanation	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>70!($L(X)<1) X` LAST EDITED: `MAY 24, 1995` HELP-PROMPT: `Answer must be 1-70 characters in length.`

Code

0;1

FREE TEXT

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

CROSS-REFERENCE: 9002313.93^B

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

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

Explanation

0;2

FREE TEXT