Jump to content

click.png

click.png

click.png

click.png

click.png

click.png

click.png click.png click.png

click.png

click.png

click.png

click.png

click.png

click.png

edf

Membros
  • Posts

    14
  • Joined

  • Last visited

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

edf's Achievements

Apprentice

Apprentice (3/14)

  • First Post
  • Collaborator Rare
  • Week One Done
  • One Month Later
  • One Year In

Recent Badges

2

Reputation

  1. edf

    Evento S2221

    Boa tarde. Durante implementação do evento S-2221, verifiquei que o schema utilizado para validação do XML está incorreto, usando schevtInsApo ao invés de schEvtToxic Também, está faltando a geração dos dados do Vínculo e Empregador Segue unit. Obrigado pcesS2221.pas
  2. Seguem os arquivos. pcesS2210.pas pcesGerador.pas
  3. Bom dia galera. Quando fui gerar o evento S-2210 ocorreu rejeição na versão 2_05_00 onde faltou gerar os dados do empregador na linha 574 no arquivo pcesS2210.pas, alterei o arquivo conforme abaixo adicionando GerarIdeEmpregador(Self.IdeEmpregador); function TEvtCAT.GerarXML: boolean; begin try Self.VersaoDF := TACBreSocial(FACBreSocial).Configuracoes.Geral.VersaoDF; Self.Id := GerarChaveEsocial(now, Self.ideEmpregador.NrInsc, Self.Sequencial); GerarCabecalho('evtCAT'); Gerador.wGrupo('evtCAT Id="' + Self.Id + '"'); GerarIdeEvento2(Self.IdeEvento); GerarIdeEmpregador(Self.IdeEmpregador); GerarIdeVinculo(Self.IdeVinculo); GerarCAT; Gerador.wGrupo('/evtCAT'); GerarRodape; XML := Assinar(Gerador.ArquivoFormatoXML, 'evtCAT'); Validar(schevtCAT); except on e:exception do raise Exception.Create('ID: ' + Self.Id + sLineBreak + ' ' + e.Message); end; Result := (Gerador.ArquivoFormatoXML <> '') end; Também, ocorreu a rejeição na validação porque o número de inscrição no órgão de classe na linha 1581 do arquivo pcesGerador.pas do eSocial está com a nomenclatura diferente, está "nrOc" ao invés de "nrOC", alterei o arquivo e a validação passou certo: procedure TeSocialEvento.GerarEmitente(pEmitente: TEmitente); begin Gerador.wGrupo('emitente'); Gerador.wCampo(tcStr, '', 'nmEmit', 1, 70, 1, pEmitente.nmEmit); Gerador.wCampo(tcStr, '', 'ideOC', 1, 1, 1, eSIdeOCToStr(pEmitente.ideOC)); Gerador.wCampo(tcStr, '', 'nrOC', 1, 14, 1, pEmitente.nrOc); Gerador.wCampo(tcStr, '', 'ufOC', 2, 2, 0, pEmitente.ufOC);//eSufToStr(pEmitente.ufOC)); Gerador.wGrupo('/emitente'); end;
  4. Para enviar a carta de correção eu utilizei o StringReplace para alterar o ç e ã. Eventos := NativeStringToUTF8( StringReplace(StringReplace(EventoCTe.Gerador.ArquivoFormatoXML, 'ç', 'c', []), 'ã', 'a', []) ); O evento foi enviado.
  5. Estou tentando enviar uma carta de correção e após gerar o XML do evento tem um tratamento a acentuação que retorna uma rejeição da receita. Esse tratamento está no arquivo ACBrCTeWebServices.pas linha 2717: NativeStringToUTF8( EventoCTe.Gerador.ArquivoFormatoXML ) Após esse tratamento, a tag descEvento que está com "Carta de correção" é alterada para "Carta de Correção" resultando no erro "Assinatura difere do padrão do projeto". <detEvento versaoEvento="3.00"> <evCCeCTe> <descEvento>Carta de Correção</descEvento> <infCorrecao> <grupoAlterado>ide</grupoAlterado> <campoAlterado>cMunIni</campoAlterado> <valorAlterado>4113908</valorAlterado> </infCorrecao> <xCondUso>A Carta de Correcao e disciplinada pelo Art. 58-B do CONVENIO/SINIEF 06/89: Fica permitida a utilizacao de carta de correcao, para regularizacao de erro ocorrido na emissao de documentos fiscais relativos a prestacao de servico de transporte, desde que o erro nao esteja relacionado com: I - as variaveis que determinam o valor do imposto tais como: base de calculo, aliquota, diferenca de preco, quantidade, valor da prestacao;II - a correcao de dados cadastrais que implique mudanca do emitente, tomador, remetente ou do destinatario;III - a data de emissao ou de saida.</xCondUso> </evCCeCTe> </detEvento> Tentei alterar a descrição do evento para "Carta de correcao" mas está buscando de outro lugar que não encontrei.
  6. Essa versão oculta o logo quando não tiver informado. DANFeNFCe4_10.fr3
  7. Alterei a posição da logo da DANFC-e versão 4.10 conforme manual versão 4.2 DANFeNFCe4_10.fr3
  8. Fiz as correções da acentuação, segue novo arquivo. DANFeNFCe4_10.fr3
  9. Não lembro de ter removido, vi agora com o comparer que está sem. Mando outro ou você altera?
  10. O arquivo no svn está com problema na acentuação. Segue outro para verificar. DANFeNFCe4_10.fr3
  11. Me desculpe, eu esqueci de mencionar que a alteração foi baseada no modelo DANFeNFCe4_10.fr3 Segue o arquivo correto. Por isso teve alterações de dataset. DANFeNFCe4_10.fr3
  12. Não fiz nenhuma alteração de dataset, apenas alterei as margens, tamanho do papel, pontuação dos totais que estavam com ponto ao invés de virgula e coloquei a informação "Via consumidor" que já existia no dataset.
  13. Foram alterados: Largura do papel que estava cortando em algumas impressoras, de 8 para 7,2 e removidas as bordas Ajustado alinhamento dos itens da nota Corrigido pontuação nos totais Adicionado Via Consumidor e Via Estabelecimento, quando necessário DANFeNFCe.fr3
  14. Bom dia a todos. Aqui na empresa nós usávamos a impressão da dacte no quickreport e migramos para o fast report e nós alteramos a marca d'água do fast pra ficar como no quick, "HOMOLOGAÇÃO - SEM VALOR FISCAL" e "CANCELADO" foi adicionado como campo do dataset e ficou de forma dinâmica a impressão do texto. Em anexo tem os arquivos. Espero que seja útil. Obrigado. ACBrCTeDACTEFRDM.dfm ACBrCTeDACTEFRDM.pas DACTE.fr3
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.