What is the output generated by the following code?
01 GRP-I.
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"
ELSE
DISPLAY "SPACES"
DISPLAY "END".
(a) SUBFLD1
SUBFLD3
END
(b) SPACES
END
(c) SUBFLD1
END
(d) SUBFLD1
SPACES

Answers were Sorted based on User's Feedback



What is the output generated by the following code? 01 GRP-I. 05 SUBFLD1 PIC XX VALUE "A..

Answer / guest

a

Is This Answer Correct ?    5 Yes 0 No

What is the output generated by the following code? 01 GRP-I. 05 SUBFLD1 PIC XX VALUE "A..

Answer / 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.

Is This Answer Correct ?    5 Yes 1 No

What is the output generated by the following code? 01 GRP-I. 05 SUBFLD1 PIC XX VALUE "A..

Answer / ajith

(a)

Is This Answer Correct ?    2 Yes 0 No

What is the output generated by the following code? 01 GRP-I. 05 SUBFLD1 PIC XX VALUE "A..

Answer / vish

Uttam, I guess you missed to see the REDEFINES part of the
code given. It's moving 'ABBCCD' to GRP-1 and since GRP-2
REDEFINES GRP-1, the variables in GRP-2 also will be
populated and then naturally SUB-FLD3 is not SPACES and
contain 'BC'. So the correct answer is (a).

I request - please don't be in hurry to answer the
questions. A lot many people build their concepts based on
the questions & queswers provided in such groups.

Is This Answer Correct ?    2 Yes 0 No

What is the output generated by the following code? 01 GRP-I. 05 SUBFLD1 PIC XX VALUE "A..

Answer / guest

I hope SUBFLD1 is erroneously written as SUB-FLD1

Is This Answer Correct ?    0 Yes 0 No

What is the output generated by the following code? 01 GRP-I. 05 SUBFLD1 PIC XX VALUE "A..

Answer / muttaiah

I guess we will get Maxcc - 8 when we compile. Because
SUB-FLD1 is not declared anywhere here. If the field has to
be SUBFLD1 by typo mistake.
Then answer would be (a).

Is This Answer Correct ?    0 Yes 0 No

What is the output generated by the following code? 01 GRP-I. 05 SUBFLD1 PIC XX VALUE "A..

Answer / uttam das

my answer is (d)

SUB-FLD3 = SPACES, it satisfies bcz in grp-2

there is no initialization of sub-fld3.
when sub-fld3 is not initialize, it always contains spaces.
alphanumeric stored spaces and numeric stored zeros

Is This Answer Correct ?    0 Yes 5 No

Post New Answer

More COBOL Interview Questions

COMP-3 field occupy ?

8 Answers  


If there are two copybooks which have same variables and we are using both the copybooks in our program. will there be an error and if i move values to the variable which copybook varibales gets the values i move in.

3 Answers   CTS,


i have 10 names in an array and my name is one of them also array is not in sorted order i need to display my name using index how will i do this

0 Answers  


how do u indetify files succesfully executed or not ?

4 Answers   TCS,


What are INPUT PROCEDURE and OUTPUT PROCEDURE?

0 Answers  






Difference between array and sub-script ?

0 Answers   HCL,


why we are using picture clause in the cobol programs?

2 Answers  


Explain the difference between an internal and an external sort, the pros and cons, internal sort syntax etc.

3 Answers  


a. Can the OPTIONAL clause in COBOL only be coded for input files? b. If it is coded for files opened in OUTPUT, I-O or EXTEND mode, will it give a compilation error? c. If there are no compilation errors and if such files are not coded in the JCL, will the OPEN statement run fine when these files are opened? d. How will a WRITE statement work for the above files?

2 Answers  


created cluster using IDCAMS ..that is empty ..when i write a program for read using Input ..wil it open the cluster or gives any error?

2 Answers   HCL,


) How do you access the migrate the data from production region to development region

1 Answers   IBM,


IF there 5 to 6 files in a JCL and there is some space abends, how can we identify which file has space abend and what can be done to get off that abend or rectify that abend.

2 Answers   ADNA, CSC,


Categories