Answer Posted / vinay gautam

working-storage section.
77 index1 pic 9 value 1.
01 week value 'montuewedthufrisatsun'.
03 days pic x(3) occurs 7 times indexed by idx.
procedure division.
perform varying index1 from 1 by 1 until index1 >= 8
display days(Index1)
compute index1 = index1 + 1
end-perform.
stop run.

Explain the input procedure?

936

---

What is comp?

1142

---

Explain the output procedure?

1027

---

What is sort? And its syntax?

1031

---

Explain the difference between section, paragraph and sentences?

968

---

Define redefine and its syntax?

964

---

How to detect record is locked in cobol/400?

970

---

seqence numbers in cobol

3113

---

Define perform? And its types?

979

---

Explain the types of perform?

1007

---

What is perform?

1086

---

How to update data area in cobol 400 program?

1038

---

Explain the input procedure and output procedure?

904

---

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

2475

---

Explain the syntax of redefine?

907

---