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 / mahesh satya

123124590abc

Is This Answer Correct ?    1 Yes 1 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

What is a report item?

741


1.Is it possible to move the data from 99.99 to 99v99? 2.What is the CICS-vsam Compilation process? 3.In My GDG 5 generation will be there GDG3 got an abend what will happen? 4.In my GDG first generation is +1 And I want to add the new generation what will happen previous generation? 5.How can you give the PIC clause below conditions A). s9 (reddy), B). s9 (5) occurs 5 times? 6.How override the proc from a particular step? and what is symbolic and override Procs?

5375


How do you code cobol to access a parameter that has been defined in jcl? And do you code the parm parameter on the exec line in jcl?

700


What are all the divisions of a COBOL program?

663


What are the pertinent COBOL commands?

2623






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

1902


what happens if parmparameter passes zero bytes to the program

1665


Mention the guidelines to write a structured cobol program?

620


Differentiate between structured cobol programming and object-oriented cobol programming.

667


Discuss about changing dataset name in proc.

759


2 input fles: 2 flat files, with different number of records. both are having unique key for each record and already sorted in ascending order . match these files using unique key and in output only matching key value has to be written. please procide cobol logic

2111


Define static linking and dynamic linking.

662


i want a program using by if, evaluate , string, unstring, perform, occurs?

4057


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

996


) How do u handle errors in BMS macro?

1427