Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Fatura Despesas
Data/Hora da Publicação: 27/04/2006 00:00:00
Data/Hora Última Alteração: 20/06/2011 12:30:26
Descrição da Nota: ERRO NAS FATURAS DE SERVIÇO, QUANDO GERAMOS A REMESSA PARA O MÓDULO DE C
Sintoma
Nas Faturas de Serviço, quando geramos a remessa para o Módulo de Câmbio, o sistema leva a
informação de Taxa de Câmbio (Campo KURSF) na tabela /PWS/ZYCBT124. Porém se efetuamos o Recebimento
dessa Fatura, a informação de Taxa de Câmbio não aparece mais na tabela.
Solução
Atualizado o tratamento para fatura do tipo Serviço com relação a informação da taxa de Cambio.
6.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 01256 Data: 27/04/2006 Hora: 10:39:25
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 01256
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00023
Agrupamento : 00111
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
00811 - 00001 - 6.0 - 00022 - SISTEMA NÃO REALIZA A FATURA EM ALGUNS EMBARQUES.
----------------------------------------------------------------------------------------------------
ERRO NAS FATURAS DE SERVIÇO, QUANDO GERAMOS A REMESSA PARA O MÓDULO DE C
----------------------------------------------------------------------------------------------------
Palavras Chave:
FATURAS - SERVIÇO - REMESSA - CAMBIO - RECEBIMENTO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI003F01
REPS /PWS/MZYCI003F02
REPS /PWS/MZYCI003TOP
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F01
...
PERFORM gravar_cambio.
ELSEIF /pws/zycie006-fhcambio = 'X'.
ENDIF.
ENDIF.
ENDIF.
* >> Início da inclusão: FORM ROTINA_DE_CONTABILIZACAO
if v_recebi ne 'X'.
if /pws/zycie006-tpfatura eq '11'.
perform cria_remessa.
endif.
endif.
* << Fim da inclusão
IF ( NOT v_contabilizou IS INITIAL AND
( /pws/zycie006-belnr_p NE wa_zycie006_ini-belnr_p OR
( itab_zycit132[] NE itab_zycit132_ini[] AND
( itab_zycit132_ini[] IS INITIAL OR
v_par = 'X' ) ) ) )
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F02
...
DATA: v_lfsnr_old LIKE /pws/zycie006-lfsnr,
v_lfsnr LIKE /pws/zycie006-lfsnr,
v_indice(02) TYPE n ,
v_erro ,
v_servico(01) TYPE c .
* >> Início da inclusão: FORM EXECUTA_RECEBIMENTO
v_recebi = 'X'.
* << Fim da inclusão
IF /pws/zycie006-belnr_mr1m IS INITIAL AND
/pws/zycie006-mblnr_mb01 IS INITIAL AND
/pws/zycie006-belnr_f_51 IS INITIAL.
CLEAR v_lfsnr.
MOVE /pws/zycie006-lfsnr TO v_lfsnr.
...
...
/pws/zycie006-lfsnr = v_lfsnr_old.
ENDIF.
ELSE.
/pws/zycie006-lfsnr = v_lfsnr_old.
ENDIF.
* >> Início da inclusão: FORM EXECUTA_RECEBIMENTO
clear v_recebi.
* << Fim da inclusão
ENDFORM.
FORM lock_fornecedor CHANGING erro.
DATA: v_message(40) TYPE c.
CALL FUNCTION 'ENQUEUE_EFLFB1AS'
EXPORTING
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003TOP
...
v_tela_help LIKE sy-dynnr value '0052',
v_kurst like /pws/zycit000-kurst ,
v_nrseq LIKE /pws/zycit001-nrseq ,
v_awkey LIKE bkpf-awkey ,
v_existe_lc type C ,
* >> Início da exclusão:
v_descfab(01).
* << Fim da exclusão
* >> Início da inclusão:
v_descfab(01) ,
v_recebi.
* << Fim da inclusão
DATA: gv_subscreen_0050 TYPE sy-dynnr VALUE '0051',
gv_subscreen_0100_1 TYPE sy-dynnr,
gv_subscreen_0300_2 TYPE sy-dynnr.
CONSTANTS: BEGIN OF gc_subscreen,
prog TYPE sy-dynnr VALUE '0100',
...