Módulo: DOC. EXPORTAÇÃO
Funcionalidade: Siscomex Transmissão
Data/Hora da Publicação: 30/05/2007 00:00:00
Data/Hora Última Alteração: 22/02/2011 11:47:33
Descrição da Nota: MENSAGEM DO LOG DE TRANSMISSÃO DO RC
Sintoma
Não apresentava o Mensagem do Log de Transmissão.
Solução
Adicionado tratamento para exibição do Log de Mensagem na Fila de Transmissão.
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 03798 Data: 30/05/2007 Hora: 15:22:31
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 03798
Categoria : Melhoria
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00001
Agrupamento : 00168
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
03721 - 00001 - 7.0 - 00001 - CONSULTA DE RE - CRE
----------------------------------------------------------------------------------------------------
MENSAGEM DO LOG DE TRANSMISSÃO DO RC
----------------------------------------------------------------------------------------------------
Palavras Chave:
RC SISCOMEX LOG DE TRANSMISSÃO MENSAGEM
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCE200I01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCE200I01
...
ENDIF.
ENDIF.
WHEN 'B_LOG'.
CLEAR okcode.
CLEAR itab_zycet183_aux.
GET CURSOR FIELD v_campo VALUE v_valor LINE v_linha.
v_pos = tbcontrol-top_line + v_linha - 1.
READ TABLE itab_zycet183_aux INDEX v_pos.
IF sy-subrc = 0.
CASE itab_zycet183_aux-tp_doc.
* >> Início da exclusão: MODULE USER_COMMAND_0100
WHEN 'DDE' OR 'DSE' OR 'CRE'.
* << Fim da exclusão
* >> Início da inclusão: MODULE USER_COMMAND_0100
WHEN 'DDE' OR 'DSE' OR 'CRE' OR 'RC'.
* << Fim da inclusão
IF NOT itab_zycet183_aux-log IS INITIAL.
v_texto2 = v_texto = itab_zycet183_aux-log.
v_txt = 95.
DO v_txt TIMES.
IF v_texto2(1) <> ' ' OR v_texto2(1) EQ ' '.
SHIFT v_texto2.
ENDIF.
ENDDO.
v_texto1 = v_texto2.
CALL SCREEN '0200' STARTING AT 25 6
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DOMINIO /PWS/ZYCED017
Inclusão de Registro:
Valor Fixo: RC
Descrição Breve: Registro de Crédito