CE PLUS - Nota 011975

Módulo: DOC. EXPORTAÇÃO

Funcionalidade: Parâmetros

Data/Hora da Publicação: 28/02/2012 09:59:49

Data/Hora Última Alteração: 28/02/2012 09:59:49

Descrição da Nota: PARAMETRO SISCOMEX MULTIP FILAS:AUDITORIA

Sintoma

O programa não possui nenhum log de alteração,e por essa razão não é possivel auditar os dados.

 

 

Solução

Criado a rotina para que seja gravado todo tipo de alteração feito pelo o usuário que posteriormente

será usado para auditar os dados do pw.CE.

 

Versões Tratadas

8.0


Pré-Requisitos

Produto:

Nota

Descrição

TRILHA DE AUDITORIA

Informações Complementares

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

Nota Número 11975 Data: 28/02/2012 Hora: 09:57:06

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

 

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

Nota Número              : 11975

Categoria                : Melhoria

Prioridade               : Média

Versão PW.CE             : 8.0

Pacote                   : 00010

Agrupamento              : 00107

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

Referência às notas relacionadas:

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

 

11506  - 00001 - 8.0    - 00009 - TRILHA DE AUDITORIA

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

Texto Rápido:

PARAMETRO SISCOMEX MULTIP FILAS:AUDITORIA

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

Palavras Chave:

LOG AUDITORIA - TRILHA

 

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

Objetos da nota:

CUAD /PWS/SAPMZYCET320

REPS /PWS/MZYCET320F01

REPS /PWS/MZYCET320I01

REPS /PWS/MZYCET320TOP

REPS /PWS/SAPMZYCET320

 

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

Modificações efetuadas em CUAD /PWS/SAPMZYCET320

 

STATUS GUI: '0320'

 

BOTÃO ESTÁTICO

 

CÓDIGO DE FUNÇÃO: 'LOG_TRILHA'

CATEGORIA DE FUNÇÃO: ____

 

TEXTOS DE FUNÇÃO ESTÁTICOS

TEXTO DE FUNÇÃO: 'Log de Modificação'

NOME DE ÍCONE: 'ICON_PHIO_CLASS'

TEXTO DE ÍCONE: _____________________________________________________

TEXTO INFORMATIVO: __________________________________________________

SELEÇÃO DIRETA: _____

TECLA DE ATALHO: Ctrl-F2

 

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

Modificações efetuadas em REPS /PWS/MZYCET320F01

 

...

  ENDIF.

ENDFORM.

FORM save.

  DATA: BEGIN OF itab_zycet320 OCCURS 0.                    "#EC NEEDED

          INCLUDE STRUCTURE /pws/zycet320.

  DATA: END OF itab_zycet320.

  v_save = 'X'.

  SELECT * FROM /pws/zycet320 INTO TABLE itab_zycet320. "#EC CI_NOWHERE

  DELETE /pws/zycet320 FROM TABLE itab_zycet320 .

  INSERT /pws/zycet320.

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

  if not v_log_trilha is initial.

    PERFORM carrega_log USING '/PWS/ZYCET320'

                              'U'

                              sy-tcode

                              sy-repid

                              space.

  endif.

* << Fim da inclusão

  COMMIT WORK.

  CLEAR itab_zycet320.

  REFRESH itab_zycet320.

ENDFORM.

FORM seleciona_dados.

  SELECT SINGLE * FROM /pws/zycet320.                       "#EC *

ENDFORM.

FORM set_srcreen.

  LOOP AT SCREEN.

    IF v_controle = ' '.

...

 

 

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

Modificações efetuadas em REPS /PWS/MZYCET320I01

 

...

          PERFORM save.

          LEAVE PROGRAM.

        ELSEIF v_answer EQ 'A'.

        ELSE.

          LEAVE PROGRAM.

        ENDIF.

      ELSE.

        CLEAR v_save.

        LEAVE PROGRAM.

      ENDIF.

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

    WHEN 'LOG_TRILHA'.

      PERFORM log_trilha USING '/PWS/SAPMZYCET320'

                               space

                               ' '.

* << Fim da inclusão

  ENDCASE.

ENDMODULE.

MODULE user_exit_0100 INPUT.

  LEAVE PROGRAM.

ENDMODULE.

 

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

Modificações efetuadas em REPS /PWS/MZYCET320TOP

 

...

DATA: okcode      LIKE sy-ucomm,

      v_simples,

      v_multiplas,

      v_controle,

      v_save      TYPE c,

      v_answer    TYPE c,

      v_exp,

      v_drw,

      v_cpf_re,

      v_cpf_user.

* >> Início da inclusão:

data: v_log_trilha     TYPE /pws/zyglt009-trilha_auditoria.

LOAD-OF-PROGRAM.

  SELECT SINGLE trilha_auditoria

      FROM /pws/zyglt009

      INTO v_log_trilha

      WHERE bukrs = '    '.

* << Fim da inclusão

 

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

Modificações efetuadas em REPS /PWS/SAPMZYCET320

 

INCLUDE /pws/mzycet320top.

INCLUDE /pws/mzycet320o01.

INCLUDE /pws/mzycet320i01.

INCLUDE /pws/mzycet320f01.

* >> Início da inclusão:

INCLUDE /PWS/ZYGLLOG.

* << Fim da inclusão