01 xxx pic 9(4).
01 yyy pic 9(6).
move 123456 into yyy.
move yyy to xxx.
display yyy.
what would be the value of yyy
Answer Posted / siba
In numeric number alingment is right to left
truncation is done in left side
the datatype size of y is 6
so value of y is 123456
| Is This Answer Correct ? | 14 Yes | 2 No |
Post New Answer View All Answers
what is the difference between COBOL2 AND COBOL390?
What is the default value(s) for an initialize and what keyword allows for an override of the default?
What kind of error is trapped by on size error option?
What is the difference between goback, stop run and exit program in cobol?
How can i load all the data from a file to Table (array) in cobol.How i manage the occurs clause with out reading the file.Any options avilable ? Please can any one help me it is urgent?
) How do u handle errors in BMS macro?
What are literals?
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 Purpose of Pointer in the string?
Is it possible that the redefines clause has different picture clauses compared to the one it redefined?
Why occurs cannot be used in 01 level in COBOL?
what happens if parmparameter passes zero bytes to the program
What is amode(24), amode(31), rmode(24) and rmode(any) (applicable to only mvsesa enterprise server) ?
)If there are 10 steps in GDG, if I want to refer the step2 after step5 . what should I do?
How many sections are there in data division in COBOL?