Golgappa.net | Golgappa.org | BagIndia.net | BodyIndia.Com | CabIndia.net | CarsBikes.net | CarsBikes.org | CashIndia.net | ConsumerIndia.net | CookingIndia.net | DataIndia.net | DealIndia.net | EmailIndia.net | FirstTablet.com | FirstTourist.com | ForsaleIndia.net | IndiaBody.Com | IndiaCab.net | IndiaCash.net | IndiaModel.net | KidForum.net | OfficeIndia.net | PaysIndia.com | RestaurantIndia.net | RestaurantsIndia.net | SaleForum.net | SellForum.net | SoldIndia.com | StarIndia.net | TomatoCab.com | TomatoCabs.com | TownIndia.com
Interested to Buy Any Domain ? << Click Here >> for more details...

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 are fillers? What is the actual use of fillers? With mall/simple example?

1013


seqence numbers in cobol

3127


How to update data area in cobol 400 program?

1053


What is output procedure?

1013


Explain the difference between comp & comp-3?

984


What is input procedure?

1005


What is comp?

1160


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

911


Explain the syntax of sort?

983


Explain the difference between section, paragraph and sentences?

991


What is the syntax of sort?

907


why icetool be used in programmer view?

2583


What are fillers?

1043


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

973


Explain the input procedure?

951