CE PLUS - Nota 008954

Módulo: CÂMBIO EXPORTAÇÃO

Funcionalidade: Captação

Data/Hora da Publicação: 03/09/2009 00:00:00

Data/Hora Última Alteração: 11/03/2010 11:11:12

Descrição da Nota: CAPTAÇÃO - DA - INCLUSAO DE CAMPOS NA PASTA DADOS ADICIONAIS

Sintoma

 

Desenvolvimento Adicional - Captação - Inclusao de campos na pasta Dados adicionais

 

Solução

 

Desenvolvimento Adicional - Captação - Inclusao de campos na pasta Dados adicionais

Versões Tratadas

7.0

Informações Complementares

 

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

Nota Número 08954 Data: 03/09/2009 Hora: 14:04:52

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

 

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

Nota Número              : 08954

Categoria                : Melhoria

Prioridade               : Alta

Versão PW.CE             : 7.0

Pacote                   : 00010

Agrupamento              : 00112

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

 

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

CAPTAÇÃO - DA - INCLUSAO DE CAMPOS NA PASTA DADOS ADICIONAIS

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

Palavras Chave:

CAPTAÇÃO - DA - INCLUSAO DE CAMPOS NA PASTA DADOS ADICIONAIS

 

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

Objetos da nota:

DTEL /PWS/ZYCBL486

DYNP /PWS/SAPMZYCB001                        0100

DYNP /PWS/SAPMZYCB001                        0600

REPS /PWS/MZYCB001O01

REPS /PWS/MZYCB001I01

REPS /PWS/MZYCB001TOP

TABD /PWS/ZYCBE001

TABD /PWS/ZYCBT001

 

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

Modificações efetuadas em DTEL /PWS/ZYCBL486

 

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

Elemento de dados incluído: /PWS/ZYCBL486

Classe de desenvolvimento: /PWS/ZYGL

Idioma original: PT

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

"Num. Contrato de Câmbio"

Categoria de dados: Domínio

Domínio: NUM8

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

"Nº Cambio"

Comprimento máximo do denominador médio: 17

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

"Nº Contr . Cambio"

Comprimento máximo do denominador longo: 20

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

"Nº Contr. de Cambio"

Comprimento máximo do título: 21

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

"Nº Contrato de Cambio"

 

 

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

Modificações efetuadas em DYNP /PWS/SAPMZYCB001                        0100

 

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

FAVOR SOLICITAR O ARQUIVO PARA UPLOAD NO PROGRAMA DE CAPTAÇÃO DA TELA 0100

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

 

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

Modificações efetuadas em DYNP /PWS/SAPMZYCB001                        0600

 

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

FAVOR SOLICITAR O ARQUIVO PARA UPLOAD NO PROGRAMA DE CAPTAÇÃO DA TELA 0600

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

 

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

Modificações efetuadas em REPS /PWS/MZYCB001O01

 

...

            screen-active = '1'.

          endif.

          screen-input = v_status_s.

        endif.

      when '/PWS/ZYCBE074-BUKRS_PERF'.

        if v_status_s is initial.

          screen-input = '1'.

        else.

          screen-input = v_status_s.

        endif.

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

      when '/PWS/ZYCBE001-NUM_CONTR_CAM'.

        if v_status_s is initial.

          screen-input = '1'.

        else.

          screen-input = v_status_s.

        endif.

      when '/PWS/ZYCBE001-DT_LIQUIDACAO'.

        if v_status_s is initial.

          screen-input = '1'.

        else.

          screen-input = v_status_s.

        endif.

      when '/PWS/ZYCBE001-DT_SWIFT'.

        if v_status_s is initial.

          screen-input = '1'.

        else.

          screen-input = v_status_s.

        endif.

      when '/PWS/ZYCBE001-INSTITUICAO'.

        if v_status_s is initial.

          screen-input = '1'.

        else.

          screen-input = v_status_s.

        endif.

* << Fim da inclusão

    endcase.

    modify screen.

  endloop.

  if /pws/zycbe001-tpcontr = 'DP'.

    loop at screen.

      case screen-name.

        when 'BTN15'.

          screen-invisible = '1'.

      endcase.

      modify screen.

...

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

Modificações efetuadas em REPS /PWS/MZYCB001I01

 

...

  if /pws/zycbe001-bcocred eq '00'.

    /pws/zycbe001-bcocred = '  '.

  endif.

 

  select single lifnr name1

  into (lfa1-lifnr, lfa1-name1)

  from lfa1

  where lifnr eq v_banco.

  bcodescr = lfa1-name1.

 

 

  call function 'DYNP_VALUES_UPDATE'

       exporting

            dyname     = sy-cprog

            dynumb     = '0301'

       tables

            dynpfields = tdynpread

       exceptions

            others     = 8.

 

 

endmodule.                 " ajuda_pesquisa  INPUT

* >> Início da inclusão:

*&---------------------------------------------------------------------*

*&      Module  consiste_instituicao  INPUT

*&---------------------------------------------------------------------*

*       text

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

module consiste_instituicao input.

 

check not /pws/zycbe001-instituicao is initial.

 

select single * from /pws/zyglt215

where instituicao = /pws/zycbe001-instituicao."#EC CI_NOFIELD

 

 if sy-subrc ne 0.

  message e061 with text-084.

 endif.

 

endmodule.                 " consiste_instituicao  INPUT

* << Fim da inclusão

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

Modificações efetuadas em REPS /PWS/MZYCB001TOP

 

...

  /pws/zycbe226,

  /pws/zycbt226,

  /pws/zycbe227,

  /pws/zycbt227,

  /pws/zycbe241,

  /pws/zycbt241,

  /pws/zycbt067,

  /pws/zycbt060,

* >> Início da inclusão:

  /pws/zyglt215,

* << Fim da inclusão

  /pws/zyglt340,

  /pws/zyglt343,

  /pws/zyglt364,

  rm06b,

  t16fe,

 

...

 

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

Modificações efetuadas em TABD /PWS/ZYCBE001

 

MODIFICAR ESTRUTURA: /PWS/ZYCBE001

DESCRIÇÃO BREVE: CB - Captação de Contrato

 

COMPONENTES NOVOS

COMPONENTE:     TP. COMP:      TAB.REF.:       CPO.REF.:    AJUD. PESQU.

 

NUM_CONTR_CAM   /PWS/ZYCBL486

DT_LIQUIDACAO   DATUM

DT_SWIFT        DATUM

INSTITUICAO     /PWS/ZYGLL889                                /PWS/ZYCAA018

 

 

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

Modificações efetuadas em TABD /PWS/ZYCBT001

 

MODIFICAR TABELA TRANSPARENTE: /PWS/ZYCBT001

DESCRIÇÃO BREVE: CB - Captação de Contrato

 

 

CAMPOS NOVOS

 

CAMPOS:         TP. CAMPO   CH: INI: TAB.VERIF.:    TAB.REF.:     CPO.RE

 

NUM_CONTR_CAM  /PWS/ZYCBL486

DT_LIQUIDACAO  DATUM

DT_SWIFT       DATUM

INSTITUICAO    /PWS/ZYGLL889

INSTITUICAO    /PWS/ZYGLL889

INSTITUICAO    /PWS/ZYGLL889

INSTITUICAO    /PWS/ZYGLL889

INSTITUICAO    /PWS/ZYGLL889