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 / praveen
REC2 will just contain 12312459 , the code was tested
| Is This Answer Correct ? | 2 Yes | 1 No |
Post New Answer View All Answers
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?
What is amode(31)
What is the difference between comp and comp-3?
How you can characterize tables in cobol?
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.
Difference between array and sub-script ?
How to use the same COBOL program in Batch and CICS on lines? explain with an example
how to convert the recors form vsam file to db2 table tru file aid
Are you comfortable in cobol or jcl?
What is the difference between PIC 9.99 and PIC9v99?
Explain about different table spaces.
State the various causes of s0c1, s0c5 and s0c7.
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
Write some characteristics of cobol as means of business language.
A table has two indexes defined. Which one will be used by the SEARCH?