Painel de líderes

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.

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.

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.

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

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.

Muito obg a todos!

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.

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.

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

Bom dia, Obr Junior. Você tentou realizar os passos informados pelo Daniel?

Precisamos de mais informações... como um passo a passo mais exato, de como reproduzir o problema...

Chuto que pode ser um bug. notei que eles disponibilizam o fonte junto. será que debugar pra verificar senão é um erro e corrigir?

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...

Foi enviado uma correção favor baixar a dll novamente.

Obrigado por reportar. Fechando o tópico. Para nova dúvida, favor abrir novo tópico.

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.

Meu deus do céu, véspera de feriado e estamos como?

Uso no win10 64 e nao estou tendo problema. https://youtu.be/rxZdI4UI51o

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.

Fiquei curiosa e fui pesquisar no Google. Um exemplo está nesse link do SEFAZ/MT existem algumas reduções de 100% na base de cálculo(busque por 100%). http://app1.sefaz.mt.gov.br/sistema/legislacao/regulamentoicms.nsf/0/f168e90e3fbef136042572f1006e9866?OpenDocument Então basta verificar a legislação dos demais estados

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.

Se você tem a propriedade AtualizarXMLCancelado ativada, o ACBr vai alterar o XML da nota inserindo o protocolo de cancelamento. O problema é que a SEFAZ-MG está retornando indevidamente prefixos ns0: para as tags do XML no retorno da consulta. Isso faz com que o XML final montado pelo XML fique inválido.

Liberado o WebService de Recepção Síncrono em Homologação Está implantando no ambiente de homologação da SVRS o WebService de Recepção Síncrona do CT-e conforme estabelecido no MOC 3.00a. A URL do serviço e o WSDL podem ser obtidos acessando o menu Serviços do Portal. A liberação ocorreu no dia 02/08/2019, não temos informações de quando será liberado em ambiente de produção. As alterações no componente já estão sendo feitas e serão liberadas, para que vocês possam realizar os testes.

27/08/2019 Disponível serviços de autorização síncrona de CT-e na SVRS O Webservice de Recepção Síncrona de CT-e da versão 3.00 está disponível para utilização das empresas emitentes no ambiente de autorização da SEFAZ Virtual RS.

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;