When I maintain my old application.
xHarbour v1.2.3 / FWH1312
I have C code in PRG below:
- Code: Select all Expand view RUN
#pragma BEGINDUMP
#include "windows.h"
int WINAPI PEA_SamExeNhiQuery(LPSTR cHostname, int nPort, LPSTR cBuscode, int nCom, LPSTR cDocid, LPSTR cPatdid, LPSTR cPatbirth);
void WINAPI PEA_GetMsg(LPSTR cBuffer,int * nLen );
HB_FUNC( PEA_SAMEXENHIQUERY )
{
LPSTR cHostname = hb_parc(1) ;
int nPort = hb_parni(2);
LPSTR cBuscode = hb_parc(3) ;
int nCom = hb_parni(4);
LPSTR cDocid = hb_parc(5) ;
LPSTR cPatdid = hb_parc(6) ;
LPSTR cPatbirth = hb_parc(7) ;
int nErrCode ;
nErrCode = PEA_SamExeNhiQuery(cHostname,nPort,cBuscode,nCom,cDocid,cPatdid,cPatbirth ) ;
hb_retni( nErrCode );
}
HB_FUNC( PEA_GETMSG )
{
LPSTR cBuffer = hb_parc(1);
long nLen = hb_parni(2);
PEA_GetMsg( cBuffer, &nLen );
}
#pragma ENDDUMP
When I compile it. appear error message below:
hb_retni( nErrCode ); Undefined symbol 'hb_stackST'
Any suggestion?