Interested to Buy Any Domain ? << Click Here >> for more details...
WORKING-STORAGE SECTION.
01 VAR1 COMP-2 VALUE 0.
PROCEDURE DIVISION.
MOVE 10.2115 TO VAR1.
DISPLAY 'VAR1 =' VAR1.
GOBACK.
10.2115 is stored as .10211499999999996E 02 in OS VS Cobol
10.2115 is stored as .10211500000000000E 02 in ecobol.
Any reason why?
- 3 Answers
- 9567 Views
- TCS, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / islam
Ans is : 10.2115 is stored as .10211500000000000E 02 in
ecobol.
| Is This Answer Correct ? | 3 Yes | 1 No |
Answer / jennifer victor
comp-2 is pre defined that it stores all the data values in hexadecimal format, using 8 bytes, hence its displayed in hexa format.
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / mani
comp-1 and comp-2 values can not be handled as above.
they are meant to be used for simple incrementation and i
think we can not move values like the above.
| Is This Answer Correct ? | 0 Yes | 2 No |
How to read records in reverse order in flat file? I know we can do it by reading all records into an array.... Then read records in reverse order by using subscript or index but can any body give me the exact code.
Why occurs can not be used in 01 level ?
what are the steps to sort in a cobol program?
There is a variable with value 19446. Requirement is to convert it to 194.46. I tried it by doing divide by 100 and my receiving field data type is 9(03)v99. But the output is 194. I am not getting the decimal value. Could anyone pls let me know how to get this done?
How is sign stored in a COMP field ?
how do you move only numeric data from A to B 01 A pic x(10) value 'a1b2c34d5e'. 01 B pic x(5).
) what is the difference between AID and HANDLE AID?
if i am reading a file with some 50000 records and moving to a DB2 table and suddenly the program abends in between, is there anyway i could restart from the exact record at which the job failed once the program restarts.
Can we move SPACES to numeric field and ZEROES to alphabetic field? If yes what are the way doing this?
What is amode(31)
The following entries appear in the WORKING-STORAGE SECTION: 01 DATE-TODAY. 05 YY PIC XX VALUE "90". 05 MM PIC XX VALUE "12". 05 DD PIC XX VALUE :31". 01 DATE-EDIT PIC XX/XX/XX. MOVE DATE-TODAY TO DATE-EDIT. (a) 901231 (b) 90/12/31 (c) 31/12/90 (d) 311290
I want ALL jcl ERROR cods
COBOL 
