IB 837 TRANSMISSION (160)    IB FORM FIELD CONTENT (364.7)

Name Value
FORM FIELD REFERENCE IB 837 TRANSMISSION
SECURITY LEVEL NATIONAL,NO EDIT
DATA ELEMENT N-GET FROM PREVIOUS EXTRACT
PAD CHARACTER NO PAD REQUIRED
FORMAT CODE Q:'$G(IBXSAVE("SERVFACFLAG")) N Z S Z=$G(IBXSAVE("SERVFACDATA")),IBXDATA=$$GETFAC^IBCEP8(+$P(Z,U,4),$P(Z,U,3),"3Z"),IBXDATA=$$NOPUNCT^IBCEF(IBXDATA,1)
FORMAT CODE DESCRIPTION
SUB-6  lab/facility zip code