Sintoma

Aumento das casas decimais de peso líquido no embarque.

Solução

aumentar as casas decimais de peso líquido no embarque.

Informações Complementares

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

Nota Número 06710 Data: 06/06/2008 Hora: 16:06:25

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

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

Nota Número              : 06710

Categoria                : Melhoria

Prioridade               : Alta

Versão PW.CE             : 7.0

Pacote                   : 00005

Agrupamento              : 00050

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

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

AUMENTO DAS CASAS DECIMAIS DE PESO LÍQUIDO NO EMBARQUE.

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

Palavras Chave:

CASAS DECIMAIS - PESO LÍQUIDO - EMBARQUE - NTGEW

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

Objetos da nota:

DTEL /PWS/ZYCIL858

REPS /PWS/MZYCI016F01

REPS /PWS/MZYCI016TOP

TABD /PWS/ZYCIE006

TABD /PWS/ZYCIE085

TABD /PWS/ZYCIE263

TABD /PWS/ZYCIT003

TABD /PWS/ZYCIT006

TABD /PWS/ZYCIT085

TABD /PWS/ZYCIT263

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

Modificações efetuadas em DTEL /PWS/ZYCIL858

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

Elemento de dados incluído: /PWS/ZYCIL858

Classe de desenvolvimento: /PWS/ZYGL

Idioma original: PT

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

"GL - Peso Líquido"

Categoria de dados: Entrada direta de categoria

Categoria de dados: QUAN

Comprimento: 18

Decimais: 06

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 (8 caracteres), idioma: PT

"Peso liq"

Comprimento máximo do denominador médio: 15

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

"Peso líquido"

Comprimento máximo do denominador longo: 20

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

"Peso líquido"

Comprimento máximo do título: 22

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

"Peso líquido"

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

Modificações efetuadas em REPS /PWS/MZYCI016F01

...

              v_qtditem = wa_zycit048-qtd_item.

              IF v_counter >= v_qtditem.

                CLEAR: v_counter, v_tpnf, v_j_1bbranch, v_lifnr .

                EXIT.

              ENDIF.

            ENDLOOP.

            IF sy-subrc NE 0.

              EXIT.

            ENDIF.

            it_zycee005-transpnac = /pws/zycie041-transpnac.

* >> Início da inclusão: FORM FILL_DATA_J1B1

            IF it_zycee005-ntgew LT '0.001'.

              it_zycee005-ntgew = '0.001'.

            ENDIF.

* << Fim da inclusão

            APPEND it_zycee005.

            PERFORM mensagens_nf.

            LOOP AT it_zycet004.

              MESSAGE i019 WITH it_zycet004-descricao.

            ENDLOOP.

            IF it_zycet004 IS INITIAL.

              CLEAR: sy-subrc.

              IF v_modalidade NE '99' AND ( t001-land1 NE 'AR' AND

                   t001-land1 NE 'CL' ) OR

                 ( v_modalidade = '99' AND

...

...

              CLEAR itab_zycit033.

              PERFORM peso_global_sep.

              v_counter = v_counter + 1.

              v_qtditem =  wa_zycit048-qtd_item.

              IF v_counter >= v_qtditem.

                CLEAR: v_counter, v_j_1bbranch, v_lifnr .

                EXIT.

              ENDIF.

            ENDLOOP.

            it_zycee005-transpnac = /pws/zycie041-transpnac.

* >> Início da inclusão: FORM FILL_DATA_J1B1

            IF it_zycee005-ntgew LT '0.001'.

              it_zycee005-ntgew = '0.001'.

            ENDIF.

* << Fim da inclusão

            APPEND it_zycee005.

            PERFORM mensagens_nf.

            LOOP AT it_zycet004.

              MESSAGE i019 WITH it_zycet004-descricao.

            ENDLOOP.

            IF it_zycet004 IS INITIAL.

              IF ( v_modalidade NE '99' AND t001-land1 NE 'AR'

              AND t001-land1 NE 'CL' ) OR

                 ( v_modalidade = '99' AND

                   v_libera = 'X' ).

...

...

    READ TABLE itab_zycit033 WITH KEY tpnf  = itab_zycit044-tpnf

                                      regio = itab_t001w-regio.

    IF sy-subrc NE 0.

      READ TABLE itab_zycit033 WITH KEY tpnf  = itab_zycit044-tpnf

                                        regio = space.

    ENDIF.

    PERFORM itens_nf_r.

    CLEAR itab_zycit033.

  ENDLOOP.

  it_zycee005-transpnac = /pws/zycie043-transpnac.

* >> Início da inclusão: FORM FILL_DATA_J1B1_R

  IF it_zycee005-ntgew LT '0.001'.

    it_zycee005-ntgew = '0.001'.

  ENDIF.

* << Fim da inclusão

  APPEND it_zycee005.

  PERFORM mensagens_nf_r.

  LOOP AT it_zycet004.

    MESSAGE i019 WITH it_zycet004-descricao.

  ENDLOOP.

  IF it_zycet004 IS INITIAL.

    PERFORM verifica_exit USING 'D'

                        '/PWS/SAPMZYCI016'

                        'DNF004'.

    CLEAR itab_zyglt100 .

...

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

Modificações efetuadas em REPS /PWS/MZYCI016TOP

...

  v_descr       LIKE tinct-bezei,

  v_data        LIKE /pws/zycit004-dtemiss,

  v_last_date   LIKE /pws/zycit004-dtemiss,

  v_codeven     LIKE /pws/zycbt011-codeven,

  v_trans(4)    TYPE c,

  v_nfnum(10)   TYPE c,

  erro_bi,

  v_nrseq       LIKE /pws/zycit085-nrseqdi,

  v_identify    LIKE /pws/zycit085-identify,

  v_nrdi        LIKE /pws/zycit085-nrdi,

* >> Início da exclusão:

  v_ntgew       LIKE /pws/zycit004-ntgew,

* << Fim da exclusão

* >> Início da inclusão:

  v_ntgew      type /pws/zycit003-ntgew,

* << Fim da inclusão

  v_brgew       LIKE /pws/zycit093-brgew,

  v_montante2   LIKE j_1bdytax-base,

  v_aliquota    LIKE j_1bdystx-rate,

  v_taxa_reg    LIKE tcurr-ukurs,

  i_docnum      LIKE j_1bnfdoc-docnum,

  i_ebeln       LIKE ekko-ebeln,

  i_belnr       LIKE bkpf-belnr,

  v_ok          TYPE c,

  v_cancel(2)   TYPE c,

  v_sucesso(2)  TYPE c,

...

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

Modificações efetuadas em TABD /PWS/ZYCIE006

*Alterado elemento de dados da estrutura /PWS/ZYCIE006

*DE

Campo        elemento de dados

NTGEW        NTGEW_15

*PARA

Campo        elemento de dados

NTGEW        /PWS/ZYCIL858

*Tabela de referência

/PWS/ZYCIE006

*Campo de Referência

GEWEI

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

Modificações efetuadas em TABD /PWS/ZYCIE085

*Alterado elemento de dados da estrutura /PWS/ZYCIE085

*DE

Campo        elemento de dados

NTGEW        NTGEW_15

*PARA

Campo        elemento de dados

NTGEW        /PWS/ZYCIL858

*Tabela de referência

/PWS/ZYCIE085

*Campo de Referência

GEWEI_L

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

Modificações efetuadas em TABD /PWS/ZYCIE263

*Alterado elemento de dados da estrutura /PWS/ZYCIE263

*DE

Campo        elemento de dados

NTGEW        NTGEW_15

*PARA

Campo        elemento de dados

NTGEW        /PWS/ZYCIL858

*Tabela de referência

/PWS/ZYCIE263

*Campo de Referência

MEINS

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

Modificações efetuadas em TABD /PWS/ZYCIT003

*Alterado elemento de dados da tabela /PWS/ZYCIT003

*DE

Campo        elemento de dados

NTGEW        NTGEW_15

*PARA

Campo        elemento de dados

NTGEW        /PWS/ZYCIL858

*Tabela de referência

/PWS/ZYCIT003

*Campo de Referência

GEWEI

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

Modificações efetuadas em TABD /PWS/ZYCIT006

*Alterado elemento de dados da tabela /PWS/ZYCIT006

*DE

Campo        elemento de dados

NTGEW        NTGEW_15

*PARA

Campo        elemento de dados

NTGEW        /PWS/ZYCIL858

*Tabela de referência

/PWS/ZYCIT006

*Campo de Referência

GEWEI

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

Modificações efetuadas em TABD /PWS/ZYCIT085

*Alterado elemento de dados da tabela /PWS/ZYCIT085

*DE

Campo        elemento de dados

NTGEW        NTGEW_15

*PARA

Campo        elemento de dados

NTGEW        /PWS/ZYCIL858

*Tabela de referência

/PWS/ZYCIT085

*Campo de Referência

GEWEI_L

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

Modificações efetuadas em TABD /PWS/ZYCIT263

*Alterado elemento de dados da tabela /PWS/ZYCIT263

*DE

Campo        elemento de dados

NTGEW        NTGEW_15

*PARA

Campo        elemento de dados

NTGEW        /PWS/ZYCIL858

*Tabela de referência

/PWS/ZYCIT263

*Campo de Referência

MEINS