CE PLUS - Nota 002207
Módulo: DRAWBACK
Funcionalidade: Transmissão Siscomex
Data/Hora da Publicação: 04/10/2006 00:00:00
Data/Hora Última Alteração: 17/02/2011 14:02:23
Descrição da Nota: TRANSMISSÃO DE SISCOMEX EM AMBIENTES UNICODE - DRAWBACK
Sintoma
Ao se tentar transmitir documentos através do SISCOMEX em ambientes com o UNICODE implementado, os
mesmos não eram lidos pelo robô de transmissão de documentos SISCOMEX, neste caso na função de
leitura dos documentos da fila de transmissão do módulo de Drawback.
Solução
Modificar a referência da variável para uma string literal, eliminando o problema a rotina de
conversão no parâmetro de exportação.
Versões Tratadas
6.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 02207 Data: 04/10/2006 Hora: 14:16:31
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 02207
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 6.0
Pacote : 00025
Agrupamento : 00134
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
00815 - 00001 - 6.0 - 00022 - MELHORIAS NO ROBÔ DE TRANSMISSÃO DO DRAWBACK
----------------------------------------------------------------------------------------------------
TRANSMISSÃO DE SISCOMEX EM AMBIENTES UNICODE - DRAWBACK
----------------------------------------------------------------------------------------------------
Palavras Chave:
UNICODE; AMBIENTES; SISCOMEX; TRANSMISSÃO; DRAWBACK
----------------------------------------------------------------------------------------------------
Objetos da nota:
FUNC /PWS/ZYCI_READ_FILAD
----------------------------------------------------------------------------------------------------
Parâmetros de exportação em FUNC /PWS/ZYCI_READ_FILAD
* >> Início da exclusão: FUNCTION /PWS/ZYCI_READ_FILAD
CGC_NUMBER LIKE J_1BWFIELD-CGC_NUMBER
* << Fim da exclusão
* >> Início da inclusão: FUNCTION /PWS/ZYCI_READ_FILAD
CGC_NUMBER LIKE /PWS/ZYCET183-NRSISCOMEX
* << Fim da inclusão
Modificações efetuadas em FUNC /PWS/ZYCI_READ_FILAD
...
t001w.
data: begin of it_zycit285 occurs 0 .
include structure /pws/zycit285.
data: end of it_zycit285 .
data : v_branch like t001w-j_1bbranch.
* >> Início da exclusão: FUNCTION /PWS/ZYCI_READ_FILAD
data : v_multiplas_filas type /pws/zycet320-multiplas_filas.
* << Fim da exclusão
* >> Início da inclusão: FUNCTION /PWS/ZYCI_READ_FILAD
data : v_multiplas_filas type /pws/zycet320-multiplas_filas,
v_cgc LIKE j_1bwfield-cgc_number.
* << Fim da inclusão
SELECT SINGLE multiplas_filas
FROM /pws/zycet320
INTO v_multiplas_filas.
IF v_multiplas_filas EQ 'X'.
select single * from /pws/zycit285
...
...
call function 'J_1BREAD_BRANCH_DATA'
exporting
branch = v_branch
bukrs = t_fila-bukrs
importing
* >> Início da exclusão: FUNCTION /PWS/ZYCI_READ_FILAD
cgc_number = cgc_number
* << Fim da exclusão
* >> Início da inclusão: FUNCTION /PWS/ZYCI_READ_FILAD
cgc_number = v_cgc
* << Fim da inclusão
exceptions
branch_not_found = 1
address_not_found = 2
company_not_found = 3
others = 4.
* >> Início da inclusão: FUNCTION /PWS/ZYCI_READ_FILAD
IF sy-subrc <> 1.
cgc_number = v_cgc.
ENDIF.
* << Fim da inclusão
modify t_fila index 1.
endif.
clear v_branch.
select single uname cpf into (uname, cpf)
from /pws/zycet184
...