E10 (244)    BPS NCPDP FIELD DEFS (9002313.91)

Name Value
NCPDP FIELD NUMBER E10
NAME PATIENT NAME PREFIX
ID 0D
D0 LENGTH 10
D0 FORMAT ALPHANUMERIC
VISTA FIELD NUMBER 2310
STANDARD NCPDP FIELD NAME PATIENT NAME PREFIX
GET CODE
S BPS("X")=$G(BPS("Patient","Prefix"))
REQUEST SEGMENT PATIENT
D0 FORMAT CODE
S BPS("X")=$$ANFF^BPSECFM($G(BPS("X")),10)
SET CODE
S $P(^BPSC(BPS(9002313.02),"E00"),U,10)=BPS("X")