CE PLUS - Nota 001256

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.

 

Versões Tratadas

6.0


Pré-Requisitos

Produto:

Nota

Descrição

SISTEMA NÃO REALIZA A FATURA EM ALGUNS EMBARQUES.

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',

...