The CURRENT_DATE function returns the current date in local time.
This example creates a table of invoices and inserts the current date into the INV_DATE column:
  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