548 (203) BPS NCPDP FIELD DEFS (9002313.91)

Name	Value
NCPDP FIELD NUMBER	548
NAME	APPROVED MESSAGE CODE
FORMAT	ALPHA/NUMERIC
ID	6F
LENGTH	3
D0 LENGTH	3
D0 FORMAT	ALPHANUMERIC
GET CODE	; This is a response-only field which does not use the GET, FORMAT, or SET code
RESPONSE SEGMENT	RESPONSE STATUS
SET CODE	S $P(^BPSR(BPS(9002313.02),1000,BPS(9002313.0201),548,0),B,4)=BPS("X")
FORMAT CODE	S BPS("X")=$$ANFF^BPSECFM($G(BPS("X")),3)