SYSDATE in Sql vba Recordset error

[shaggers421]

hi all...first post...I am having difficulty creating a recordset
using sysdate. I am trying to gather data only from 'today' using a
macro. However, when I run my sql, I continue getting a error. When I
just enter a specific date into the code it works fine. Code
below...if anyone could help. Thanks

SQL = " SELECT "
SQL = SQL & "
SECURITY_TRANSACTION.SETTLEMENT_TRANSACTION_DATE,"
SQL = SQL & " trunc(SECURITY_TRANSACTION.TRADE_PLACED_TIME) ,"
SQL = SQL & " XXX_BROKER_1.ORGANIZATION_NAME Clear,"
SQL = SQL & " SECURITY_MASTER.COUNTRY_VALUATION_CODE,"
SQL = SQL & " SECURITY_MASTER.CURRENCY_ISSUE_CODE,"
SQL = SQL & " SECURITY_TRANSACTION.FORWARD_RATE_AMT"
SQL = SQL & " FROM"
SQL = SQL & " SR_BASKET BASKET,"
SQL = SQL & " SR_CUSTODIAN CUSTODIAN,"
SQL = SQL & " SR_SECURITY_MASTER SECURITY_MASTER,"
SQL = SQL & " SR_SECURITY_TRANSACTION SECURITY_TRANSACTION,"
SQL = SQL & " WHERE"
SQL = SQL & " AND SECURITY_MASTER.TYPE_SECURITY_CODE='CFWD'"
SQL = SQL & " AND TRUNC(SECURITY_TRANSACTION.CREATION_DATE) >=
TRUNC(SYSDATE)"
SQL = SQL & " AND
SECURITY_TRANSACTION.TYPE_CORPORATE_ACTION_CODE Is Null"
SQL = SQL & " AND SECURITY_TRANSACTION.TRADE_STATUS_CODE<>'C'"
SQL = SQL & " AND TICKET.VERSION_CURRENT_FLAG='Y'"
SQL = SQL & " ORDER BY
SECURITY_TRANSACTION.SETTLEMENT_TRANSACTION_DATE"

Set rs_entry = db.OpenRecordset(SQL, dbOpenSnapshot,
dbSQLPassThrough)