Sintoma

Necessária chamada de exit para desenvolvimento específico

Solução

Criada a chamada de exit FAT018 e inserido um campo de entrada e saída na tela Basica para permitir

troca de texto.

Informações Complementares

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

Nota Número 11438 Data: 09/09/2011 Hora: 09:51:49

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

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

Nota Número              : 11438

Categoria                : Melhoria

Prioridade               : Alta

Versão PW.CE             : 8.0

Pacote                   : 00008

Agrupamento              : 00084

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

Referência às notas relacionadas:

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

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

NECESSÁRIA CHAMADA DE EXIT PARA DESENVOLVIMENTO ESPECÍFICO

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

Palavras Chave:

ZYGLT100 - EXIT - DESENVOLVIMENTO ESPECÍFICO

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

Objetos da nota:

DYNP /PWS/SAPMZYCI003                        0101

REPS /PWS/MZYCI003I01

REPS /PWS/MZYCI003O01

REPS /PWS/MZYCI003X01

REPT /PWS/SAPMZYCI003

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

Modificações efetuadas em REPS /PWS/MZYCI003X01

...

* >> Início da inclusão:

data: v_txforn(60).

* << Fim da inclusão

DATA: END OF COMMON PART.

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

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

*Retirar o campo "/PWS/ZYCIE006-LIFNR" e colocar o campo de entrada/saída "V_TXFORN"

*no lugar, permitindo que o texto seja alterado.

EXCLUIR TEXTO "/PWS/ZYCIE006-LIFNR"

INCLUIR CAMPO TEXTO "V_TXFORN"

Comprimento Visível      13

Linha                    2

Coluna                   50

Formato                  CHAR

Texto                    _____________

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

Modificações efetuadas em REPS /PWS/MZYCI003I01

...

MODULE consiste_fornecedor INPUT.

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

  e_subrc = '0'.

  PERFORM verifica_exit USING 'D'

                              '/PWS/SAPMZYCI003'

                              'FAT018'.

  CLEAR itab_zyglt100 .

  READ TABLE itab_zyglt100 WITH KEY

                   zexit = 'FAT018' BINARY SEARCH.

  IF sy-subrc EQ 0.

    IF NOT itab_zyglt100-zexit_ativa IS INITIAL.

      PERFORM (itab_zyglt100-formulario) IN PROGRAM

          (itab_zyglt100-programa) IF FOUND.

    ENDIF.

  ENDIF.

  IF e_subrc EQ '0'.

* << Fim da inclusão

  IF ( /pws/zycie006-tpfatura = '02' OR

       /pws/zycie006-tpfatura = '03' OR

       /pws/zycie006-tpfatura = '09' OR

       /pws/zycie006-tpfatura = '04' )

       AND /pws/zycie006-lifnr IS INITIAL.

    MESSAGE e015 WITH text-014.

  ENDIF.

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

  ENDIF.

* << Fim da inclusão

ENDMODULE.

...

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

Modificações efetuadas em REPS /PWS/MZYCI003O01

...

  ENDCASE.

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

  v_txforn = text-213.

* << Fim da inclusão

ENDMODULE.

...

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

Modificações efetuadas em REPT /PWS/SAPMZYCI003

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

Incluído símbolo de texto:

Idioma: EN

Símbolo: 213

Texto: (8 caracteres)

"Supplier"

Comprimento máximo: 10

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

Incluído símbolo de texto:

Idioma: PT

Símbolo: 213

Texto: (10 caracteres)

"Fornecedor"

Comprimento máximo: 10

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

Incluído símbolo de texto:

Idioma: ES

Símbolo: 213

Texto: (9 caracteres)

"Proveedor"

Comprimento máximo: 10