Answer Posted / vish

I doubt if we can code like IF ELSE ELSE....since no scope
terminatior (END-IF) has been given for the nested IF ELSE
so it should throw a compilation error. It can display the
output as (a) ONLY if the code is something like below:

01 GRP-1.
05 SUBFLD1 PIC XX VALUE "AB".
05 FILTER PIC X(6) VALUE SPACES.
01 GRP-2 REDEFINED GRP-1.
05 SUB-FLD2 PIC XX.
05 SUB-FLD3 PIC XX.
05 FILTER PIC X(4).
IF SUB-FLD1 NOT = SPACES
DISPLAY "SUBFLD1"
MOVE "ABBCCD" TO GRP-1
IF SUB-FLD3 = SPACES
DISPLAY "SPACES"
ELSE
DISPLAY "SUBFLD3"
DISPLAY "END"
END-IF
ELSE
DISPLAY "SPACES"
DISPLAY "END".

Please correct me if I am wrong.

Can we redefine the field of x(200) to less than 200?

1429

---

How to get the last record in vsam file in cluster? And how can you get the ksds file records into your cobol program?

1204

---

How do you code cobol to access a parameter that has been defined in jcl? And do you code the parm parameter on the exec line in jcl?

1249

---

What are the different rules to perform a Search?

1139

---

What the difference is between continue and next sentence?

1218

---

How do get the result of your program directly on your pc?

2394

---

What are the various section in data division and briefly explain them.

1251

---

how do you reference the printer file formats from cobol programs

1277

---

what is difference between cobol and cobol/400

23076

---

what happens if parmparameter passes zero bytes to the program

2181

---

What are the pertinent COBOL

2623

---

How do you get the data to code the BMS macro?

2016

---

What happens when we move a comp-3 field to an edited (say z (9). Zz-)?

1481

---

Write a program that uses move corresponding.

1206

---

EXPLAIN MAIN FRAME TESTING PROCESS...HOW TO FIX THE MAINFRAME BUGS?

2597

---