[open-cobol-list] what happens in case of overflow?

[Alain Lucari]

Hi,

if really you should to test all what appen
perhaps you ALSO can try with "ON SIZE ERROR"
wich is standard in cobol ...

Le Thu, 26 Jan 2006 14:59:34 -0200
"Jose Vilmar Estacio de Souza" <address@hidden> a écrit:

> Hi all.
> I've the following program:
> 
> ------
>        identification division.
>        program-id. t4.
>        environment division.
>        data division.
>        working-storage section.
>        77 x pic 9(1) value 9.
>        procedure division.
>        display "x = " x
>        add 1 to x ON SIZE ERROR display "X is too less"
>        display "x after the add = " x
>        stop run.
> ------
> 
> Executing the program I receive the following result:
> $ ./t4
> x = 9
> x after the add = 9
> $
> 
> When executing the same program in my old micro focus cobol
> environment, I'm  receiving the following result:
> $ cobrun t4
> x = 9
> x after the add = 0
> $
> 
> Thanks. 
> 
> 
> 
> -------------------------------------------------------
> This SF.net email is sponsored by: Splunk Inc. Do you grep through
> log files for problems?  Stop!  Download the new AJAX search engine
> that makes searching your log files as easy as surfing the  web. 
> DOWNLOAD SPLUNK!
> http://sel.as-us.falkag.net/sel?cmd=lnk&kid=103432&bid=230486&dat=121642
> _______________________________________________
> open-cobol-list mailing list
> address@hidden
> https://lists.sourceforge.net/lists/listinfo/open-cobol-list
> 

Best regards,
-- 
Alain Lucari (Eurlix)


-- 
Alain Lucari (Eurlix)