Sintoma

Ao referenciar uma LI na PLI, gerei o txt - Suframa 5.0

O campo LI referencia fica no registro 1 posição 267

E o campo no txt ficou 0000000, não levou o numero que eu referenciei.

Solução

Campo correto: /pws/zycit078-li_ref.

Informações Complementares

----------------------------------------------------------------------------------------------------

Nota Número 13636 Data: 28/01/2014 Hora: 11:20:28

----------------------------------------------------------------------------------------------------

----------------------------------------------------------------------------------------------------

Nota Número              : 13636

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 9.0

Pacote                   : 00007

Agrupamento              : 00170

----------------------------------------------------------------------------------------------------

Referência às notas relacionadas:

Número - Ordem - Versão - Pacote - Descrição Breve

13597  - 00001 - 9.0    - 00007  - SUFRAMA 5.0 - AJUSTE NA FORMATAÇÃO DO NCM

13617  - 00002 - 9.0    - 00007  - SUFRAMA 5.0 - AJUSTE NA FORMATAÇÃO DO NCM E PRODUTO ZFM

----------------------------------------------------------------------------------------------------

CORRIGIR A INFORMAÇÃO DA LI DE REFERÊNCIA NO ARQUIVO SUFRAMA 5.0

----------------------------------------------------------------------------------------------------

Palavras Chave:

LI DE REFERÊNCIA - /PWS/ZYCIE078-LI_REF - W_LI_REFER

/PWS/ZYCIR041 - /PWS/ZYCIT078-LI_REF

----------------------------------------------------------------------------------------------------

Objetos da nota:

REPS /PWS/ZYCIR041

----------------------------------------------------------------------------------------------------

Modificações efetuadas em REPS /PWS/ZYCIR041

...

       doc_refer(08),

       tipo_aplic   LIKE /pws/zycit078-aplicpli,

* >> Início da exclusão:

       li_refer     LIKE /pws/zycit078-nrli,

* << Fim da exclusão

* >> Início da inclusão:

       li_refer     LIKE /pws/zycit078-li_ref,

* << Fim da inclusão

       nr_proex     LIKE /pws/zycit078-numpexpam,

       ano_proex    LIKE /pws/zycit078-anopexpam,

...

...

        CLEAR /pws/zycit078-codtsp  .

        CLEAR: it_reg09-aplic_merc  .

        it_reg01-nrseqli      = itab_zycit078_aux-nrseqli     .

        it_reg01-tpli         = itab_zycit078_aux-tpli        .

        it_reg01-cd_inscsuf   = itab_zycit078_aux-inscsufr    .

        it_reg01-tipo_impor   = itab_zycit078_aux-tpimp       .

        it_reg01-importador   = itab_zycit078_aux-cnpj        .

        it_reg01-pais_impor   = itab_zycit078_aux-paisfab     .

        it_reg01-tipo_doc     = itab_zycit078_aux-tppli       .

        it_reg01-tipo_aplic   = itab_zycit078_aux-aplicpli    .

* >> Início da exclusão: FORM BUSCA_DADOS_01

        it_reg01-li_refer     = itab_zycit078_aux-nrli        .

* << Fim da exclusão

* >> Início da inclusão: FORM BUSCA_DADOS_01

        it_reg01-li_refer     = itab_zycit078_aux-li_ref      .

* << Fim da inclusão

        it_reg01-nr_proex     = itab_zycit078_aux-numpexpam   .

        it_reg01-ano_proex    = itab_zycit078_aux-anopexpam   .

        it_reg09-naladi       = itab_zycit078_aux-naladi      .

        it_reg09-moeda        = itab_zycit078_aux-waers       .

        it_reg09-incoterms    = itab_zycit078_aux-inco1       .

        it_reg09-cond_merc    = itab_zycit078_aux-condmerc    .

        it_reg09-comunc-compra = itab_zycit078_aux-ncompra     .

        it_reg09-urf_entr     = itab_zycit078_aux-urfent      .

        it_reg09-pais_proc    = itab_zycit078_aux-land1       .

        it_reg09-urf_despacho = itab_zycit078_aux-urfdesp     .

...

...

        AND numli   EQ it_reg03-numli.

      w_ind_exig     = 'N'.

      SELECT SINGLE *

      FROM /pws/zycit079

      WHERE nrseqli EQ it_reg03-nrseqli

        AND numli   EQ it_reg03-numli.

      IF NOT /pws/zycit079-subs_exigencia IS INITIAL.

        w_ind_exig   = 'S'.

      ENDIF.

      ww_aliqii = /pws/zycit079-aliqii.

* >> Início da exclusão: FORM MONTA_TXT

      w_li_refer = /pws/zycit079-nrli.

* << Fim da exclusão

* >> Início da inclusão: FORM MONTA_TXT

      w_li_refer = /pws/zycit078-li_ref.

* << Fim da inclusão

      w_ac_aladi = /pws/zycit079-aladi.

      w_naladi = /pws/zycit079-naladi.

      w_tipo_ac_tar = /pws/zycit079-codtarif.

      w_mat_usado = 'N'.

      w_cond_merc = 'N'.

      IF NOT /pws/zycit079-matusado IS INITIAL.

        w_mat_usado = /pws/zycit079-matusado.

      ENDIF.

      IF NOT /pws/zycit079-bemencomenda IS INITIAL.

        w_cond_merc = /pws/zycit079-bemencomenda.

...