Tom Lake

I'm using precompiled GnuCOBOL 3.2 64-bit on Windows 11. I can compile a program from OpenCOBOL IDE and it runs fine from a Command prompt. When I try to run it from the OpenCOBOL IDE Run command, though, it opens a new copy of OpenCOBOL IDE and tries to edit the .exe file in that instead of opening a terminal and executing the file. I used to be able to run programs but I don't know what changed. I have the Run in external terminal box checked since I use a lot of SCREEN commands. What could be...

Sure make fun of Rene Descartes. No one even remembers the great philosopher Emile DeHors. These days everyone puts Descartes before DeHors.

I got a message that said: Exception In Executable Input-Output This message was originally conceived by Old MacDonald on his farm.

Everyone has heard of René Descartes but few people have heard of Emile DesHors. It's not surprising because philosophers usually put Descartes before DesHors.

René Descartes walks into a bar and has a few drinks, then has a few more. He realizes he's been drinking too much when the bartender asks, "Have another?" Descartes answers, "I think not." and, POOF! He vanishes.

Tired of the same old meals? Here's a tasty recipe for a unique dish that came from my ancestors in southern Italy (Africa) Zuppa di Elefanti (Elephant Soup) Ingredients: 1 Elephant 475 gallons (1798 Liters) of water salt and pepper 2 rabbits (optional) To make: Cut up elephant into bite-sized pieces. This will take about three months, so plan ahead. Put the elephant pieces into the water and add salt and pepper to taste. Boil over a kerosene fire at 470 degrees for about 8 days. This will feed about...

I used the example from the page you suggested. The error occurs on line 4, EXEC SQL. The compiler says SQL is reserved but not implemented. I can't compile GnuCOBOL myself. I can only run pre-compiled binaries. MOVE 0 TO hVar3 PERFORM UNTIL hVar3 > 2 COMPUTE hVar3 = hVar3 + 1 EXEC SQL <=============Error here SELECT TestCol1, TestCol2 INTO :hVar1, :hVar2 FROM TestTab WHERE TestCol1=:hVar3 END-EXEC IF SQLCODE NOT < 0 AND NOT = 100 DISPLAY 'SELECTED in LOOP iteration ' hVar3 DISPLAY ' hVar1 ' hVar1...

I used the example from the page you suggested. The error occurs on line 4, EXEC SQL. The compiler says SQL is reserved but not implemented. MOVE 0 TO hVar3 PERFORM UNTIL hVar3 > 2 COMPUTE hVar3 = hVar3 + 1 EXEC SQL <=============Error here SELECT TestCol1, TestCol2 INTO :hVar1, :hVar2 FROM TestTab WHERE TestCol1=:hVar3 END-EXEC IF SQLCODE NOT < 0 AND NOT = 100 DISPLAY 'SELECTED in LOOP iteration ' hVar3 DISPLAY ' hVar1 ' hVar1 ' hVar2 ' hVar2 END-IF END-PERFORM.