Asi se ve Zeos 6.6.3...

zeos663

Y asi se ve Zeos 7

zeos700

La verdad es que no sigo muy de cerca el desarrollo pero por lo que parece se estan preparando para una version con cambios importantes.

Mas informacion sobre la nueva generacion de Zeos Lib!

Tags

  • zeos

xanxov (not verified) Tue, 03/24/2009 - 13:00

Estoy interesado en zeos 7, ando buscandole como un loco y soy incapaz de encontrarlo. ¿ Podrías indicarme el link de donde lo bajaste ?. Gracias anticipadas.

jose luis larios (not verified) Thu, 10/29/2009 - 23:10

Tengo problemas con el ZStoreProc necesito ejecutar el store pero tengo el siguiente error "Unsopported Operation"
estoy con mysql 5.1 y este es el store
DROP PROCEDURE IF EXISTS SHOW_CORRIDAS;
DELIMITER $$
CREATE PROCEDURE SHOW_CORRIDAS(IN IN_ORIGEN VARCHAR(5), IN IN_DESTINO VARCHAR(5), IN FECHA_INPUT DATE)
BEGIN
DECLARE LD_FECHA2 DATE;
DECLARE LT_HORA2 TIME;

IF DATE_FORMAT(FECHA_INPUT,'%Y %m %d') = DATE_FORMAT(NOW( ),'%Y %m %d') THEN

SET LD_FECHA2 = CAST(CURRENT_DATE() + 1 AS DATE);
SET LT_HORA2 = CAST(NOW() AS TIME);

SELECT
(SELECT P.TIPO_CORRIDA FROM PDV_T_CORRIDA P WHERE P.ID_CORRIDA = D.ID_CORRIDA),
D.FECHA, TR.DESTINO, D.HORA,
(SELECT S.ABREVIACION FROM SERVICIOS S INNER JOIN PDV_T_CORRIDA C ON S.TIPOSERVICIO = C.TIPOSERVICIO
WHERE C.ID_CORRIDA = D.ID_CORRIDA)AS ABREVIA,
TR.ID_TRAMO
FROM PDV_T_CORRIDA_D D INNER JOIN T_C_TERMINAL T ON D.ID_TERMINAL = T.ID_TERMINAL
INNER JOIN T_C_RUTA_D R ON D.ID_RUTA = R.ID_RUTA
INNER JOIN T_C_TRAMO TR ON R.ID_TRAMO = TR.ID_TRAMO
WHERE T.ID_TERMINAL = IN_ORIGEN AND D.HORA >= LT_HORA2
AND D.FECHA BETWEEN CAST(NOW() AS DATE) AND LD_FECHA2
AND TR.DESTINO = IN_DESTINO
ORDER BY D.FECHA, D.HORA;
END IF;

IF DATE_FORMAT(FECHA_INPUT,'%Y %m %d') != DATE_FORMAT(NOW( ),'%Y %m %d') THEN
SET LD_FECHA2 = CAST(CAST(FECHA_INPUT AS DATE) + 1 AS DATE);-- EL SIGUIENTE DIA
SELECT
(SELECT P.TIPO_CORRIDA FROM PDV_T_CORRIDA P WHERE P.ID_CORRIDA = D.ID_CORRIDA),
D.FECHA, TR.DESTINO, D.HORA,
(SELECT S.ABREVIACION FROM SERVICIOS S INNER JOIN PDV_T_CORRIDA C ON S.TIPOSERVICIO = C.TIPOSERVICIO
WHERE C.ID_CORRIDA = D.ID_CORRIDA)AS ABREVIA,
TR.ID_TRAMO
FROM PDV_T_CORRIDA_D D INNER JOIN T_C_TERMINAL T ON D.ID_TERMINAL = T.ID_TERMINAL
INNER JOIN T_C_RUTA_D R ON D.ID_RUTA = R.ID_RUTA
INNER JOIN T_C_TRAMO TR ON R.ID_TRAMO = TR.ID_TRAMO
WHERE T.ID_TERMINAL = IN_ORIGEN AND D.FECHA BETWEEN FECHA_INPUT AND LD_FECHA2
AND TR.DESTINO = IN_DESTINO
ORDER BY D.FECHA, D.HORA;
END IF;

END $$
DELIMITER ;

y asi lo invoco en delphi 7

try
ZStoredProc1.Close;
ZStoredProc1.Active := true;
ZStoredProc1.StoredProcName := 'CALL SHOW_CORRIDAS';
ZStoredProc1.Params[0].Value := 'MEX';
ZStoredProc1.Params[0].Value := 'XOX';
ZStoredProc1.Params[0].Value := '2009-10-30';
ZStoredProc1.Open;
except
on E:Exception do begin
ShowMessage(e.Message);
end;
end;

Puedes ayudarme por que esta marcando el error

javivf Fri, 10/30/2009 - 13:47

Ni idea, nunca uso procedimientos almacenados ni delphi, asi que lo mejor sera que pruebes a consultar en los foros oficiales de zeos.

Add new comment

Filtered HTML

  • Web page addresses and email addresses turn into links automatically.
  • Allowed HTML tags: <a href hreflang> <em> <strong> <cite> <blockquote cite> <code> <ul type> <ol start type> <li> <dl> <dt> <dd>
  • Lines and paragraphs break automatically.
CAPTCHA
5 + 0 =
Solve this simple math problem and enter the result. E.g. for 1+3, enter 4.
This question is for testing whether or not you are a human visitor and to prevent automated spam submissions.