Olá Pessoal, estou com o seguinte problema:
Descrição do erro.: Erro TOleAuto/65535 - Fim de Tempo para Bloqueio: TOLEAUTO:NEW
Area Atual........: 1 - RPS
Argumentos:
[ 1] = C MSXML2.DOMDocument.5.0
[ 2] = U MSXML2.DOMDocument.5.0
[ 3] = U MSXML2.DOMDocument.5.0
Lista de Chamada
================
Chamada de THROW(0)
Chamada de TOLEAUTO:NEW(346)
Chamada de CREATEOBJECT(78)
Chamada de TMONTADOCUMENTOXML:ASSINAR(463)
Chamada de TRECIBOPROVISORIOSERVICOENVIARRPS:ENVIARRPSTINUS(1588)
Este erro está acontecendo no seguinte trecho de código:
#IfnDef DEBUG_MODE
TRY
oDOMDoc := CreateObject( "MSXML2.DOMDocument.5.0" ) <-- Aqui
CATCH
RETURN msgErro("Não foi possÃvel carregar o componente MSXML2.DOMDocument.5.0", "Assinando")
END
#Else
oDOMDoc := CreateObject( "MSXML2.DOMDocument.5.0" )
#Endif
oDOMDoc:async := .F.
oDOMDoc:resolveExternals := .F.
oDOMDoc:validateOnParse := .T.
oDOMDoc:preserveWhiteSpace := .T.
Este é uma parte do código que realiza a assinatura do XML da nota de serviço.
Conto com a atenção de todos.
Este erro não ocorre aqui na minha máquina, mas está ocorrendo no cliente.