CE PLUS - Nota 012168
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Transmissão Siscomex
Data/Hora da Publicação: 10/05/2012 11:09:35
Data/Hora Última Alteração: 10/05/2012 11:09:35
Descrição da Nota: ERRO AO TRANSMITIR PLI
Sintoma
Erro ao transmitir PLI
Solução
Atualizado programa para pesquisar o número de versão da tabela /pws/zycit514.
Versões Tratadas
8.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 12168 Data: 04/05/2012 Hora: 17:16:58
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 12168
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 8.0
Pacote : 00011
Agrupamento : 00113
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
12036 - 00001 - 8.0 - 00011 - ERROS DIVERSOS ENCONTRADOS NO PROGRAMA
12118 - 00002 - 8.0 - 00011 - AJUSTES GERAIS EM PROGRAMA PEXPAM
----------------------------------------------------------------------------------------------------
ERRO AO TRANSMITIR PLI
----------------------------------------------------------------------------------------------------
Palavras Chave:
ERRO - TRANSMISSÃO - SUFRAMA - PLI - VERSAO - ZYCIT101
ZYCIT514
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI033F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI033F01
...
FORM trata_button_transm.
* >> Início da inclusão: FORM TRATA_BUTTON_TRANSM
TABLES /pws/zycit514.
DATA: v_nversao TYPE /pws/zycit101-nversao.
* << Fim da inclusão
...
...
IF wa_zycet050-path_sisc_imp IS INITIAL.
MESSAGE i061 WITH text-026 text-060 text-028.
EXIT.
ENDIF.
ENDIF.
* >> Início da inclusão: FORM TRATA_BUTTON_TRANSM
IF itab_zycit136-tp_doc NE 'PLI'.
* << Fim da inclusão
SELECT SINGLE * FROM /pws/zycit101 INTO /pws/zycit101.
* >> Início da inclusão: FORM TRATA_BUTTON_TRANSM
v_nversao = /pws/zycit101-nversao.
ELSE.
SELECT SINGLE * FROM /pws/zycit514
INTO /pws/zycit514 WHERE produto EQ '1'.
v_nversao = /pws/zycit514-nversao.
ENDIF.
* << Fim da inclusão
CLEAR: v_param.
CONCATENATE wa_zycet050-appsvr ','
wa_zycet050-sysnr ','
sy-mandt ','
sy-langu ','
* >> Início da exclusão: FORM TRATA_BUTTON_TRANSM
/pws/zycit101-nversao ','
* << Fim da exclusão
* >> Início da inclusão: FORM TRATA_BUTTON_TRANSM
v_nversao ','
* << Fim da inclusão
wa_zycet050-router ','
INTO v_param.
MOVE itab_zycit136-tp_doc TO v_tpdoc.
SORT itab_zycit136 BY tp_doc nrseq.
LOOP AT itab_zycit136.
CHECK itab_zycit136-mark EQ 'X'.
IF itab_zycit136-tp_doc EQ v_tpdoc.
CONCATENATE v_param
itab_zycit136-tp_doc '_'
itab_zycit136-nrseq '|'
...