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.
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