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

What is input procedure?

578


What is the syntax of redefine?

540


Explain the difference between comp & comp-3?

549


Define redefine?

561


Explain the syntax of redefine?

521






Define sort?

581


What is the actual use of fillers?

503


Explain the input procedure and output procedure?

522


Explain the difference between search and searchall?

513


I like to know if possible to use %TRIM or any statement with prefiv "%" like RPG ile programs. thanks

2069


Explain the difference between section, paragraph and sentences?

512


What is the syntax of sort?

544


How to update data area in cobol 400 program?

579


Explain how to update data area in cobol 400 program?

578


How to detect record is locked in cobol/400?

542