I have these line of codes:
DATA TPFRQDAT; SET TP_FREQ_DATA; FILE TPFREQ01; OUT = MESSAGE_TYPE||ORIG_ADDR_ID||ORIG_SUB_ADDR_ID||EDI_VERSION||PUT(ERROR_DATA,$