DEC_PL_I (Copy)