Name | Value |
---|---|
FORM FIELD REFERENCE | LEGACY UB-92 |
SECURITY LEVEL | NATIONAL,NO EDIT |
DATA ELEMENT | N-GET FROM PREVIOUS EXTRACT |
PAD CHARACTER | NO PAD REQUIRED |
FORMAT CODE | S:$G(IBXSAVE("CC",7))'="" IBXDATA=IBXSAVE("CC",7) K IBXSAVE("CC",7) S Z=0 F S Z=$O(IBXSAVE("CC",Z)) Q:'Z D XCC^IBCEF3(IBXSAVE("CC",Z),Z) |
FORMAT CODE DESCRIPTION | Data element relies on the data in array IBXSAVE("CC") extracted previously. This field reports the data in the seventh occurrence of the array. If there are more than 7 condition codes present, save them in the global overflow array. |