Pesquisar na Comunidade
Showing results for tags 'classificação de serviços'.
Encontrado 1 registro
-
Ao imprimir o PDF, está cortando o código da classificação de serviços, em vez de imprimir "14.10.01" está imprimindo "14.10." O código da classificação de serviços do provedor SIGISSWEB ele vem com o código completo no retorno ao emitir a NFS-e: <id_codigo_servico>14.10.01</id_codigo_servico> Logo ao executar o ACBrNFse.NotasFiscais.ImprimirPDF, dentro do componente ACBrNFSeXDANFSeFR na linha 1316 o "LCDS.FieldByName('ItemListaServico').AsString := LServico.ItemListaServico" o "LServico.ItemListaServico" mostra código inteiro (14.10.01) enquanto no "LCDS.FieldByName('ItemListaServico').AsString" acaba armazenando os 6 primeiros caracteres (14.10.), por conta que no próprio ACBrNFSeXDANFSeFR na linha 508 : "cdsServicos.FieldDefs.Add('ItemListaServico', ftString, 6);" está setado como padrão 6 caracteres, pra corrigir isso percebi 2 soluções: Mudar o "cdsServicos.FieldDefs.Add('ItemListaServico', ftString, 6);" pra 8 pra imprimir o código por completo "14.10.01" ou Na linha "LCDS.FieldByName('ItemListaServico').AsString := LServico.ItemListaServico" ter uma função para extrair somente os números do LServico.ItemListaServico "141001"
