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 / 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 do we get current date from system with century in COBOL?
How to remove 2 duplicate records and copy only one using job control language?
how to access the file from prodution from changeman tool and to submit a file to production
Which division and paragraphs are mandatory for a COBOL program?
What are different data types in cobol?
What is amode(24)?
System Testing for Mainframe Developers What is System Testing? integration testing ? what's the procedure ..
Explain how will you differentiate between an internal and an external sort, the pros and cons, internal sort syntax etc
how to move the records from file to array table. give with code example
how can i see junk values in dclgen or in hostvariable of comp ?
How to change size of Initial number of records to *NOMAX for ALL PF files from perticular library, how can I do that
please..could u give an example about USAGE IS POINTER ..and explain why and when we use it ?
How to fetch 1000 error records from VSAM file(Eg: 1000000 records present) while getting SOC7 abend ?
I have one ps file in which there are 3 fileds emp_no,emp_name and leave_app.this ps file information give the detail of employee which is going to apply for leave.suppose emp_no=113430,emp_name=ajay,leave_app=1 that means he is going to apply for 1 day leave.and accordingling the table in db2 will be updated means if he has that no of leave in his account then he will get dat leave and updated acc. in table(leave_balance=previous leave present in table-leave_app).Now i want to check whther the updated result is correct or not by comparing the two ps file using IEBCOMPARE or icetool so what is going to be the two ps file and how its is going to be compare.
What is the default value(s) for an initialize? What keyword will allow for an override of the default?