01 var1 pic x(10)
01 var2 redefines var1 pic 9(10).
then in procedure division
move 'abcde' to var1 then waht is the value of var1 and var2
Answer Posted / soumya santosini patnaik
soc7 abend occurs because according to move rules
alphaneumericfields can be moved to numeric fields only
when alphanumeric field consists of numeric data only.
| Is This Answer Correct ? | 0 Yes | 5 No |
Post New Answer View All Answers
I have a program with an Array of 5000 occurences which is being passed from 5 sub levels to the front end screen. Thess 5 programs using each 5*2 = 10 different arrays with size as 5000. This is causing the transaction to utilize more storage consupmtion. I am looking to reduce the storage consumption. As part of that initially i thought Dynamic array may solve my problem. After viewing the comments given i see its same as normal array. IS there any other way we can resolve this issue?
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
How to find out the closest prime number of an input number? I believe it has something to do with SEARCH and COBOL Linear Array.
Can we change the password using ALTER? anyone tried and changed?
explain sorting techniques in cobol program?
What are the cobol coding sheets?
If you are current on the owner of a set, what is the difference between an obtain next and obtain first? Actually in which topic will we use dis???Plz explain it clearly
EXPLAIN MAIN FRAME TESTING PROCESS...HOW TO FIX THE MAINFRAME BUGS?
How to use the same COBOL program in Batch and CICS on lines? explain with an example
i want a program using by if, evaluate , string, unstring, perform, occurs?
How many bytes S(8) comp field occupy and its maximum value?
What the difference is between continue and next sentence?
How you can read the file from bottom?
) How do u handle errors in BMS macro
example for sub strings ? and refernce modifications whit output pls