Hi All,
Can anyone tell me how we can MOVE value of a X(19)
variable to a S9(17) COMP-3 variable?
Answer with an Example will be of great help.
- 6 Answers
- 24973 Views
- EDS, I also Faced
- E-Mail Answers
Answer Posted / ram.g
Vamsi, u r wrong, you have to read the 2nd answer again...
we can't perform any numeric operations on arithmetic field
thats right for overcome that scenario only we are using
the method called redefine. when you redefine its pointing
to the same loacation only but just telling the MVS
consider the new picture clause for the new variable..one
thing is sure here which is nothing but truncation when you
try to move x(...) to comp-3 but we can perform arithmetic
operations for sure..you can try it out....
| Is This Answer Correct ? | 2 Yes | 3 No |
Post New Answer View All Answers
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
Why would you use find and get rather than to obtain?
What is the Purpose of POINTER Phrase in STRING command in COBOL?
Is it possible that the redefines clause has different picture clauses compared to the one it redefined?
i need a small 3d program using inline and outline.
1.give the details about WHEN OTHER. 2. how many form are available in evaluate.
Explain how you can characterize tables in cobol?
how can i see junk values in dclgen or in hostvariable of comp ?
System Testing for Mainframe Developers What is System Testing? integration testing ? what's the procedure ..
What is the compute verb? How is it used?
can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there
Define cobol?
There are 5 fields and 1000 records in a file. Unload it into an array. Write the syntax for declaration and how will you unload it.
How to change size of Initial number of records to *NOMAX for ALL PF files from perticular library, how can I do that
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?
