Boa tarde!
Antes de mais nada PARABÉNS!
Eu já utilizava o ACBR NF-e e agora estou utilizando também o ACBR NFS-e, e estou super satisfeito.
Meu projeto é um "monitor" capaz de processar "N" arquivos, de emitentes diferentes e efetuar o envio sem intervenções de usuários.
Utilizei o "Demo" para ganhar tempo e já tenho a primeira versão (ainda para 1 emitente) funcionando.
Como é um aplicativo silencioso (inclusive a impressão do DANFE pode ou não ficar a cargo do nosso sistema fiscal) tive que efetuar 1 única modificação na unit ACBrNFSeWebServices na linha 2574:
Código original:
if Self.ConsLote.Msg <> '' //aqui - vini - não subir excessão.
then raise Exception.Create(Self.ConsLote.Msg)
else raise Exception.Create('Erro Desconhecido ao Consultar o Lote!');
Código modificado:
if TACBrNFSe( FACBrNFSe ).Configuracoes.WebServices.Visualizar then
if Self.ConsLote.Msg <> '' //aqui - vini - não subir excessão.
then raise Exception.Create(Self.ConsLote.Msg)
else raise Exception.Create('Erro Desconhecido ao Consultar o Lote!');
Ou seja, eu mostro a mensagem de exceção apenas se o componente estiver configurado para mostrar, pois existem outras formas de saber que ocorreu uma falha com o lote como os arquivos intermediários e o site da prefeitura. Detalhe utilizo para teste a propriedade que já existe no componente.
Bom pessoal, é apenas uma sugestão!
Grande abraço,
Vinícius César - ZWK Software.