Everybody:

Since Informix 4GL is going the way of Cobol, I decided to post a function FAQ.  No sense reinventing the wheel.  Here's a synopsis:

{
Miscellaneous Informix 4GL functions

abs(val)       # returns the absolute value of a integer
abs_dec10()    # returns the absolute value of a decimal
parse_str()    # parses string by character delimiter
rt_just()      # right justify a string
ret_day()      # takes a date and returns a three character day
replace()      # replace in string occurrences of old pattern with new pattern
is_online()    # returns true if the database is online else false
row_locked()   # tests the sqlca.sqlerrd[2] variable to check if record locked
squeeze()      # squeezes out all the spaces in a string
squ_any_char() # squeezes out a particlar character from a string

Datetime functions:
date_to_str()
return_min()
return_hr()
date_to_int()
secs_to_int()
int_to_date()
dtaddhrs()
yr_of_date()
ck_time()
ck_diget()
}