... - 1 ) + ")" oQry := ::Query( cExecute ) ::NextResult()RETURN oQry ReturnCall (cProcName,aParameters) oServer:ReturnCall("busca_clientes",{ cCodClie }) En tu caso es una lista, muestranos un ejemplo y el storeproceure ...
... for each function in the DLL? You can implement several functions for each number of params to pass: void pascal __export HBDLLENTRY1( char * cProcName, PHB_ITEM pParam1 ) { hb_itemDoC( cProcName, 1, pParam1 ); } void pascal __export HBDLLENTRY2( char * cProcName, PHB_ITEM pParam1, PHB_ITEM ...
... está devolviendo un LONG (un número de 32 bits) y además estas recogiendo como número la fecha que le das: return hb_itemGetNL( hb_itemDoC( cProcName, 1, pParam1 ) ) ; puesto que recibes una fecha, primero debes decidir en que formato la vas a usar. Uno sencillo es "AAAAMMDD", ...
... RPC in HBNETIO protocol + added the following client functions: check if function/procedure exists on the server side: NETIO_PROCEXISTS( <cProcName> ) -> <lExists> execute function/procedure on server the side, do not wait for confirmation: NETIO_PROCEXEC( <cProcName> ...
... that the DLL will work outside of harbour. Here is my first attempt at my c code. It is very incomplete and compiles with the expected errors of cProcname, pitem1, and pitem2 Parameter is never used in function HBDLLSTRING2. #include <windows.h>#include <stdio.h>int __declspec(dllimport) ...
... working (once the bug fix that I described is applied). I just missed to use __export in maindll.c :-) LONG PASCAL __export HBDLLENTRY2( char * cProcName, LONG pItem1, LONG pItem2 ) Here you have the DLL to test it (using FWH\samples\babu.prg): http://www.mediafire.com/?sharekey=d0453478149576bfe7c82ed4b8f0c380c56966ad7665c154c95965eaa7bc68bc