Sintoma

Devido a versão 46B o nome LANGUAGE ser reservado, foi necessário alterar os campos com este nome

para outro nome. Atentar em todo texto da nota.

Solução

Devido a versão 46B o nome LANGUAGE ser reservado, foi necessário alterar os campos com este nome

para outro nome. Atentar em todo texto da nota.

Informações Complementares

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

Nota Número 08826 Data: 13/08/2009 Hora: 15:05:13

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

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

Nota Número              : 08826

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 7.0

Pacote                   : 00010

Agrupamento              : 00109

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

Referência às notas relacionadas:

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

08619  - 00001 - 7.0    - 00010  - VINCULAÇÃO - LIQUIDAÇÃO - PARÂMETROS NO IDIOMA - 166/167/168/169

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

ALTERAÇÃO DO CAMPO LANGUAGE PARA IDIOMA - TABELAS 166, 167, 168 E 169

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

Palavras Chave:

ALTERAÇÃO DO CAMPO LANGUAGE PARA IDIOMA TABELAS /PWS/ZYCBT166

/PWS/ZYCBT167 /PWS/ZYCBT168 /PWS/ZYCBT169 VINCULAÇÃO LIQUIDAÇÃO

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

Objetos da nota:

FUGR /PWS/ZYCBGF1

FUNC /PWS/ZYCB_DADOS_BI

SHLD /PWS/ZYCBA292

SHLD /PWS/ZYCBA293

SHLD /PWS/ZYCBA294

TABD /PWS/ZYCBT166

TABD /PWS/ZYCBT167

TABD /PWS/ZYCBT168

TABD /PWS/ZYCBT169

TABU TDDAT

TABU TVDIR

TOBJ /PWS/ZYCBT166S

TOBJ /PWS/ZYCBT167S

TOBJ /PWS/ZYCBT168S

TOBJ /PWS/ZYCBT169S

VIED /PWS/ZYCBV294

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

Modificações efetuadas em FUNC /PWS/ZYCB_DADOS_BI

...

        v_fdtlanc   TYPE /pws/zycbt001-dtcontr,

        v_data_vin  TYPE /pws/zycbt007-dtvincul.

  DATA: wa_zycet048     TYPE /pws/zycet048,

        wa_zycbt009     TYPE /pws/zycbt009,

        wa_zycbt168_aux TYPE /pws/zycbt168.

  SELECT * FROM /pws/zycbt169 INTO TABLE itab_zycbt169

           WHERE bukrs          = i_bukrs

             AND funcionalidade = i_funcionalidade

             AND tpcontr        = i_tpcontr

             AND tpcontabil     = i_tpcontabil

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

             and language       = sy-langu.

* << Fim da exclusão

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

             and idioma         = sy-langu.

* << Fim da inclusão

  IF sy-subrc = 0.

    SELECT * FROM /pws/zycbt168 INTO TABLE itab_zycbt168

             FOR ALL ENTRIES IN itab_zycbt169

             WHERE tpcontabil = itab_zycbt169-tpcontabil

               AND taxa       = itab_zycbt169-taxa

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

               and language   = sy-langu.

* << Fim da exclusão

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

               and idioma         = sy-langu.

* << Fim da inclusão

    READ TABLE itab_zycbt169 WITH KEY funcionalidade = i_funcionalidade

                                      tpcontr        = i_tpcontr

                                      tpcontabil     = i_tpcontabil.

    IF sy-subrc = 0.

      IF NOT itab_zycbt169-tpdocto IS INITIAL.

        t_zycbe033-blart = itab_zycbt169-tpdocto.

        IF NOT t_zycbe033-blart IS INITIAL.

          clear t_zycbt034.

          DELETE t_zycbt034 WHERE campo = 'BLART'.

        ENDIF.

...

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

Include: /PWS/MZYCB009F04

...

form define_cambio using    value(p_data)

                            value(p_moedae)

                            value(p_moedal)

                                  p_kursf.

  select single codpadr kurst

    into (/pws/zycbt009-codpadr, /pws/zycbt009-kurst)

    from  /pws/zycbt009

    where codpadr = wa_zycbt011-ctmoed.

  call function '/PWS/ZYCB_MONTANTE_CONVERTE'

       exporting

            i_montante  = '1'

            i_demoeda   = p_moedae

            i_paramoeda = p_moedal

            i_ctmoeda   = /pws/zycbt009-kurst

            i_dtbase    = p_data

       importing

            e_txc       = p_kursf

       exceptions

         i_demoeda_nao_encontrado           = 1

         i_paramoeda_nao_encontrado         = 2

         i_ctmoeda_nao_encontrado           = 3

         i_dtbase_nao_encontrada            = 4

         taxa_nao_encontrada                = 5

         fator_nao_encontrado               = 6

         i_montante_nao_encontrado          = 7

         tabela_categ_nao_configurada       = 8             "299969

         others                             = 9.

  check sy-subrc ne 0.

  select * from /pws/zycbt169

           up to 1 rows

           into /pws/zycbt169

           where bukrs          = /pws/zycbe001-bukrs

             and funcionalidade = 'VIN'

* << Início da exclusão: FORM DEFINE_CAMBIO

             and language       = sy-langu.

* << Fim da exclusão

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

             and idioma         = sy-langu.

* << Fim da inclusão

  endselect.

  check sy-subrc ne 0.

...

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

Include: /PWS/MZYCB009F09

...

form verifica_taxas.

  clear wa_zycbt089.

  select single * from /pws/zycbt089

                  into wa_zycbt089

    where bukrs eq /pws/zycbe001-bukrs. "David Pietroniro 24/04

  if wa_zycbt089-tx_desm_dev    is initial or

     wa_zycbt089-tx_cl_ace_vinc is initial or

     wa_zycbt089-tx_desm_acc    is initial or

     wa_zycbt089-tx_est_liq     is initial or

     wa_zycbt089-tx_cl_ace_liq  is initial or

     wa_zycbt089-tx_cl_cli      is initial or

     wa_zycbt089-tx_desm_cli    is initial or

     wa_zycbt089-tx_desm_ace    is initial or

     wa_zycbt089-tx_est_liq_and is initial.

    select * from /pws/zycbt169

             up to 1 rows

             into /pws/zycbt169

             where bukrs          = /pws/zycbe001-bukrs

               and funcionalidade = 'VIN'

* << Início da exclusão: FORM VERIFICA_TAXAS

               and language       = sy-langu.

* << Fim da exclusão

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

               and idioma         = sy-langu.

* << Fim da inclusão

    endselect.

    if sy-subrc ne 0.

      message i061 with text-319 text-320 text-321.

      clear v_vert.

    else.

      move 'X' to v_vert.

    endif.

  else.

    move 'X' to v_vert.

  endif.

endform.                    " verifica_taxas

...

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

Modificações efetuadas em FUGR /PWS/ZYCBGF1

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

Modificações efetuadas em SHLD /PWS/ZYCBA292

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

Modificações efetuadas em SHLD /PWS/ZYCBA293

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

Modificações efetuadas em SHLD /PWS/ZYCBA294

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

Modificações efetuadas em TABD /PWS/ZYCBT166

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

Modificações efetuadas em TABD /PWS/ZYCBT167

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

Modificações efetuadas em TABD /PWS/ZYCBT168

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

Modificações efetuadas em TABD /PWS/ZYCBT169

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

Modificações efetuadas em TABU TDDAT

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

Modificações efetuadas em TABU TVDIR

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

Modificações efetuadas em TOBJ /PWS/ZYCBT166S

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

Modificações efetuadas em TOBJ /PWS/ZYCBT167S

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

Modificações efetuadas em TOBJ /PWS/ZYCBT168S

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

Modificações efetuadas em TOBJ /PWS/ZYCBT169S

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

Modificações efetuadas em VIED /PWS/ZYCBV294

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

Seguir passos abaixo para atualizar os objetos acima

Ajudas de pesquisa

/PWS/ZYCBA292

/PWS/ZYCBA293

/PWS/ZYCBA294

Retirar campo LANGUAGE e ativar.

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

Visão

/PWS/ZYCBV294

- retirar o campo LANGUAGE e ativar

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

Tabela

/PWS/ZYCBT166

- alterar o nome do campo LANGUAGE para IDIOMA

- ativar com: Utilitário-> utilitário banco de dados-> ativar a ajustar banco de dados, com flag no

Conservar Dados.

- Gerar novamente a visão da tabela: Utilitários-> gerador de atualização de tabelas -> modificar ->

deixar somente a  primeira opção desflegada. Na próxima tela, flegar as 4 opções.

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

Tabela

/PWS/ZYCBT167

- alterar o nome do campo LANGUAGE para IDIOMA

- ativar com: Utilitário-> utilitário banco de dados-> ativar a ajustar banco de dados, com flag no

Conservar Dados.

- Gerar novamente a visão da tabela: Utilitários-> gerador de atualização de tabelas -> modificar ->

deixar somente a  primeira opção desflegada. Na próxima tela, flegar as 4 opções.

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

Tabela

/PWS/ZYCBT168

- excluir ajuda de pesquisa do campo TAXA e TAXA_DESCR

- alterar o nome do campo LANGUAGE para IDIOMA

- Salvar

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

Tabela

/PWS/ZYCBT169

- excluir chave externa do campo TPCONTABIL e TAXA

- excluir ajuda de pesquisa do campo TPCONTABIL, TAXA E TAXA_DESCR

- alterar o nome do campo LANGUAGE para IDIOMA

- ativar tabelas /PWS/ZYCBT168 e /PWS/ZYCBT169

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

Ajuda de pesquisa

/PWS/ZYCBA292

- incluir IDIOMA, flegar EXP, Pos = 3, Sel = 3, Elemento de Dados = SYLANGU, Valor Proposto = SY-

LANGU

- Ativar

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

Ajuda de pesquisa

/PWS/ZYCBA293

- incluir IDIOMA, flegar EXP, Pos = 3, Sel = 3, Elemento de Dados = SYLANGU, Valor Proposto = SY-

LANGU

- Ativar

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

Visão

/PWS/ZYCBV294

- Tabelas condições/Join - incluir /pws/zycbt167-idioma = /pws/zycbt168-idioma

- Campos de visão: incluir no final campo IDIOMA /PWS/ZYCBT168 IDIOMA

- Ativar

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

Ajuda de pesquisa

/PWS/ZYCBA294

- incluir IDIOMA, flegar EXP, Pos = 5, Sel = 5, Elemento de Dados = SYLANGU, Valor Proposto = SY-

LANGU

- Ativar

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

Tabela

/PWS/ZYCBT168

- incluir ajuda de pesquisa PWS/ZYCBA292 nos campos TAXA e TAXA_DESCR

- Deixar desta forma:

TAXA        /PWS/ZYCBT168 TAXA

TAXA_DESCR /PWS/ZYCBT168 TAXA_DESCR

IDIOMA        /PWS/ZYCBT168 IDIOMA

- Ativar

- Gerar novamente a visão da tabela: Utilitários-> gerador de atualização de tabelas -> modificar ->

deixar somente a  primeira opção desflegada. Na próxima tela, flegar as 4 opções.

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

Tabela

/PWS/ZYCBT169

- incluir ajuda de pesquisa /PWS/ZYCBA294 no campos TPCONTABIL, TAXA e TAXA_DESCR

- Deixar desta forma:

TPCONTABIL /PWS/ZYCBT169 TPCONTABIL

TAXA        /PWS/ZYCBT169 TAXA

TAXA_DESCR /PWS/ZYCBT169 TAXA_DESCR

IDIOMA        /PWS/ZYCBT169 IDIOMA

- incluir Chave Externa /PWS/ZYCBT168 nos campos TPCONTABIL e TAXA.

- Deixar desta forma:

/PWS/ZYCBT168 MANDT        /PWS/ZYCBT169 MANDT

/PWS/ZYCBT168 TPCONTABIL     /PWS/ZYCBT169 TPCONTABIL

/PWS/ZYCBT168 TAXA        /PWS/ZYCBT169 TAXA

/PWS/ZYCBT168 IDIOMA        /PWS/ZYCBT169 IDIOMA

- Ativar

- Gerar novamente a visão da tabela: Utilitários-> gerador de atualização de tabelas -> modificar ->

deixar somente a  primeira opção desflegada. Na próxima tela, flegar as 4 opções.

****************************************************************************************************

IMPORTANTE - IMPORTANTE - IMPORTANTE - IMPORTANTE - IMPORTANTE - IMPORTANTE - IMPORTANTE

****************************************************************************************************

Problemas na aplicação via nota:

- Com esta alteração do campo chave LANGUAGE para IDIOMA, apesar de ativar conservando os dados, as

tabelas perdem o conteúdo  deste campo alterado. Solicitar a equipe de produto download das tabelas:

/PWS/ZYCBT166, /PWS/ZYCBT167, /PWS/ZYCBT168 e  /PWS/ZYCBT169 - transação /PWS/ZYCB251, para efetuar

upload no ambiente DEV. Já em QA e PRD, fazer download do próprio DEV do cliente e subir para QA e

PRD.

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

Problemas na aplicação via request em QA e PRD, ou seja, transporte do DEV para QA/PRD:

- Com esta alteração do campo chave LANGUAGE para IDIOMA, o SAP não consegue ativar estes objetos.

Proceder da seguinte  forma no QA e PRD:

Tabelas: /PWS/ZYCBT166, /PWS/ZYCBT167, /PWS/ZYCBT168, /PWS/ZYCBT169 - ativar com: Utilitário->

utilitário banco de dados->  ativar e ajustar banco de dados, com flag no Conservar Dados.

Ajudas de pesquisa e Visão: /PWS/ZYCBA292, /PWS/ZYCBA293, /PWS/ZYCBA294, /PWS/ZYCBV294 - apenas

ativar

- Com esta alteração do campo chave LANGUAGE para IDIOMA, apesar de ativar conservando os dados, as

tabelas perdem o conteúdo  deste campo alterado. Solicitar a equipe de produto download das tabelas:

/PWS/ZYCBT166, /PWS/ZYCBT167, /PWS/ZYCBT168 e  /PWS/ZYCBT169 - transação /PWS/ZYCB251, para efetuar

upload no ambiente DEV. Já em QA e PRD, fazer download do próprio DEV do cliente e subir para QA e

PRD.

****************************************************************************************************

IMPORTANTE - IMPORTANTE - IMPORTANTE - IMPORTANTE - IMPORTANTE - IMPORTANTE - IMPORTANTE

****************************************************************************************************