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 / kk

please try this.


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.

Is This Answer Correct ?    14 Yes 3 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

Define sort?

1165


What is perform?

1088


What is redefine?

1218


What is input procedure?

992


What is the actual use of fillers?

957


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

958


Explain the syntax of redefine?

909


Explain the output procedure?

1035


Explain how to update data area in cobol 400 program?

1014


What is the syntax of sort?

900


Define perform? And its types?

981


What are fillers? What is the actual use of fillers? With mall/simple example?

998


seqence numbers in cobol

3114


How to update data area in cobol 400 program?

1044


What is the syntax of redefine?

946