codigo de serviços

[Antonio Alexanadre]

 

Bom dia, gostaria de pedir ao moderador ver a possibilidade de incluir esses codigos de serviços,  no acbr tanto no trunc1 e truck2 esse codigos se da Prefeitura de São paulo e ao gerar a danfe se informar alguns desses codigo a descrição do danfe aparece sem a descrição

  7870: r := 'Vigilância, segurança ou monitoramento de bens e pessoas';
  3115: r := 'Assessirua ou consultoria de qualquer natureza não contida em outros itens desta lista';
  7285: r := 'Instalação e montagem de aparelhos, maquinas e equipamentos.';
  3085: r := 'Serviços de pesquisas e desenvolvimento de qualquer natureza.';
  2682: r := 'Processamento de dados.';
  2798: r := 'Licenciamento ou cessão de direito de uso de programas de computação, inclusive distribuição.';
  2917: r := 'Suporte técnico em informática.';
  2933: r := 'Planejamento, confecção, manutenção e atualização de páginas eletrônicas.';
  6564: r := 'Cobranças e recebimentos por conta de terceiros.';
  3204: r := 'Administração de bens e negócios emm geral incluive de terceiros, exceto imoveis.';
  6298: r := 'Agenciamento, corret. Intermed bens móveis, não abrangidos em outros itens por quaisquer meios.';

 2800: r := 'Licenciamento ou cessão de direito de uso de programas de computação, inclusive distribuição.';

Outra coisa ACBrNFSeDANFSeFRDM.pas

na hora de carregar o serviços metodo valores  mutiplicar a aliquota por 100

 FieldByName('Aliquota').AsFloat                 := Aliquota * 100;

e no total do nota já aparecer com com 2 zeros depois da virgula

 

Eu tenho o habito de sempre atualizar o acbr mas as vezes esta dando erro qdo baixo o acbr

desde ja agradeço

 

 

 

 

 

[Italo Giurizzato Junior]

Bom dia Antônio,

Quanto aos serviços, existe um arquivo TXT chamado TabServicos, ele se encontra na pasta: ...\Exemplos\ACBrDFe\ACBrNFSe\Delphi

Inclua eles nesse arquivo e configura o componente para usar esse arquivo em vez da tabela interna dele.

Mas se desejar alterar a tabela interna, ela se encontra na unit pnfsConversao.