How we can update data area in cobol 400 program?

Answer Posted / mahendran

we can update data area inCOBOL400 by 3 ways
#1
IDENTIFICATION DIVISION.
PROGRAM-ID. DATAAREA1.
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SPECIAL-NAMES.
DATA-AREA IS OTHER-DATA-AREA.

INPUT-OUTPUT SECTION.
FILE-CONTROL.
01 W-DATA1.
05 DATA1 PIC X(100).
DATA DIVISION.
WORKING-STORAGE SECTION.
01 DATA11 PIC A(100).
PROCEDURE DIVISION.
MOVE "JKL" TO DATA11.
MOVE "JKL" TO DATA11.
DISPLAY DATA11 UPON OTHER-DATA-AREA
FOR "DATA1" LIBRARY "NAGARED1".
ACCEPT DATA-VALUE FROM DATA-AREA
FOR "DATA1" LIBRARY "NAGARED1".
STOP RUN.

#2 Built the command chgdtaara cmd and use QCMDEXC to
execute it.


#3 Built the command chgdtaara cmd and use QCAPCMD to
execute it.

Is This Answer Correct ?    1 Yes 2 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

Explain the output procedure?

585


Explain the difference between comp & comp-3?

551


Explain the input procedure and output procedure?

526


What is input procedure?

582


Explain the difference between search and searchall?

519






Define redefine and its syntax?

549


Explain how to convert 2010/02/11 to m/dd/yyy.. With string and without string if any other method... Code?

656


What is perform?

547


Define sort?

589


What is comp?

557


How to update data area in cobol 400 program?

587


Explain what all the conditiones required for using open opcode on a file?

509


Explain the difference between section, paragraph and sentences?

518


How to detect record is locked in cobol/400?

544


Explain how to detect record is locked in cobol/400? What is the solution for that?

537