CE PLUS - Nota 011587
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Fatura Mercadoria
Data/Hora da Publicação: 27/10/2011 00:00:00
Data/Hora Última Alteração: 27/10/2011 13:41:23
Descrição da Nota: TRATAMENTO DATA DE LANÇAMENTO NA FATURA AMÉRICA LATINA
Sintoma
Criar o campo "data de lançamento" na fatura da América Latina.
Este campo deverá ser proposto com a data do dia e possível de modificação.
A informação deste campo deverá ser levada para a MIRO, campo INVFO-BUDAT.
Solução
Criar campo em tela e fazer tratamento para levar a informação deste campo para a MIRO, campo INVFO-
BUDAT.
Versões Tratadas
8.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 11587 Data: 27/10/2011 Hora: 13:43:26
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 11587
Categoria : Melhoria
Prioridade : Alta
Versão PW.CE : 8.0
Pacote : 00009
Agrupamento : 00091
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
10446 - 00001 - 8.0 - 00004 - DEFINIR DATA DE LANÇAMENTO ATRAVÉS DO PARAMETRO DA TAB. /PWS/ZYCI
----------------------------------------------------------------------------------------------------
TRATAMENTO DATA DE LANÇAMENTO NA FATURA AMÉRICA LATINA
----------------------------------------------------------------------------------------------------
Palavras Chave:
DATA DE LANÇAMENTO - BUDAT - LATAM - AMÉRICA LATINA - FATURA
----------------------------------------------------------------------------------------------------
Objetos da nota:
DYNP /PWS/SAPMZYCI003 0101
REPS /PWS/MZYCI003F01
REPS /PWS/MZYCI003F02
REPS /PWS/MZYCI003O01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DYNP /PWS/SAPMZYCI003 0101
*Retirar o campo Data do Débito em Conta e colocar o campo Data de Lançamento no lugar
*Colocar o campo Data do Débito em Conta no final da tela
*Mover o campo "/PWS/ZYCIE006-DTD_CONTA" (abaixo do campo Fecha Câmbio)
MODIFICAR CAMPO TEXTO "/PWS/ZYCIE006-DTD_CONTA"
Linha 21
MODIFICAR TEXTO "/PWS/ZYCIE006-DTD_CONTA"
Linha 21
*Incluir campo em tela
INCLUIR CAMPO TEXTO "/PWS/ZYCIE006-DTLANC"
Comprimento Visível 10
Linha 1
Coluna 71
Formato DATE
Grupo 4 BOL
Linhas mínimas 8
Texto __________
Código função
Do Dict. X
Programa:
Campo de Entrada X
Campo de Saída X
Entrs.Possíveis X
Exibição:
Fonte equidistante X
Oculto X
INCLUIR TEXTO "/PWS/ZYCIE006-DTLANC"
Comprimento Visível 18
Linha 1
Coluna 50
Formato CHAR
Grupo 4 BOL
Texto Data de Lançamento
Código função
Dicionário:
Do Dict. X
Modific. 3
Exibição:
Oculto X
Como denom.à esquerda X
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F01
...
itab_zycbe033-budat = sy-datlo.
* >> Início da inclusão: FORM FILL_DATE_F-43_F-02
if /pws/zycit477 is initial or /pws/zycie006-dtlanc is initial.
* << Fim da inclusão
/pws/zycie006-dtlanc = sy-datlo.
* >> Início da inclusão: FORM FILL_DATE_F-43_F-02
endif.
* << Fim da inclusão
SELECT SINGLE * FROM /pws/zycit286 WHERE tpfatura =
/pws/zycie006-tpfatura.
IF /pws/zycit286-conversao = 'DTDOC'.
itab_zycbe033-wwert = /pws/zycie006-dtincl.
ELSE.
itab_zycbe033-wwert = sy-datlo.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F02
...
* >> Início da exclusão: FORM MIRO_AM_LA
wa_headerdata-pstng_date = sy-datum.
* << Fim da exclusão
* >> Início da inclusão: FORM MIRO_AM_LA
wa_headerdata-pstng_date = /pws/zycie006-dtlanc.
* << Fim da inclusão
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003O01
...
* >> Início da inclusão: MODULE LOAD_DATA
if /pws/zycie006-dtlanc is initial.
/pws/zycie006-dtlanc = sy-datlo.
endif.
* << Fim da inclusão
ENDMODULE.
...
...
IF screen-name EQ '/PWS/ZYCIE006-IVA' AND
( /pws/zycit477 IS INITIAL OR
/pws/zycie006-tpfatura EQ '01' OR
/pws/zycie006-tpfatura IS INITIAL ).
screen-active = 0 .
screen-invisible = 1 .
MODIFY SCREEN.
ENDIF.
* >> Início da inclusão: MODULE SET_SCREEN
IF screen-name EQ '/PWS/ZYCIE006-DTLANC' and
/pws/zycit477 IS INITIAL .
screen-active = 0 .
screen-invisible = 1 .
MODIFY SCREEN.
elseif screen-name EQ '/PWS/ZYCIE006-DTLANC'.
screen-active = 1 .
screen-invisible = 0 .
if not /pws/zycie006-belnr_p is initial.
screen-input = '0'.
endif.
MODIFY SCREEN.
ENDIF.
* << Fim da inclusão
...