[firebase-br] SP Simples no IBExpert

[Júlio Vasques]

Muito obrigado, funcionou.

Mas infelizmente não consegui rodar a SP do Firebird através de uma
aplicação ADVPL no PROTHEUS (TOTVS).

Se alguém aqui também conhece o ADVPL, abaixo está o comando que usei e que
causa um erro de interpretação da SELECT. No FireBird roda tranquilo.

cQuery := "EXECUTE PROCEDURE SPVENDAS "
TcQuery cQuery NEW ALIAS "FIRETMP"

Se alguém já fez a integração ADVPL Firebird, a ajuda seria de grande valia.

Obrigado a todos.






2016-01-13 15:12 GMT-02:00 Glaucos Ginez <glaucosginez em gmail.com>:

> SET TERM ^ ;
>
> CREATE OR ALTER procedure SPVENDAS
> returns (
>     PLACA integer,
>     VENDA_ID integer,
>     VAL_TOTAL_LIQUIDO double precision,
>     KM integer,
>     MARCA varchar(10),
>     DATA date)
> as
> begin
>
>   FOR SELECT V.DAT_HOR_INICIO_VENDA_CPU,V.VENDA_ID,V.PLACA,VC.MARCA,V.KM
> <http://v.km/>
> ,V.VAL_TOTAL_LIQUIDO
>         FROM VENDA V
>         INNER JOIN PESSOA P ON V.PESSOA_ID = P.PESSOA_ID
>         INNER JOIN VEICULO VC ON V.PLACA = VC.PLACA
>         INTO :DATA,:VENDA_ID,:PLACA,:MARCA,:KM,:VAL_TOTAL_LIQUIDO DO
>   suspend;
> end^
>
> SET TERM ; ^
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> Para saber como gerenciar/excluir seu cadastro na lista, use:
> http://www.firebase.com.br/fb/artigo.php?id=1107
> Para consultar mensagens antigas:
> http://www.firebase.com.br/pesquisa_lista.html
>