E11 (245)    BPS NCPDP FIELD DEFS (9002313.91)

Name Value
NCPDP FIELD NUMBER E11
NAME PATIENT NAME SUFFIX
ID 0E
D0 LENGTH 10
D0 FORMAT ALPHANUMERIC
VISTA FIELD NUMBER 2311
STANDARD NCPDP FIELD NAME PATIENT NAME SUFFIX
GET CODE
S BPS("X")=$G(BPS("Patient","Suffix"))
REQUEST SEGMENT PATIENT
D0 FORMAT CODE
S BPS("X")=$$ANFF^BPSECFM($G(BPS("X")),10)
SET CODE
S $P(^BPSC(BPS(9002313.02),"E10"),U,1)=BPS("X")