#403 Rollback functionality doesn't work

[Sebastian Steinweg]

Hi GnuCOBOL team,

we would like to ask if the implementation of Rollback is on the roadmap of GnuCOBOL.

Especially the syntac

LOCK MODE IS MANUAL WITH ROLLBACK

We got a testcase, where we found out, that this seems to be parsed but not to be supported at the moment.

Please take a look in the attached testcase while using the script tc2287.sh:

cobc -x tc2287.cbl

./tc2287

The program shows a message at the end, whether the test was passed (no second record existing) or not passed (second record was written).

Kind regards

Sebastian Steinweg
Easirun Europa GmbH

[Simon Sobisch]

This should be supported with GnuCOBOL 4.x, while it is not "stable" (in the way that an update may need a complete recompile of all modules and in the way that it is not as widely tested as 3.x) it would be good if you could run the testcase there to verify the state of this.

In any case, especially for bug-hunting (or verification) it is highly suggested to compile with -Wall --debug.
In your case the included -Wpending -Wunfinished should have raised a warning - hasn't it?

[Sebastian Steinweg]

sure, the warning

Warnung: WITH ROLLBACK is not implemented [-Wpending]

is shown.

We will check this also with version 4.x

[Sebastian Steinweg]

Hi,

could you please send me a link to download the latest version of GC 4.x.

I'm not sure, but it seems that the links in the download area are not working.

[Simon Sobisch]

https://sourceforge.net/projects/gnucobol/files/gnucobol/nightly_snapshots/ has working 4.x downloads at least since yesterday.

[Ron Norman]

COMMIT/ROLLBACK was completed February of 2021.
I just ran you test case and it passed.

sh ./tc2287.sh
GNU-rollback-commit >> ee:0002287 >> GNU:0000000000 >> passed