Página 1 de 1

Executar procedure no xHarbour

Enviado: 27 Mar 2014 12:38
por volp
Olá pessoal,

Estou com problemas para executar uma procedure de MySql dentro do xHarbour. Fizemos uma procedure que retorna o valor "11" para fazer um teste, tentamos dar a "call procedure1" usando a lib sqlrdd, Segue abaixo o codigo fonte da função teste

Código: Selecionar todos

STATIC FUNCTION TESTE2
	LOCAL vRet:={}	

	alert("TESTE")
	sr_getconnection():exec("call procedure1 ;",,.T.,@vRet)
	sr_getconnection():commit()
	
	alert(vRet[1,1])
	return nil
No caso de um select o comando funciona perfeitamente, se baseamos nele mas da erro

Código: Selecionar todos

sr_getconnection():exec("select * minhatabela;",,.T.,@vRet)
Alguém da um help ? algum comando ou algo assim.
Att, Abraços