77 a pic x(4) value '1234' -----> instead of this 'abcd'
77 b pic 9(4) value zeros.
move a to b
what is the answers for both cases?
IS it possible? Give me elementary move rules briefly......
Answer Posted / subra kondaveeti
Hello All, Move a alpha numeric field to Numeric fields doesn't necessarily gives a soc7 because it depends upon the what the alpha-numeric field contains.
for example value of 'ABCD' in teh alpha-numeric field ALSO MOVES 1234 to numeric field. if you look at the assembly instruction produced for the move statement is
moven which means ignore the zone portion of each byte and move the numeric value of the byte. but it can give soc7 if you move '----' to numeric field because it tries to move x'CACACACA' to numeric field. if you look at the numeric portion of every byte is 'A' and hence can't be moved
| Is This Answer Correct ? | 3 Yes | 0 No |
Post New Answer View All Answers
What is the problem of ordered sequential files access?
What is the difference between PIC 9.99 and PIC9v99?
In COBOL programming, what is PERFORM? What is VARYING?
What are different data types in cobol?
EXPLAIN MAIN FRAME TESTING PROCESS...HOW TO FIX THE MAINFRAME BUGS?
I have program P1 which calls file F1 which has 100 records and following structure 001 .................. 002 .................. 003 .................. 098 .................... 099 ................... 100 .................... Now I want to read these files and write these records in file F2 in following manner. 001 ...... 051 ..... 002 ...... 052 ..... 003 ...... 053 ..... .......... ....... .......... ....... .......... ....... 048 ........ 098 ...... 049 .......... 099 ....... 050 .... 100 ......
Which Search verb is equivalent to PERFORM…VARYING?
How do u write test cases?
i was faced one question- i have value -00001234.56 Suppress the zeroes and the output should be -1234.56 But Not - 1234.56 spaces should not be available after suppressing the zeroes. logic in jcl and cobol?
What is difference between static and dynamic call in cobol?
What is the difference between a binary search and a sequential search what are the pertinent cobol?
What are the different data types in cobol?
What is comp-1 and comp-2?
How to get the last record in vsam file in cluster? And how can you get the ksds file records into cobol program?
how to access the file from prodution from changeman tool and to submit a file to production