CREATE OR REPLACE FUNCTION TO_STZ (f_date DATE) RETURN DATE IS
BEGIN
RETURN f_date+(extract(TIMEZONE_HOUR from
current_timestamp)-extract(TIMEZONE_HOUR from systimestamp))/24;
END TO_STZ;