Sintoma

O Campo BUPLA não está sendo exibido na tela.

Solução

Tirar essa verificação visto que sempre será igual, permitindo a exibição do campo bupla

Informações Complementares

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

Nota Número 04221 Data: 20/07/2007 Hora: 11:27:52

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

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

Nota Número              : 04221

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 7.0

Pacote                   : 00002

Agrupamento              : 00004

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

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

ENVIAR O CAMPO BUPLA PARA A TELA.

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

Palavras Chave:

VINCULAÇÃO, CAMPO BUPLA, BRNCH, GRAVAR VINCULAÇÃO E BATCH-INPUT.

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

Objetos da nota:

REPS /PWS/MZYCB009F08

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

Modificações efetuadas em REPS /PWS/MZYCB009F08

...

        ELSE.

          itab_zycbe033-belnr   = /pws/zycbe001-belnr2.

          itab_zycbe033-dtdocto = /pws/zycbe001-dtvincul.

        ENDIF.

      ENDIF.

    ENDIF.

  ENDIF.

  CLEAR v_vinc_tot.

  IF /pws/zycbe001-tpcontr+0(1) = 'D'.

    CLEAR v_year.

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

    CASE /pws/zycbe001-fdtlanc.

      WHEN 'O'.

        v_data = /pws/zycbe001-dtcontr.

      WHEN 'D'.

        v_data = /pws/zycbe001-dtdesem.

      WHEN OTHERS.

        v_data = /pws/zycbe001-dtcred.

    ENDCASE.

* << Fim da inclusão

    CALL FUNCTION '/PWS/ZYGL_OBTEM_ANO_CONTABIL'

         EXPORTING

              v_bukrs                = /pws/zycbe001-bukrs

* >> Início da exclusão: FORM DESMEMBRA_ACE

              v_date                 = itab_zycbt030-budat

* << Fim da exclusão

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

              v_date                 = v_data

* << Fim da inclusão

         IMPORTING

...

...

           WHERE belnr  = itab_zycbe033-belnr

           AND   gjahr  = v_year

           AND   kunnr  = itab_zycbe033-d_newko

           AND   bukrs  = /pws/zycbe001-bukrs

           AND   umskz  = itab_zycbe033-umskz

           AND   shkzg  = 'H'.

    IF v_wrbtr2 EQ itab_zycbt005-vlme_p.

      v_vinc_tot = 'X'.

    ENDIF.

  ENDIF.

* >> Início da exclusão: FORM DESMEMBRA_ACE

  IF /pws/zycbe001-tpcontr(01) NE 'C' AND

     itab_zycbt005-vlme_p NE itab_zycbt005-vlvinc .

* << Fim da exclusão

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

  IF /pws/zycbe001-tpcontr(01) NE 'C'.

* << Fim da inclusão

    IF NOT /pws/zycbe005-j_1bbranch IS INITIAL.

      PERFORM verifica_pais_filial USING /pws/zycbe001-bukrs

                                         /pws/zycbe001-j_1bbranch.

      itab_zycbe033-brnch = itab_zycbt005-j_1bbranch.

    ELSE.

      PERFORM local_negocio.

      PERFORM verifica_pais_filial USING /pws/zycbe001-bukrs

                                         wa_t001w-j_1bbranch.

      itab_zycbe033-brnch = wa_t001w-j_1bbranch.

    ENDIF.

...