CE PLUS - Nota 006807

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: Nota Fiscal

Data/Hora da Publicação: 19/06/2008 00:00:00

Data/Hora Última Alteração: 23/02/2011 09:17:04

Descrição da Nota: NOTA FISCAL ELETRONICA.

Sintoma

Erro no bacth input (comprimento do campo NFNUM)

 

 

Solução

Atualização da nota fiscal para atender a nota fiscal eletronica.

 

Versões Tratadas

7.0


Pré-Requisitos

Produto:

Nota

Descrição

AJUSTE NOS PROGRAMAS DE EXPORTAÇÃO PARA ATENDER A NOTA FISCAL ELETRÔNICA

AJUSTES PARA ATENDER A GERAÇÃO DA NOTA FISCAL ELETRÔNICA VIA SAP

DUMP NO MOMENTO DE EMITIR A NOTA FISCAL, QUANDO AMBIENTE POSSUI NFE

DEFINIÇÃO DO CAMPO NFNUM

AO CRIAR NF QUANDO HÁ MAIS DE UM ITEM DÁ ERRO DE BATCH INPUT NA MENSAGEM

Informações Complementares

----------------------------------------------------------------------------------------------------

Nota Número 06807 Data: 19/06/2008 Hora: 11:11:39

----------------------------------------------------------------------------------------------------

 

----------------------------------------------------------------------------------------------------

Nota Número              : 06807

Categoria                : Melhoria

Prioridade               : Média

Versão PW.CE             : 7.0

Pacote                   : 00006

Agrupamento              : 00053

----------------------------------------------------------------------------------------------------

Referência às notas relacionadas:

Número - Ordem - Versão - Pacote - Descrição Breve

 

05047  - 00001 - 7.0    - 00003  - AO CRIAR NF QUANDO HÁ MAIS DE UM ITEM DÁ ERRO DE BATCH INPUT NA M

06573  - 00002 - 7.0    - 00005  - AJUSTES PARA ATENDER A GERAÇÃO DA NOTA FISCAL ELETRÔNICA VIA SAP

06651  - 00003 - 7.0    - 00005  - DUMP NO MOMENTO DE EMITIR A NOTA FISCAL, QUANDO AMBIENTE POSSUI N

06708  - 00005 - 7.0    - 00005  - DEFINIÇÃO DO CAMPO NFNUM

06798  - 00004 - 7.0    - 00006  - AJUSTE NOS PROGRAMAS DE EXPORTAÇÃO PARA ATENDER A NOTA FISCAL ELE

----------------------------------------------------------------------------------------------------

NOTA FISCAL ELETRONICA.

----------------------------------------------------------------------------------------------------

Palavras Chave:

NOTA FISCAL ELETRONICA - NFE - NF-E

 

----------------------------------------------------------------------------------------------------

Objetos da nota:

FUNC /PWS/ZYCI_TRANSACAO_J1B1N

 

*---------------------------------------------------------------------------------------------------

*---------------------------------------------------------------------------------------------------

*---------------------------------------------------------------------------------------------------

*---------------------------------------------------------------------------------------------------

*---------------------------------------------------------------------------------------------------

*---------------------------------------------------------------------------------------------------

OBSERVAÇÕES:

 

Caso a nota 6798 não esteja aplicada no ambiente:

 

Modificações efetuadas em DTEL /PWS/ZYCEL719

 

------------------------------------------------------------------------

Elemento de dados incluído: /PWS/ZYCEL719

Classe de desenvolvimento: /PWS/ZYCE

Idioma original: PT

Descrição breve incluída: (26 caracteres), idioma: PT

"CE - Número de Nota Fiscal"

Categoria de dados: Domínio

Domínio: NUM9

ID parâmetro:

Nome componente default:

Documentar modificações: NÃO

Nome da ajuda de pesquisa:

Parâmetro da ajuda de pesquisa:

Comprimento máximo do denominador breve: 10

Denominador breve incluído (5 caracteres), idioma: PT

"Nº NF"

Comprimento máximo do denominador médio: 15

Denominador médio incluído (14 caracteres), idioma: PT

"Nº Nota Fiscal"

Comprimento máximo do denominador longo: 20

Denominador longo incluído (14 caracteres), idioma: PT

"Nº Nota Fiscal"

Comprimento máximo do título: 14

Título incluído (14 caracteres), idioma: PT

"Nº Nota Fiscal"

----------------------------------------------------------------------------------------------------

Modificações efetuadas em TABD /PWS/ZYCEE005

 

Alterar o elemento de dados do campo NFNUM:

 

DE:

 NFNUM      J_1BNFNUMB                 NUMC     6

 

PARA:

 NFNUM      /PWS/ZYCEL719              NUMC     9

 

OBSERVAÇÕES - FIM

*---------------------------------------------------------------------------------------------------

*---------------------------------------------------------------------------------------------------

*---------------------------------------------------------------------------------------------------

*---------------------------------------------------------------------------------------------------

*---------------------------------------------------------------------------------------------------

*---------------------------------------------------------------------------------------------------

 

Modificações efetuadas em FUNC /PWS/ZYCI_TRANSACAO_J1B1N

 

...

 

* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSACAO_J1B1N

    v_direito LIKE t_itens-taxlw1.

* << Fim da exclusão

* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_J1B1N

    v_direito LIKE t_itens-taxlw1,

    v_nfnum LIKE j_1bdydoc-nfnum.

* << Fim da inclusão

...

 

...

 

      PERFORM bdc_campo USING:

                'J_1BDYDOC-NFENUM'         t_dados-nfnum,

                  'BDC_OKCODE'              '=TAB5'.

    ELSE.

* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_J1B1N

        MOVE t_dados-nfnum TO v_nfnum.

* << Fim da inclusão

      PERFORM bdc_campo USING:

* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSACAO_J1B1N

                'J_1BDYDOC-NFNUM'         t_dados-nfnum,

* << Fim da exclusão

* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_J1B1N

                  'J_1BDYDOC-NFNUM'         v_nfnum,

* << Fim da inclusão

                  'BDC_OKCODE'              '=TAB5'.

    ENDIF.

...

 

...

 

    READ TABLE itab_oculto WITH KEY campo = 'J_1BDYDOC-NFNUM'.

    IF sy-subrc <> 0 AND v_refer NE '0004'.

      PERFORM bdc_campo  USING:

* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSACAO_J1B1N

             'J_1BDYDOC-NFNUM'         t_dados-nfnum,

* << Fim da exclusão

             'J_1BDYDOC-SERIES'        t_dados-series,

             'J_1BDYLIN-ITMTYP'        t_itens-itmtyp,

             'J_1BDYLIN-MATNR'         t_itens-matnr,

             'J_1BDYLIN-MAKTX'         t_itens-maktx,

             'J_1BDYLIN-MATKL'         t_itens-matkl,

             'J_1BDYLIN-WERKS'         t_itens-werks,

             'J_1BDYLIN-MENGE'         v_menge,

             'J_1BDYLIN-MEINS'         t_itens-meins,

             'J_1BDYLIN-NETPR'         v_netpr,

             'J_1BDYLIN-NETINS'        v_netins,

             'J_1BDYLIN-NETFRE'        v_netfre,

             'J_1BDYLIN-NETOTH'        v_netoth,

             'J_1BDYLIN-BWTAR'         t_itens-bwtar,

             'J_1BDYLIN-CFOP'          t_itens-cfop,

             'J_1BDYLIN-TAXLW1'        t_itens-taxlw1,

             'J_1BDYLIN-TAXLW2'        t_itens-taxlw2,

             'J_1BDYLIN-NBM'           t_itens-nbm,

             'J_1BDYLIN-MATORG'    t_itens-matorg.

* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSACAO_J1B1N

        IF v_nfe = 'X'.

          PERFORM bdc_campo  USING:

               'J_1BDYDOC-NFNUM'         t_dados-nfnum.

        ELSE.

          MOVE t_dados-nfnum TO v_nfnum.

          PERFORM bdc_campo  USING:

               'J_1BDYDOC-NFNUM'         v_nfnum.

        ENDIF.

* << Fim da inclusão

      IF NOT t_itens-leicofins IS INITIAL.

        PERFORM bdc_campo  USING:

               'J_1BDYLIN-TAXLW4'        t_itens-leicofins.

      ENDIF.

      IF NOT t_itens-leipis IS INITIAL.

        PERFORM bdc_campo  USING:

               'J_1BDYLIN-TAXLW5'        t_itens-leipis.

      ENDIF.

...