How To move a value to an array using move verb?
Answer Posted / chandrababu naidu
01 ARRAY.
02 ARRAY2 PIC 99 OCCURS 5 TIMES INDEXED BY I.
PROCEDURE DIVISION.
MOVE LOW-ELEMENT TO ARRAY2 [ I ].
or
MOVE HIGH-ELEMENT TO ARRAY.
| Is This Answer Correct ? | 1 Yes | 0 No |
Post New Answer View All Answers
what are decleratives in cobol?
What are different data types in cobol?
What is the difference between Structured COBOL Programming and Object Oriented COBOL programming?
What are the pertinent COBOL
What is the difference between PIC 9.99 and PIC9v99?
What are the different data types in cobol?
How do get the result of your program directly on your pc?
How to change size of Initial number of records to *NOMAX for ALL PF files from perticular library, how can I do that
What is the default value(s) for an initialize and what keyword allows for an override of the default?
Name the sections present in data division.
What kind of error is trapped by on size error option?
)If there are 10 steps in GDG, if I want to refer the step2 after step5 . what should I do?
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.
How to fetch 1000 error records from VSAM file(Eg: 1000000 records present) while getting SOC7 abend ?
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 ......