nformix Pegar data de Hoje

-- CARREGAR O DIA DE HOJE
BEGIN
SELECT GO_DATE(TODAY)HOJE
INTO X_HOJE
FROM GLB_DUAL;
END;