Text 426, 58 rader
Skriven 2010-12-09 21:22:06 av Robert Klemme
Ärende: Re: Call Oracle procedure with variables (D5)
=====================================================
comp.lang.pascal.borland,comp.lang.pascal.delphi.databases,comp.databases.oracle.misc

Gecko/20101027 Lightning/1.0b2 Thunderbird/3.1.6
<22396c80-754c-4fb7-b6d7-e7d87ea87a42@c13g2000prc.googlegroups.com>
comp.lang.pascal.delphi.databases:31 comp.databases.oracle.misc:2298
9eaa7185
From: Robert Klemme <shortcutter@googlemail.com>

On 12/09/2010 11:21 AM, jodleren wrote:
> Hi all
>
> I have tried this, but it fails. I need to call a procedure (it works
> we do it all the time) with parameters.
> The Oracle code works in an SQL editor, now we need to have it in
> Delphi.
> This does not work. Any suggestions?
>
> Sonnich
>
>      ora := TQuery.Create(nil);
>      ora.DatabaseName := OraSession1.DatabaseName;
> ora.SQL.Text := '';
> ora.SQL.Add('declare');
> ora.SQL.Add(' inv wise.Vararasto_pack.vctable;');
> ora.SQL.Add(' jnumero wise.Vararasto_pack.intTable;');
> ora.SQL.Add(' qty wise.Vararasto_pack.floatTable; ');
> ora.SQL.Add('begin        ');
> ora.SQL.Add(' inv(1) := ''inv'';             ');
> ora.SQL.Add(' jnumero(1) := 123546;         ');
> ora.SQL.Add(' qty(1) := -2;          ');
> ora.SQL.Add(' begin wise.VarastopaikkaSiirrot(inv,jnumero,qty,''I'');
> end;');
> ora.SQL.Add('end; ');
>
> Field '=' is of unknown type
>
> So I tried:
>
> Using a   ora2 := TStoredProc.Create(nil);
>    ora2.DatabaseName := OraSession1.DatabaseName;
>
> I get : General SQL Error: Syntax Error or access violation
>
> Better, but how do I do this?

I dunno Delphy but are you sure you can use Add to add text to a single 
SQL statement?  Maybe it's the batch interface and the driver thinks 
he's seeing a whole bunch of malformed statements.  For the block to 
work it must be seen as a single SQL statement by Oracle.

Cheers

	robert

F'Up to comp.lang.pascal.delphi.databases

--- Internet Rex 2.31
 * Origin: The gateway at Omicron Theta (1:261/20.999)