ACBrGTIN32.dll no Method GTIN_Consultar a dll nao retorna o sResposta, a dll esta consultando retornando as informacao em um arquivo xml.
harbour
Method GTIN_Consultar(aGTIN, sResposta, esTamanho) Class ACBrGTIN
Local hResult, buffer, bufferLen
bufferLen:= STR_LEN
buffer := Space(bufferLen)
aGTIN := ALLTRIM(aGTIN)
hResult := DllCall(ACBrLIB, DLL_OSAPI, "GTIN_Consultar", hb_StrToUTF8(aGTIN),@sResposta,@esTamanho)
::CheckResult(hResult)
Return::ProcessResult(buffer, bufferLen)
11/07/24 17:01:19:701 - GTIN_Consultar (7899641108649 )
11/07/24 17:01:19:702 - Travar
11/07/24 17:01:20:220 - MoverStringParaPChar. StrLen:162, BufLen:512
11/07/24 17:01:20:221 - SetRetorno(0,
<Consulta>
<CEST></CEST>
<NCM>00000000</NCM>
<cStat>0</cStat>
<dhResp/>
<tpGTIN>0</tpGTIN>
<xMotivo></xMotivo>
<xProd></xProd>
</Consulta>)