CE PLUS - Nota 002353

Módulo: DRAWBACK

Funcionalidade: Transmissão Siscomex

Data/Hora da Publicação: 31/10/2006 00:00:00

Data/Hora Última Alteração: 17/02/2011 14:26:49

Descrição da Nota: CORREÇÃO DA FUNÇÃO PARA ABERTURA DO ATO NO SISCOMEX

Sintoma

1- Não informou no SISCOMEX valor de seguro de importação;

2- Exportação - Informado no AC que trata-se de uma operação com cobertura cambial, no SISCOMEX

repete-se o valor com e sem cobertura. Quando processo com cobertura o campo sem cobertura deve

ficar em branco;

3- Importação - Transmissão da usagem ao invés da quantidade a ser importada para os itens;

4- Importação - Descrição das matérias-primas importadas no SISCOMEX em inglês no AC está em

português.Devem ser transmitidas em português;

5- Importação - Campos quantidade e quantidade líquida NCM (usagem) no SISCOMEX;

6- Exportação - Informado no AC ao invés do valor USD, está a quantidade a exportar no SISCOMEX.

 

 

Solução

Foi criado tratativa no programa para levar o valor das tabelas /pws/zycit245 e /pws/zycit247 ao

invés de levar a porcentagem. Foi incluído na seleção da tabela MAKT a condição do idioma: "PT".

 

Versões Tratadas

6.0

Informações Complementares

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

Nota Número 02353 Data: 31/10/2006 Hora: 09:21:55

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

 

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

Nota Número              : 02353

Categoria                : Melhoria

Prioridade               : Média

Versão PW.CE             : 6.0

Pacote                   : 00025

Agrupamento              : 00138

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

 

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

CORREÇÃO DA FUNÇÃO PARA ABERTURA DO ATO NO SISCOMEX

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

Palavras Chave:

SISCOMEX, TRANSMISSÃO, ATO CONCESSÓRIO, VL_SEG_T, VL_FRETE_T, QTD_NCM

 

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

Objetos da nota:

FUNC /PWS/ZYCI_TRANSFER_DRAWBACK

 

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

Modificações efetuadas em FUNC /PWS/ZYCI_TRANSFER_DRAWBACK

 

...

         into table it_zycit245 where

         nrseqd = i_nrseqd.

  if sy-subrc eq 0.

    select matnr maktx from makt into table it_makt

         for all entries in it_zycit245

* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSFER_DRAWBACK

         where matnr = it_zycit245-codcomp.

* << Fim da exclusão

* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSFER_DRAWBACK

         where matnr = it_zycit245-codcomp

         and spras = 'PT'.

* << Fim da inclusão

  endif.

  if not it_zycit245[] is initial.

    loop at it_zycit245.

      move:

          it_zycit245-mandt        to it_ac_matimp-mandt     ,

          it_zycit245-nrseqd       to it_ac_matimp-nrseqd    ,

          it_zycit245-codcomp      to it_ac_matimp-codcomp   ,

          it_zycit245-werks        to it_ac_matimp-werks     ,

          it_zycit245-proced       to it_ac_matimp-proced    ,

          it_zycit245-meins        to it_ac_matimp-meins     ,

* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSFER_DRAWBACK

          it_zycit245-qtd_iten     to it_ac_matimp-qtd_iten  ,

* << Fim da exclusão

* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSFER_DRAWBACK

          it_zycit245-qtd_ncm      to it_ac_matimp-qtd_iten  ,

* << Fim da inclusão

          it_zycit245-qtd_tot      to it_ac_matimp-qtd_tot   ,

          it_zycit245-gewei        to it_ac_matimp-gewei     ,

          it_zycit245-brgew        to it_ac_matimp-brgew     ,

          it_zycit245-ntgew        to it_ac_matimp-ntgew     ,

          it_zycit245-sdocomp_i    to it_ac_matimp-sdocomp_i ,

          it_zycit245-waers        to it_ac_matimp-waers     ,

          it_zycit245-netpr        to it_ac_matimp-netpr     ,

          it_zycit245-netpr_t      to it_ac_matimp-netpr_t   ,

* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSFER_DRAWBACK

          it_zycit245-vl_frete     to it_ac_matimp-vl_frete  ,

* << Fim da exclusão

* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSFER_DRAWBACK

          it_zycit245-vl_frete_t   to it_ac_matimp-vl_frete  ,

* << Fim da inclusão

          it_zycit245-vl_frete_t   to it_ac_matimp-vl_frete_t,

          it_zycit245-pctseg       to it_ac_matimp-pctseg    ,

* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSFER_DRAWBACK

          it_zycit245-vl_seg       to it_ac_matimp-vl_seg    ,

* << Fim da exclusão

* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSFER_DRAWBACK

          it_zycit245-vl_seg_t     to it_ac_matimp-vl_seg    ,

* << Fim da inclusão

          it_zycit245-vl_seg_t     to it_ac_matimp-vl_seg_t  ,

          it_zycit245-j_1bnbm      to it_ac_matimp-j_1bnbm   .

      append it_ac_matimp.

    endloop.

  endif.

...

 

...

         into table it_zycit247 where

         nrseqd = i_nrseqd.

  if sy-subrc eq 0.

     select matnr maktx from makt into table it_makt

            for all entries in it_zycit247

* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSFER_DRAWBACK

            where matnr = it_zycit247-codmat.

* << Fim da exclusão

* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSFER_DRAWBACK

            where matnr = it_zycit247-codmat

            and   spras = 'PT'.

* << Fim da inclusão

  endif.

  if not it_zycit247[] is initial.

    loop at it_zycit247.

      move:

          it_zycit247-mandt        to it_ac_matexp-mandt         ,

...

 

...

          it_zycit247-sdomat_e     to it_ac_matexp-sdomat_e      ,

          it_zycit247-esgotado     to it_ac_matexp-esgotado      ,

          it_zycit247-waers        to it_ac_matexp-waers         ,

          it_zycit247-netpr        to it_ac_matexp-netpr         ,

          it_zycit247-netpr_t      to it_ac_matexp-netpr_t       ,

* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSFER_DRAWBACK

          it_zycit247-vl_frete     to it_ac_matexp-vl_frete      ,

* << Fim da exclusão

* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSFER_DRAWBACK

          it_zycit247-vl_frete_t   to it_ac_matexp-vl_frete      ,

* << Fim da inclusão

          it_zycit247-vl_frete_t   to it_ac_matexp-vl_frete_t    ,

          it_zycit247-pctcomis     to it_ac_matexp-pctcomis      ,

          it_zycit247-vl_comis     to it_ac_matexp-vl_comis      ,

          it_zycit247-vl_comis_t   to it_ac_matexp-vl_comis_t    ,

          it_zycit247-gewei        to it_ac_matexp-gewei         ,

          it_zycit247-brgew        to it_ac_matexp-brgew         ,

          it_zycit247-ntgew        to it_ac_matexp-ntgew         ,

* >> Início da exclusão: FUNCTION /PWS/ZYCI_TRANSFER_DRAWBACK

          it_zycit247-j_1bnbm      to it_ac_matexp-j_1bnbm       .

* << Fim da exclusão

* >> Início da inclusão: FUNCTION /PWS/ZYCI_TRANSFER_DRAWBACK

          it_zycit247-j_1bnbm      to it_ac_matexp-j_1bnbm       ,

          it_zycit247-vl_scamb     to it_ac_matexp-vl_scamb      .

* << Fim da inclusão

      append it_ac_matexp.

    endloop.

  endif.

  if not it_makt[] is initial.

          loop at it_ac_matexp.

...

 

 

* Tabelas

 

* Antigo:

 

IT_AC_MATEXP LIKE /PWS/ZYCIE247D   CI - Ato Concessório Materiais Exportados - função

 

* Novo

 

IT_AC_MATEXP LIKE /PWS/ZYCIE247         CI - Ato Concessório Materiais Exportados - função