426 (46)    BPS NCPDP FIELD DEFS (9002313.91)

Name Value
NCPDP FIELD NUMBER 426
F6 LENGTH 11
NAME USUAL AND CUSTOMARY CHARGE
FORMAT SIGNED NUMERIC
F6 FORMAT SIGNED NUMERIC
ID DQ
LENGTH 8
D0 LENGTH 8
D0 FORMAT SIGNED NUMERIC
GET CODE
S BPS("X")=$G(BPS("RX",BPS(9002313.0201),"Usual & Customary"))
REQUEST SEGMENT PRICING
D0 FORMAT CODE
S BPS("X")=$$DFF^BPSECFM($G(BPS("X")),8)
SET CODE
S $P(^BPSC(BPS(9002313.02),400,BPS(9002313.0201),400),U,26)=BPS("X")
FORMAT CODE
S BPS("X")=$$DFF^BPSECFM($G(BPS("X")),8)
F6 FORMAT CODE
S BPS("X")=$$DFF^BPSECFM($G(BPS("X")),11)