| Name | Value |
|---|---|
| FORM FIELD REFERENCE | IB 837 TRANSMISSION |
| SECURITY LEVEL | NATIONAL,NO EDIT |
| DATA ELEMENT | N-RECORD ID |
| PAD CHARACTER | NO PAD REQUIRED |
| FORMAT CODE | I $D(IBXDATA) S IBXDATA="CI1 " |
| FORMAT CODE DESCRIPTION |
If header data has already been extracted, array ^TMP("IBHDR1",$J) will
already exist. Don't want to extract this field again, so kill data
element so there is no output. If no header already extracted, output
the record id for the 'CI1' record.
|