NFSe - IPM
Enviado: 18 Out 2022 15:33
Boa tarde a todos, alguém do grupo já conseguiu enviar arquivo XML da NFSe para a IPM? Estou autenticando, mas não consego enviar o arquivo, eu uso exemplo do HBNFe nas NFe´s e tudo funciona, já fiz as alterações:
*Retorna:
<retorno>
<mensagem>
<codigo>9999 - Arquivo XML da Nota Fiscal de Servi?Eletr?a n?enviado!</codigo>
</mensagem>
</retorno>
Alguém tem uma ideia de como resolver?
Obrigado.
Código: Selecionar todos
TRY
// oServerWS:=win_oleCreateObject( 'MSXML2.ServerXMLHTTP.5.0' )
// oServerWS:=win_oleCreateObject( 'MSXML2.ServerXMLHTTP.3.0' )
// oServerWS:=win_oleCreateObject( 'MSXML2.XMLHTTP.6.0' )
oServerWS:=win_oleCreateObject( 'MSXML2.XMLHTTP' )
CATCH
MsgInfo('Erro ao criar servidor HTTP !!!')
RETURN
END
_cBoundary := '----WebKitFormBoundary7MA4YWxkTrZu0gW'
//oServerWS:open("POST",'https://ws-saojose.atende.net:7443/?pg=rest&service=WNERestServiceNFSe',.F.)
oServerWS:open("POST",'https://saojose.atende.net/atende.php?pg=rest&service=WNERestServiceNFSe&cidade=padrao',.F.)
oServerWS:setRequestHeader("Authorization","Basic "+_cBase64Encode)
oServerWS:setRequestHeader("Host","saojose.atende.net")
oServerWS:setRequestHeader("content-type", "multipart/form-data; boundary="+_cBoundary)
* Autêntica
TRY
oServerWS:Send(_cXml)
CATCH
Rotina('!!! ERRO no Envido do XML !!!')
END
*Não Envia
_Status := oServerWS:STATUS
* Retorna Status 200
_cRetorno := oServerWS:ResponseText //Resposta Web Server
<retorno>
<mensagem>
<codigo>9999 - Arquivo XML da Nota Fiscal de Servi?Eletr?a n?enviado!</codigo>
</mensagem>
</retorno>
Alguém tem uma ideia de como resolver?
Obrigado.