Interested to Buy Any Domain ? << Click Here >> for more details...
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
- 7 Answers
- 10250 Views
- TCS, I also Faced
- E-Mail Answers
Answer Posted / guest
I hope SUBFLD1 is erroneously written as SUB-FLD1
| Is This Answer Correct ? | 0 Yes | 0 No |
Post New Answer View All Answers
What are the different rules for performing sort operation?
How to change size of Initial number of records to *NOMAX for ALL PF files from perticular library, how can I do that
can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there
input 1 input2 ouput1 output2 output 3 1 re 300 1 re 200 1 re 300 3 rc 500 1 re 200 2 rr 400 1 re 300 2 rr 400 1 rc 400 3 rc 500 1 rc 400 2 rr 700 2 rr 700 5 tt 900 5 tt 900 2 inputs r in flat file and output 1 is matched records,ouptput2 is unmatched of input1,output3 is unmatched of input2! how vl u get the output files using sequential order and to check with each and every records! let me know the procedure division ?
If you are current on the owner of a set, what is the difference between obtain next and obtain first?
How to get the last record in vsam file in cluster? And how can you get the ksds file records into your cobol program?
Can you please let me know the centre name of INS certification in Kolkata.
What is the difference between comp and comp-3?
what is difference bt COND, REGION & TIME parameters at JOB & EXEC. give an exp.
)If there are 10 steps in GDG, if I want to refer the step2 after step5 . what should I do?
Why would you use find and get rather than to obtain?
i need a small 3d program using inline and outline.
How to traceback if I am getting SOC7 or SOC4 abend? List down the steps
What is an in line perform? When would you use it? Anything else you wish to say about it.
How did the release of cobol/370 version 1.3 improve the performance of release 1.1?
