Prezado Jo�o. Tenho chamadas feitas da forma abaixo funcionando. Obs: No caso abaixo, a vari�vel boo_output1 � um par�metro de OUTPUT e preciso dar um select no final da SP (SQLServer). Pego o retorno na vari�vel par_util que � um par�metro de receive na minha fun��o Centura. Qquer d�vida me mande um e-mail.
Set str_comando = " { :nReturn = call sp_calend_util (" ||
" :par_dat_data, " ||
" :par_str_tp_calend, " ||
" 'C', " ||
" :boo_output1) } "
Set str_bind = " :par_util "
If NOT OdrPrepareProc (hSql_Funcao, str_comando, str_bind)
Return FALSE
If NOT SqlExecute (hSql_Funcao)
Return FALSE
If NOT SqlFetchNext (hSql_Funcao, nu_fetch)
Return FALSE
If NOT OdrGetReturnStatus (hSql_Funcao, nReturn)
Return FALSE
Rodrigo Scarano
Target Sistemas
http://www.targetsis.com.br/
[EMAIL PROTECTED]
-----Mensagem original-----
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Em nome
de Joao Batista Sesconetto
Enviada em: ter�a-feira, 21 de setembro de 2004 09:12
Para: Lista Centura (E-mail)
Assunto: [sqlwin] Executar uma SP
Caros amigos da lista,
Ser� que alguem pode me ajudar a resolver um problema de execu��o de uma
Storage Procedure.
Abaixo temos a chamada � procedure que n�o me retorna nada, apesar dos
comandos n�o d� erro, e os
parametros passados serem validos, pois se eu executo esta procedure direto
no banco ela funciona corretamente.(exec uspInfoBancaria
@da_pagamento_inicio='2004-09-16',
@da_pagamento_final='2004-09-16', @co_superintendencia=2,
@co_tipo_documento=1)
Set gnTemp = OdrPrepareProc( ghSqlCOB, {Call uspInfoBancaria ('2004-9-16',
'2004-9-21', 2, 1)}, (:lsco_chave_documento_origem, :lsDtda_pagamento,
:lnvl_pagamento, :lnvl_desconto, :lnvl_mora_multa,
:lsnr_sequencial_documento, :lsaa_sequencial_documento))
If SqlExecute( ghSqlCOB )
Call SqlFetchNext(ghSqlCOB,gnTemp)
Segue abaixo a parte da procedure chamada:
CREATE PROCEDURE uspInfoBancaria (@co_chave_documento_origem
VARCHAR(100)=NULL, @da_pagamento_inicio SMALLDATETIME,
@da_pagamento_final SMALLDATETIME, @co_superintendencia TINYINT,
@co_tipo_documento TINYINT=NULL)
AS
-- Evita a apresenta��o da contagem de linhas
SET NOCOUNT ON
Caso tenham alguma id�ia, ou at� mesmo um outro exemplo eu ficarei muito
grato.
Att. Jo�o B. Sesconetto
ANTT/SUINF/BRAS�LIA
==============================================
Lista de Centura SQLWindows
Administrador : [EMAIL PROTECTED]
[ http://www.centuraexplorer.com ]
Para sair desta lista mande mensagem para:
[EMAIL PROTECTED] sem nada no Subject e
com o comando a seguir no corpo da msg:
"unsubscribe sqlwin" (sem as aspas)
==============================================
<<attachment: winmail.dat>>
