In order to change the record in the RECORD-UP area, first move it to the WORK area. Make the changes there and then pass return code 20 in RETURN-CODE. The altered record in the WORK area will replace the record in RECORD-UP.
In order to change the record in the RECORD-UP area, first move it to the WORK area. Make the changes there and then pass return code 20 in RETURN-CODE. The altered record in the WORK area will replace the record in RECORD-UP.