CE PLUS - Nota 001286
Módulo: DRAWBACK
Funcionalidade: Ato Concessório
Data/Hora da Publicação: 08/05/2006 00:00:00
Data/Hora Última Alteração: 17/02/2011 13:46:39
Descrição da Nota: AJUSTE PARA TRATAMENTO DO PARAMETRO DE CONTROLE DE ATO COMUM POR NCM
Sintoma
Programa não possui tratamento para o parametro de controle de ato concessório comum por ncm.
Solução
Ajuste no programa de vinculação para tratamento do parametro de controle de ato concessório comum
por ncm.
Versões Tratadas
6.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 01286 Data: 08/05/2006 Hora: 09:24:36
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 01286
Categoria : Melhoria
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00023
Agrupamento : 00112
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
00581 - 00001 - 6.0 - 00022 - TRATAMENTO DE INSUMO ALTERNATIVO NA VINCULAÇÃO DO PEDIDO.
----------------------------------------------------------------------------------------------------
AJUSTE PARA TRATAMENTO DO PARAMETRO DE CONTROLE DE ATO COMUM POR NCM
----------------------------------------------------------------------------------------------------
Palavras Chave:
VINCULAÇÃO - ATO CONCESSÓRIO - COMUM - NCM - PARAMETRO
/PWS/SAPMZYCI068
----------------------------------------------------------------------------------------------------
Objetos da nota:
DYNP /PWS/SAPMZYCI068 0200
REPS /PWS/MZYCI068F01
REPS /PWS/MZYCI068I01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DYNP /PWS/SAPMZYCI068 0200
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI068F01
...
ebelp = itab_ekpo-ebelp.
IF sy-subrc EQ 0.
CONTINUE.
ENDIF.
IF /pws/zycit321-apr_imp NE 'X'.
* >> Início da inclusão: FORM MONTA_376_APR
IF /pws/zycit321-c_comum is initial.
* << Fim da inclusão
READ TABLE itab_atos WITH KEY matnr = itab_ekpo-matnr
j_1bnbm = itab_ekpo-j_1bnbm.
* >> Início da inclusão: FORM MONTA_376_APR
else.
READ TABLE itab_atos WITH KEY j_1bnbm = itab_ekpo-j_1bnbm.
endif.
* << Fim da inclusão
IF sy-subrc NE 0.
READ TABLE itab_zycit433 WITH KEY
matnr_alt = itab_ekpo-matnr.
IF sy-subrc NE 0.
CONTINUE.
...
...
DATA: BEGIN OF itab_mat_t OCCURS 0.
DATA: matnr LIKE mara-matnr.
DATA: END OF itab_mat_t.
itab_atos_t[] = itab_atos[].
IF /pws/zycit321-apr_imp IS INITIAL.
* >> Início da inclusão: FORM MOVE_ATOS
IF /pws/zycit321-c_comum IS INITIAL.
* << Fim da inclusão
CLEAR: itab_zycit433. REFRESH itab_zycit433.
SELECT * FROM /pws/zycit433 INTO TABLE itab_zycit433
WHERE matnr_alt EQ itab_zycit376_t-matnr.
itab_zycit433-matnr_alt = itab_zycit376_t-matnr.
itab_zycit433-matnr = itab_zycit376_t-matnr.
...
...
matnr = itab_atos_t-matnr.
IF sy-subrc NE 0.
DELETE itab_atos_t WHERE matnr EQ itab_atos_t-matnr.
ENDIF.
ENDLOOP.
* >> Início da inclusão: FORM MOVE_ATOS
ELSE.
DELETE itab_atos_t WHERE j_1bnbm NE itab_zycit376_t-j_1bnbm.
* << Fim da inclusão
ENDIF.
* >> Início da inclusão: FORM MOVE_ATOS
ENDIF.
* << Fim da inclusão
ENDFORM.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI068I01
...
WHEN 'VINC'.
READ TABLE itab_zycit376_t WITH KEY marc = 'X'.
IF sy-subrc EQ 0.
PERFORM vic_ped.
PERFORM move_atos.
* >> Início da inclusão: MODULE USER_COMMAND_0100
tc_atos-top_line = 1.
* << Fim da inclusão
CALL SCREEN 0200.
ENDIF.
WHEN 'NVINC'.
CLEAR v_resp.
PERFORM popup USING text-004
...