CE PLUS - Nota 003704
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 17/05/2007 00:00:00
Data/Hora Última Alteração: 09/03/2010 09:41:26
Descrição da Nota: TEXTOS DA DI SÓ SÃO SALVOS SE ENTRAR NO DETALHE DO ITEM
Sintoma
textos da DI só são salvos se entrar no detalhe do item.
Solução
Atualização do programa da DI para que no momento da transmissão para o siscomex o sistema leve
corretamente os textos dos ìtens para o orientador.
Versões Tratadas
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 03704 Data: 17/05/2007 Hora: 14:27:41
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 03704
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 7.0
Pacote : 00027
Agrupamento : 00166
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
TEXTOS DA DI SÓ SÃO SALVOS SE ENTRAR NO DETALHE DO ITEM
----------------------------------------------------------------------------------------------------
Palavras Chave:
TEXTOS DA DI - DETALHE DO ITEM - TRANSMISSÃO SISCOMEX
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023F03
REPS /PWS/MZYCI023I01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F03
...
itab_it-nrseq
itab_it-ebeln
itab_it-ebelp
INTO v_txtki.
CALL FUNCTION 'READ_TEXT'
EXPORTING
client = sy-mandt
id = 'ZDSI'
language = sy-langu
name = v_txtki
* >> Início da exclusão: FORM SAVE_ESPECIFICACAO
object = '/PWS/CIDI'
* << Fim da exclusão
* >> Início da inclusão: FORM SAVE_ESPECIFICACAO
object = '/PWS/CIDDI'
* << Fim da inclusão
TABLES
lines = rtexti
EXCEPTIONS
id = 1
language = 2
name = 3
not_found = 4
object = 5
reference_check = 6
wrong_access_to_archive = 7
OTHERS = 8.
* >> Início da inclusão: FORM SAVE_ESPECIFICACAO
if sy-subrc ne 0.
perform fill_desc.
endif.
* << Fim da inclusão
* >> Início da exclusão: FORM SAVE_ESPECIFICACAO
xtheadi-tdobject = '/PWS/CIDI'.
* << Fim da exclusão
* >> Início da inclusão: FORM SAVE_ESPECIFICACAO
xtheadi-tdobject = '/PWS/CIDDI'.
* << Fim da inclusão
xtheadi-tdname = v_txtki.
xtheadi-tdid = 'ZDSI'.
xtheadi-tdspras = sy-langu.
xtheadi-tdlinesize = 072.
CALL FUNCTION 'SAVE_TEXT'
EXPORTING
header = xtheadi
insert = 'X'
savemode_direct = 'X'
owner_specified = 'X'
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F03
...
/pws/zycie085
/pws/zycie093
e_subrc
e_exec_okcode.
IF e_subrc NE 0.
EXIT.
ENDIF.
ENDIF.
ENDIF.
IF e_exec_okcode IS INITIAL.
* >> Início da inclusão: MODULE USER_COMMAND_0050
CASE okcode.
* << Fim da inclusão
* >> Início da exclusão: MODULE USER_COMMAND_0050
CASE sy-ucomm.
* << Fim da exclusão
WHEN 'DETA'.
PERFORM: comm_deta.
WHEN 'SAVE'.
PERFORM: comm_save.
WHEN 'FUND'.
PERFORM: comm_fundap.
WHEN 'ADIC'.
PERFORM: comm_adic.
WHEN 'REFR'.
PERFORM: refresh_all, fill_receitas.
...
...