CE PLUS - Nota 005615

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: Fatura Mercadoria

Data/Hora da Publicação: 11/01/2008 00:00:00

Data/Hora Última Alteração: 03/02/2010 17:00:28

Descrição da Nota: NA TELA DE EMBARQUE O FABRICANTE FICA CORRETO NA FATURA NÃO

Sintoma

 

O Fabricante não estava com a descrição correta na fatura e o título da coluna estava com fornecedor

na fatura sendo o correto fabricante

 

Solução

 

Carregar corretamente a Descrição do Fornecedor no grid da Fatura e alterar a descrição do Título da

coluna fornecedor para Fabricante

Versões Tratadas

7.0

Informações Complementares

 

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

Nota Número 05615 Data: 11/01/2008 Hora: 13:21:47

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

 

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

Nota Número              : 05615

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 7.0

Pacote                   : 00004

Agrupamento              : 00029

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

 

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

NA TELA DE EMBARQUE O FABRICANTE FICA CORRETO NA FATURA NÃO

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

Palavras Chave:

FABRICANTE - FORNECEDOR - EMBARQUE - FATURA

 

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

Objetos da nota:

DYNP /PWS/SAPMZYCI003                        0106

REPS /PWS/MZYCI003F01

REPS /PWS/MZYCI003F02

REPS /PWS/MZYCI003I01

REPS /PWS/MZYCI003O01

 

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

Modificações efetuadas em DYNP /PWS/SAPMZYCI003                        0106

 

* alterar o layout da tela 106 do Título do grid dos itens da Fatura de Mercadoria

de     Fornecedor    para     Cod. Fabricante

de     Fabricante    para     Descr. Fabricante

 

 

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

Modificações efetuadas em REPS /PWS/MZYCI003F01

 

 

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

Modificações efetuadas em REPS /PWS/MZYCI003F02

 

...

        ENDIF.

      ENDIF .

    ELSEIF /pws/zycie003-flagfabr = 'N'.

      CLEAR /pws/zycie003-lifnrfabr.

    ENDIF.

  ELSE.

    itab_zycit003-descfab   = /pws/zycie006-descfab.

    IF itab_zycit003-paisfab IS INITIAL.

      itab_zycit003-paisfab   = /pws/zycie006-paisfab.

    ENDIF.

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

    IF itab_zycit003-descfab IS INITIAL AND

       /PWS/ZYCIE006-FABRICANTE IS INITIAL AND

       NOT /pws/zycie003-lifnrfabr IS INITIAL AND

       sy-tcode = '/PWS/ZYCI003_C'.

          SELECT SINGLE * FROM lfa1

          WHERE lifnr EQ /pws/zycie003-lifnrfabr.

            MOVE lfa1-name1 TO itab_zycit003-descfab.

            MOVE lfa1-name1 TO /pws/zycie003-descfab.

    ENDIF.

* << Fim da inclusão

  ENDIF.

ENDFORM.

FORM calcula_total_planejado.

  CLEAR: v_val_plan_tot, v_tot_qtd.

  LOOP AT itab_zycit003.

    MOVE sy-tabix TO v_tabix.

    IF v_waers_diferente = 'X'.

      IF /pws/zycit006-tpfatura = '02' AND NOT

         /pws/zycit085-ukursfre IS INITIAL.

        v_taxa = /pws/zycit085-ukursfre.

...

 

 

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

Modificações efetuadas em REPS /PWS/MZYCI003I01

 

...

MODULE altera_item INPUT.

  IF /pws/zycie006-fabricante = '2'.

    IF /pws/zycie003-fabric = '1'.

      /pws/zycie003-flagfabr = 'S'.

      /pws/zycie003-lifnrfabr = /pws/zycie006-lifnr.

    ELSEIF /pws/zycie003-fabric = '3'.

      CLEAR: /pws/zycie003-lifnrfabr, /pws/zycie003-flagfabr,

             /pws/zycie003-descfab  .

    ELSE.

      /pws/zycie003-fabric = /pws/zycie006-fabricante.

* >> Início da inclusão: MODULE ALTERA_ITEM

      /pws/zycie003-descfab = /pws/zycie006-descfab.

* << Fim da inclusão

    ENDIF.

    /pws/zycie003-porigem = /pws/zycie003-paisfab.

    IF NOT /pws/zycie006-fabricante IS INITIAL.

      /pws/zycie003-flagfabr = 'S'.

    ENDIF.

    IF /pws/zycie003-flagfabr = 'S' AND /pws/zycie003-fabric NE '3'.

      CLEAR lfa1.

      SELECT SINGLE *

        FROM lfa1

        WHERE lifnr EQ /pws/zycie003-lifnrfabr.

...

 

...

    WHEN 'AVAN'.

      CALL METHOD html_control->go_forward.

      CLEAR okcode.

  ENDCASE.

ENDMODULE.

MODULE carrega_pais INPUT.

  PERFORM carrega_pais.

ENDMODULE.

MODULE atualiza_pais INPUT.

  CLEAR v_paisfab.

* >> Início da exclusão: MODULE ATUALIZA_PAIS

  IF  '023' CA /pws/zycie006-fabricante .

* << Fim da exclusão

* >> Início da inclusão: MODULE ATUALIZA_PAIS

  IF  '03' CA /pws/zycie006-fabricante .

* << Fim da inclusão

    CLEAR : /pws/zycie006-lifnrfabr,

            /pws/zycie006-descfab,

            /pws/zycie006-paisfab.

    v_paisfab = 'X' .

  ENDIF.

  LOOP AT itab_zycit003.

* >> Início da exclusão: MODULE ATUALIZA_PAIS

    IF '023' CA /pws/zycie006-fabricante .

* << Fim da exclusão

* >> Início da inclusão: MODULE ATUALIZA_PAIS

    IF '03' CA /pws/zycie006-fabricante .

* << Fim da inclusão

      CLEAR : itab_zycit003-paisfab,

              itab_zycit003-lifnrfabr,

              itab_zycit003-descfab ,

              itab_zycit003-porigem ,

              /pws/zycie003-porigem .

      CLEAR : /pws/zycie003-paisfab,

              /pws/zycie003-lifnrfabr,

              /pws/zycie003-descfab .

    ENDIF.

    IF /pws/zycie006-fabricante EQ '0'.

...

 

 

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

Modificações efetuadas em REPS /PWS/MZYCI003O01

 

...

      IF sy-subrc EQ 0.

        screen-input = 0.

      ENDIF.

    ENDIF.

    IF /pws/zycie006-fabricante EQ '2' AND

      ( screen-name EQ '/PWS/ZYCIE003-DESCFAB' OR

        screen-name EQ '/PWS/ZYCIE003-PAISFAB' ) .

      IF /pws/zycie003-lifnrfabr  IS INITIAL .

        screen-input = '1' .

      ELSE .

* >> Início da exclusão: MODULE SET_SCREEN_0400

        CLEAR : /pws/zycie003-descfab, /pws/zycie003-paisfab.

* << Fim da exclusão

        screen-input = '0' .

      ENDIF.

    ENDIF.

    MODIFY SCREEN.

  ENDLOOP.

ENDMODULE.

MODULE /pws/zycie047 OUTPUT.

  IF itab_zycit047[]      IS INITIAL AND

     NOT /pws/zycie006-dtincl  IS INITIAL AND

     NOT /pws/zycie006-nrfat   IS INITIAL AND

...