bhiss CodigoTributacaoMunicipio na Danfse de Belo Horizonte

[RonBrisola]

Olá.

Estou querendo usar a impressão da danfse com os xmls da prefeitura de Belo Horizonte.

Porém, no modelo implementado com o componente Fortes a tag CodigoTributacaoMunicipio não está sendo impressa em nenhum lugar.

Há alguma forma de imprimir essa tag?

Percebo também que está sendo impresso um espaçamento em branco na margem direita do formulário.

201900000000x01-nfse.xml

[Italo Giurizzato Junior]

Bom noite,

Você tem um outro modelo do DANFSE que mostra onde deve ser impresso o código de tributação do município?

[RonBrisola]

Bom dia Italo.

Segue a nfse como é gerada no site da prefeitura de Belo Horizonte.

[Felipe Augusto R.]

Boa tarde pessoal.

Pesquisei, mas não encontrei nos fontes atualizados do ACBr.
Houve alguma implementação referente a exibição da tag CodigoTributacaoMunicipio no DANFSe ?

[Italo Giurizzato Junior]

Boa tarde Felipe,

Acredito que não foi, caso tenha interesse em colaborar com o projeto, fique a vontade de fazer as alterações.

Depois anexe aqui para que possamos analisar, caso esteja tudo OK enviaremos para o repositório.

[RonBrisola]

O problema maior é a descrição da tributação que não consta no xml.
Essa tabela de códigos é muito grande, não sei se seria possível fazer o mesmo que é feito com o FxItemListaServico, em que há uma tabela com as descrições no próprio código do componente.

Eu resolvi aqui criando a propriedade no objeto TDadosServico.
Então, antes de imprimir a nota eu busco o código numa tabela no meu banco de dados e atribuo à propriedade.

  public
    constructor Create;
    destructor Destroy; override;

    property xCodigoTributacaoMunicipio: ansiString read FxCodigoTributacaoMunicipio write FxCodigoTributacaoMunicipio;  //BHIss

            if FindKey([ facbrNFSE.NotasFiscais.Items[n].NFSe.Servico.CodigoTributacaoMunicipio ]) then
               facbrNFSE.NotasFiscais.Items[n].NFSe.Servico.xCodigoTributacaoMunicipio := FormatMaskText('0000-0/00-00;0;',
                                                                                                         PadL(facbrNFSE.NotasFiscais.Items[n].NFSe.Servico.CodigoTributacaoMunicipio, '0', 9)) +
                                                                                          ' - ' + FieldByName('DESCRCNAE').AsString;

 

Entendo que o que fiz atende só ao meu uso do componente, não sei se é possível acrescentar no projeto.

 

[Italo Giurizzato Junior]

Bom dia,

Favor anexar as units alteradas para que possamos analisar.

[RonBrisola]

Em 13/01/2020 at 11:08, Italo Jurisato Junior disse:

Bom dia,

Favor anexar as units alteradas para que possamos analisar.

Olá.

Desculpem-me pela demora.

Aqui estão os arquivos que editei para poder usar a impressão com o provedor de Belo Horizonte.

impressaoBHISS.zip

[RonBrisola]

Em tempo, segue abaixo um print de como ficou a impressão da danfse

[Juliana Tamizou]

Boa tarde.

Obrigada pela contribuição, adicionada para validação.

Att.

[Italo Giurizzato Junior]

Boa tarde RonBrisola,

Muito obrigado pela colaboração, já foi enviado para o repositório.

[RonBrisola]

Eu que agradeço Italo

[Italo Giurizzato Junior]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.