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.

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

1086

---

Explain the types of perform?

926

---

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

888

---

Explain the input procedure?

881

---

What are the types of perform?

947

---

What is the syntax of sort?

851

---

Explain the input procedure and output procedure?

857

---

What is comp?

1087

---

Explain the output procedure?

967

---

Define perform? And its types?

929

---

What is the actual use of fillers?

892

---

Define redefine?

1048

---

What is output procedure?

935

---

Explain how to update data area in cobol 400 program?

957

---

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

897

---