Preenchimento do campo CHV_NFE no Sped-EFD para notas de entrada

[Former Member]

Boa tarde,

Estou gerando o Sped-EFD com o campo chv_nfe sendo obrigatório a partir de 1 de Maio, mas o campo não está sendo preenchido.Eu já apliquei a nota  1694397 mas o campo continua vazio. Alguém já implementou essa obrigação?

Obrigado pela jauda

[Former Member · Accepted solution]

Obs. As chaves das nfe estão sendo geradas somente para notas de saída.

[Former Member · Accepted solution]

Olá, Alexandre, tudo bem?

Resolvemos o problema em um cliente implementando a BADI montando a chave da NF-e para Notas de Entrada.

A implementação foi realizada no Método SET_BLOCK_C_REG_C100_ALL.

<...> parte do código

*******  NF-e  *******

if cs_c100-cod_mod eq '55'.

      data:   l_code_d      type j_1bnfdoc-code,

                 l_code_a      type j_1bnfdoc-code,

                 l_docstat_d   type j_1bnfdoc-docstat,

                 l_docstat_a   type j_1bnfdoc-docstat,

                 l_cancel_a   type j_1bnfdoc-cancel,

                 l_cancel_d   type j_1bnfdoc-cancel,

                 l_docnum     type j_1bnfdoc-docnum,

                l_subrc       type sy-subrc.

*** Variáveis locais para chave de acesso

      data: vl_regio    type j_1bnfe_active-regio,

               vl_nfyear   type j_1bnfe_active-nfyear,

                       vl_nfmonth  type j_1bnfe_active-nfmonth,

               vl_stcd1    type j_1bnfe_active-stcd1,

               vl_model    type j_1bnfe_active-model,

               vl_serie    type j_1bnfe_active-serie,

               vl_nfnum9   type j_1bnfe_active-nfnum9,

               vl_docnum9  type j_1bnfe_active-docnum9,

               vl_cdv      type j_1bnfe_active-cdv.

*** Busca Chave de Acesso

      if cs_c100-chv_nfe is initial.

        select single regio nfyear nfmonth stcd1 model serie nfnum9 docnum9 cdv

          into (vl_regio, vl_nfyear, vl_nfmonth, vl_stcd1, vl_model, vl_serie, vl_nfnum9, vl_docnum9, vl_cdv)

          from j_1bnfe_active

          where docnum eq l_docnum

            and branch eq <branch>.

        if sy-subrc eq 0.

          concatenate vl_regio vl_nfyear vl_nfmonth vl_stcd1 vl_model vl_serie vl_nfnum9 vl_docnum9 vl_cdv into cs_c100-chv_nfe.

        endif.

      endif.

endif.

....

Depois da implementação, todas a notas eletrônicas de entrada são relacionadas com a chv_nfe.

Espero que ajude no seu caso.

Abs.

Att.,

Fábio Cirino

[Former Member · Accepted solution]

Eu implentei o código.

Obrigado pela ajuda Fabio.

Abraço.

[Former Member · Accepted solution]

Maravilha Alexander.

Que ótimo que lhe ajudou.

Abs.

Att.,

Fábio Cirino.