B58 (504) BPS NCPDP FIELD DEFS (9002313.91)

Name	Value
NCPDP FIELD NUMBER	B58
NAME	LAST KNOWN GROUP ID
ID	3G
D0 LENGTH	15
D0 FORMAT	ALPHANUMERIC
VISTA FIELD NUMBER	2058
GET CODE	S BPS("X")=""
REQUEST SEGMENT	LAST KNOWN 4RX
D0 FORMAT CODE	S BPS("X")=$$ANFF^BPSECFM($G(BPS("X")),15)
SET CODE	S $P(^BPSC(BPS(9002313.02),400,BPS(9002313.0201),"B50"),U,8)=BPS("X")