Painel de líderes

Max basicamente é isso, o monitor le teu arquivo de entrada (ENT.TXT)e gera um arquivo de saída (SAI.TXT) com o resultado do processamento do comando enviado. Envie um comando de cada vez. Tu deves ler esse arquivo SAI.TXT para dar o próximo passo. Cada comando tem um retorno padrão que está descrito nesse help online que o @Daniel Simoes te passou.

Veja, isso não se trata de como preencher o arquivo, mas sim da estrutura do mesmo, conforme eu havia citado acima... O Modelo do .ini de cada evento deve seguir exatamente a mesma estrutura descrita no manual Reinf. No Evento R2010 é permitido apena um (1) registro "IdePrestServ" Então se tem mais prestadores precisa gerar um novo evento, da mesma forma que já está preenchendo os campos, mas um novo arquivo de Evento R-2010, nesse caso o que muda é o ID de cada evento (O ID não pode se repetir) Veja o exemplo em anexo com seu próprio arquivo... Se mesmo assim houver rejeição do WebService precisa ver com seu Contador como enviar nestes casos, sei que alguns Eventos tem restrições de ocorrências por lote, não sei se seria este o caso. ex: R2010_2.iniR2010.INI

Olá Charles e todos os que estiverem passando por esse mesmo problema. Queremos incentivar a todos vocês a entrar em contato pelo Fale Conosco mencionando o problema. Por favor, façam isso. Quanto maior o volume de pessoas fazendo isso, mais urgente eles vão considerar o problema.

@Daniel Port, conforme falamos em PV o seu XML foi gerado em duplicidade e por estar permitindo a consulta com DigestValue divergente atualizou o protocolo no segundo XML gerado, a recomendação é sempre consultar a chave na SEFAZ antes de gerar um novo documento para envio, no caso de não obter retorno na primeira tentativa de envio. Esclarecendo apenas para encerrar o tópico...

Boa tarde, está utilizando a opção: "Remover Acentos da Remessa" no ACBrMonitor? Realizando testes com seu arquivo, alterou o caractere acentuado corretamente, alterando para "C"...

Bom dia Charles, Faça o seguinte: 1. Abra a unit ACBrNFeWebServices; 2. procure pela function: TNFeConsulta.TratarResposta: Boolean; 3. inclua a linha indicada abaixo: FPRetWS := SeparaDadosArray(['NfeConsultaNF2Result', 'NfeConsultaNFResult', 'nfeResultMsg'], FPRetornoWS); VerificarSemResposta; // a linha abaixo remove o prefixo que foi incluido pela SEFAZ de forma indevida. FPRetWS := StringReplace(FPRetWS, 'ns0:', '', [rfReplaceAll, rfIgnoreCase]); NFeRetorno.Leitor.Arquivo := ParseText(FPRetWS); NFeRetorno.LerXML; 4. Faça novos testes.

Provavelmente por que a maquina que esta rodando não esta com o fuso horário correto, por isso fico -2 como se fosse horário de verão.

Bom dia. O erro diz que vc está usando a fbclient.dll incorreta, tentou substituir? Att.

Complementando. Tu vais precisa de um certificado digital para fazer todo processo com o servidor SEFAZ ; Existem dois ambientes Homologação (testes) e produção (real), o ambiente de hologação que tem todas as funcionalidades do ambiente produção.

Valeu Daniel, grato pela ajuda! Um abraço, Max

Então, você vai gerar, assinar e validar, depois... NotasFiscais.Imprimir. Se estiver tudo ok depois disso você acionar o enviar normalmente.

boa tarde ======================== PROCEDURE ACBR_OBTERXML(sRecebe_nome_dll is string="",sRecebe_nome_metodo is string="", ... sRecebe_nome_ultimo_Retorno is string="",nPosicao is int=0) gsResposta is string on 256 sGsResposta_maior_256 is string="" gnTamanho is system int=256 //gnretorno_acbr=API("ACBrNFe32.DLL","NFE_ObterXml",nPosicao_nfe,&gsResposta,&gnTamanho) gnretorno_acbr=API(sRecebe_nome_dll,sRecebe_nome_metodo,nPosicao,&gsResposta,&gnTamanho) IF gnretorno_acbr=0 THEN RESULT(VER_RETORNO_MAIOR_256(sRecebe_nome_dll,sRecebe_nome_ultimo_Retorno,gnTamanho,gsResposta)) ELSE texto is string="Erro Retorno - "+gnretorno_acbr IF gnretorno_acbr=-1 THEN texto+=" Indica que a biblioteca não foi inicializada" IF gnretorno_acbr=-5 THEN texto+=" Indica que o arquivo passado não existe." IF gnretorno_acbr=-7 THEN texto+=" Indica erro na comunicação HTTP." IF gnretorno_acbr=-10 THEN texto+=" Indica que houve erro ao consultar." IF gnretorno_acbr=-12 THEN texto+=" Indica falha na validação da chave passada." texto+=ACBR_ULTIMO_RETORNO(sRecebe_nome_dll,sRecebe_nome_ultimo_Retorno) RESULT texto END // Método para retornar o xml da NFe. // https://acbr.sourceforge.io/ACBrLib/NFE_ObterXml.html // NFE_ObterXml( AIndex, sResposta, esTamanho ); // AiNDEX = Posição da NFe na lista, À lista inicia em 0. ======================== // btn cte obter xml bRETORNO is boolean=ACBR_INICIALIZAR("ACBrCTe32.dll","CTE_Inicializar") IF bRETORNO=True THEN EDT_RESPOSTA=ACBR_CARREGARINI("ACBrCTe32.dll","CTE_CarregarINI",EDT_INI) IF EDT_RESPOSTA=0 THEN // carregou com sucesso EDT_RESPOSTA=ACBR_OBTERXML("ACBrCTe32.DLL","CTE_ObterXml","CTE_UltimoRetorno",0) ELSE EDT_RESPOSTA+=CR+"ERRO CARREGAR INI" END ELSE EDT_RESPOSTA="erro inicializar" END ACBR_FINALIZAR("ACBrCTe32.dll","CTE_Finalizar") ======================== https://windevdesenvolvimento.blogspot.com/2019/11/dicas-2477-windev-webdev-mobile-acbr_17.html Dica 2479. Método para retornar o xml do CTe com Dll acbr Lib. DICAS 2479 - WINDEV WEBDEV MOBILE - ACBR 168 - ACBR LIB - CTE_ObterXml

Boa noite, Para testar e homologar o seu sistema, você pode contar com um módulo próprio para isso e cada fabricante tem o seu. A Tanca por exemplo, dispõe do módulo SDK1000: https://www.tanca.com.br/automacao-comercial-produto.php?cod=84 Além disso você terá que configurar o integrador fiscal conforme as especificações passadas pela Sefaz-CE, exemplo: Estabelecimento: CNPJ: 30146465000116 IE: 065911482 CNPJ da Softwarehouse: 98155757000159 CHAVE: MD2Nof/O0tQMPKiYeeAydSjYt7YV9kU0nWKZGXHVdYIzR2W9Z6tgXni/Y5bnjmUAk8MkqlBJIiOOIskKCjJ086k7vAP0EU5cBRYj/nzHUiRdu9AVD7WRfVs00BDyb5fsnnKg7gAXXH6SBgCxG9yjAkxJ0l2E2idsWBAJ5peQEBZqtHytRUC+FLaSfd3+66QNxIBlDwQIRzUGPaU6fvErVDSfMUf8WpkwnPz36fCQnyLypqe/5mbox9pt3RCbbXcYqnR/4poYGr9M9Kymj4/PyX9xGeiXwbgzOOHNIU5M/aAs0rulXz948bZla0eXABgEcp6mDkTzweLPZTbmOhX+eA== Atenciosamente, Nilton Felipe Braz

Demo em VB já disponível no SVN.

Outra coisa se código de carregamento de certificado esta errado. CAPICOM carrega certificado pelo arquivo PFX sim. Não utilize CAPICOM esta depreciado, use Wincrypt no lugar, pode desativar ela ativando a diretiva DFE_SEM_CAPICOM na ACBr.inc. OpenSSL não suporta carregamento de certificado pelo número de serie.

Perdão desconsiderar! Ele gerou um código 2. Tocantis pra mim foi novidade

Olá pessoal trago algumas mudanças que fizemos em nossa empresa para adequar a algumas necessidades que possuíamos com os boletos.. 1 - Adicionado ao Banrisul a leitura do valor pago do boleto. Adicionado pois nesse banco a informação não era preenchida na leitura permanecendo nulo o valor. Alteração do Fonte para Adicionar a leitura do valor pago 2 - Adicionado 3 tipos de Cobrança no TACBrCaracTitulo do ACBrBoleto.pas Adicionado esses três tipos, pois ao ler os manuais dos bancos foi verificado que eles não se encontravam como opções no fonte. Alteração no fonte do ACBrBoleto.pas adicionando os 3 novos tipos. 3 - Alterado o Banco do Brasil pois um dos tipos de cobrança visto no item 2 não existia como uma opção. Manual do Bando do Brasil "Nota 22". Alteração para se adequar ao manual. 4 - Alterado o Banco do Santander pois um dos tipos de cobrança visto no item 2 não existia como uma opção. Manual do Santander "Nota 5". Fonte Alterado para se Adequar ao manual. Segue abaixo os fontes alterados... Fontes.rar

O erro está que sua aplicação é win32 e ele está achando a dll win64.

Boa tarde Italo, Efetuei um pequeno ajuste no Fonte em anexo. Ao carregar o arquivo XML no componente os dados do prestador não eram preenchidos. Na imagem abaixo o que foi alterado para carregar os dados corretamente a partir do XML (LoadFromFile() ou LoadFromStream()). pnfsNFSeR.pas

Está usando o componente DACTE para Fast ou Fortes? Anexe o XML do CTe e eventos para testes.

Enviei os arquivos modificados pelo @fefevilela para o repositório, rev. 18256. Obrigado pela contribuição. Fiz apenas alguns ajustes nos mesmos pra manter os arquivos do repositório na versão 5.xx.

Ítalo, Boa tarde. Fiz a alteração, reinstalei o ACBr e funcionou perfeitamente. Acho que esta alteração poderia subir para os fontes, já que não prejudica outras funcionalidades e corrige o erro da SEFAZ. Obrigado pela ajuda. Charles

Muito obg a todos!

configure SSLType, para TLS_12 xmlSignLib, deixe libXml2 lembro que havia um Bug na leitura da Senha criptografada no INI... O @Rafael Dias já corrigiu... verifique se seus fontes estão atualizados....

Seu XML contém diversas inconsistências, sugiro usar o InteliSAT para validá-lo - https://www.tanca.com.br/assets/conteudo/drivers/TS-1000/Ferramenta_Desenvolvimento_InteliSAT.zip

Bom dia. Por favor evite copiar conteúdo de arquivos em seus posts, isso dificulta a leitura e por consequência que vc receba auxilio, ao invés disso anexe o XML. Att.

Na segunda pagina só não carrega a parte da chave , código de barras numero série. O restante é tudo igual da primeira pagina

Bom dia, Talvez seria o caso de você criar uma regra de negócio que, quando o usuário selecionar a forma de pagamento cartão (recomendo criar uma forma de pagamento específica para esse cartão), o seu programa pode já enviar o valor para o TEF considerando os 10% de desconto. Caso a transação seja feita, você aplica o desconto no subtotal do cupom. No seu caso como o desconto é por item, antes de subtotalizar o cupom, você aplica o desconto ao item.

Como você vai dar desconto na venda já definida? Você vai emitir o cupom do TEF antes de fechar a venda? É isso?

Bom dia, sistemp. Veja o tópico abaixo:

Bom dia Daniel, Vou testar com essa solução e retorno para dizer se funcionou também , obrigado.

só por curioso. printa de qual pasta do svn está abrindo e cola aqui no post

Tu pode usar o ACBrNFe que ele tem aqui diversos tópicos explicando como fazer. mas só pode baixar dos últimos 3 meses. há é e não deve baixar na totalidade, está descrito na NT do sefaz que liberou esse Webservice para download ele deve ser baixado somente quando for perdido o xml por ambos os lados. seja o emissor ou o que recebeu . mas o fornecedor deve e tem que disponibilizar o xml está previsto em lei isso.

Estude os fontes do demo do ACBrMTER http://svn.code.sf.net/p/acbr/code/trunk2/Exemplos/ACBrTCP/ACBrMTer/Delphi/

Bom dia, segue o arquivo alterado. ACBrBoletoFCFortesFr.pas ACBrBoletoFCFortesFr.dfm

o Tópico parece descrever bem o problema e a solução... veja ainda o change-log o ACBr é Open Surce... então basta abrir os fontes e estudar...

uso sim o ACBrTEFD, vou olhar suas dicas.valeu.

Obrigado, era isso mesmo ... o componente ACBrIntegrador tinha sido sumido, e eu não percebi e salvei... reinstalei tudo novamente e esta tudo ok. muito obrigado.

Boa tarde a todos Muito obrigado pelos esclarecimento, hoje no período da tarde conversei com um contador, e obtive a mesma informação sobre o CSOSN 500. muito obrigado.

O componente ACBrIntegrador está aparecendo no formulário? Tem um problema conhecido que faz o Delphi não encontrar o componente e acaba apagando o mesmo, reinstalando o ACBr ele volta a enxergar. Veja se algum arquivo da pasta do exemplo aparece marcado com sinal vermelho, indicando que houve alteração, faça o revert pelo Tortoise se for o caso.

@CelsoPires, Consegui emitir com o ACBr, porém utilizando a solução de um outro post aqui do forum. Segue o link para acesso: Distribui a aplicação gerada em C# somente para a assinatura e está funcionando no cliente, já validado.

Você deve preencher a tag xObs e não a xJust.

Boa tarde. O componente foi implementado conforme orientações existentes no manual, sugiro estudar o mesmo para entender as regras. Att.

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

que eu saiba o csosn 500 só suporta esses campos <ICMSSN500> <!-- Origem da mercadoria --> <orig>0</orig> <!-- Valor do ICMS ST Retido na operação anterior --> <CSOSN>500</CSOSN> <!-- Base de Cálculo ICMS Retido na operação anterior --> <vBCSTRet/> <!-- Alíquota suportada pelo Consumidor Final --> <pST/> <!-- Valor do ICMS próprio do Substituto --> <vICMSSubstituto/> <!-- Valor do ICMS ST Retido na operação anterior --> <vICMSSTRet/> </ICMSSN500> para fazer esses destaques acredito que só o csosn 900

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Esse problema geralmente acontece quando se tem mais de uma versão do Delphi instalada e uma versão do Delphi está pegando as bibliotecas (arquivos BPL) da outra versão.

Boa tarde Anexe o log do ACBrIstall, por favor. Att.

Olá pessoal, Já foi implementado no componente ACBrCTe o modo de envio síncrono de CT-e. Para que possamos enviar o CT-e no modo síncrono foi necessário acrescentar um parâmetro a mais no método Enviar. function Enviar(ALote: Integer; Imprimir: Boolean = True; ASincrono: Boolean = False) : Boolean; overload; Parâmetros do método Enviar: 1o = Número do Lote 2o = Se True imprime automaticamente o DACTE 3o = Se True o envio é no modo Síncrono, caso contrario Assíncrono. Observação: no modo Síncrono só podemos enviar UM CT-e por vez. Por padrão o parâmetro ASincrono vale False fazendo com que o envio seja realizado no modo assíncrono. Exemplos: ACBrCTe1.Enviar(StrToInt(vNumLote)); ===> envio no modo assíncrono com a impressão do DACTE automaticamente. ACBrCTe1.Enviar(StrToInt(vNumLote), False); ===> envio no modo assíncrono sem a impressão do DACTE automaticamente. ACBrCTe1.Enviar(StrToInt(vNumLote), True, True); ===> envio no modo síncrono com a impressão do DACTE automaticamente. ACBrCTe1.Enviar(StrToInt(vNumLote), False, True); ===> envio no modo assíncrono sem a impressão do DACTE automaticamente. Para quem não usa o método Enviar e prefere executar diretamente as chamadas do webservice abaixo temos um exemplo: ACBrCTe1.WebServices.Enviar.Lote := vNumLote; <=== Numero do Lote ACBrCTe1.WebServices.Enviar.Sincrono := True; <= Se True o modo de envio será síncrono, caso contrario assíncrono. ACBrCTe1.WebServices.Enviar.Executar;