CE PLUS - Nota 012597
Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Parâmetros
Data/Hora da Publicação: 09/10/2012 16:50:52
Data/Hora Última Alteração: 09/10/2012 16:50:52
Descrição da Nota: PARAMETRIZAÇÃO DE APROVAÇÃO DE PRÉ-EDIÇÃO - ATUALIZAR DADOS DA TABELA
Sintoma
Quando da alteração de alguma parâmetro, o sistema não armazenava a Data, Hora e Usuário da última
modificação
Solução
O programa foi alterado para gravar essas informações em tabela
Versões Tratadas
9.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 12597 Data: 09/10/2012 Hora: 16:18:52
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 12597
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 9.0
Pacote : 00002
Agrupamento : 00132
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
12272 - 00001 - 8.0 - 00011 - LOG DE MODIFICAÇÕES - MELHORIAS TÉCNICAS
----------------------------------------------------------------------------------------------------
PARAMETRIZAÇÃO DE APROVAÇÃO DE PRÉ-EDIÇÃO - ATUALIZAR DADOS DA TABELA
----------------------------------------------------------------------------------------------------
Palavras Chave:
PARAMETRIZAÇÃO DE APROVAÇÃO DE PRÉ-EDIÇÃO - ATUALIZAR DADOS DA TABELA
USUÁRIO, DATA E HORA
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCBT133F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCBT133F01
...
vclear = itab_zycbt133-vclear
vpgpri = itab_zycbt133-vpgpri
vcomp = itab_zycbt133-vcomp
where bukrs = itab_zycbt133-bukrs and
codmod = itab_zycbt133-codmod.
if sy-subrc eq 0.
read table itab_zycbt133_cr
with key bukrs = itab_zycbt133-bukrs
codmod = itab_zycbt133-codmod.
if sy-subrc = 0 and itab_zycbt133_cr ne itab_zycbt133.
* >> Início da inclusão: FORM SALVAR
UPDATE /pws/zycbt133 SET usernamec = sy-uname
dtuserc = sy-datum
hruserc = sy-uzeit
WHERE bukrs = itab_zycbt133-bukrs AND
codmod = itab_zycbt133-codmod.
* << Fim da inclusão
move-corresponding itab_zycbt133 to /pws/zycbt133.
perform carrega_log using '/PWS/ZYCBT133'
'U'
sy-tcode
sy-repid
' '.
endif.
endif.
clear itab_zycbt133_aux.
read table itab_zycbt133_aux
...
...
clear: v_alt,
v_nulo.
v_tcode = '/PWS/ZYCBT133_M'.
message w016 with text-015.
else.
if itab_zycbt133_insert[] is initial.
loop at itab_zycbt133.
move 'X' to itab_zycbt133-salvo.
modify itab_zycbt133 index sy-tabix.
move 'X' to itab_zycbt133-insert.
* >> Início da inclusão: FORM SALVAR
itab_zycbt133-usernamec = sy-uname.
itab_zycbt133-dtuserc = sy-datum.
itab_zycbt133-hruserc = sy-uzeit.
* << Fim da inclusão
modify itab_zycbt133 index sy-tabix.
move-corresponding itab_zycbt133 to itab_zycbt133_aux.
append itab_zycbt133_aux.
move-corresponding itab_zycbt133 to itab_zycbt133_cr.
move sy-mandt to itab_zycbt133_cr-mandt.
append itab_zycbt133_cr.
endloop.
insert /pws/zycbt133 from table itab_zycbt133.
if sy-subrc eq 0.
loop at itab_zycbt133 into /pws/zycbt133.
...