513 (179)    BPS NCPDP FIELD DEFS (9002313.91)

Name Value
NCPDP FIELD NUMBER 513
NAME REMAINING DEDUCTIBLE AMOUNT
FORMAT ALPHA/NUMERIC
ID FD
LENGTH 8
D0 LENGTH 8
D0 FORMAT SIGNED NUMERIC
GET CODE
; This is a response-only field which does not use the GET, FORMAT, or SET code
RESPONSE SEGMENT RESPONSE PRICING
SET CODE
S $P(^BPSR(BPS(9002313.02),1000,BPS(9002313.0201),500),U,13)=BPS("X")
FORMAT CODE
S BPS("X")=$$DFF^BPSECFM($G(BPS("X")),8)