| Name | Value |
|---|---|
| FORM FIELD REFERENCE | CMS-1500 |
| SECURITY LEVEL | NATIONAL,NO EDIT |
| DATA ELEMENT | N-GET FROM PREVIOUS EXTRACT |
| PAD CHARACTER | NO PAD REQUIRED |
| FORMAT CODE | S IBXDATA=$P($G(IBXSAVE("IDEM")),U,3) I IBXDATA'="" N IBZ S IBZ=$$NOPUNCT^IBCEF(IBXDATA,1),IBXDATA=$S(IBZ?10N:($E(IBZ,1,3)_" "_$E(IBZ,4,6)_"-"_$E(IBZ,7,10)),1:$J(IBXDATA,14)) |
| FORMAT CODE DESCRIPTION |
This field relies on the existence of the variable IBXSAVE("IDEM")
previously extracted.
|