Sintoma

O Ato concessório não esta preenchendo a quantidade e unidade NCM, quando ocorre a vinculação da

composição isenção.

Solução

Ajustar o programa para efetuar o calculo durante a transferencia dos dados da composição.

Informações Complementares

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

Nota Número 01209 Data: 17/04/2006 Hora: 09:53:24

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

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

Nota Número              : 01209

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 6.0

Pacote                   : 00023

Agrupamento              : 00109

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

Referência às notas relacionadas:

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

01159  - 00001 - 6.0    - 00023  - DESENVOLVIMENTO PARA TRANSMISSÃO DOS DADOS DO ATO PARA O SISCOMEX

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

PREENCHIMENTO DA QUANTIDADE E UNIDADE NCM NA VINCULAÇÃO DA COMPOSIÇÃO

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

Palavras Chave:

ATO CONCESSÓRIO - COMPOSIÇÃO - VINCULAÇÃO - QUANTIDADE - UNIDADE

/PWS/SAPMZYCI040 - NCM

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

Objetos da nota:

REPS /PWS/MZYCI040F02

REPS /PWS/MZYCI040F03

REPS /PWS/MZYCI040I01

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

Modificações efetuadas em REPS /PWS/MZYCI040F02

...

          itab_zycit245-brgew = vbrgtmp .

          itab_zycit245-ntgew = vntgtmp .

          MOVE: itab_zycit260-meins TO itab_zycit245-meins,

                itab_zycit260-gewei TO itab_zycit245-gewei,

                itab_zycit260-waers TO itab_zycit245-waers.

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

          itab_zycit245-qtd_ncm = itab_zycit245-qtd_tot.

          itab_zycit245-um_ncm  = itab_zycit245-meins.

          PERFORM converte_um_ncm USING itab_zycit245-codcomp

                                  CHANGING itab_zycit245-um_ncm

                                           itab_zycit245-werks

                                           itab_zycit245-qtd_ncm.

* << Fim da inclusão

          PERFORM select_max_item_number2 CHANGING v_nritem.

          itab_zycit245-nritem = v_nritem.

          MODIFY itab_zycit245.

          itab_zycit245_aux[] = itab_zycit245[].

        ENDIF.

...

...

                itab_zycit259-stlnr    TO itab_zycit247-stlnr     ,

                itab_zycit259-stlan    TO itab_zycit247-stlan     ,

                itab_zycit259-meins    TO itab_zycit247-meins     ,

                itab_zycit259-waersfob TO itab_zycit247-waers     ,

                itab_zycit259-gewei    TO itab_zycit247-gewei     .

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

          itab_zycit247-qtd_ncm = itab_zycit247-qtd_iten.

          itab_zycit247-um_ncm  = itab_zycit247-meins.

          PERFORM converte_um_ncm USING itab_zycit247-codmat

                                  CHANGING itab_zycit247-um_ncm

                                           itab_zycit247-werks

                                           itab_zycit247-qtd_ncm.

* << Fim da inclusão

          CLEAR: vntgtmp, vbrgtmp.

          SELECT SINGLE ntgew brgew FROM mara INTO (vntgtmp, vbrgtmp)

              WHERE matnr EQ itab_zycit247-codmat.

          itab_zycit247-vl_frete = itab_zycit247-vl_frete_t /

                                   itab_zycit247-qtd_iten.

...

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

Modificações efetuadas em REPS /PWS/MZYCI040F03

...

  CLEAR v_status_tf.

  PERFORM transf_saldo USING v_status_tf.

  IF v_status_tf NE 'S'.

    EXIT.

  ENDIF.

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

  IF NOT /pws/zycit321-siscotrans IS INITIAL AND

     /pws/zycie244-modalidade EQ 'D'.

* << Fim da inclusão

  it_zycit285-nrseqd   = /pws/zycie244-nrseqd.

  it_zycit285-tp_doc   = 'BAC'.

  it_zycit285-identify = /pws/zycie244-identify.

  it_zycit285-werks    = /pws/zycie244-werks.

  it_zycit285-bukrs    = /pws/zycie244-bukrs.

...

...

  it_zycit285-stasis   = 'A'.

  it_zycit285-cpf    = /pws/zycet184-cpf.

  APPEND it_zycit285.

  MODIFY /pws/zycit285 FROM TABLE it_zycit285.

  COMMIT WORK.

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

  ENDIF.

* << Fim da inclusão

  CLEAR itab_zycit282. REFRESH itab_zycit282.

  /pws/zycie244-fechado = 'X'.

  /pws/zycie244-status  = 'E'.

  /pws/zycie244-dtencer = sy-datum.

  wa_zycit244-status = 'E'.

...

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

Modificações efetuadas em REPS /PWS/MZYCI040I01

...

    WHEN 'BTN3'.

      PERFORM trata_button_btn3.

    WHEN 'SITUAC'.

      PERFORM trata_button_situac2.

    WHEN 'ENCER'.

* >> Início da exclusão: MODULE USER_COMMAND_0200

      IF /pws/zycit321-siscotrans IS INITIAL.

* << Fim da exclusão

* >> Início da inclusão: MODULE USER_COMMAND_0200

      IF /pws/zycit321-siscotrans IS INITIAL or

         /pws/zycie244-modalidade eq 'I'.

* << Fim da inclusão

        PERFORM trata_button_encer2.

      ELSE.

        READ TABLE itab_zycit248_save WITH KEY siscomex = space.

        IF sy-subrc EQ 0.

          MESSAGE i015 WITH text-306.

...