01rec1.
05 a pic 999v99 value 123.12
05 b pic 99v9 value 45.9

02 rec2.
05 x pic 999v99
05 y pic 99v99
05 z pic x(3) value 'abc'

if rec1 is moved to rec2 then what is the value of rec2?

Answer Posted / kingmanish

Valur of REC2 would be

12312459abc

Is This Answer Correct ?    1 Yes 3 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

I have File 1 occurs 5 times with Employee-ID,Employee-Name,Employee-Dept (EEE and MECH). I have File 2 occurs 10 times with Employee-ID,Employee-Name,Employee-Dept (EEE,CIVIL,CHEMICAL and MECH). In FIle 1 and FIle 2 , for matching Employee-DEPT (Only MECH) , we need to move entire records from file1 to file 2. We should not use 2D array. Your help is needed here.

1115


can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there

1906


How to read the 2nd last record of a VSAM file? (The file size is huge and we don't know the key)

2723


How to remove 2 duplicate records and copy only one using job control language?

753


How to use the same COBOL program in Batch and CICS on lines? explain with an example

1914






Why would you use find and get rather than to obtain?

683


What is the difference between a binary search and a sequential search what are the pertinent cobol?

735


Why do we code s9 (4) comp. Inspite of knowing comp-3 will occupy less space?

718


How do you differentiate between cobol and cobol-ii?

656


What the difference is between continue and next sentence?

659


How can you get the ksds file records into your cobol program?

642


Write the code implementing the perform … varying.

646


A table has two indexes defined. Which one will be used by the SEARCH?

757


What rules are followed by the search verb.

638


Explain how you can characterize tables in cobol?

638