is 4gl shipped with informix?

[lsantos]

Hi,

Is 4gl shipped with any informix installation or client has to request and pay separately to have/use 4gl?

At my correct assignment client uses a 3rd party package that runs on AIX/Informix/4gl. I know that the package was written in ESQL and 4GL so I am wondering if I can

If 4GL is shipped/available how can I launch it from the unix shell?

 

[vpshriyan]

Hi,

No, the development tool 4GL is NOT a bundled product with Informix Database server products. One need buy 4GL separately.

Informix provides two versions of 4GL:
1. The INFORMIX-4GL C Compiler Version, which uses a preprocessor to generate INFORMIX-ESQL/C source code. This code is preprocessed in turn to produce C source code, which is then compiled and linked as object code in an executable command file.

2. The INFORMIX-4GL Rapid Development System, which uses a compiler to produce pseudo-code (called “p-code”) in a single step. You then invoke a “runner” to execute the p-code version of your application. (This version is sometimes abbreviated as RDS.)

The informix installed directory, that is $INFORMIXDIR contains any of the files as below, then you can used it.

ls -l $INFORMIXDIR/bin/fglpc # compiler for RDS
ls -l $INFORMIXDIR/bin/fglgo # runner for RDS
ls -l $INFORMIXDIR/bin/c4gl # compiler for C compiled 4GL
ls -l $INFORMIXDIR/bin/r4gl # Programmer Interactive tool

You may use any of the above objects to do the activity according to the need and availability of these at your end.

Regards,
Shriyan

"Man who knows knows he knows nothing"

 

[vpshriyan]

Hi,

You may look at the Informix Online Documentation at:

http://www-3.ibm.com/software/data/informix/pubs/library/4gl_7.html

Regards,
Shriyan

"Man who knows knows he knows nothing!"

 

[S1P]

Thanks for the help Ed.

Does anyone out there know if this is a good function or not, as regards the best way?

FUNCTION add_month_to_date( ps_no_of_months=4 )

DEFINE
ps_no_of_months SMALLINT

DEFINE
ls_day SMALLINT,
ls_month SMALLINT,
ls_year SMALLINT,
ls_loopday SMALLINT,
ld_today DATE,
ld_tdate DATE,
lc_date CHAR(10)

INITIALIZE ls_day, ls_month, ls_year, ld_date TO NULL
LET lc_date = ""

LET ld_today = "31/10/2003"

LET l_tdate = ld_today + ps_no_of_months UNITS MONTH

IF ld_tdate IS NULL THEN
LET ls_day = DAY(ld_today)
LET ls_month = MONTH(ld_today)
LET ls_year = YEAR(ld_today)
LET ls_month = ls_month + ps_no_of_months

IF ls_month > 12 THEN
LET ls_year = ls_year + 1
LET ls_month = ls_month - 12
END IF

LET lc_date = ls_day USING "&&", "/",
ls_month USING "&&", "/",
ls_year USING "&&&&"

LET ld_tdate = lc_date
IF ld_tdate IS NULL THEN
FOR ls_loopday = 31 TO 28 STEP - 1
LET lc_date = ls_loopday USING "&&", "/",
ls_month USING "&&", "/",
ls_year USING "&&&&"
LET ld_tdate = lc_date
IF ld_tdate IS NOT NULL THEN
EXIT FOR
END IF
LET lc_date = ""
END FOR
END IF
END IF
RETURN ld_tdate
END FUNCTION

all advice/better programming ways are welcome. Thank you all