CE PLUS - Nota 002196
Módulo: DRAWBACK
Funcionalidade: Ato Concessório
Data/Hora da Publicação: 03/10/2006 00:00:00
Data/Hora Última Alteração: 17/02/2011 14:15:28
Descrição da Nota: AJUSTE NA DATA DO ATO E O COMPRIMENTO DO CAMPO NÚMERO
Sintoma
No campo data era exibido a data da DI e o tamanho do campo Número não era suficiente.
Solução
Foi mudado o tratamento para da data, trazendo a data do ato da tabela /pws/zycit244 e o tamanho do
campo Número foi aumentado.
Versões Tratadas
6.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 02196 Data: 03/10/2006 Hora: 15:29:53
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 02196
Categoria : Melhoria
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00025
Agrupamento : 00134
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
00728 - 00001 - 6.0 - 00022 - DATA AC DO ATO TIPO INTERMEDIARIO-EXPORTADOR É APAGADA AO ENTRAR
----------------------------------------------------------------------------------------------------
AJUSTE NA DATA DO ATO E O COMPRIMENTO DO CAMPO NÚMERO
----------------------------------------------------------------------------------------------------
Palavras Chave:
NRATOC, DTATOC, DTDI,/PWS/ZYCIT244,
----------------------------------------------------------------------------------------------------
Objetos da nota:
DYNP /PWS/SAPMZYCI040 0201
REPS /PWS/MZYCI040F02
REPS /PWS/MZYCI040I01
TABD /PWS/ZYCIE244
TABD /PWS/ZYCIT244
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DYNP /PWS/SAPMZYCI040 0201
Nome
Ctg. Linha Coluna CmprDf CmVis Altura Format Dict Modif At.Des.Só At
Gr1 Gr2 Gr3 Gr4 SPA GPA ID parâm Cód.F TCmp TpoLoopExbLoop
Outros atributos
*Modificação:
*Antigo:
/PWS/ZYCIE244-NRATOC
Texto 2 50 6 6 1 CHAR X F
/PWS/ZYCIE244-NRATOC
I/O 2 65 11 11 1 CHAR X X Ent Off
*Novo:
/PWS/ZYCIE244-NRATOC
Texto 4 50 6 6 1 CHAR X F
/PWS/ZYCIE244-NRATOC
I/O 4 65 16 16 1 CHAR X X Ent Off
*Antigo:
/PWS/ZYCIE244-DTDI
Texto 3 50 7 7 1 CHAR X F
/PWS/ZYCIE244-DTDI
I/O 3 65 11 11 1 DATS X X Off
NEX
Botão EntrsPoss.stand.
*Novo:
/PWS/ZYCIE244-DTDI
Texto 2 50 7 7 1 CHAR X F
/PWS/ZYCIE244-DTDI
I/O 2 65 11 11 1 DATS X X Off
NEX
Botão EntrsPoss.stand.
*Antigo:
/PWS/ZYCIE244-STATUS
Texto 4 50 8 8 1 CHAR X F
/PWS/ZYCIE244-STATUS
I/O 4 65 1 11 1 CHAR X Ent Off
SITUAC
Botão EntrsPoss.temp, Drop-down, Caixa listagem
*Novo:
/PWS/ZYCIE244-STATUS
Texto 3 50 8 8 1 CHAR X F
/PWS/ZYCIE244-STATUS
I/O 3 65 1 11 1 CHAR X Ent Off
SITUAC
Botão EntrsPoss.temp, Drop-down, Caixa listagem
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI040F02
...
ENDLOOP.
itab_zycit279_ap-perda = ( itab_zycit279_ap-qtd_perda /
itab_zycit279_ap-menge ) * 100.
MODIFY itab_zycit279_ap.
ENDLOOP.
* >> Início da exclusão: FORM CARREGA_TABELA279
IF /pws/zycie244-dtdi IS INITIAL.
IF NOT itab_data_di[] IS INITIAL.
SORT itab_data_di BY data.
READ TABLE itab_data_di INDEX 1.
/pws/zycie244-dtdi = itab_data_di-data.
/pws/zycie244-vcto_fn = /pws/zycie244-dtdi + 731.
IF /pws/zycie244-vcto_vg IS INITIAL.
/pws/zycie244-vcto_vg = /pws/zycie244-vcto_fn.
itab_vencto2-vencto = /pws/zycie244-vcto_fn.
APPEND itab_vencto2.
ENDIF.
UPDATE /pws/zycit244 SET dtdi = /pws/zycie244-dtdi
vcto_fn = /pws/zycie244-vcto_fn
WHERE nrseqd EQ /pws/zycie244-nrseqd.
ENDIF.
ENDIF.
* << Fim da exclusão
ENDFORM.
FORM monta_transf.
REFRESH itab_zycit279_ap_aux.
CLEAR itab_zycit279_ap.
MODIFY itab_zycit279_ap TRANSPORTING mark
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI040I01
...
IF /pws/zycie244-nratoc IS INITIAL OR
/pws/zycie244-dtatoc IS INITIAL.
MESSAGE e015 WITH text-209 text-210.
/pws/zycie244-status = v_status_dif.
EXIT.
* >> Início da inclusão: MODULE VERIFICA_ATO
ELSE.
/pws/zycie244-dtdi = /pws/zycie244-dtatoc.
IF NOT /pws/zycie244-dtatoc IS INITIAL.
/pws/zycie244-vcto_fn = /pws/zycie244-dtatoc + 731.
IF /pws/zycie244-vcto_vg IS INITIAL.
/pws/zycie244-vcto_vg = /pws/zycie244-vcto_fn.
itab_vencto2-vencto = /pws/zycie244-vcto_fn.
APPEND itab_vencto2.
ENDIF.
UPDATE /pws/zycit244 SET vcto_fn = /pws/zycie244-vcto_fn
WHERE nrseqd EQ /pws/zycie244-nrseqd.
ENDIF.
* << Fim da inclusão
ENDIF.
ELSEIF /pws/zycie244-status EQ 'E' AND
wa_zycit244-status NE 'E' AND
sy-ucomm NE 'ENCER'.
/pws/zycie244-status = wa_zycit244-status.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em TABD /PWS/ZYCIE244
MODIFICAR ESTRUTURA: /PWS/ZYCIE244
DESCRIÇÃO BREVE: CI - AtoConcessório Cabeçalho
COMPONENTES NOVOS
COMPONENTE: TP. COMP: TAB.REF.: CPO.REF.: AJUD. PESQU.
NRATOC CHAR16
COMPONENTES EXCLUÍDOS
COMPONENTE: TP. COMP: TAB.REF.: CPO.REF.: AJUD. PESQU.
NRATOC CHAR13
----------------------------------------------------------------------------------------------------
Modificações efetuadas em TABD /PWS/ZYCIT244
MODIFICAR TABELA TRANSPARENTE: /PWS/ZYCIT244
DESCRIÇÃO BREVE: CI - Ato Concessório Cabeçalho
CAMPOS NOVOS
CAMPOS: TP. CAMPO CH: INI: TAB.VERIF.: TAB.REF.: CPO.RE
NRATOC CHAR16
CAMPOS EXCLUÍDOS
CAMPOS: TP. CAMPO CH: INI: TAB.VERIF.: TAB.REF.: CPO.RE
NRATOC CHAR13