saludos club delphi
Realize un store procedure que me devuleve tres valores para pasarselo a mi detalle de pedido, lo que quiero manejar es como puedo mandar un mensaje desde el programa de delphi, este es el Sp:
Código PHP:
Select orden_cantidad, orden_precio, orden_observacion from ORDENES where Orden_estado='A' and Orden_id=:CLAVE into :CANTIDAD, :PRECIO , :OBSERV;
hace una busqueda y si no lo encuentra que me de un mensaje de que
'No existe el articulo' no se como implementar desde codigo:
Código PHP:
lo que jago es esto desde el evento Onvalidate del campo, codigo:
with IBStoredProc1 do
begin
ParamByName('CLAVE').AsInteger:=BD.IbDetalleDET_ORDEN.Value;
ExecProc;
BD.IbDetalleDET_CANTIDAD.Value:=ParamByName('CANTIDAD').AsFloat;
BD.IbDetalleDET_PRECIO.Value:= ParamByName('PRECIO').AsFloat;
BD.IbDetalleDET_DESCRIPCION.Value:=ParamByName('OBSERV').AsString;
end;
? que me diga que si no existe showmessage('no existe . . . ');
gracias.