CE PLUS - Nota 013908

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: PLI

Data/Hora da Publicação: 05/05/2014 00:00:00

Data/Hora Última Alteração: 05/05/2014 16:09:17

Descrição da Nota: NECESSARIO DESENVOLVIMENTO ESPECÍFICO.

Sintoma

Necessario desenvolvimento específico na pLi

 

 

Solução

Criada a chamada de exit pLI005.

 

Versões Tratadas

9.0


Pré-Requisitos

Produto:

Nota

Descrição

DJAI PARA PROCESSOS LATAM - DESENVOLVIMENTO ADICIONAL

AO INFORMAR DADOS DO FABRICANTE NA PLI, NAO ESTA SALVANDO

DJAI PARA PROCESSOS LATAM - DESENVOLVIMENTO ADICIONAL

Informações Complementares

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

Nota Número 13908 Data: 05/05/2014 Hora: 16:00:13

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

 

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

Nota Número              : 13908

Categoria                : Melhoria

Prioridade               : Alta

Versão PW.CE             : 9.0

Pacote                   : 00007

Agrupamento              : 00170

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

Referência às notas relacionadas:

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

 

13342  - 00001 - 9.0    - 00006  - DJAI PARA PROCESSOS LATAM - DESENVOLVIMENTO ADICIONAL

13371  - 00002 - 9.0    - 00006  - DJAI PARA PROCESSOS LATAM - DESENVOLVIMENTO ADICIONAL

13762  - 00003 - 9.0    - 00007  - AO INFORMAR DADOS DO FABRICANTE NA PLI, NAO ESTA SALVANDO

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

NECESSARIO DESENVOLVIMENTO ESPECÍFICO.

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

Palavras Chave:

MELHORIA -EXIT -ZYGLT100 - DESENVOLVIMENTO ESPECIFICO

 

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

Objetos da nota:

REPS /PWS/MZYCI020X01

REPS /PWS/MZYCI020F01

 

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

Modificações efetuadas em REPS /PWS/MZYCI020X01

 

...

 

* >> Início da inclusão:

  DATA: v_liref TYPE /pws/zycie078-li_ref.

  DATA: v_save.

* << Fim da inclusão

DATA: END OF COMMON PART.

 

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

Modificações efetuadas em REPS /PWS/MZYCI020F01

 

...

 

FORM quest_gravacao.

  CLEAR v_salvo.

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

  DATA: v_liref TYPE /pws/zycie078-li_ref.

  CLEAR v_resp_save.

  DATA: v_save.

* << Fim da exclusão

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

  CLEAR: v_resp_save,

         v_liref,

         v_save.

* << Fim da inclusão

  IF v_tcode NE '/PWS/ZYCI020_E'  AND

     v_tcode NE '/PWS/ZYCI020_R'  AND

     v_tcode NE '/PWS/ZYCI020_L'  AND

     v_tcode NE '/PWS/ZYCI020_V'.

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

    PERFORM verifica_exit USING 'D'

                               '/PWS/SAPMZYCI020'

                               'PLI005'.

    e_subrc = 0.

    CLEAR itab_zyglt100 .

    READ TABLE itab_zyglt100 WITH KEY zexit = 'PLI005'  BINARY SEARCH.

    IF sy-subrc EQ 0 AND NOT itab_zyglt100-zexit_ativa IS INITIAL.

      PERFORM (itab_zyglt100-formulario) IN PROGRAM

          (itab_zyglt100-programa)       IF FOUND     .

    ENDIF.

    IF e_subrc NE 4.

* << Fim da inclusão

    IF /pws/zycie078          NE wa_zycit078.

      v_save = 'X'.

...

 

...

 

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

    ENDIF.

* << Fim da inclusão

  ENDIF.

ENDFORM.

...