| 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 | K IBXDATA N Z,Z0 S Z=0 F S Z=$O(IBXSAVE("OUTPT",Z)) Q:'Z S Z0=$P(IBXSAVE("OUTPT",Z),U,7) S:$P(Z0,",",2) IBXDATA(Z)=$P(Z0,",",2) |
| FORMAT CODE DESCRIPTION | This is a group data element so more than 1 occurrence of a value is possible for the data element in the previously extract IBXSAVE array. If any service line data is found, the data is output. Data is taken from the second ',' delimited piece of the extracted data. |