B55 (500)    BPS NCPDP FIELD DEFS (9002313.91)

Name Value
NCPDP FIELD NUMBER B55
F6 LENGTH 2
NAME INTERMEDIARY ID COUNTRY CODE
F6 FORMAT ALPHANUMERIC
ID 8U
D0 LENGTH 2
D0 FORMAT ALPHANUMERIC
VISTA FIELD NUMBER 2055
GET CODE
S BPS("X")=""
REQUEST SEGMENT INTERMEDIARY
D0 FORMAT CODE
S BPS("X")=$$ANFF^BPSECFM($G(BPS("X")),2)
F6 FORMAT CODE
S BPS("X")=$$ANFF^BPSECFM($G(BPS("X")),2)