Módulo: CÂMBIO FINANCEIRO
Funcionalidade: Rotina de Pagamento
Data/Hora da Publicação: 18/10/2012 15:33:17
Data/Hora Última Alteração: 18/10/2012 15:33:17
Descrição da Nota: COMPLEMENTO DO BOLETO, NÃO LEVAR CLASSIFICAÇÃO CONTÁBIL CONTA CRÉDITO
Sintoma
No cliente está parametrizado para que o imposto seja contabilizado na conta razão. Quando é
informado classificação contábil na pasta de impostos ao contabilizar o sistema está levando os
dados da classificação na conta de crédito e deveria levar somente na conta de débito.
Deverá ser criado um parâmetro na /PWS/ZYCAT024 - Tipo de Imposto para quando o parâmetro da
conta crédito for Conta Razão deverá aparecer um check box para informar que não é para preencher
classificação contábil. Quando estiver flegado não preenche a classificação contábil no lançamento
e quando estiver em branco preenche.
Solução
Foi criado um parâmetro na /pws/ZYCAT024, para quando o Imposto estiver com o "Tipo Contab.Crédito"
igual a "3 - Conta do Razão", o usuário poderá selecionar se no BI dos Impostos deverá ou não ser
preenchido a Classificação Contábil na conta de crédito. E no complemento do boleto, foi inserida a
verificação do parâmetro para preencher ou não a Class.Contabil na conta de crédito.
9.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 12577 Data: 03/10/2012 Hora: 09:54:33
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 12577
Categoria : Melhoria
Prioridade : Baixa
Versão PW.CE : 9.0
Pacote : 00002
Agrupamento : 00131
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
10222 - 00001 - 8.0 - 00003 - COMPLEMENTO DE BOLETOS, CONTABILIZAÇÃO SOCIEDADE PARCEIRA
10706 - 00002 - 8.0 - 00005 - NOVO TRATAMENTO NO PROGRAMA DE REMESSA FINANCEIRA, CÁLCULOS IMPOS
----------------------------------------------------------------------------------------------------
COMPLEMENTO DO BOLETO, NÃO LEVAR CLASSIFICAÇÃO CONTÁBIL CONTA CRÉDITO
----------------------------------------------------------------------------------------------------
Palavras Chave:
COMPLEMENTO DO BOLETO, BOLETO REMESSA, NÃO LEVAR CLASSIFICAÇÃO CONTÁBIL
CONTA RAZÃO CRÉDITO
----------------------------------------------------------------------------------------------------
Objetos da nota:
DTEL /PWS/ZYGLL1178
TABD /PWS/ZYCAT024
DYNP /PWS/SAPMZYCA024 0200
DYNP /PWS/SAPMZYCA024 0100
REPS /PWS/MZYCA024F01
REPS /PWS/MZYCA110F01
RELE F6DK984380 20121003 094617 PWSCB
RELE F6DK984381 20121003 094628 PWSCB
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DTEL /PWS/ZYGLL1178
------------------------------------------------------------------------
Elemento de dados incluído: /PWS/ZYGLL1178
*******************************************
Classe de desenvolvimento: /PWS/ZYGL
Idioma original: PT
Descrição breve incluída: (39 caracteres), idioma: PT
"GL - Não Preencher Classificação Fiscal"
Categoria de dados: Domínio
Domínio: XFELD
ID parâmetro:
Nome componente default:
Documentar modificações: NÃO
Nome da ajuda de pesquisa:
Parâmetro da ajuda de pesquisa:
Comprimento máximo do denominador breve: 10
Denominador breve incluído (10 caracteres), idioma: PT
"Não Pre.CF"
Comprimento máximo do denominador médio: 20
Denominador médio incluído (20 caracteres), idioma: PT
"Não Preenc.Cl.Fiscal"
Comprimento máximo do denominador longo: 39
Denominador longo incluído (39 caracteres), idioma: PT
"GL - Não Preencher Classificação Fiscal"
Comprimento máximo do título: 39
Título incluído (39 caracteres), idioma: PT
"GL - Não Preencher Classificação Fiscal"
----------------------------------------------------------------------------------------------------
Modificações efetuadas em TABD /PWS/ZYCAT024
*** INSERIDO NOVO CAMPO NA TABELA /PWS/ZYCAT024 (SE11)
****** *** **** *************
CAMPOS CHV INIC TIPO DE CAMPO
****** *** **** *************
.
N_PREENCHER_CF /PWS/ZYGLL1178
*** ORDENAÇÃO DOS CAMPOS
.
.
.
ATUALIZA_DTVENCT
FORNECEDOR
FORMULA
N_PREENCHER_CF
USERNAMEC
DTUSERC
HRUSERC
USER_SAVE
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DYNP /PWS/SAPMZYCA024 0200
*** SOLICITAR ARQUIVO DE DOWNLOAD DA TELA - /PWS/SAPMZYCA024 - 0200
*** ARQUIVO 12577_SAPMZYCA024_TELA_0200.TXT
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DYNP /PWS/SAPMZYCA024 0100
*** SOLICITAR ARQUIVO DE DOWNLOAD DA TELA - /PWS/SAPMZYCA024 - 0100
*** ARQUIVO 12577_SAPMZYCA024_TELA_0100.TXT
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCA024F01
...
IF /pws/zycat024-tpimp IS INITIAL.
MESSAGE i013 WITH text-022.
EXIT.
ENDIF.
IF /pws/zycat024-tpimp(3) NE 'ISS' AND
NOT /pws/zycat024-j_1bbranch IS INITIAL.
MESSAGE i015 WITH text-027 text-028.
/pws/zycat024-j_1bbranch = ''.
EXIT.
ENDIF.
* >> Início da inclusão: FORM SALVAR_DADOS
if /pws/zycat024-credito_imp ne '3'.
/pws/zycat024-n_preencher_cf = ''.
endif.
* << Fim da inclusão
IF v_copy NE 'X'.
READ TABLE itab_zycat024
WITH KEY bukrs = /pws/zycat024-bukrs
tpimp = /pws/zycat024-tpimp
j_1bbranch = /pws/zycat024-j_1bbranch.
v_tabix = sy-tabix.
MOVE: v_name TO /pws/zycat024-user_save,
sy-uname TO /pws/zycat024-usernamec,
sy-datum TO /pws/zycat024-dtuserc,
sy-uzeit TO /pws/zycat024-hruserc.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCA110F01
...
i_zexit_nao_encontrado = 3
OTHERS = 4.
IF sy-subrc EQ 0.
READ TABLE itab_zyglt100 WITH KEY zexit = v_exit.
IF sy-subrc EQ 0 AND NOT itab_zyglt100-zexit_ativa IS INITIAL.
PERFORM (itab_zyglt100-formulario)
IN PROGRAM (itab_zyglt100-programa).
ENDIF.
ENDIF.
itab_zycbe033-vbund = itab_zycbt124_aux-vbund.
* >> Início da inclusão: FORM CONTABILIZA_DOCTO_CP
if p_tpimp ne 'PRINCIPAL' and
itab_zycat024-n_preencher_cf = 'X' and
itab_zycbe033-newbs eq '50'.
itab_zycbe033-c_kostl = ''.
itab_zycbe033-d_kostl = ''.
endif.
* << Fim da inclusão
APPEND itab_zycbe033.
PERFORM lancamento_multiplo USING p_tpimp
p_recontabiliza
p_recuperar.
LOOP AT itab_zycbt034.
itab_zycbt032-msgv1 = itab_zycbt034-descricao.
PERFORM message_store
USING c_classe_msg
c_tipo_msg_e
itab_zycbt032-msgv1
...
----------------------------------------------------------------------------------------------------