Re: [open-cobol-list] possibly bug: accept into numeric field

[Keisuke Nishida]

At Mon, 10 Nov 2003 18:24:37 +0100,
Thomas Biehler wrote:
> 
> The intuitive behaviour:  (conform to ... ?!)
> ==============================
> From the user sight it looks like a 
> numeric MOVE from a shorter Field to a longer Field !!!!
> (Right alignment , Fillup with Zero's)   
> But only one request to the User is made
> (ACCEPT from  Terminal / SYSIN / Console ...)
>   = only one Transfer of Data !?

What results do you suppose to obtain (or do you get
from other compilers) by the following ACCEPT?

  Data item          Input
  ---------          -----
  01 X-1 PIC 99.     "123"
  01 X-2 PIC 99V9.   "1"
  01 X-3 PIC 99V9.   "123.4"

Maybe "23", "010", and "234"?  But it seems the standard
requires X-1 to be "12". (At leat the NIST Test Suite has
a test for this.)  Gee.

> I hope, it is now clear why i can not say 
> what I expect, only in a simple sentence.
> I don't now what i should request from you.
> (I have some ideas but i would like to see your answer first)
> In general, i like compiler that follows standards !
> (And i like good standards too :-) )

I'd like to implement a compiler that follows standards
by default, while I'd like to make it compatible with
other COBOL compilers by giving appropriate options.

Keisuke