[NOCaut]

Подскажите как правильно передать параметри в компонент TSQLQUERY
c пакета dbExpress

os: windows
programm: XE2
BD: oracle,db2

SQL.Text := 'SQL.Text := 'DECLARE P_XML CLOB; P_PARAM CLOB;'+'begin '+
AddClob('P_XML', AXMLPacket)+AddClob('P_PARAM', AParams)+
'INSERT INTO TBL_TXN (ORG_ID, TXN_TYPE_ID, DATA_RECEIVED, '+
'DATE_STARTED, SRC_ID, HOST, PARAMS) VALUES ('+
IntToStr(AOrgID)+','+IntToStr(l_TransCode)+
','+'P_XML,'+'timestamp'+
QuotedStr(DateTimeToStr(Now, p_FormatSettings2))+','+
QuotedStr(ATransID)+','+QuotedStr(AHost)+',P_PARAM ) '+
'RETURNING TXN_ID INTO :P' +
'end;'';
Prepared := True;
Params[0].Name := 'P';
Params[0].AsInteger := 100;
Params[0].ParamType := ptOutput;
Params[0].DataType := ftInteger;
ExecSQL; // TDBXError with message 'ORA-01036: illegal variable name/number'.