I $G(IBXDATA)'="" S IBXDATA=$$NOPUNCT^IBCEF(IBXDATA),IBXSAVE("MAMMO")=1
FORMAT CODE DESCRIPTION
Extract and format the mammo# cert number from the claim. If a mammo# is
present for the claim then save that fact in IBXSAVE for later usage for
the mammo# qualifier field.