B18 (476)    BPS NCPDP FIELD DEFS (9002313.91)

Name Value
NCPDP FIELD NUMBER B18
NAME EMPLOYER CONTACT LAST NAME
ID 7J
D0 LENGTH 35
D0 FORMAT ALPHANUMERIC
VISTA FIELD NUMBER 2018
GET CODE
S BPS("X")=""
REQUEST SEGMENT WORKER'S COMPENSATION
D0 FORMAT CODE
S BPS("X")=$$ANFF^BPSECFM($G(BPS("X")),35)
SET CODE
S $P(^BPSC(BPS(9002313.02),400,BPS(9002313.0201),"B10"),U,8)=BPS("X")