120 (360) BPS NCPDP FIELD DEFS (9002313.91)

Name	Value
NCPDP FIELD NUMBER	120
NAME	PAY TO NAME
FORMAT	ALPHA/NUMERIC
ID	TU
LENGTH	20
D0 LENGTH	20
D0 FORMAT	ALPHANUMERIC
GET CODE	S BPS("X")=""
REQUEST SEGMENT	WORKER'S COMPENSATION
D0 FORMAT CODE	S BPS("X")=$$ANFF^BPSECFM($G(BPS("X")),20)
SET CODE	S $P(^BPSC(BPS(9002313.02),400,BPS(9002313.0201),110),U,10)=""