Re: R4GL V C4GL

>From: Paul@ecles.demon.co.uk (Paul Eccleston) >Subject: R4GL V C4GL >Date: Wed, 24 Aug 1994 21:03:01 +0000 >X-Informix-List-Id: <news.8359> > >I've just purchased the RDS to go along with the compiled version of >Informix which I've been using for around 3 yours (they are both version 4). >I've come across some problems which I hope someone may be able to help >me with. > > 1. Some of our programs use a database stored in "/u/cham/bespoke/misc/data" > So to access this database, at the top of each program we have > database "/u/cham/bespoke/misc/data" > This works fine for C4GL, in R4GL it compiles, but when we run it > we get a 'syntax error at line 0' error. Now I know this can be > resolved by just using database data, and setting the DBPATH var, > but that's not the point! > > 2. One program uses the thru command to pass specific fields in a record > to a report section. The program again compiles and runs ok under > C4GL, but in R4GL I get a compile error saying 'this report has already > been called with a different number of parameters'. > >I would be grateful if anybody can help, I may just be unlucky but >everything I've tried to do in R4GL so far has failed miserably, >have I made a mistake in buying it, mmmmmm.... Paul, I just put together this test program which I think tests the things you complain about. Running on Solaris 2.3 with 4.12.UC1 SE and 4.12.UE1 I4GL-RDS, everything works without a problem. You don't supply either platform or software version information, so I can't say whether you have run foul of problems since fixed or not. There have been many bugs fixed at various times which might affect this. I don't think you made a mistake buying RDS -- I use it as the development tool of first choice for all my 4GL development work. But I admit that I can hardly claim to be unbiassed. Yours, Jonathan Leffler (johnl@informix.com) #include <disclaimer.h> DATABASE "/work/tmp/widget/pumpkin/dbase/somedb" MAIN DEFINE r1 RECORD LIKE Systables.* SELECT * INTO r1.* FROM Systables WHERE Tabid = 1 START REPORT r2 OUTPUT TO REPORT r2 (r1.tabname, r1.owner, r1.dirpath, r1.tabid) OUTPUT TO REPORT r2 (r1.tabname THRU r1.tabid) FINISH REPORT r2 END MAIN REPORT r2(tabname, owner, dirpath, tabid) DEFINE tabname LIKE systables.tabname, owner LIKE systables.owner, dirpath LIKE systables.dirpath, tabid LIKE systables.tabid FORMAT EVERY ROW END REPORT