Answer Posted / madesh

1st of all it will give an error because of pic clause with
group item in occurs.
a.if we remove pic clause from there it will take 66 bytes.
01 rec1.
02 a pic x(6) == 6
02 b redefines a. == 6
03 c occus 6 times pic 9. == 0
02 d occurs 6 times.
03 e pic x(5) ==30
03 f pic 999. ==24
------
66
b.if we remove e,f
01 rec1.
02 a pic x(6) ==6
02 b redefines a. ==6
03 c occus 6 times pic 9. ==0
02 d occurs 6 times pic 9. ==6
----
18

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

1936

---

How to change size of Initial number of records to *NOMAX for ALL PF files from perticular library, how can I do that

3197

---

if we display var1 then what will b displayed in below condition. 77 var1 pic s9(2) value -10. 77 var1 pic s9(2) value -11. " " " -12. " " " -13. -14 ... ... -19.

6486

---

What is the compute verb? How is it used?

1095

---

System Testing for Mainframe Developers What is System Testing? integration testing ? what's the procedure ..

2027

---

What is length is cobol?

1070

---

What are different data types in cobol?

1246

---

What are the different rules of SORT operation?

1097

---

Discuss about changing dataset name in proc.

1192

---

here is my requirement A1 is alphanumeric with value 'A1B2C3D4' as defined below 05 A1 PIC X(8) VALUE IS 'A1B2C3D4' but i need to have A2,A3 as ABCD & 1234 repectively...... A2 = ABCD A3 = 1234 Can you please explain me what are the different ways to do it?

7770

---

how do you reference the variable block file formats from cobol programs

1199

---

what is amode(24), amode(31), rmode(24) and rmode(any)?

1106

---

Difference between array and sub-script ?

1619

---

What is a scope terminator give example?

1070

---

) what is the difference between AID and HANDLE AID?

2110

---