CE PLUS - Nota 000382
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Encerramento Contábil
Data/Hora da Publicação: 02/12/2005 00:00:00
Data/Hora Última Alteração: 20/06/2011 12:08:22
Descrição da Nota: AO FAZER A F-51 PARA DOCUMENTOS ANTIGOS EX:2004 O PROGRAMA NÃO ESTÁ PEGA
Sintoma
Ao Fazer a F-51 para documentos antigos Ex:2004, o programa não está pegando.
Recebimento e encerramento contábil.
Solução
Ajustado para passar a função de obter ano contabil para pegar os documentos para fazer a
compensação na F-51
Versões Tratadas
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 00382 Data: 02/12/2005 Hora: 10:57:10
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 00382
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00021
Agrupamento : 00090
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
AO FAZER A F-51 PARA DOCUMENTOS ANTIGOS EX:2004 O PROGRAMA NÃO ESTÁ PEGA
----------------------------------------------------------------------------------------------------
Palavras Chave:
F-51
----------------------------------------------------------------------------------------------------
Objetos da nota:
FUNC /PWS/ZYCI_TRANSACAO_F_51G
----------------------------------------------------------------------------------------------------
Modificações efetuadas em FUNC /PWS/ZYCI_TRANSACAO_F_51G
...
WRITE: t_dados-bldat TO v_bldat,
t_dados-budat TO v_budat,
t_dados-kursf TO v_kursf,
t_dados-wrbtr TO v_wrbtr CURRENCY t_dados-waers,
t_dados-bukrs TO v_bukrs.
* Testa se o período é válido e permite que o usuário digite uma nova
* data de lançamento
v_monat = t_dados-budat+4(2). "período
* << início Inclusão >> <-----Nota
CALL FUNCTION '/PWS/ZYGL_OBTEM_ANO_CONTABIL'
EXPORTING
v_bukrs = v_bukrs
v_date = t_dados-budat
IMPORTING
v_year = v_gjahr.
IF sy-subrc <> 0.
v_gjahr = t_dados-budat+0(4). "ano
ENDIF.
* << Fim Inclusão >> <-----Nota
v_koart = 'K'. "tipo de conta: Fornecedor
* while v_ok <> 'S'.
PERFORM check_periodo USING v_koart
v_monat
v_bukrs
v_gjahr
CHANGING v_budat
v_ok.
...