CE PLUS - Nota 009266

Módulo: CÂMBIO FINANCEIRO

Funcionalidade: Relatórios

Data/Hora da Publicação: 27/10/2009 00:00:00

Data/Hora Última Alteração: 18/02/2011 14:20:15

Descrição da Nota: RELATÓRIO CÂMBIOS FECHADOS

Sintoma

O Relatório /PWS/ZYCBR047 - Câmbios Fechados não está carregando todos os contratos que deveriam ser

selecionados.

 

 

Solução

Quando é selecionada a Opção de "Todos os Contratos", o relatório irá selecionar os dados comparando

a Data do Contrato com o campo da tela "Posição em.:". ( Quando o campo "Posição em.:" não estiver

preenchdio o relatório irá consider a Data Atual ) e irá desprezar os registros com STATUS = "I",

isto somente para a Opção de "Todos os Contratos".

 

Versões Tratadas

7.0


Pré-Requisitos

Produto:

Nota

Descrição

RELATORIO DE CAMBIOS FECHADOS - NÃO EXIBIR CONTRATOS ENCERRADOS

SELEÇÃO DO RELATORIO DE CAMBIOS FECHADOS COMO O CAMPO "POSIÇÃO EM"

Informações Complementares

----------------------------------------------------------------------------------------------------

Nota Número 09266 Data: 27/10/2009 Hora: 13:47:56

----------------------------------------------------------------------------------------------------

 

----------------------------------------------------------------------------------------------------

Nota Número              : 09266

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 8.0

Pacote                   : 00001

Agrupamento              : 00001

----------------------------------------------------------------------------------------------------

Referência às notas relacionadas:

Número - Ordem - Versão - Pacote - Descrição Breve

 

07151  - 00001 - 7.0    - 00006  - SELEÇÃO DO RELATORIO DE CAMBIOS FECHADOS COMO O CAMPO "POSIÇÃO EM

08235  - 00002 - 7.0    - 00009  - RELATORIO DE CAMBIOS FECHADOS - NÃO EXIBIR CONTRATOS ENCERRADOS

----------------------------------------------------------------------------------------------------

RELATÓRIO CÂMBIOS FECHADOS

----------------------------------------------------------------------------------------------------

Palavras Chave:

RELATÓRIO CÄMBIOS FECHADOS - FLAG TODOS OS CONTRATOS

 

----------------------------------------------------------------------------------------------------

Objetos da nota:

REPS /PWS/ZYCBR047

 

----------------------------------------------------------------------------------------------------

Modificações efetuadas em REPS /PWS/ZYCBR047

 

...

          dtcred   like /pws/zycbt001-dtcred,

          dtliquid like /pws/zycbt001-dtliquid,

          waers    like /pws/zycbt001-waers,

          vlme     like /pws/zycbt001-vlme,

          txcneg   like /pws/zycbt001-txcneg,

          slvinc   like /pws/zycbt001-slvinc,

          slpagar  like /pws/zycbt001-slpagar,

          kunnr    like /pws/zycbt001-kunnr,

          corret   like /pws/zycbt001-corret,

          vlmi     like /pws/zycbt001-vlmi,

* >> Início da inclusão:

          status   like /pws/zycbt001-status,

* << Fim da inclusão

      end of itab_zycbt001.

data: begin of itab_zycbt002 occurs 0,

        nrseqc   like /pws/zycbt002-nrseqc,

        txjtotal like /pws/zycbt002-txjtotal,

        tptxjur  like /pws/zycbt002-tptxjur,

    end of itab_zycbt002.

data: begin of itab_kna1cli occurs 0,

        kunnr    like kna1-kunnr,

        name1    like kna1-name1,

    end of itab_kna1cli.

...

 

...

  if not p_alv is initial.

    set pf-status 'SEL047'.

  endif.

at user-command.

  case sy-ucomm.

    when others.

  endcase.

form seleciona_dados.

  select nrseqc nrcontr tpcontr bconegoc bukrs gsber dtcontr dtcred

         dtliquid waers vlme txcneg slvinc slpagar kunnr corret vlmi

* >> Início da inclusão: FORM SELECIONA_DADOS

         status

* << Fim da inclusão

         into table itab_zycbt001 from /pws/zycbt001

         where nrcontr  in s_nrcont and

               bukrs    in s_bukrs  and

               werks    in s_werks  and

               gsber    in s_gsber  and

               tpcontr  in s_tpcont and

               dtcontr  in s_dtcont and

               corret   in s_corret and

               bconegoc in s_bconeg and

               kunnr    in s_kunnr                     "#EC CI_NOFIELD

...

 

...

          delete itab_zycbt001 where nrseqc = v_nrseq.

          if itab_zycbt001[] is initial.

            message i222.

            stop.

          endif.

        endif.

      endif.

    endif.

  endloop.

  if p_todos eq 'X'.

* >> Início da inclusão: FORM FILTRA_DADOS

    if p_dtliq ne '00000000'.

      delete itab_zycbt001 where dtcontr gt p_dtliq.

    else.

      delete itab_zycbt001 where dtcontr gt sy-datum.

    endif.

    delete itab_zycbt001 where status eq 'I'.

  else.

* << Fim da inclusão

    if p_dtliq ne '00000000'.

      delete itab_zycbt001 where dtliquid gt p_dtliq.

      delete itab_zycbt005 where dtvincul gt p_dtliq.

      delete itab_zycbt006 where dtpagto  gt p_dtliq.

    else.

      delete itab_zycbt001 where dtliquid gt sy-datum.

    endif.

  endif.

endform.