Ir para conteúdo
  • Cadastre-se

dev botao

Detalhamento dos serviços - Fortes Report


  • Este tópico foi criado há 1865 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Bom dia

 

Estou utilizando o  componente TACBrNFSeDANFSeRL para imprimir as notas de serviço. (FortesReport)

Quando utilizo a opção DetalharServico marcada, gera a impressão com os títulos do detalhamento do serviço, mas sem as informações.

Nfse.thumb.png.5dea985c1ec45842f0519974cd62c3ce.png

Preciso configurar algo ou esta com problema?

 

Alguém pode me auxiliar?

 

 

Link para o comentário
Compartilhar em outros sites

  • Consultores

Boa tarde Alexandro,

Como as informações sobre o serviço consta no XML?

Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

Boa tarde Italo

 

O serviço no xml esta assim:

 

-<Servico>
    -<Valores>
        <ValorServicos>100.00</ValorServicos>
        <IssRetido>2</IssRetido>
        <ValorIss>4.00</ValorIss>
        <BaseCalculo>100.00</BaseCalculo>
        <Aliquota>0.0004</Aliquota>
        <ValorLiquidoNfse>100.00</ValorLiquidoNfse>
    </Valores>
<ItemListaServico>07.01</ItemListaServico>
<Discriminacao>{[[Descricao=ELABORACAO DE PROJETO] [ItemServico=701][Quantidade=1.000] [ValorUnitario=100.00][ValorServico=100.00][ValorBaseCalculo=100.00][Aliquota=4.00][Deducoes=0.00]]}</Discriminacao>
<CodigoMunicipio>4202909</CodigoMunicipio>
</Servico>

Esta correto?

 

Observei que na procedure:

...\ACBr\Fontes\ACBrDFe\ACBrNFSe\DANFSE\Fortes\ACBrNFSeDANFSeRLRetrato.pas

procedure TfrlDANFSeRLRetrato.subItensDataRecord(Sender: TObject;
   RecNo: Integer; CopyNo: Integer; var Eof: Boolean;
   var RecordAction: TRLRecordAction);
begin
  inherited;
  FNumItem := RecNo - 1 ;
  Eof := (RecNo > fpNFSe.Servico.ItemServico.Count) ;
  RecordAction := raUseIt ;
end;

 

Ao inspecionar esta linha fpNFSe.Servico.ItemServico.Count, sempre traz zero.

 

Não consegui identificar o problema.

Link para o comentário
Compartilhar em outros sites

  • Consultores

Boa tarde Alexandro,

Qual é o provedor?

Você poderia anexar o XML da NFS-e?

Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

  • Consultores

Boa tarde Alexandro,

Você anexou o XML de envio do Lote de RPS, eu pedi o XML da NFS-e que é retornado pelo webservice do provedor caso o RPS seja processado com sucesso.

  • Curtir 1
Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 1865 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.