CE PLUS - Nota 005919
Módulo: DOC. EXPORTAÇÃO
Funcionalidade: Siscomex Transmissão
Data/Hora da Publicação: 13/02/2008 00:00:00
Data/Hora Última Alteração: 05/03/2010 09:13:26
Descrição da Nota: CODE INSPECTOR PARÂMETROS SISCOMEX MF
Sintoma
Code Inspector Parâmetros SISCOMEX MF
Solução
Code Inspector Parâmetros SISCOMEX MF
Versões Tratadas
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 05919 Data: 13/02/2008 Hora: 15:41:08
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 05919
Categoria : Melhoria
Prioridade : Baixa
Versão PW.CE : 7.0
Pacote : 00004
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
Texto Rápido:
CODE INSPECTOR PARÂMETROS SISCOMEX MF
----------------------------------------------------------------------------------------------------
Palavras Chave:
CODE INSPECTOR PARÂMETROS SISCOMEX MF
----------------------------------------------------------------------------------------------------
Objetos da nota:
RELE F6DK957666 20080208 105732 PWSCE
REPS /PWS/MZYCET320F01
REPS /PWS/MZYCET320I01
REPS /PWS/MZYCET320O01
REPS /PWS/MZYCET320TOP
REPT /PWS/SAPMZYCET320
----------------------------------------------------------------------------------------------------
Modificações efetuadas em RELE F6DK957666 20080208 105732 PWSCE
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCET320F01
FORM modif.
IF v_controle EQ space.
v_controle = 'X'.
ELSE.
CLEAR v_controle.
ENDIF.
ENDFORM.
FORM save.
* >> Início da exclusão: FORM SAVE
DATA: BEGIN OF itab_zycet320 OCCURS 0.
* << Fim da exclusão
* >> Início da inclusão: FORM SAVE
DATA: BEGIN OF itab_zycet320 OCCURS 0. "#EC NEEDED
* << Fim da inclusão
INCLUDE STRUCTURE /pws/zycet320.
DATA: END OF itab_zycet320.
v_save = 'X'.
* >> Início da exclusão: FORM SAVE
SELECT * FROM /pws/zycet320 INTO TABLE itab_zycet320.
* << Fim da exclusão
* >> Início da inclusão: FORM SAVE
SELECT * FROM /pws/zycet320 INTO TABLE itab_zycet320. "#EC CI_NOWHERE
* << Fim da inclusão
DELETE /pws/zycet320 FROM TABLE itab_zycet320 .
INSERT /pws/zycet320.
COMMIT WORK.
CLEAR itab_zycet320.
REFRESH itab_zycet320.
ENDFORM.
FORM seleciona_dados.
* >> Início da exclusão: FORM SELECIONA_DADOS
SELECT SINGLE * FROM /pws/zycet320.
* << Fim da exclusão
* >> Início da inclusão: FORM SELECIONA_DADOS
SELECT SINGLE * FROM /pws/zycet320. "#EC *
* << Fim da inclusão
ENDFORM.
FORM set_srcreen.
LOOP AT SCREEN.
IF v_controle = ' '.
screen-input = '0'.
MODIFY SCREEN.
ENDIF.
ENDLOOP.
ENDFORM.
FORM set_campos.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCET320I01
...
case okcode.
when 'MODI'.
perform modif.
when 'SAVE'.
perform save.
when 'BACK' or 'CANC' or 'ENCE'.
if v_save ne 'X'.
call function 'POPUP_TO_CONFIRM_WITH_MESSAGE'
exporting
defaultoption = 'Y'
* >> Início da exclusão: MODULE USER_COMMAND_0100
diagnosetext1 = 'Dados não salvos!'
textline1 = 'Deseja salvar os dados antes de sair?'
titel = 'Salvar Dados'
* << Fim da exclusão
* >> Início da inclusão: MODULE USER_COMMAND_0100
diagnosetext1 = text-001
textline1 = text-002
titel = text-003
* << Fim da inclusão
importing
answer = v_answer.
if v_answer eq 'J'.
perform save.
leave program.
elseif v_answer eq 'A'.
else.
leave program.
endif.
else.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCET320O01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCET320TOP
* >> Início da exclusão:
PROGRAM /PWS/SAPMZYCET320 .
* << Fim da exclusão
* >> Início da inclusão:
PROGRAM /pws/sapmzycet320.
* << Fim da inclusão
tables: /pws/zycet320.
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,
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPT /PWS/SAPMZYCET320
------------------------------------------------------------------------
Incluído símbolo de texto:
Idioma: EN
Símbolo: 001
Texto: (16 caracteres)
"Deseja salvar os"
Comprimento máximo: 17
------------------------------------------------------------------------
Incluído símbolo de texto:
Idioma: PT
Símbolo: 001
Texto: (17 caracteres)
"Dados não salvos!"
Comprimento máximo: 17
------------------------------------------------------------------------
Incluído símbolo de texto:
Idioma: ES
Símbolo: 001
Texto: (17 caracteres)
"Dados não salvos!"
Comprimento máximo: 17
------------------------------------------------------------------------
Incluído símbolo de texto:
Idioma: EN
Símbolo: 002
Texto: (37 caracteres)
"Deseja salvar os dados antes de sair?"
Comprimento máximo: 37
------------------------------------------------------------------------
Incluído símbolo de texto:
Idioma: PT
Símbolo: 002
Texto: (37 caracteres)
"Deseja salvar os dados antes de sair?"
Comprimento máximo: 37
------------------------------------------------------------------------
Incluído símbolo de texto:
Idioma: ES
Símbolo: 002
Texto: (37 caracteres)
"Deseja salvar os dados antes de sair?"
Comprimento máximo: 37
------------------------------------------------------------------------
Incluído símbolo de texto:
Idioma: PT
Símbolo: 003
Texto: (12 caracteres)
"Salvar Dados"
Comprimento máximo: 12