Interested to Buy Any Domain ? << Click Here >> for more details...
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......
- 8 Answers
- 12165 Views
- I also Faced
- E-Mail Answers
Answer Posted / amarnath reddy
Hi Vinod,
If we move to only numeric values but alphanumeric data
item into numeric data item, We not possible to get any
abend. If we move to alphabetic values (abcd) to numeric
data item we can get the abend soc7.
| Is This Answer Correct ? | 1 Yes | 0 No |
Post New Answer View All Answers
How to fetch 1000 error records from VSAM file(Eg: 1000000 records present) while getting SOC7 abend ?
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 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 ......
I have File 1 occurs 5 times with Employee-ID,Employee-Name,Employee-Dept (EEE and MECH). I have File 2 occurs 10 times with Employee-ID,Employee-Name,Employee-Dept (EEE,CIVIL,CHEMICAL and MECH). In FIle 1 and FIle 2 , for matching Employee-DEPT (Only MECH) , we need to move entire records from file1 to file 2. We should not use 2D array. Your help is needed here.
How do you reference the following file formats from cobol programs?
What is perform what is varying?
what is search and searchall?what is the diffrence between them?give an best example?
Write a program to explain size error.
What is the difference between perform … with test after and perform … with test before?
1.give the details about WHEN OTHER. 2. how many form are available in evaluate.
Write down the divisions of cobol program?
Can we redefine the field of x(200) to less than 200?
What is the use of intialize verb?
how we sort two input files based on a common column and giving one o/p file please send me the coding logic?
What is an in line perform? When would you use it? Anything else you wish to say about it.
