CE PLUS - Nota 005099
Módulo: DRAWBACK
Funcionalidade: Ato Concessório
Data/Hora da Publicação: 29/10/2007 00:00:00
Data/Hora Última Alteração: 17/02/2011 15:15:46
Descrição da Nota: PREENCHIMENTO DO CAMPO MOEDA NO ATO CONCESSÓRIO ISENÇÃO
Sintoma
O programa não está preenchendo o campo moeda na pasta componentes nos processos de isenção.
Solução
Atualzação do programa para preencher o campo moeda de acordo com a moeda forte parametrizada no
módulo de cambio.
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 05099 Data: 29/10/2007 Hora: 09:41:23
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 05099
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00003
Agrupamento : 00018
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
02062 - 00001 - 6.0 - 00024 - PADRONIZAÇÃO DOS CAMPOS NO ATO CONCESSORIO
02619 - 00002 - 6.0 - 00025 - AJUSTE INSUMO ALTERNATIVO, CENTROS DA COMPOSIÇÃO E DATAS DO ATO
----------------------------------------------------------------------------------------------------
PREENCHIMENTO DO CAMPO MOEDA NO ATO CONCESSÓRIO ISENÇÃO
----------------------------------------------------------------------------------------------------
Palavras Chave:
ATO CONCESSÓRIO MOEDA FORTE ISENÇÃO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI040I01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI040I01
...
wa_zycit2382-tipo TO /pws/zycie244-tipo ,
wa_zycit2382-tipoemp TO /pws/zycie244-tipoemp ,
wa_zycit2382-oper_ind TO /pws/zycie244-oper_ind ,
wa_zycit2382-bukrs TO /pws/zycie244-bukrs ,
wa_zycit2382-werks TO /pws/zycie244-werks ,
wa_zycit2382-ekorg TO /pws/zycie244-ekorg ,
wa_zycit2382-importacao TO /pws/zycie244-importacao,
wa_zycit2382-variacaocb TO /pws/zycie244-variacaocb,
wa_zycit2382-codagrup TO /pws/zycie244-codagrup.
SELECT SINGLE * FROM t001 WHERE bukrs EQ /pws/zycie244-bukrs.
* >> Início da inclusão: MODULE TRATA_FORECAST
IF NOT /pws/zycie244-bukrs IS INITIAL.
SELECT SINGLE * FROM /pws/zycbt007 INTO wa_zycbt007
WHERE bukrs = /pws/zycie244-bukrs .
ENDIF.
* << Fim da inclusão
SELECT SINGLE ddtext FROM dd07t
INTO /pws/zycie244-tipo2
WHERE domname EQ '/PWS/ZYGLD053'
AND ddlanguage EQ sy-langu(1)
AND domvalue_l LIKE /pws/zycie244-tipo.
CLEAR itab_zycit245. REFRESH itab_zycit245.
SELECT * FROM /pws/zycit249 INTO TABLE itab_zycit249
WHERE nrseqd EQ /pws/zycie244-nrforecast.
SELECT * FROM /pws/zycit240 INTO TABLE itab_zycit240
WHERE nrseqd EQ /pws/zycie244-nrforecast.
...
...
ENDIF.
MOVE: wa_zycit2582-bukrs TO /pws/zycie244-bukrs ,
wa_zycit2582-codagrup TO /pws/zycie244-codagrup ,
wa_zycit2582-modalidade TO /pws/zycie244-modalidade,
wa_zycit2582-tipo TO /pws/zycie244-tipo ,
wa_zycit2582-tipo2 TO /pws/zycie244-tipo2 ,
wa_zycit2582-werks TO /pws/zycie244-werks ,
wa_zycit2582-ekorg TO /pws/zycie244-ekorg ,
wa_zycit2582-importacao TO /pws/zycie244-importacao.
SELECT SINGLE * FROM t001 WHERE bukrs EQ /pws/zycie244-bukrs.
* >> Início da inclusão: MODULE TRATA_COMPOSICAO
IF NOT /pws/zycie244-bukrs IS INITIAL.
SELECT SINGLE * FROM /pws/zycbt007 INTO wa_zycbt007
WHERE bukrs = /pws/zycie244-bukrs .
ENDIF.
* << Fim da inclusão
CLEAR itab_centros2. REFRESH itab_centros2.
SELECT mandt nrseqd werks FROM /pws/zycit434
INTO TABLE itab_centros2
WHERE nrseqd EQ /pws/zycie244-nrcompos.
IF sy-subrc EQ 0.
itab_centros2-nrseqd = /pws/zycie244-nrseqd.
MODIFY itab_centros2 TRANSPORTING nrseqd
WHERE nrseqd EQ /pws/zycie244-nrcompos.
ENDIF.
PERFORM busca_dados_composicao.
...