Impressão 'C.P. ANVISA ' na tag referente a cprodanvisa

[gutopmc]

Boa tarde! Cliente quer que troque o 'C.P. ANVISA ' por 'REGISTRO ANVISA ' na impressão do danfe. Tem como fazer isso? Esse texto é previsto , ou seja, tem uma nota que peça seu uso para  que eu possa demostrar para o cliente que tem que ser assim?

 

 

[Juliomar Marchetti]

  Em 08/08/2024 at 16:24, gutopmc disse:

Boa tarde! Cliente quer que troque o 'C.P. ANVISA ' por 'REGISTRO ANVISA ' na impressão do danfe. Tem como fazer isso? Esse texto é previsto , ou seja, tem uma nota que peça seu uso para  que eu possa demostrar para o cliente que tem que ser assim?

 

 

Expandir  

estava olhando e não tem em lugar algum a especificação desse campo.

se achar no manual por favor posta pra nós

[gutopmc]

  Em 08/08/2024 at 19:31, Juliomar Marchetti disse:

estava olhando e não tem em lugar algum a especificação desse campo.

se achar no manual por favor posta pra nós

Expandir  

Achei aonde esta a impressão:  Fontes/ACBrDFe/ACBrNFe/DANFE/ACBrNFeDANFEClass.pas. Vou alterar no fonte!

 for i := 0 to med.Count - 1 do
      begin
        if (aNFE.infNFe.Versao >= 4) then
          Result := Result + 'C.P. ANVISA ' + med.Items[i].cProdANVISA + sQuebraLinha
        else
        begin
          if (dm_nLote in FDetMedicamentos) then
            Result := Result + 'LOTE: ' + med.Items[i].nLote + sQuebraLinha;
          if (dm_qLote in FDetMedicamentos) then
            Result := Result + 'QTD: ' + FormatFloatBr(med.Items[i].qLote, FloatMask(3)) + sQuebraLinha;
          if (dm_dFab in FDetMedicamentos) then
            Result := Result + 'FAB: ' + DateToStr(med.Items[i].dFab) + sQuebraLinha;
          if (dm_dVal in FDetMedicamentos) then
            Result := Result + 'VAL: ' + DateToStr(med.Items[i].dVal) + sQuebraLinha;
        end;

        if (dm_vPMC in FDetMedicamentos) then
          if (med.Items[i].vPMC > 0) then
            Result := Result + 'PMC: R$' + FormatFloatBr(med.Items[i].vPMC) + sQuebraLinha;
      end;

[BigWings]

Usar "Registro ANVISA" realmente me parece melhor.

[Juliomar Marchetti]

  Em 08/08/2024 at 19:48, gutopmc disse:

Achei aonde esta a impressão:  Fontes/ACBrDFe/ACBrNFe/DANFE/ACBrNFeDANFEClass.pas. Vou alterar no fonte!

 for i := 0 to med.Count - 1 do
      begin
        if (aNFE.infNFe.Versao >= 4) then
          Result := Result + 'C.P. ANVISA ' + med.Items[i].cProdANVISA + sQuebraLinha
        else
        begin
          if (dm_nLote in FDetMedicamentos) then
            Result := Result + 'LOTE: ' + med.Items[i].nLote + sQuebraLinha;
          if (dm_qLote in FDetMedicamentos) then
            Result := Result + 'QTD: ' + FormatFloatBr(med.Items[i].qLote, FloatMask(3)) + sQuebraLinha;
          if (dm_dFab in FDetMedicamentos) then
            Result := Result + 'FAB: ' + DateToStr(med.Items[i].dFab) + sQuebraLinha;
          if (dm_dVal in FDetMedicamentos) then
            Result := Result + 'VAL: ' + DateToStr(med.Items[i].dVal) + sQuebraLinha;
        end;

        if (dm_vPMC in FDetMedicamentos) then
          if (med.Items[i].vPMC > 0) then
            Result := Result + 'PMC: R$' + FormatFloatBr(med.Items[i].vPMC) + sQuebraLinha;
      end;

Expandir  

Sim. isso eu vi onde estava. falei que não diz em lugar algum o que escrever

mas dá pra seguir o que falou o nosso amigo

  Em 08/08/2024 at 20:00, BigWings disse:

Usar "Registro ANVISA" realmente me parece melhor.

Expandir  

 

[Pedro A. Araújo]

@gutopmc Bom dia
Essa informação não é exibida no DANFe, porém, as distribuidoras de medicamentos costumam informar esses detalhes nas informações adicionais do item.

Editado 9 Agosto, 2024 por Pedro A. Araújo

[Juliomar Marchetti]

Bom dia

favor testar está no svn