CE PLUS - Nota 002243

Módulo: CÂMBIO FINANCEIRO

Funcionalidade: Rotina de Pagamento

Data/Hora da Publicação: 10/10/2006 00:00:00

Data/Hora Última Alteração: 18/02/2011 11:43:30

Descrição da Nota: COMPLEMENTO DO BOLETO - REMESSA - DATA DE VENCIMENTO

Sintoma

Ao salvar o complemento do boleto de uma remessa em que os impostos sejam regime de caixa, o

programa está modificando a data de vencimento dos impostos inserida na tela da remessa pela data de

contabilização do complemento do boleto.

 

 

Solução

Como solução para ter as duas opções, atualizar a data de vencimento ou não atualizar, foi gerado um

novo parâmetro na /PWS/ZYCAT024 que indica se deve ou não ser atualizada. Se estiver não, não

atualiza. Se estiver sim ou vazio, atualiza. Criar campo na /PWS/ZYCAT024 e gerar novamente a visão

de atualização.

 

Versões Tratadas

6.0

Informações Complementares

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

Nota Número 02243 Data: 10/10/2006 Hora: 15:48:47

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

 

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

Nota Número              : 02243

Categoria                : Melhoria

Prioridade               : Média

Versão PW.CE             : 6.0

Pacote                   : 00025

Agrupamento              : 00135

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

 

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

COMPLEMENTO DO BOLETO - REMESSA - DATA DE VENCIMENTO

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

Palavras Chave:

COMPLEMENTO DO BOLETO REMESSA DATA DE VENCIMENTO

/PWS/ZYCAT025-DTVENCTO ATUALIZAÇÃO DATA DE VENCIMENTO

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

Objetos da nota:

DTEL /PWS/ZYGLL1337

FUGR /PWS/ZYCAGF1

REPS /PWS/MZYCA110F01

TABD /PWS/ZYCAT024

TABU TDDAT

TABU TVDIR

TOBJ /PWS/ZYCAT024S

 

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

Modificações efetuadas em DTEL /PWS/ZYGLL1337

 

CRIAR ELEMENTO DE DADOS: /PWS/ZYGLL1337

DESCRIÇÃO BREVE: GL - Atualiza Data de Vencimento(Boleto)

Classe de Desenvolvimento: /PWS/ZYGL

 

DEFINIÇÃO

 

CATEGORIA DE DADOS:

(X) - CATEGORIA ELEMENTAR

   (X) - DOMÍNIO            /PWS/ZYCBD035

   (_) - TIPO INSTALADO     CTG. DADOS: ________________

         CUMPRIMEN.________ DECIMAIS.________

(_) - TIPO DE REFERÊNCIA

      REFERÊNCIA A:_____________________________________

 

DENOM. DE CAMPO:

 

BREVE : 10  Atual.Dt.V

MÉDIO : 20  GL - Atualiza Dt.Ven

LONGA : 40  GL - Atualiza Data de Vencimento(Boleto)

TÍTULO: 40  GL - Atualiza Data de Vencimento(Boleto)

 

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

Modificações efetuadas em REPS /PWS/MZYCA110F01

 

...

    MOVE-CORRESPONDING itab_zycat025 TO wa_zycat025.

    READ TABLE itab_dados_tc WITH KEY tpimp = itab_zycat025-tpimp.

    IF sy-subrc = 0.

      READ TABLE itab_zycat024 WITH KEY bukrs = /pws/zycbe031-bukrs

                                      tpimp = itab_zycat025-tpimp.

* >> Início da exclusão: FORM ATUALIZA_DTVENCTO_IMP_CP

      IF sy-subrc = 0 AND NOT itab_zycat024-zterm IS INITIAL.

* << Fim da exclusão

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

      IF sy-subrc = 0 AND NOT itab_zycat024-zterm IS INITIAL

         AND itab_zycat024-atualiza_dtvenct NE 'N'.

* << Fim da inclusão

        PERFORM verifica_cond_pagto_cp USING /pws/zycbe031-dtcredpr

                                             itab_zycat024-zterm

                                    CHANGING itab_zycat025-dtvencto.

* >> Início da exclusão: FORM ATUALIZA_DTVENCTO_IMP_CP

      ELSE.

* << Fim da exclusão

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

      ELSEIF sy-subrc = 0 AND itab_zycat024-atualiza_dtvenct NE 'N'.

* << Fim da inclusão

        itab_zycat025-dtvencto = /pws/zycbe031-dtcredpr.

      ENDIF.

      IF itab_zycat025-dtvencto EQ wa_zycat025-dtvencto.

        CONTINUE.

      ENDIF.

...

 

 

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

Modificações efetuadas em TABD /PWS/ZYCAT024

 

MODIFICAR TABELA TRANSPARENTE: /PWS/ZYCAT024

DESCRIÇÃO BREVE: CA - Parametrização do Tipo de Imposto

 

CAMPOS NOVOS

 

CAMPOS:           CH:  INI:  TIPO CAMPO      CAT.  COMPR.  TAB.VERIF.:    TAB.REF.:     CPO.RE

ATUALIZA_DTVENCT  ' '  ' '   /PWS/ZYGLL1337  CHAR  1

 

 

 

GERAR NOVAMENTE VISÃO DE ATUALIZAÇÃO DE TABELA:

 

Caminho:

SE11 - MODIFICAR /PWS/ZYCAT024 - UTILITÁRIOS - GERADOR ATUALIZAÇÃO DE TABELAS - MODIFICAR

 

Modificações efetuadas em TABU TDDAT

Modificações efetuadas em TABU TVDIR

Modificações efetuadas em TOBJ /PWS/ZYCAT024S

Modificações efetuadas em FUGR /PWS/ZYCAGF1