Jason:
No, unfortunately Informix 4GL is too brain dead for that. Your definition of variable1 when assigned a value must be assigned in the main or some other function.
If you didn't know, in Informix Rapid Development system, RDS, variable is automatically assigned to 0 where in the compiled 4GL it's undefined.
Regards,
Ed