Novo componente NFSEx - Provedor IPM - Modelo-SC - Impressão DANFSe

[Léo]

Boa tarde !, 

Tenho um caso de um XML de  NFS-e, com um com a descrição com mais de 1.100 caracteres, só que na DANFS-e para fast Report imprime somente 258 caracteres.

Fiz uma busca geral e tentei encontrar o local onde poderia alterar, mas não encontrei.

alguém já passou por isso?

 

att Léo 

[Dercide Alvarez]

Bom dia,

Qual é a cidade que vc esta testando ?

Senão me engano com o IPM pode incluir vários itens na nota, usando :

Servico.ItemServico.New

 

 

[Léo]

39 minutos atrás, Dercide Alvarez disse:

Bom dia,

Qual é a cidade que vc esta testando ?

Senão me engano com o IPM pode incluir vários itens na nota, usando :

Servico.ItemServico.New

 

 

Bom dia !, sim, estou considerando isso, encontrei o problema que estava considerando 256 caracteres para cada item, mas o problema já resolvi, alterando o limite de caracteres. 

Obrigado por responder.

[Léo]

16 horas atrás, Léo disse:

Boa tarde !, 

Tenho um caso de um XML de  NFS-e, com um com a descrição com mais de 1.100 caracteres, só que na DANFS-e para fast Report imprime somente 258 caracteres.

Fiz uma busca geral e tentei encontrar o local onde poderia alterar, mas não encontrei.

alguém já passou por isso?

 

att Léo 

Bom dia @Italo Giurizzato Junior !

Encontrei a situação, solucionei da seguinte forma:

Na Unit ACBrNFSeXDANFSeFR

especificamente neste trecho abaixo: na linha marcada em AMARELO, alterado o tamanho do campo de 256 para 2000 caracteres.

 

  cdsItensServico := TClientDataSet.Create(nil);
  with cdsItensServico do
  begin
    Close;
    with FieldDefs do
    begin
      Clear;
      Add('DiscriminacaoServico', ftString, 2000); // Add('DiscriminacaoServico', ftString, 256);
      Add('Quantidade', ftString, 10);
      Add('ValorUnitario', ftString, 30);
      Add('ValorTotal', ftString, 30);
      Add('Tributavel', ftString, 1);
      Add('Unidade', ftString, 3);
      Add('Aliquota', ftString, 30);
      Add('AliquotaISSST', ftString, 30);
      Add('ValorISSST', ftString, 30);
      Add('DescontoIncondicionado', ftString, 30);
    end;
    CreateDataSet;
    LogChanges := False;
  end;

ACBrNFSeXDANFSeFR.pas

[Italo Giurizzato Junior]

Boa tarde Léo,

Muito obrigado pela colaboração, já inclui na minha lista de tarefas. TK-2886

[Léo]

Em 09/07/2022 at 15:27, Italo Giurizzato Junior disse:

Boa tarde Léo,

Muito obrigado pela colaboração, já inclui na minha lista de tarefas. TK-2886

Bom dia Italo !,

Ainda referente a esta alteração da quantidade de caracteres da descrição da lista de Itens de 256 para 2000 caracteres. Fiz uma alteração no "DANFSeNovo.fr3", especificamente no subReport1 Itens de serviços no objeto texto "ItensServicoDiscriminacaoServico", alterando o tamanho da fonte de 7 para 6, desta forma aumentando a área de impressão e não interfere na legibilidade.

Grato pela atenção.

DANFSeNovo.fr3

[Italo Giurizzato Junior]

Bom dia Léo,

Já esta no SVN.