A função CURRENT_DATE devolve a data local atual.
Este exemplo cria uma tabela de faturas e insere a data atual na coluna DATA_FACT:
ARRAY STRING(30;aDate;0)
Begin SQL
CREATE TABLE INVOICES
(INV_DATE VARCHAR(40));
INSERT INTO INVOICES
(INV_DATE)
VALUES (CURRENT_DATE());
SELECT *
FROM INVOICES
INTO :aDate;
End SQL