Painel de líderes

Olá pessoal, Isso mesmo propriedades Salvar, no plural. Vocês já devem ter notado que os componentes que se utilizam de WebServices possuem 3 propriedades Salvar. Vamos a elas: Configuracoes.Arquivos.Salvar := True ou False; Se o valor for True ele salva em disco os XMLs que o emitente tem a obrigação legal de manter guardados. No caso da NF-e (por exemplo) os arquivos são: *-nfe.xml; *-procEventoNFe.xml e *-procInutNFe.xml, respectivamente o XML da nota fiscal, o XML de um evento (cancelamento, carta de correção, etc.) e o XML de inutilização de um numero ou faixa de números. Configuracoes.Geral.Salvar := True ou False; Se o valor for True ele salva em disco os XMLs secundários que são os de envio e de retorno. Configuracoes.WebServices.Salvar := True ou False; Se o valor for True ele salva em disco os XMLs secundários que são os de envio e de retorno envelopados, note que eles tem o mesmo nome dos arquivos de envio e de retorno mas com o sufixo -soap. Utilizamos muito os arquivos "soap" durante o desenvolvimento pois eles são mais completos e podem nos trazer informações que ajudam a resolver alguns problemas com os webservices. Dica: Caso você vai guardas os XMLs no banco de dados, pode deixar os 3 Salvar com o valor False. Por outro lado se você pretende salvar somente em disco ou além do banco de dados que ter uma cópia em disco, deve pelo menos atribuir o valor True a propriedade Configuracoes.Arquivos.Salvar. Observação: No componente ACBrNFe temos a propriedade Configuracoes.Arquivos.SalvarApenasNFeProcessadas, não atribua o valor True a essa propriedade, pois se atribuir o XML da nota só vai ser salvo em disco se a nota for autorizada pela SEFAZ. Caso ocorra algum erro de internet como por exemplo Timeout, você não tem o XML para carregar e realizar a consulta afim de saber se nota foi recepcionada pela SEFAZ ou não. Propriedade de nome semelhante esta presente nos componentes ACBrCTe, ACBrMDFe e ACBrBPe. Volto a frisar, não atribua o valor True a essa propriedade.

Bom dia pessoal, Amanhã 25/08 às 19:30 Live sobre lançamento da Arquitetura Fiscal Acesse: https://arquiteturafiscal.online

Sim, é uma boa adição ao ACBr, vou estar analisando o TEFAPI para ver em que posso ajudar. Uma excelente semana.

Esta utilizando o cst e o csosn errado, obrigado.

Segue o link: Ingressar na conversa (microsoft.com)

Obrigado Juliana!

Bom dia, sim, eu esqueci de retornar, eu fiz o teste, deixando desse jeito que informou no fonte. E deu certo. Essa parte ja esta tudo ok ref a validacao da senha. Eu removi aquilo que havia dito anteriormente. Obrigado.

Voltando o assunto referente ao MD5. Fiz um teste usando a senha: 123456789 Da forma que esta hoje no componente : LowerCase(AsciiToHex(MD5(Emitente.WSSenha))) Tive o seguinte valor: 25f9e794323b453885f5181f1b624d0b Usando somente a sua função tive o seguinte valor: 25f9e794323b453885f5181f1b624d0b Ou seja em ambos o resultado foi o mesmo. Fiz um outro teste colocando na senha letras, dígitos e o símbolo "@" e resultado também foi o mesmo.

Só complementando, fiz os testes com os fontes que o Sr. Pedro enviou Pedro A. Araújo enviou, e funcionou muito bem a remessa, mas não consegui bater a linha digitável, estou tentando localizar o problema, mas ajudou muito, está viável para registro dos boletos no banco.

Veja que ele está marcado com um ícone vermelho. Isso significa que de alguma forma ele foi alterado localmente (do seu lado). Você pode excluir e atualizar novamente como o Italo indicou ou usar a opção "Revert" do Tortoise SVN.

Eliezer, Te respondi no privado. Para que todos saibam o provedor esta gerando o XML da NFS-e de forma errada.

Boa noite, Sim, conheço a Configuracoes.WebServices.Salvar. Em produção desligo ela sim. Só estranhei toda essa quantidade, rs. Mas se é normal, então tudo certo! Obrigado.

Boa tarde, Atualizou os Schemas da sua aplicação? Se sim, tudo indica a principio ser algo na Implementação da Regra na Sefaz e não na sua implementação. Fiz o mesmo teste na SEFAZ / SP, e aprovou com êxito. Tentou o faleconosco da Sefaz / GO?

Está com o código quase pronto para commitar e subir ao testes

Bom dia. sim eu descobri onde. agora estou trabalhando no ajuste e como ajustar

Bom dia @Dércio Luis Zanatta Conseguimos recriar o caso, está sendo analisado pelo consultor @Juliomar Marchetti

Olá pessoal Confirme prometido estou anexando aqui nessa postagem o programa exemplo do componente ACBrNFSe refatorado para que vocês possam realizar os testes com os provedores de seus clientes. Caso tenham algum problema, em alguma funcionalidade favor anexar os XMLs de envio e de retorno que funciona atualmente e os gerados com o novo componente para que eu possa fazer as devidas correções. Foram implementados nesse novo componente 32 provedores que se utilizam da versão 1 do layout da ABRASF, 55 provedores (inclusive: SiapSistemas e DSFv2) que se utilizam da versão 2 do layout da ABRASF e 20 provedores que seguem o seu próprio layout, totalizando 107 provedores, abrangendo 1215 cidades. Como realizar os testes: Na sua maquina de desenvolvimento crie uma pasta (Por exemplo: NovoACBrNFSe) descompacte o arquivo ACBrNFSe_Exemplo.rar dentro dessa pasta. Ao executar ele pela primeira vez vai aparecer a tela de erro: O motivo de aparece essa tela é porque ainda não existe o arquivo de configuração. Clique no botão [OK] E configure da mesma forma que você configurou o programa exemplo do componente atual, ou antes de executar copie para dentro dessa pasta o arquivo de configuração (ACBrNFSe_Exemplo.ini) do programa exemplo que esta na pasta: ...\Exemplos\ACBrDFe\ACBrNFSe\Delphi Note que nesse novo programa exemplo temos um botão chamado Envio: Foi criado um novo método chamado Emitir que tem por finalidade abstrair os métodos de envio de cada provedor. Vamos a alguns exemplos: Os provedores que seguem a versão 1 do layout da ABRASF só possuem 1 método de envio que é o Enviar, logo o método Emitir vai usar esse método, por outro lado o provedor 4R que segue a versão 2 do layout da ABRASF e deveria ter disponibilizado os métodos Enviar, EnviarSincrono e Gerar, disponibilizou somente o EnvioSincrono, logo o método Emitir vai usar esse método. O provedor MegaSoft que também segue a versão 2 do layout da ABRSAF e que deveria ter disponibilizado os 3 métodos citados acima, só disponibilizou o método Gerar, logo o método Emitir vai se utilizar do método Gerar para enviar o RPS par o WebService. Assim que liberarmos os fontes do novo componente conto com todos para melhorarmos o método Emitir, pois acredito que ele vai simplificar bastante. Por fim peço a todos que postem os resultados dos testes aqui no fórum. Para quem não é membro do SAC favor postar em: Home / Fórum Aberto - ACBr / ACBrDFe / ACBrNFSe Para quem é membro do SAC favor postar em: Home / Suporte Pago - SAC / DFe - Documentos Fiscais Eletrônicos Programa exemplo do novo componente ACBrNFSe: ACBrNFSe_Exemplo.exe(compilado: 11/11/2020 as 16:14) Desde já muito obrigado pela colaboração de todos.

Não consigo utilizar a função IfThen... Estou tentando utilizar esse codigo procedure TFmPDvOutros.SpeedButton6Click(Sender: TObject); Var A: Integer; begin for A := 0 to FmFiscMenu.ACBrECF1.FormasPagamento.Count -1 do begin if FmFiscMenu.ACBrECF1.FormasPagamento[A].Descricao <> '' then mResp.Lines.Add( 'Forma Pagto: '+FmFiscMenu.ACBrECF1.FormasPagamento[A].Indice+' -> '+ FmFiscMenu.ACBrECF1.FormasPagamento[A].Descricao+' Permite Vinculado: '+ IfThen( FmFiscMenu.ACBrECF1.FormasPagamento[A].PermiteVinculado,'S','N')); end ; mResp.Lines.Add('---------------------------------'); end; Alguem da um help? Obrigado

StrUtils Tópico movido para área correta