Re: small value problem

Szymon wrote:
Hi,
I keep on trying to compile this part of a program:


000121 WORKING-STORAGE SECTION.
000122 01 NUMBER_1 PIC 9(2) VALUE 23.06.
000123 01 NUMBER_2 PIC 9(2) VALUE 543.07.



and still get the same error about the second and third line:

NUMERIC LITERAL OF VALUE CLAUSE IS SPECIFIED FOR VALUE WHICH IS
TRUNCATED TO EXCEPT ZERO. FIGURATIVE CONSTANT 'ZERO' ASSUMED SPECIFIED.

You have defined them as two digit integers, and then given a fractional value in one case, and a three digit fractional value in the second.

Donald
.

Relevant Pages

  • Re: small value problem
    ... Szymon wrote: ... I keep on trying to compile this part of a program: ... 000121 WORKING-STORAGE SECTION. ... FIGURATIVE CONSTANT 'ZERO' ASSUMED ...
    (comp.lang.cobol)
  • small value problem
    ... I keep on trying to compile this part of a program: ... 000121 WORKING-STORAGE SECTION. ... FIGURATIVE CONSTANT 'ZERO' ASSUMED SPECIFIED. ...
    (comp.lang.cobol)
  • Re: D3/Linux compile question
    ... 02 equ a to x ... Variable has not been assigned a value; zero used. ... Based on the actual compile I'm not sure. ... base frame not 1 past the base frame. ...
    (comp.databases.pick)
  • Re: Two problems
    ... uninitialised variables that I really should be clearing to zero ... I don't need a statement clearing the variable ... In one case they are set to zero or some other ... enabled and turn on all of the compile time warnings you can. ...
    (comp.lang.fortran)
  • Re: Two problems
    ... uninitialised variables that I really should be clearing to zero ... I don't need a statement clearing the variable ... In one case they are set to zero or some other ... enabled and turn on all of the compile time warnings you can. ...
    (comp.lang.fortran)