Mr RAO, ayuda, Store Procedure no funciona..

Mr RAO, ayuda, Store Procedure no funciona..

Postby Willi Quintana » Wed Nov 27, 2024 9:54 pm

Mr. RAO buenas tardes.
tengo este procedimiento que funcio9na correctamente cuando lo ejecuto or medio del ::Execute(cDat), pero si lo hago como un STORE PROCEDURE no funciona...
...
cDat := "SET @nT1 = 0; "
cDat += "SET @nT2 = 0; "
cDat += "SET @nT3 = 0; "
cDat += "UPDATE kardex SET saldo = ( @nT1 + ingreso - egreso), s1 = ( @nT1 := saldo ), ingreso_val = (ingreso * costo ), saldo_val = ( @nT2 + ingreso_val - egreso_val), s2 = (@nT2 := saldo_val ), kardex.num_movimiento = (@nT3 := @nT3 + 1), s1 = IF(s1 <= 0, 1, s1), precio_promedio = IF(s2 / s1 >= 0, s2 / s1,0), costo = IF(egreso > 0, If(precio_promedio > 0, precio_promedio, 0), costo) "
cDat += "WHERE estado = '' AND cod_producto = '" + cCodigo + "'"

::Execute( cDat ) // funciona correctamente..

cuando lo pongo como un STOTE PROCEDURE no funciona,,,

Gracias
User avatar
Willi Quintana
 
Posts: 1022
Joined: Sun Oct 09, 2005 10:41 pm
Location: Cusco - Perú

Re: Mr RAO, ayuda, Store Procedure no funciona..

Postby JoseAlvarez » Wed Nov 27, 2024 10:45 pm

WHERE estado = ¿?

Y al final no tienes una comilla doble sobrando?
"Los errores en programación, siempre están entre la silla y el teclado..."

Fwh 19.06 32 bits + Harbour 3.2 + Borland 7.4 + MariaDB + TDolphin

Carora, Estado Lara, Venezuela.
User avatar
JoseAlvarez
 
Posts: 805
Joined: Sun Nov 09, 2014 5:01 pm

Re: Mr RAO, ayuda, Store Procedure no funciona..

Postby Willi Quintana » Thu Nov 28, 2024 10:27 am

MI estimado,,,
- WHERE estado = '' ----> son dos comillas simples ' ' ( lo escribo separado para que se note)
- al final > + " ' " -> dentro de comillas hay una comilla simple
User avatar
Willi Quintana
 
Posts: 1022
Joined: Sun Oct 09, 2005 10:41 pm
Location: Cusco - Perú

Re: Mr RAO, ayuda, Store Procedure no funciona..

Postby cmsoft » Thu Nov 28, 2024 11:45 am

Hola Willy, como llamas a los Store?
Yo lo hago así y funciona:
Code: Select all  Expand view  RUN

oServer:Execute("CALL Carga_Familiares("+ClipValue2Sql(base:legajo)+")")
 

Uso Dolphin pero intuyo que debe ser igual en la librería nativa
User avatar
cmsoft
 
Posts: 1293
Joined: Wed Nov 16, 2005 9:14 pm
Location: Mercedes - Bs As. Argentina


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 93 guests