| Name | Value |
|---|---|
| FORM FIELD REFERENCE | IB 837 TRANSMISSION |
| SECURITY LEVEL | NATIONAL,NO EDIT |
| DATA ELEMENT | N-BATCH DATE |
| PAD CHARACTER | NO PAD REQUIRED |
| FORMAT CODE | I $D(IBXDATA) S IBXDATA=$$DT^IBCEFG1(IBXDATA,"","D8") |
| FORMAT CODE DESCRIPTION |
If header data has already been extracted, array ^TMP("IBHDR",$J) will
already exist. Don't want to extract this field again, so kill data
element so there is no output. If header data not already extracted,
format date as CCYYMMDD.
|