Can a REDEFINES clause be used along with an OCCURS clause?
if yes,
01 WS-TABLE.

03 WS-TABLE-EL OCCURS 5 TIMES PIC X(1) VALUE 'A'.

03 WS-EX REDEFINES WS-TABLE-EL PIC X(5). What can you
expect?
if no,why?


Answer Posted / vikas sharma

Yes, We Can.
In this question, When we display WS-EX we will get the
answer 5 times A. Like this AAAAA .

Is This Answer Correct ?    0 Yes 2 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

Which Search verb is equivalent to PERFORM…VARYING?

658


how do you reference the fixed unblock file formats from cobol programs

678


Program A (Normal COBBAT) calling a B Program (DB2COBOL, COBBATDB which is using a VSAM file. its a dynamic call. How we will handle VSAM file decleration in our from JCL from where we are running A PGM. And should we have PLAN for A pGM also. if possible can some one post a sample JCL. Thanks for help in advance.

5019


Mention the guidelines to write a structured cobol program?

590


how to refer the data field?

1782






how to convert the recors form vsam file to db2 table tru file aid

2726


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

648


For rewrite, why is it mandatory that file needs to be opened?

598


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

667


How do you define a variable of comp-1 and comp-2?

671


Explain what you understand by passing by value.

661


What are INPUT PROCEDURE and OUTPUT PROCEDURE?

662


How you can read the file from bottom?

640


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?

6739


can you please let me know if there is any walkins for COBOL/PLI/DB2/IMS/JCL in pune other than IBM and ITC infotech

1921