Antonio Carlos L

Existe algum método análogo ao que ocorre na consulta completa no portal da NFe onde se coloca a chave é verificado a assinatura e se faz o download do xml ?

Gostaria de saber se aa efetuar a consulta pela chave ( WebServices.Consulta.NFeChave := aChave; WebServices.Consulta.Executar ) ela retorna o XML da nota caso tenha sido autorizado ? Eu sei que a consulta pelo XML ela retorna o XML caso tenha sido autorizado autorizado mas não posso usar essa consulta quando tenho problemas no DigestValue ( devido a atualização da hora ) . Obrigado.

A solução do problema foi a instalação das cadeias v5,v10,v11 em https://www.gov.br/iti/pt-br/assuntos/repositorio/repositorio-ac-raiz , precisou ir no gerenciador de certificado e em propriedades marcar que o certificado era válido para TODAS as finalidades e o erro acabou. Pode fechar moderador.

Estou com diversos relatos erro 12175 , principalmente se a maquina se windows 7, como também tive relato de algumas maquinas com windows 10 , a sefaz não mostra indisponibilidade

OS NCMs revogados estão aqui: https://www.fazcomex.com.br/blog/atualizacao-ncm-2022/#ncms-descontinuadas-em-2022 os NCMs criados aqui : https://www.fazcomex.com.br/blog/atualizacao-ncm-2022/#ncms-2022-que-entram-em-vigor-em-1-4 E tabela com os NCMs novos : https://www.fazcomex.com.br/wp-content/uploads/2022/03/NCM_2022_NOVAS.xlsx

Caros estou com esse problema, pelo log não se tem saber a unit que esta dando o erro. log_Delphi_11_Alexandria_Win32.txt

Oi Juliomar, a contabilidade do cliente quer apenas o BLOCO H. Inclusive mandaram instruções de como tem, que ser. Eles devem ter algum importador, sei lá. Eu vi que haviam dependências entre as units, graças que o ACBr é free e pude ver na units do blocoH como era feito e gerei o boco H. Pensei que o erro era devido a minha inexperiência. Obrigado

Pessoal, é a primeira vez que uso o TACBrSPEDFiscal , pode ser algo muito básico. Procurei no fórum antes, mas não achei Preciso enviar para a contabilidade apenas o Bloco H, essa foi a solicitação da contabilidade. No exemplo do componente existe uma sucessão de blocos, sem gerar os outros blocos, é possível gerar apenas o bloco H ? Estou tendo um erro assinalado no código abaixo ( FFiscal.WriteBloco_H; <<<<< aqui ocorre a exceção ). var FFiscal: TACBrSPEDFiscal; begin FFiscal := TACBrSPEDFiscal.Create(nil) try FFiscal.Path := APath; FFiscal.Arquivo := AFile; FFiscal.LinhasBuffer := 5000; try with FFiscal.Bloco_H do begin with RegistroH001New do begin IND_MOV := imComDados; with RegistroH005New do begin DT_INV := GL_PERIODO; VL_INV := AVEstoque; MOT_INV := miFinalPeriodo; while not DM.sqlQry.Eof do begin with RegistroH010New do begin COD_ITEM := DM.sqlQry.FieldByName('CODIGO').AsString; case IsVazio(DM.sqlQry.FieldByName('UNIDADE').AsString) of False : UNID := DM.sqlQry.FieldByName('UNIDADE').AsString; True : UNID := 'PC'; end; QTD := DM.sqlQry.FieldByName('POSICAO').AsInteger; VL_UNIT := DM.sqlQry.FieldByName('PRECO_COMPRA').AsCurrency; VL_ITEM := DM.sqlQry.FieldByName('VALORITEM').AsCurrency; IND_PROP := piInformante; COD_PART := ''; TXT_COMPL := ''; COD_CTA := ACta; VL_ITEM_IR := DM.sqlQry.FieldByName('PRECO_COMPRA').AsCurrency; end; DM.sqlQry.Next; end; DM.sqlQry.Close; end; end; end; FFiscal.WriteBloco_H; <<<<< aqui ocorre a exceção . FFiscal.SaveFileTXT; finally FreeAndNil(FFiscal); end;

Oi @Juliana Tamizou, eu achei que fosse algo bem mais simples e eu estivesse sendo desatento. Conforme sua sugestão eu olhei o ACBrBancoItau.pas Na linha 807 tem essa instrução if PercentualMulta > 0 then begin inc( iSequencia ); wLinhaMulta:= '2' + // Tipo de registro - 2 OPCIONAL – COMPLEMENTO DETALHE - MULTA IfThen(MultaValorFixo,'1','2') + // Cocidgo da Multa 1- Cobrar Multa Valor Fixo / 2- Percentual / 0-Não cobrar multa ifThen((DataMulta > 0), FormatDateTime('ddmmyyyy', DataMulta), '00000000') + // Data da Multa 9(008) IntToStrZero( round(PercentualMulta * 100 ), 13) + // Valor/Percentual 9(013) space(371) + // Complemento IntToStrZero(iSequencia , 6); // Sequencial aRemessa.Add(UpperCase(wLinhaMulta)); end; No registro obrigatório existe essa mesma informação, linhas 583 IfThen((PercentualMulta > 0), IfThen(MultaValorFixo,'1','2'), '0') + // 066 a 066 1- Cobrar Multa Valor Fixo / 2- Percentual / 0-Não cobrar multa IfThen((PercentualMulta > 0), FormatDateTime('ddmmyyyy', DataMulta), '00000000') + // 067 a 074 Se cobrar informe a data para iniciar a cobrança ou informe zeros se não cobrar IfThen( (PercentualMulta > 0), IntToStrZero(round(PercentualMulta * 100), 15), PadRight('', 15, '0')) Veja que as variáveis elas se repetem portanto mudar o Flag por outra não vai ter efeito Lógico que como os fontes são abertos, eu posso alterar e resolver a minha situação, mas talvez fosse melhor uma solução que pudesse ser adicionada aos fontes originais.

Oi @Juliana Tamizou, obrigado pelo seu retorno. Realmente o titulo do tópico está mal formulado, pois não é quebra de linha e sim um registro opcional ( se puder mudar para mim agradeço ) O problema na verdade é que esta sendo gerado esse detalhe e deve ser por alguma falta de configuração pois é opcional. No exemplo que coloquei acima 2|2|2408202|00000000000300 000003 O que não deve ser informado para que esse registro Opcional não seja gerado junto ?

Caros uma dúvida, não estou dizendo que é um BUG, pode ser algo que não configurei corretamente. O ITAU possui um aplicativo de geração de boleto SISCOB, nos boletos gerados por esse aplicativo o arquivo de remessa é gerado com muito menos quebra de linhas Por exemplo : Um único vencimento o SISCOB gera : ( os pontilhados são apenas para formatar, não existem ) 01REMESSA01COBRANCA ................................... 000001 10100099999999999581700299109 0000 .... 000002 9 ............................................................................ 000003 O arquivo gerado pelo ACB contém 4 01REMESSA01COBRANCA ................................... 000001 10100099999999999581700299109 0000 .... 000002 22240820200000000000300 ............................ 000003 9 ............................................................................ 000004 Para cada titulo é gerado duas linhas. Isso é configuração de alguma propriedade ? Não dá erro, o arquivo é recepcionado e processado. Mas o cliente que usava o SISCOB que estava acostumado ao ver o resultado da recepção do remessa em linhas aumentado é que acusou isso como sendo um problema. Agradeço o esclarecimento desde já, obrigado.

Oi @Daniel Simoes , vlw pelo retorno. Para quem tiver essa necessidade eu resolvi da seguinte forma: unit RLPreviewForm; << FORTES linha 1405 procedure TRLPreviewForm.SpeedButtonPrintClick(Sender: TObject); linha 1417 // RLPrinter.Copies := 1; linha 1423 // dialog.Copies := 1; Basta comentar essas duas linhas e ai a quantidade de vias alimentada no componente vai ser mantida. Abraços.

Caros o Fortes CE esta na Revision: 503 o ACBr na Revision: 22850 Usando o DEMO do ACBrNFe Mesmo estando em ACBrNFeDANFeRL1.NumCopias := 3 O preview abre com 1, se ignorar e mandar imprimir so imprime 1 , somente alterando na mão para 3 que é respeitado. Com certeza absoluta em algum ponto quando se alimentava ACBrNFeDANFeRL1.NumCopias = n copias o Preview aparecia o numero de cópias definido. Alguma luz por favor. Obrigado

Tranquilo @Victor H. Gonzales - Panda a postagem foi mais para alertar os demais usuários. O IBPT pegou para ele a responsabilidade da Lei de Tributos e antes divulgava uma tabela de 6 meses, agora faz isso mensal e mesmo assim inexata.

Abri um tópico novo por orientação do G Panda. A tabela de NCM do IBPT com validade de 01/09/2021;30/09/2021 , 21.2.C não contém os NCMs novos NT 2016.003 e mantém os excluídos. O cliente pode ate cadastrar o NCM ausente, mas não tem como calcular o valor dos tributos.

Muito obrigado @Victor H. Gonzales - Panda pelo esclarecimento. Confesso que achava que o IBPT elaborava essa tabela observando essas NTs. Até porque eu usei a tabela novinha deles com data de validade a partir de hoje. Vou encaminhar essa NT ao cliente e ele repassar ao contador. Obrigado.

Caros informo que houve rejeição de NFCe por inexistência de NCM "85393100" tabela atualizada e NCM ate 31/08 ,. foi baixada a nova e para espanto conta como válido, a nota somente foi envaida mudando o NCM do produto 85393100;;0;"Lampadas/tubos descarga,fluorescente,de catodo quente";18.66;26.76;20.00;0.00;01/09/2021;30/09/2021;2BCEA2;21.2.C;IBPT/empresometro.com.br Não sei se é fato isolado. Abraços

Oi @RicardoVoigt eu fiz uns testes em cima do que falou mas não deu certo aqui, talvez por inexperiência. Fiz uma postagem no Issues do Fortes Adição de Nova Propriedade #284 para o Juliomar com as duas units alteradas. Com a propriedade InitialDir no RLPreviewSetup basta acrescentar ele no mesmo form de onde esta a DANFERL, sem nenhuma mudança no ACBr. Alimentando a propriedade ao se aperta o botão de selecionar o savedialog vinculado já fica setado e no edit já aparece esse caminho para que o usuario possa colocar o nome que quiser no arquivo. Para não atrapalhar eu mantive a mesma logica anterior se não tiver setado InitialDir o edit recebe apenas o nome do arquivo. Valeu a ajuda.

Realmente, eu peguei o exemplo da NFe mudei as informações para a CSOSN 900 , e destaquei vBcFCP, pFCP, vFCP e não foi gerado no XML. Eu ainda tentei argumentar que so vejo destaque de FCP em empresa diferente do SIMPLES NACIONAL. Valeu obrigado.

Caros, o contador de uma empresa ( LUCRO REAL ) que aguarda uma NOTA de DEVOLUÇÃO de empresa ( SIMPLES NACIONAL ) quer que seja destacado no XML a TAG FCP sob a CSOSN 900. Mas essa TAG não é gerada, mesmo informando vBCFCP, pFCP, vFCP . Realmente não é gerado ? Poderiam me ajudar ? Achei a seguinte informação em uma informação de contabilidade : a) no campo de "Informações Adicionais do Produto", os valores informados por item nos campos (vBCFCP, pFCP, vFCP, vBCFCPST, pFCPST, vFCPST), quando existirem; b) os valores de totais do FCP devem ser informados em "Informações Adicionais de Interesse do Fisco, quando existirem. Obrigado.

Vou dar uma olhada na semana que vem, vlw

Oi @RicardoVoigt , como também não sei como contribuir com o Fortes pelo GitHub e ficaria na dependência primeiro deles. Teria uma necessidade posterior do Team do Acbr , isso se entendessem útil, de implementarem no código, então resolvi de uma forma que não precisa da alteração nos repositórios. Em anexo estão 4 arquivos que devem ser incluídos na aplicação ( RLPreviewForm.pas , RLSaveDialog.pas , ACBrNFeDANFeRL.pas , ACBrNFeDANFeRL.dfm ) . Testei usando o exemplo da NFe , tive que dar uses em ACBrNFeDANFeRL e acessei assim : TfrlDANFeRL(ACBrNFe1.DANFE).SetInitialDir('C:\'); ACBrNFe1.NotasFiscais.Imprimir; Para ter certeza de que os componentes estavam no default deles, eu exclui as pastas do Fortes e o ACBr , e instalei do zero pelo instalador. No exemplo de NFe do ACBr coloquei as units junto aos fontes e adicionei nas uses, build e funcionou. Desconsiderem as units anteriores pois houve pequenas modificações. Se entender Ok, pode fechar Lib.zip

Você já mostrou aos clientes que a CFOP é por produto ? Que esse campo é apenas TEXTO ? Não sofre outra validação que não seja estar vazio. Isso no tempo de nota em formulário, era comum.

Não haveria relação com esse post :

Oi @RicardoVoigt por desconhecer o ACBr posso ter feito a coisa de uma forma mais dificil. Para testar eu coloquei um componente RLPreviewSetup no form ACBrNFeDANFeRL , criei a class procedure SetInitialDir(aValue:string); As units estão em anexo. Fiz a reinstalação pelo instalador e correu normal. Testei pelo exemplo da NFe , tive que dar uses em ACBrNFeDANFeRL e acessei assim : TfrlDANFeRL(ACBrNFe1.DANFE).SetInitialDir('C:\'); e ao clicar no botão selecionar é direcionado ao ponto. Se eu colocar as units ACBrNFeDANFeRL.pas e ACBrNFeDANFeRL.dfm no meu projeto isso faria com que essas units é que fossem consideradas na compilação do executável em detrimento das que ficam dentro da pasta Fortes ? ACBrNFeDANFeRL.dfm ACBrNFeDANFeRL.pas