abases,comp.databases.oracle.misc   
   Gecko/20101027 Lightning/1.0b2 Thunderbird/3.1.6   
   ooglegroups.com>   
   comp.lang.pascal.delphi.databases:31 comp.databases.oracle.misc:2298   
   9eaa7185   
   From: Robert Klemme    
      
   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)