CE PLUS - Nota 013400
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: PLI
Data/Hora da Publicação: 08/11/2013 00:00:00
Data/Hora Última Alteração: 12/11/2013 11:53:15
Descrição da Nota: A PLI NÃO PERMITE GERAR O TXT SEM POSSUIR LI VINCULADA
Sintoma
A PLI não permite gerar o txt sem possuir LI vinculada
Solução
não verificar se há LI criada antes de gerar o txt
Versões Tratadas
9.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 13400 Data: 08/11/2013 Hora: 15:42:26
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 13400
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 9.0
Pacote : 00006
Agrupamento : 00166
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
10307 - 00001 - 8.0 - 00004 - IMPLEMENTAÇÕES NA PLI PARA ATENDER SUFRAMA 5.0
10308 - 00002 - 8.0 - 00004 - PROGRAMA DE TRANSMISSÃO PARA SUFRAMA 5.0 /PWS/ZYCIR041
11138 - 00003 - 8.0 - 00007 - CORREÇÃO DE DESCRIÇÃO BOTÕES DE TRANSMISSÃO
----------------------------------------------------------------------------------------------------
A PLI NÃO PERMITE GERAR O TXT SEM POSSUIR LI VINCULADA
----------------------------------------------------------------------------------------------------
Palavras Chave:
PLI - TXT - LI VINCULADA - ZYCIR041 - RELATÓRIO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/ZYCIR041
REPS /PWS/MZYCI020I01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/ZYCIR041
...
FORM monta_txt.
* >> Início da exclusão: FORM MONTA_TXT
SORT it_reg03 BY numli.
* << Fim da exclusão
* >> Início da inclusão: FORM MONTA_TXT
SORT it_reg03 BY nrseqli.
* << Fim da inclusão
LOOP AT it_reg03.
* >> Início da exclusão: FORM MONTA_TXT
ON CHANGE OF it_reg03-numli.
* << Fim da exclusão
* >> Início da inclusão: FORM MONTA_TXT
ON CHANGE OF it_reg03-nrseqli.
* << Fim da inclusão
TRANSLATE it_reg03-ncm_merc USING '. '.
CONDENSE it_reg03-ncm_merc NO-GAPS.
w_ncm = it_reg03-ncm_merc.
WRITE it_reg03-produto_zfm TO w_codsufra.
* >> Início da exclusão: FORM MONTA_TXT
w_numli = it_reg03-numli.
w_ano = it_reg03-numli+8(02).
* << Fim da exclusão
* >> Início da inclusão: FORM MONTA_TXT
w_numli = it_reg03-nrseqli.
w_ano = it_reg03-nrseqli+8(02).
* << Fim da inclusão
CONCATENATE '20' w_ano INTO w_ano.
* >> Início da exclusão: FORM MONTA_TXT
CONCATENATE w_ano '/' it_reg03-numli+2(05) INTO w_seq.
* << Fim da exclusão
* >> Início da inclusão: FORM MONTA_TXT
CONCATENATE w_ano '/' it_reg03-nrseqli+2(05) INTO w_seq.
* << Fim da inclusão
CLEAR: w_vl_merc_iten.
CLEAR: ww_aliqii.
CLEAR: w_li_refer.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI020I01
...
WHEN 'TRANSMS'.
* >> Início da exclusão: MODULE USER_COMMAND_0500
CLEAR v_trans.
LOOP AT it_zycit079 WHERE numli IS initial.
MESSAGE w061 WITH text-376.
v_trans = 'X'.
EXIT.
ENDLOOP.
IF v_trans EQ 'X'.
EXIT.
ENDIF.
* << Fim da exclusão
PERFORM: consiste_transm.
IF v_transm NE 'N'.
PERFORM: envio_dados,
send.
ENDIF.
...