CE PLUS - Nota 006425
Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Rotina de Pagamento
Data/Hora da Publicação: 18/04/2008 00:00:00
Data/Hora Última Alteração: 18/02/2011 13:53:34
Descrição da Nota: COTAÇÃO DE MOEDAS
Sintoma
Desenvolvimento Adicional
Solução
DA - Ajuste da tela de cotação para considerar o custo da linha de crédito no exterior em conjunto
com o custo do CDI para tomada de decisão da melhor cotação, incluindo ajustes no cálculo do CDI e
exibição dos cálculos de CDI e Linha separadamente.
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 06425 Data: 18/04/2008 Hora: 14:32:14
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 06425
Categoria : Melhoria
Prioridade : Alta
Versão PW.CE : 7.0
Pacote : 00005
Agrupamento : 00043
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
03984 - 00001 - 7.0 - 00001 - COTAÇÃO DE MOEDAS - DESENVOLVIMENTO ADICIONAL
04594 - 00002 - 7.0 - 00002 - COTAÇÃO MOEDA - MODIFICAR/EXCLUIR
----------------------------------------------------------------------------------------------------
COTAÇÃO DE MOEDAS
----------------------------------------------------------------------------------------------------
Palavras Chave:
COTAÇÃO DE MOEDAS, CUSTO DA LINHA DE CRÉDITO, CUSTO DO CDI
----------------------------------------------------------------------------------------------------
Objetos da nota:
DOCV /PWS/DTZ_ZYGLT009_FLAG_CDI_TXT
DOMA /PWS/ZYGLD581
DOMA /PWS/ZYGLD582
DOMA /PWS/ZYGLD584
DOMA /PWS/ZYGLD585
DOMA /PWS/ZYGLD587
DOMD /PWS/ZYCBD003
DTED /PWS/ZYGLL1379
DTEL /PWS/ZYGLL1380
DTEL /PWS/ZYGLL1381
DTEL /PWS/ZYGLL1382
DTEL /PWS/ZYGLL1383
DTEL /PWS/ZYGLL1384
DTEL /PWS/ZYGLL1385
DTEL /PWS/ZYGLL1386
DYNP /PWS/SAPMZYCB116 0101
DYNP /PWS/SAPMZYGL007 0107
FUGR /PWS/ZYGLGF
REPS /PWS/MZYCB116F01
REPS /PWS/MZYCB116F02
REPS /PWS/MZYCB116F03
REPS /PWS/MZYCB116T01
REPS /PWS/MZYGL007F02
REPT /PWS/SAPMZYCB116
REPT /PWS/SAPMZYGL007
TABD /PWS/ZYCBE234
TABD /PWS/ZYCBT234
TABD /PWS/ZYGLT009
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DOCV /PWS/DTZ_ZYGLT009_FLAG_CDI_TXT
Entrar na transação SE61
Texto de diálogo: /PWS/Z_ZYGLT009_FLAG_CDI_TXT
Classe de Documentos: Texto em diálogo
Idioma: Português
Classe de desenvolvimento: /PWS/ZYGL
Criar o seguinte texto:
Cálculo CDI na Cotação
(Campo FLAG_CDI_COTACAO - Tabela /PWS/ZYGLT009)
Ao executar a rotina de Cotação de Moedas, o sistema irá considerar o ano comercial (252 dias) e
o mês comercial (22 dias) para o cálculo do CDI.
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DOMA /PWS/ZYGLD581
Domínio incluído: /PWS/ZYGLD581
Descrição breve incluída (16 caracteres), idioma: PT
"GL - TAXA DO CDI"
Classe de desenvolvimento: /PWS/ZYGL
Idioma original: PT
Categoria de dados: DEC
Número de posições: 10
Decimais: 8
Comprimento de saída: 11
Rotina de conversão:
Sinal (+/-): NÃO
Incluída tabela de valores:
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DOMA /PWS/ZYGLD582
Domínio incluído: /PWS/ZYGLD582
Descrição breve incluída (27 caracteres), idioma: PT
"GL - Quantidade de dias CDI"
Classe de desenvolvimento: /PWS/ZYGL
Idioma original: PT
Categoria de dados: INT4
Número de posições: 10
Comprimento de saída: 11
Rotina de conversão:
Sinal (+/-): SIM
Incluída tabela de valores:
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DOMA /PWS/ZYGLD584
Domínio incluído: /PWS/ZYGLD584
Descrição breve incluída (29 caracteres), idioma: PT
"GL - Período da taxa de linha"
Classe de desenvolvimento: /PWS/ZYGL
Idioma original: PT
Categoria de dados: CHAR
Número de posições: 1
Comprimento de saída: 1
Rotina de conversão:
Letras minúsculas: NÃO
-Valores individuais
Incluído valor fixo "A"
Texto incluído, idioma: PT (5 caracteres):
"Anual"
Incluída tabela de valores:
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DOMA /PWS/ZYGLD585
Domínio incluído: /PWS/ZYGLD585
Descrição breve incluída (51 caracteres), idioma: PT
"GL - Quantidade de dias do período da taxa de linha"
Classe de desenvolvimento: /PWS/ZYGL
Idioma original: PT
Categoria de dados: INT4
Número de posições: 10
Comprimento de saída: 11
Rotina de conversão:
Sinal (+/-): SIM
Incluída tabela de valores:
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DOMA /PWS/ZYGLD587
Domínio incluído: /PWS/ZYGLD587
Descrição breve incluída (30 caracteres), idioma: PT
"GL - Periodicidade da taxa CDI"
Classe de desenvolvimento: /PWS/ZYGL
Idioma original: PT
Categoria de dados: CHAR
Número de posições: 1
Comprimento de saída: 1
Rotina de conversão:
Letras minúsculas: NÃO
-Valores individuais
Incluído valor fixo "A"
Texto incluído, idioma: PT (5 caracteres):
"Anual"
Incluído valor fixo "M"
Texto incluído, idioma: PT (6 caracteres):
"Mensal"
Incluído valor fixo "D"
Texto incluído, idioma: PT (6 caracteres):
"Diário"
Incluída tabela de valores:
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DTED /PWS/ZYGLL1379
Elemento de dados modificado: /PWS/ZYGLL1379
Descrição breve modificada (27 caracteres), idioma: PT
"GL - CÁLCULO CDI NA COTAÇÃO"
Comprimento máximo do denominador breve: 07
Denominador breve modificado (7 caracteres), idioma: PT
"Cálculo"
Comprimento máximo do denominador médio: 11
Denominador médio modificado (11 caracteres), idioma: PT
"Cálculo CDI"
Comprimento máximo do denominador longo: 22
Denominador longo modificado (22 caracteres), idioma: PT
"Cálculo CDI na Cotação"
Comprimento máximo do título: 22
Título modificado (22 caracteres), idioma: PT
"Cálculo CDI na Cotação"
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DTEL /PWS/ZYGLL1380
Elemento de dados incluído: /PWS/ZYGLL1380
Classe de desenvolvimento: /PWS/ZYGL
Idioma original: PT
Descrição breve incluída: (16 caracteres), idioma: PT
"GL - TAXA DO CDI"
Categoria de dados: Domínio
Domínio: /PWS/ZYGLD581
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: 07
Denominador breve incluído (7 caracteres), idioma: PT
"Tx. CDI"
Comprimento máximo do denominador médio: 08
Denominador médio incluído (8 caracteres), idioma: PT
"Taxa CDI"
Comprimento máximo do denominador longo: 11
Denominador longo incluído (11 caracteres), idioma: PT
"Taxa do CDI"
Comprimento máximo do título: 11
Título incluído (11 caracteres), idioma: PT
"Taxa do CDI"
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DTEL /PWS/ZYGLL1381
Elemento de dados incluído: /PWS/ZYGLL1381
Classe de desenvolvimento: /PWS/ZYGL
Idioma original: PT
Descrição breve incluída: (27 caracteres), idioma: PT
"GL - Quantidade de dias CDI"
Categoria de dados: Domínio
Domínio: /PWS/ZYGLD582
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: 09
Denominador breve incluído (9 caracteres), idioma: PT
"Qtd. Dias"
Comprimento máximo do denominador médio: 13
Denominador médio incluído (13 caracteres), idioma: PT
"Qtd. dias CDI"
Comprimento máximo do denominador longo: 25
Denominador longo incluído (25 caracteres), idioma: PT
"Quantidade de dias do CDI"
Comprimento máximo do título: 25
Título incluído (25 caracteres), idioma: PT
"Quantidade de dias do CDI"
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DTEL /PWS/ZYGLL1382
Elemento de dados incluído: /PWS/ZYGLL1382
Classe de desenvolvimento: /PWS/ZYGL
Idioma original: PT
Descrição breve incluída: (18 caracteres), idioma: PT
"GL - Taxa de Linha"
Categoria de dados: Domínio
Domínio: /PWS/ZYGLD581
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: 09
Denominador breve incluído (9 caracteres), idioma: PT
"Tx. Linha"
Comprimento máximo do denominador médio: 10
Denominador médio incluído (10 caracteres), idioma: PT
"Taxa Linha"
Comprimento máximo do denominador longo: 13
Denominador longo incluído (13 caracteres), idioma: PT
"Taxa de Linha"
Comprimento máximo do título: 13
Título incluído (13 caracteres), idioma: PT
"Taxa de Linha"
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DTEL /PWS/ZYGLL1383
Elemento de dados incluído: /PWS/ZYGLL1383
Classe de desenvolvimento: /PWS/ZYGL
Idioma original: PT
Descrição breve incluída: (29 caracteres), idioma: PT
"GL - Período da taxa de linha"
Categoria de dados: Domínio
Domínio: /PWS/ZYGLD584
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: 08
Denominador breve incluído (8 caracteres), idioma: PT
"Pd. Taxa"
Comprimento máximo do denominador médio: 17
Denominador médio incluído (17 caracteres), idioma: PT
"Pd. da Taxa Linha"
Comprimento máximo do denominador longo: 24
Denominador longo incluído (24 caracteres), idioma: PT
"Período da Taxa de Linha"
Comprimento máximo do título: 24
Título incluído (24 caracteres), idioma: PT
"Período da Taxa de Linha"
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DTEL /PWS/ZYGLL1384
Elemento de dados incluído: /PWS/ZYGLL1384
Classe de desenvolvimento: /PWS/ZYGL
Idioma original: PT
Descrição breve incluída: (51 caracteres), idioma: PT
"GL - Quantidade de dias do período da taxa de linha"
Categoria de dados: Domínio
Domínio: /PWS/ZYGLD585
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: 09
Denominador breve incluído (9 caracteres), idioma: PT
"Qde. Dias"
Comprimento máximo do denominador médio: 15
Denominador médio incluído (15 caracteres), idioma: PT
"Qde. Dias Linha"
Comprimento máximo do denominador longo: 37
Denominador longo incluído (37 caracteres), idioma: PT
"Qde. dias do período da taxa de linha"
Comprimento máximo do título: 46
Título incluído (46 caracteres), idioma: PT
"Quantidade de dias do período da taxa de linha"
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DTEL /PWS/ZYGLL1385
Elemento de dados incluído: /PWS/ZYGLL1385
Classe de desenvolvimento: /PWS/ZYGL
Idioma original: PT
Descrição breve incluída: (40 caracteres), idioma: PT
"GL - Taxa final cotado do câmbio / linha"
Categoria de dados: Domínio
Domínio: /PWS/ZYGLD581
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: 09
Denominador breve incluído (9 caracteres), idioma: PT
"Tx. Final"
Comprimento máximo do denominador médio: 10
Denominador médio incluído (10 caracteres), idioma: PT
"Taxa Final"
Comprimento máximo do denominador longo: 35
Denominador longo incluído (35 caracteres), idioma: PT
"Taxa final cotado do câmbio / linha"
Comprimento máximo do título: 35
Título incluído (35 caracteres), idioma: PT
"Taxa final cotado do câmbio / linha"
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DTEL /PWS/ZYGLL1386
Elemento de dados incluído: /PWS/ZYGLL1386
Classe de desenvolvimento: /PWS/ZYGL
Idioma original: PT
Descrição breve incluída: (30 caracteres), idioma: PT
"GL - PERIODICIDADE DA TAXA CDI"
Categoria de dados: Domínio
Domínio: /PWS/ZYGLD587
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: 08
Denominador breve incluído (8 caracteres), idioma: PT
"Pd. Taxa"
Comprimento máximo do denominador médio: 15
Denominador médio incluído (15 caracteres), idioma: PT
"Pd. da Taxa CDI"
Comprimento máximo do denominador longo: 22
Denominador longo incluído (22 caracteres), idioma: PT
"Período da Taxa de CDI"
Comprimento máximo do título: 15
Título incluído (15 caracteres), idioma: PT
"Pd. da Taxa CDI"
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DYNP /PWS/SAPMZYCB116 0101
Solicitar a tela a equipe técnica, Obrigado!
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DYNP /PWS/SAPMZYGL007 0107
Solicitar a tela a equipe técnica, Obrigado!
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB116F01
...
READ TABLE itab_zycbe234_alt ASSIGNING <fs_zycbe234_alt>
WITH KEY hbkid = <fs_zycbe234>-hbkid
tipo = <fs_zycbe234>-tipo
waers = <fs_zycbe234>-waers.
IF sy-subrc EQ 0.
IF <fs_zycbe234>-KURSF1 NE <fs_zycbe234_alt>-KURSF1 OR
<fs_zycbe234>-KURSF2 NE <fs_zycbe234_alt>-KURSF2 OR
<fs_zycbe234>-KURSF3 NE <fs_zycbe234_alt>-KURSF3 OR
<fs_zycbe234>-VLME NE <fs_zycbe234_alt>-VLME OR
<fs_zycbe234>-CDI NE <fs_zycbe234_alt>-CDI OR
* >> Início da exclusão: FORM MOSTRAR_BOLETOS_ATUALIZACAO
<fs_zycbe234>-TIPO_CDI NE <fs_zycbe234_alt>-TIPO_CDI OR
* << Fim da exclusão
* >> Início da inclusão: FORM MOSTRAR_BOLETOS_ATUALIZACAO
<fs_zycbe234>-PERIODO_CDI NE <fs_zycbe234_alt>-PERIODO_CDI OR
* << Fim da inclusão
<fs_zycbe234>-GANHADOR NE <fs_zycbe234_alt>-GANHADOR.
v_atualiza_boleto = abap_true.
ENDIF.
ELSE.
v_atualiza_boleto = abap_true.
ENDIF.
ENDLOOP.
ELSE.
PERFORM preenche_zycbe234_alt.
ENDIF.
...
...
waers = <fs_zycbe234>-waers.
IF sy-subrc EQ 0.
IF <fs_zycbe234>-kursf1 NE wa_zycbt234-kursf1 OR
<fs_zycbe234>-kursf2 NE wa_zycbt234-kursf2 OR
<fs_zycbe234>-kursf3 NE wa_zycbt234-kursf3 OR
<fs_zycbe234>-kursf_desp NE wa_zycbt234-kursf_desp OR
<fs_zycbe234>-waers_desp NE wa_zycbt234-waers_desp OR
<fs_zycbe234>-vlme NE wa_zycbt234-vlme OR
<fs_zycbe234>-boleto NE wa_zycbt234-boleto OR
<fs_zycbe234>-cdi NE wa_zycbt234-cdi OR
* >> Início da exclusão: FORM VERIFICA_ALTERACAO_BANCO
<fs_zycbe234>-tipo_cdi NE wa_zycbt234-tipo_cdi.
* << Fim da exclusão
* >> Início da inclusão: FORM VERIFICA_ALTERACAO_BANCO
<fs_zycbe234>-periodo_cdi NE wa_zycbt234-periodo_cdi.
* << Fim da inclusão
<fs_zycbe234>-oper = c_alterado.
ENDIF.
ENDIF.
ENDLOOP.
ENDFORM.
FORM verifica_alteracao_boleto
CHANGING
p_zycbe236a TYPE t_t_zycbe236a.
DATA:
wa_zycbe234 LIKE LINE OF itab_zycbe234,
...
...
p_wa_zycbe234-tipo = /pws/zycbe234-tipo.
p_wa_zycbe234-waers = /pws/zycbe234-waers.
p_wa_zycbe234-kursf1 = /pws/zycbe234-kursf1.
p_wa_zycbe234-kursf2 = /pws/zycbe234-kursf2.
p_wa_zycbe234-kursf3 = /pws/zycbe234-kursf3.
p_wa_zycbe234-waers_desp = /pws/zycbe234-waers_desp.
p_wa_zycbe234-kursf_desp = /pws/zycbe234-kursf_desp.
p_wa_zycbe234-vlme = /pws/zycbe234-vlme.
p_wa_zycbe234-boleto = /pws/zycbe234-boleto.
p_wa_zycbe234-cdi = /pws/zycbe234-cdi.
* >> Início da exclusão: FORM ATUALIZA_CAMPOS_TC_COTACOES
p_wa_zycbe234-tipo_cdi = /pws/zycbe234-tipo_cdi.
* << Fim da exclusão
* >> Início da inclusão: FORM ATUALIZA_CAMPOS_TC_COTACOES
p_wa_zycbe234-periodo_cdi = /pws/zycbe234-periodo_cdi.
p_wa_zycbe234-qtde_dias_cdi = /pws/zycbe234-qtde_dias_cdi.
p_wa_zycbe234-linha = /pws/zycbe234-linha.
p_wa_zycbe234-periodo_linha = /pws/zycbe234-periodo_linha.
p_wa_zycbe234-qtde_dias_linha = /pws/zycbe234-qtde_dias_linha.
p_wa_zycbe234-taxa_final = /pws/zycbe234-taxa_final.
* << Fim da inclusão
p_wa_zycbe234-mark = wa_zycbe234_comp-mark.
PERFORM calcula_total_despesa
USING p_wa_zycbe234-tipo p_wa_zycbe234-waers
p_wa_zycbe234-boleto p_wa_zycbe234-vlme
CHANGING p_wa_zycbe234-total_desp.
ENDFORM.
FORM atualiza_campos_tc_valores
CHANGING p_wa_zycbe236a LIKE LINE OF itab_zycbe236a.
p_wa_zycbe236a-kursf = /pws/zycbe236a-kursf.
p_wa_zycbe236a-vlmi = /pws/zycbe236a-vlmi.
...
...
'deve ser preenchido.'(e09).
ELSEIF NOT /pws/zycbe234-boleto IS INITIAL AND
/pws/zycbe234-waers_desp IS INITIAL AND
/pws/zycbe234-vlme IS INITIAL AND
/pws/zycbe234-kursf_desp IS INITIAL.
MESSAGE e061 WITH 'Os campos'(e11)
'Moeda Despesa, Taxa Despesa e Valor Despesa'(e12)
'devem ser preenchidos.'(e13).
ENDIF.
IF /pws/zycbe234-cdi IS INITIAL AND
* >> Início da exclusão: FORM VERIFICA_CAMPOS_0101
NOT /pws/zycbe234-tipo_cdi IS INITIAL.
* << Fim da exclusão
* >> Início da inclusão: FORM VERIFICA_CAMPOS_0101
NOT /pws/zycbe234-periodo_cdi IS INITIAL.
* << Fim da inclusão
MESSAGE e061 WITH 'O campo'(e07) 'CDI'(e14)
'deve ser preenchido.'(e09).
ELSEIF NOT /pws/zycbe234-cdi IS INITIAL AND
* >> Início da exclusão: FORM VERIFICA_CAMPOS_0101
/pws/zycbe234-tipo_cdi IS INITIAL.
MESSAGE e061 WITH 'O campo'(e07) 'Tipo CDI'(e15)
* << Fim da exclusão
* >> Início da inclusão: FORM VERIFICA_CAMPOS_0101
/pws/zycbe234-periodo_cdi IS INITIAL.
MESSAGE e061 WITH 'O campo'(e07) 'Período CDI'(e15)
* << Fim da inclusão
'deve ser preenchido.'(e09).
ENDIF.
* >> Início da inclusão: FORM VERIFICA_CAMPOS_0101
IF /pws/zycbe234-cdi IS INITIAL AND
NOT /pws/zycbe234-qtde_dias_cdi IS INITIAL.
MESSAGE e061 WITH 'O campo'(e07) 'CDI'(e14)
'deve ser preenchido.'(e09).
ELSEIF NOT /pws/zycbe234-cdi IS INITIAL AND
/pws/zycbe234-qtde_dias_cdi IS INITIAL.
MESSAGE e061 WITH 'O campo'(e07) 'Qde. dias CDI'(e22)
'deve ser preenchido.'(e09).
ENDIF.
IF /pws/zycbe234-linha IS INITIAL AND
NOT /pws/zycbe234-periodo_linha IS INITIAL.
MESSAGE e061 WITH 'O campo'(e07) 'Linha'(e24)
'deve ser preenchido.'(e09).
ELSEIF NOT /pws/zycbe234-linha IS INITIAL AND
/pws/zycbe234-periodo_linha IS INITIAL.
MESSAGE e061 WITH 'O campo'(e07) 'Período Linha'(e23)
'deve ser preenchido.'(e09).
ENDIF.
IF /pws/zycbe234-linha IS INITIAL AND
NOT /pws/zycbe234-qtde_dias_linha IS INITIAL.
MESSAGE e061 WITH 'O campo'(e07) 'Linha'(e24)
'deve ser preenchido.'(e09).
ELSEIF NOT /pws/zycbe234-linha IS INITIAL AND
/pws/zycbe234-qtde_dias_linha IS INITIAL.
MESSAGE e061 WITH 'O campo'(e07) 'Qde. Dias Linha'(e25)
'deve ser preenchido.'(e09).
ENDIF.
* << Fim da inclusão
ENDFORM.
FORM verifica_campos_0102.
DATA:
wa_zycbe234 LIKE LINE OF itab_zycbe234.
FIELD-SYMBOLS:
<fs_zycbe236a> LIKE LINE OF itab_zycbe236a.
READ TABLE itab_zycbe234 INTO wa_zycbe234
WITH KEY hbkid = /pws/zycbe236a-hbkid
waers = /pws/zycbe236a-waers
tipo = /pws/zycbe236a-pag_rec.
...
...
IMPORTING
amount_external = v_vlme.
READ TABLE itab_zycbe234
WITH KEY
tipo = <fs_zycbe236a_agrup>-pag_rec
waers = <fs_zycbe236a_agrup>-waers
ganhador = abap_true
ASSIGNING <fs_zycbe234>.
IF sy-subrc = 0.
PERFORM verifica_ultima_taxa
* >> Início da exclusão: FORM MONTA_ITAB_MELHORES
USING <fs_zycbe234>-tipo <fs_zycbe234>-kursf1
<fs_zycbe234>-kursf2 <fs_zycbe234>-kursf3
* << Fim da exclusão
* >> Início da inclusão: FORM MONTA_ITAB_MELHORES
USING
<fs_zycbe234>-tipo
<fs_zycbe234>-kursf1
<fs_zycbe234>-kursf2
<fs_zycbe234>-kursf3
* << Fim da inclusão
CHANGING v_kursf.
ENDIF.
CASE <fs_zycbe236a_agrup>-mdcorresp(1).
WHEN c_fin.
ASSIGN 'Financeiro'(d01) TO <fs_modulo>.
WHEN c_exp.
ASSIGN 'Exportação'(d02) TO <fs_modulo>.
WHEN c_imp.
ASSIGN 'Importação'(d03) TO <fs_modulo>.
ENDCASE.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB116F02
...
FORM carrega_parametros USING value(p_bukrs) TYPE bukrs.
CONSTANTS:
c_codeven TYPE t_zycbt011-codeven VALUE '006DC',
c_codmod TYPE t_zycbt011-codmod VALUE 'F'.
CHECK wa_controle-parametros_carregados IS INITIAL AND
NOT p_bukrs IS INITIAL.
SELECT SINGLE bukrs butxt periv
FROM t001 INTO wa_t001
WHERE bukrs = p_bukrs.
SELECT SINGLE bukrs waersb bktxt perencer percorr
* >> Início da inclusão: FORM CARREGA_PARAMETROS
hcalidbr
* << Fim da inclusão
FROM /pws/zycbt007 INTO wa_zycbt007
WHERE bukrs = p_bukrs.
SELECT SINGLE codeven codmod bukrs blart
FROM /pws/zycbt011 INTO wa_zycbt011
WHERE
codeven = c_codeven AND
codmod = c_codmod AND
bukrs = p_bukrs.
SELECT SINGLE bukrs fech_cb fech_cm fech_ca
FROM /pws/zycbt089 INTO wa_zycbt089
WHERE bukrs = p_bukrs.
SELECT SINGLE bukrs viagemtv arq_eletro
* >> Início da inclusão: FORM CARREGA_PARAMETROS
flag_cdi_cotacao
* << Fim da inclusão
FROM /pws/zyglt009 INTO wa_zyglt009
WHERE bukrs = p_bukrs.
SELECT tptxjur nrdias
FROM /pws/zycbt010 INTO TABLE itab_zycbt010.
SELECT modo descr
FROM /pws/zycbt039 INTO TABLE itab_zycbt039. "#EC CI_NOWHERE
SELECT bukrs lifnr tipo hbkid text1
FROM /pws/zyglt025 INTO TABLE itab_zyglt025
WHERE bukrs = p_bukrs.
CALL FUNCTION '/PWS/ZYGL_READ_ACCOUNT_NUMBER'
...
...
FORM calcula_valor_ganhador
USING
value(p_vlagrup) TYPE t_zycbe236a-vlme
value(p_tipo) TYPE t_zycbe234-tipo
value(p_kursf1) TYPE t_zycbe234-kursf1
value(p_kursf2) TYPE t_zycbe234-kursf1
value(p_kursf3) TYPE t_zycbe234-kursf1
value(p_txdesp) TYPE t_zycbe234-kursf_desp
value(p_vldesp) TYPE t_zycbe234-total_desp
value(p_txcdi) TYPE t_zycbe234-cdi
* >> Início da exclusão: FORM CALCULA_VALOR_GANHADOR
value(p_tipo_cdi) TYPE t_zycbe234-tipo_cdi
CHANGING p_valor TYPE t_zycbe236a-vlmi.
* << Fim da exclusão
* >> Início da inclusão: FORM CALCULA_VALOR_GANHADOR
value(p_tipo_cdi) TYPE t_zycbe234-periodo_cdi
CHANGING p_valor
p_txfinal TYPE t_zycbe234-taxa_final.
* << Fim da inclusão
DATA:
v_vlmi_desp TYPE t_zycbe236a-vlmi,
v_vlmi_agrup TYPE t_zycbe236a-vlmi,
v_vlmi_cdi TYPE t_zycbe236a-vlmi,
* >> Início da exclusão: FORM CALCULA_VALOR_GANHADOR
v_kursf TYPE t_zycbe234-kursf1.
* << Fim da exclusão
* >> Início da inclusão: FORM CALCULA_VALOR_GANHADOR
v_kursf TYPE t_zycbe234-kursf1,
v_valor_aux TYPE F.
* << Fim da inclusão
FIELD-SYMBOLS <fs_zycbt010> LIKE LINE OF itab_zycbt010.
CHECK p_vlagrup > 0.
PERFORM verifica_ultima_taxa
* >> Início da exclusão: FORM CALCULA_VALOR_GANHADOR
USING p_tipo p_kursf1 p_kursf2 p_kursf3 CHANGING v_kursf.
* << Fim da exclusão
* >> Início da inclusão: FORM CALCULA_VALOR_GANHADOR
USING p_tipo p_kursf1 p_kursf2 p_kursf3
CHANGING v_kursf.
* << Fim da inclusão
IF p_vldesp > 0.
v_vlmi_desp = p_vldesp * p_txdesp.
ENDIF.
* >> Início da exclusão: FORM CALCULA_VALOR_GANHADOR
IF p_txcdi > 0.
READ TABLE itab_zycbt010 WITH TABLE KEY tptxjur = p_tipo_cdi
ASSIGNING <fs_zycbt010>.
IF sy-subrc = 0.
v_vlmi_cdi = p_vlagrup * ( v_kursf / ( 1 / (
( p_txcdi / <fs_zycbt010>-nrdias / 100 ) + 1 ) ) ).
ENDIF.
ENDIF.
v_vlmi_agrup = p_vlagrup * v_kursf.
* << Fim da exclusão
* >> Início da inclusão: FORM CALCULA_VALOR_GANHADOR
v_vlmi_agrup = p_vlagrup.
* << Fim da inclusão
IF p_tipo = c_pagto.
* >> Início da exclusão: FORM CALCULA_VALOR_GANHADOR
p_valor = v_vlmi_agrup + v_vlmi_cdi + v_vlmi_desp.
* << Fim da exclusão
* >> Início da inclusão: FORM CALCULA_VALOR_GANHADOR
v_valor_aux = ( v_vlmi_agrup * p_txfinal ) + v_vlmi_desp.
* << Fim da inclusão
ELSE.
* >> Início da exclusão: FORM CALCULA_VALOR_GANHADOR
p_valor = v_vlmi_agrup - v_vlmi_cdi - v_vlmi_desp.
* << Fim da exclusão
* >> Início da inclusão: FORM CALCULA_VALOR_GANHADOR
v_valor_aux = ( v_vlmi_agrup * p_txfinal ) - v_vlmi_desp.
* << Fim da inclusão
ENDIF.
* >> Início da inclusão: FORM CALCULA_VALOR_GANHADOR
p_valor = v_valor_aux.
* << Fim da inclusão
ENDFORM.
FORM define_ganhador.
TYPES:
BEGIN OF t_ganhador,
tipo TYPE t_zycbe234-tipo,
waers TYPE t_zycbe234-waers,
hbkid TYPE t_zycbe234-hbkid,
* >> Início da exclusão: FORM DEFINE_GANHADOR
vlmi TYPE t_zycbe236a-vlmi,
* << Fim da exclusão
* >> Início da inclusão: FORM DEFINE_GANHADOR
vlmi TYPE F,
* << Fim da inclusão
END OF t_ganhador.
DATA:
itab_ganhador TYPE STANDARD TABLE OF t_ganhador
WITH NON-UNIQUE KEY tipo waers,
wa_ganhador LIKE LINE OF itab_ganhador,
itab_zycbe236a_agrup TYPE t_t_zycbe236a_agrup.
* >> Início da inclusão: FORM DEFINE_GANHADOR
DATA: v_cdi TYPE /pws/zycbe234-cdi.
* << Fim da inclusão
FIELD-SYMBOLS:
<fs_ganhador> LIKE LINE OF itab_ganhador,
<fs_zycbe234> LIKE LINE OF itab_zycbe234,
<fs_zycbe234_ex> LIKE LINE OF itab_zycbe234,
<fs_zycbe236a_agrup> LIKE LINE OF itab_zycbe236a_agrup.
CHECK sy-tcode <> c_transacao_e.
* >> Início da inclusão: FORM DEFINE_GANHADOR
CLEAR v_cdi.
* << Fim da inclusão
PERFORM agrupa_boletos USING abap_false CHANGING itab_zycbe236a_agrup.
LOOP AT itab_zycbe234 ASSIGNING <fs_zycbe234>
WHERE ganhador = abap_true.
READ TABLE itab_zycbe236a_agrup
WITH KEY
pag_rec = <fs_zycbe234>-tipo
waers = <fs_zycbe234>-waers
ASSIGNING <fs_zycbe236a_agrup> BINARY SEARCH.
CHECK <fs_zycbe236a_agrup> IS ASSIGNED.
* >> Início da inclusão: FORM DEFINE_GANHADOR
PERFORM define_taxa_cdi
USING
<fs_zycbe234>-cdi
<fs_zycbe234>-periodo_cdi
<fs_zycbe234>-qtde_dias_cdi
<fs_zycbe234>-tipo
<fs_zycbe234>-kursf1
<fs_zycbe234>-kursf2
<fs_zycbe234>-kursf3
<fs_zycbe234>-linha
<fs_zycbe234>-qtde_dias_linha
CHANGING
<fs_zycbe234>-taxa_final.
* << Fim da inclusão
PERFORM calcula_valor_ganhador
USING
<fs_zycbe236a_agrup>-vlme
* >> Início da exclusão: FORM DEFINE_GANHADOR
<fs_zycbe234>-tipo <fs_zycbe234>-kursf1 <fs_zycbe234>-kursf2
<fs_zycbe234>-kursf3 <fs_zycbe234>-kursf_desp
<fs_zycbe234>-total_desp <fs_zycbe234>-cdi
<fs_zycbe234>-tipo_cdi
CHANGING wa_ganhador-vlmi.
* << Fim da exclusão
* >> Início da inclusão: FORM DEFINE_GANHADOR
<fs_zycbe234>-tipo
<fs_zycbe234>-kursf1
<fs_zycbe234>-kursf2
<fs_zycbe234>-kursf3
<fs_zycbe234>-kursf_desp
<fs_zycbe234>-total_desp
<fs_zycbe234>-cdi
<fs_zycbe234>-periodo_cdi
CHANGING
wa_ganhador-vlmi
<fs_zycbe234>-taxa_final.
* << Fim da inclusão
wa_ganhador-tipo = <fs_zycbe234>-tipo.
wa_ganhador-waers = <fs_zycbe234>-waers.
wa_ganhador-hbkid = <fs_zycbe234>-hbkid.
APPEND wa_ganhador TO itab_ganhador.
ENDLOOP.
SORT itab_ganhador BY tipo waers.
LOOP AT itab_zycbe234 ASSIGNING <fs_zycbe234>.
READ TABLE itab_zycbe236a_agrup
WITH KEY
pag_rec = <fs_zycbe234>-tipo
waers = <fs_zycbe234>-waers
ASSIGNING <fs_zycbe236a_agrup> BINARY SEARCH.
CHECK <fs_zycbe236a_agrup> IS ASSIGNED.
* >> Início da inclusão: FORM DEFINE_GANHADOR
PERFORM define_taxa_cdi
USING
<fs_zycbe234>-cdi
<fs_zycbe234>-periodo_cdi
<fs_zycbe234>-qtde_dias_cdi
<fs_zycbe234>-tipo
<fs_zycbe234>-kursf1
<fs_zycbe234>-kursf2
<fs_zycbe234>-kursf3
<fs_zycbe234>-linha
<fs_zycbe234>-qtde_dias_linha
CHANGING
<fs_zycbe234>-taxa_final.
* << Fim da inclusão
PERFORM calcula_valor_ganhador
USING
<fs_zycbe236a_agrup>-vlme
* >> Início da exclusão: FORM DEFINE_GANHADOR
<fs_zycbe234>-tipo <fs_zycbe234>-kursf1 <fs_zycbe234>-kursf2
<fs_zycbe234>-kursf3 <fs_zycbe234>-kursf_desp
<fs_zycbe234>-total_desp <fs_zycbe234>-cdi
<fs_zycbe234>-tipo_cdi
CHANGING wa_ganhador-vlmi.
* << Fim da exclusão
* >> Início da inclusão: FORM DEFINE_GANHADOR
<fs_zycbe234>-tipo
<fs_zycbe234>-kursf1
<fs_zycbe234>-kursf2
<fs_zycbe234>-kursf3
<fs_zycbe234>-kursf_desp
<fs_zycbe234>-total_desp
<fs_zycbe234>-cdi
<fs_zycbe234>-periodo_cdi
CHANGING wa_ganhador-vlmi
<fs_zycbe234>-taxa_final.
* << Fim da inclusão
READ TABLE itab_ganhador
WITH KEY
tipo = <fs_zycbe234>-tipo
waers = <fs_zycbe234>-waers
ASSIGNING <fs_ganhador> BINARY SEARCH.
IF sy-subrc = 0.
IF <fs_zycbe234>-tipo = c_pagto.
IF <fs_ganhador>-vlmi > wa_ganhador-vlmi.
READ TABLE itab_zycbe234
WITH TABLE KEY
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB116F03
...
CONCATENATE v_boletos wa_zycbt134-nrseq INTO v_boletos
SEPARATED BY space.
ENDLOOP.
MESSAGE i061(/pws/zycbm) WITH
'Boleto(s)'(c02)
v_boletos
'já com saída de pagamento.'(e20)
TEXT-019.
ENDIF.
ENDFORM.
* >> Início da inclusão:
FORM define_taxa_cdi
USING
value(p_cdi) TYPE t_zycbe234-cdi
value(p_periodo_cdi) TYPE t_zycbe234-periodo_cdi
value(p_qtde_dias_cdi) TYPE t_zycbe234-qtde_dias_cdi
value(p_tipo) TYPE t_zycbe234-tipo
value(p_kursf1) TYPE t_zycbe234-kursf1
value(p_kursf2) TYPE t_zycbe234-kursf2
value(p_kursf3) TYPE t_zycbe234-kursf3
value(p_linha) TYPE t_zycbe234-linha
value(p_qtde_dias_linha) TYPE t_zycbe234-qtde_dias_linha
CHANGING
p_txfinal TYPE t_zycbe234-cdi.
DATA: v_data_inicial TYPE SCAL-DATE,
v_data_final TYPE SCAL-DATE,
v_ano TYPE ioworkflds-yearn,
v_apagar(01) TYPE c VALUE 'X',
v_dias TYPE SCAL-WEEK,
v_cdi TYPE /pws/zycbe234-cdi,
v_kursf TYPE /pws/zycbe234-kursf1.
CLEAR: v_ano, v_data_inicial, v_data_final, v_cdi, p_txfinal.
v_ano = /PWS/ZYCBE233-DTCOT(04).
IF NOT wa_zyglt009-flag_cdi_cotacao IS INITIAL.
CASE p_periodo_cdi.
WHEN 'A'.
v_cdi = ( 1 + ( p_cdi / 100 ) ) **
( p_qtde_dias_cdi / 252 ).
WHEN 'M'.
v_cdi = ( 1 + ( p_cdi / 100 ) ) **
( p_qtde_dias_cdi / 22 ).
WHEN 'D'.
v_cdi = ( 1 + ( p_cdi / 100 ) ) **
( p_qtde_dias_cdi ).
WHEN OTHERS.
v_cdi = 1.
ENDCASE.
ELSE.
CASE p_periodo_cdi.
WHEN 'A'.
PERFORM primeiro_dia_e_ultima_dia_ano
USING
v_ano
CHANGING
v_data_inicial
v_data_final.
CALL FUNCTION '/PWS/ZYGL_DIAS_UTEIS'
EXPORTING
calendar = wa_zycbt007-hcalidbr
date_from = v_data_inicial
date_to = v_data_final
IMPORTING
DAYS = v_dias
EXCEPTIONS
DATA_INVALIDA = 1
OTHERS = 2.
v_cdi = ( 1 + ( p_cdi / 100 ) ) **
( p_qtde_dias_cdi / v_dias ).
WHEN 'M'.
PERFORM primeiro_dia_e_ultima_dia_mes
USING
v_ano
CHANGING
v_data_inicial
v_data_final.
CALL FUNCTION '/PWS/ZYGL_DIAS_UTEIS'
EXPORTING
calendar = wa_zycbt007-hcalidbr
date_from = v_data_inicial
date_to = v_data_final
IMPORTING
DAYS = v_dias
EXCEPTIONS
DATA_INVALIDA = 1
OTHERS = 2.
v_cdi = ( 1 + ( p_cdi / 100 ) ) **
( p_qtde_dias_cdi / v_dias ).
WHEN 'D'.
v_cdi = ( 1 + ( p_cdi / 100 ) ) **
( p_qtde_dias_cdi ).
WHEN OTHERS.
v_cdi = 1.
ENDCASE.
ENDIF.
PERFORM define_taxa_final
USING
p_tipo
p_kursf1
p_kursf2
p_kursf3
p_linha
p_qtde_dias_linha
v_cdi
v_kursf
CHANGING
p_txfinal.
ENDFORM.
form primeiro_dia_e_ultima_dia_ano
USING
p_ano_calendario LIKE t009b-bdatj
CHANGING
p_dt_inicial LIKE sy-datum
p_dt_final LIKE sy-datum.
CALL FUNCTION 'FIRST_AND_LAST_DAY_IN_YEAR_GET'
EXPORTING
i_gjahr = p_ano_calendario
i_periv = 'C1'
IMPORTING
e_first_day = p_dt_inicial
e_last_day = p_dt_final
EXCEPTIONS
input_false = 1
t009_notfound = 2
t009b_notfound = 3.
IF sy-subrc <> 0.
ELSE.
ENDIF.
endform.
form primeiro_dia_e_ultima_dia_mes
USING
p_ano LIKE t009b-bdatj
CHANGING
p_dt_inicial TYPE d
p_dt_final TYPE d.
CONCATENATE p_ano /PWS/ZYCBE233-DTCOT+4(02) '01' INTO p_dt_inicial.
CALL FUNCTION 'LAST_DAY_OF_MONTHS'
EXPORTING
day_in = p_dt_inicial
IMPORTING
LAST_DAY_OF_MONTH = p_dt_final
EXCEPTIONS
DAY_IN_NO_DATE = 1.
.
IF sy-subrc <> 0.
ELSE.
ENDIF.
endform.
FORM define_taxa_final
USING
value(p_pag_rec) TYPE t_zycbe234-tipo
value(p_kursf1) TYPE t_zycbe234-kursf1
value(p_kursf2) TYPE t_zycbe234-kursf1
value(p_kursf3) TYPE t_zycbe234-kursf1
value(p_linha) TYPE t_zycbe234-linha
value(p_qde_dias_linha) TYPE t_zycbe234-qtde_dias_linha
value(p_cdi) TYPE t_zycbe234-cdi
value(p_kursf) TYPE t_zycbe234-kursf1
CHANGING
p_txfinal TYPE t_zycbe234-taxa_final.
CHECK NOT ( p_pag_rec IS INITIAL OR p_kursf1 IS INITIAL ).
IF NOT p_kursf3 IS INITIAL.
p_kursf = p_kursf3.
ELSEIF NOT p_kursf2 IS INITIAL.
p_kursf = p_kursf2.
ELSE.
p_kursf = p_kursf1.
ENDIF.
p_txfinal = ( ( ( p_linha * p_qde_dias_linha * p_kursf ) / 36000 )
+ p_kursf ) * p_cdi.
ENDFORM.
* << Fim da inclusão
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB116T01
...
bukrs TYPE t001-bukrs,
butxt TYPE t001-butxt,
periv TYPE t001-periv,
END OF t_t001,
BEGIN OF t_zycbt007,
bukrs TYPE /pws/zycbt007-bukrs,
waersb TYPE /pws/zycbt007-waersb,
bktxt TYPE /pws/zycbt007-bktxt,
perencer TYPE /pws/zycbt007-perencer,
percorr TYPE /pws/zycbt007-percorr,
* >> Início da inclusão:
hcalidbr TYPE SCAL-HCALID,
* << Fim da inclusão
END OF t_zycbt007,
BEGIN OF t_zycbt011,
codeven TYPE /pws/zycbt011-codeven,
codmod TYPE /pws/zycbt011-codmod,
bukrs TYPE /pws/zycbt011-bukrs,
blart TYPE /pws/zycbt011-blart,
END OF t_zycbt011,
BEGIN OF t_zycbt089,
bukrs TYPE /pws/zycbt089-bukrs,
fech_cb TYPE /pws/zycbt089-fech_cb,
...
...
BEGIN OF t_zycbt039,
modo TYPE /pws/zycbt039-modo,
descr TYPE /pws/zycbt039-descr,
END OF t_zycbt039,
t_t_zycbt039 TYPE SORTED TABLE OF t_zycbt039
WITH UNIQUE KEY modo,
BEGIN OF t_zyglt009,
bukrs TYPE /pws/zyglt009-bukrs,
viagemtv TYPE /pws/zyglt009-viagemtv,
arq_eletro TYPE /pws/zyglt009-arq_eletro,
* >> Início da inclusão:
flag_cdi_cotacao TYPE /pws/zyglt009-flag_cdi_cotacao,
* << Fim da inclusão
END OF t_zyglt009,
BEGIN OF t_zyglt025,
bukrs TYPE /pws/zyglt025-bukrs,
lifnr TYPE /pws/zyglt025-lifnr,
tipo TYPE /pws/zyglt025-tipo,
hbkid TYPE /pws/zyglt025-hbkid,
text1 TYPE /pws/zyglt025-text1,
END OF t_zyglt025,
t_t_zyglt025 TYPE SORTED TABLE OF t_zyglt025
WITH UNIQUE KEY bukrs lifnr tipo,
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYGL007F02
...
text-041
10
3
'/PWS/Z_ZYCBT007_HCALID_TXT'.
WHEN '/PWS/ZYCBT007-HCALIDBR'.
PERFORM get_information USING sy-langu
text-042
10
3
'/PWS/Z_ZYCBT007_HCALIDBR_TXT'.
* >> Início da inclusão: FORM HELP_GERAL_CALENDARIO
WHEN '/PWS/ZYGLT009-FLAG_CDI_COTACAO'.
PERFORM get_information USING sy-langu
text-091
10
3
'/PWS/Z_ZYGLT009_FLAG_CDI_TXT'.
* << Fim da inclusão
ENDCASE.
ENDFORM.
FORM help_geral_rotinamensal.
CASE v_campo.
WHEN 'V_FTRANSF1' OR 'V_FTRANSF2'.
PERFORM get_information USING sy-langu
text-033
10
3
'/PWS/Z_ZYCBT007_FTRANSF_TXT' .
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPT /PWS/SAPMZYCB116
Modificado símbolo de texto:
Idioma: PT
Símbolo: E15
Texto: (11 caracteres)
"Período CDI"
Comprimento máximo: 11
------------------------------------------------------------------------
Incluído símbolo de texto:
Idioma: PT
Símbolo: E22
Texto: (13 caracteres)
"Qde. dias CDI"
Comprimento máximo: 13
------------------------------------------------------------------------
Incluído símbolo de texto:
Idioma: PT
Símbolo: E23
Texto: (13 caracteres)
"Período Linha"
Comprimento máximo: 13
------------------------------------------------------------------------
Incluído símbolo de texto:
Idioma: PT
Símbolo: E24
Texto: (5 caracteres)
"Linha"
Comprimento máximo: 5
------------------------------------------------------------------------
Incluído símbolo de texto:
Idioma: PT
Símbolo: E25
Texto: (15 caracteres)
"Qde. dias Linha"
Comprimento máximo: 15
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPT /PWS/SAPMZYGL007
Incluído símbolo de texto:
Idioma: PT
Símbolo: 091
Texto: (25 caracteres)
"Cálculo do CDI na cotação"
Comprimento máximo: 25
----------------------------------------------------------------------------------------------------
Modificações efetuadas em TABD /PWS/ZYCBE234
MODIFICAR ESTRUTURA: /PWS/ZYCBE234
DESCRIÇÃO BREVE: GL - Cotações de moedas
COMPONENTES NOVOS
COMPONENTE: TP. COMP: TAB.REF.: CPO.REF.: AJUD. PESQU.
QTDE_DIAS_CDI /PWS/ZYGLL1381
LINHA /PWS/ZYGLL1382
PERIODO_LINHA /PWS/ZYGLL1383
QTDE_DIAS_LINHA /PWS/ZYGLL1384
TAXA_FINAL /PWS/ZYGLL1385
COMPONENTES ALTERADOS (NOVOS)
COMPONENTE: TP. COMP: TAB.REF.: CPO.REF.: AJUD. PESQU.
CDI /PWS/ZYGLL1380
PERIODO_CDI /PWS/ZYGLL1386
COMPNENTES ALTERADOS (ANTIGO - TROCA DE NOME DE CAMPO, ELEMENTO DE DADO E DOMÍNIO)
COMPONENTE: TP. COMP: TAB.REF.: CPO.REF.: AJUD. PESQU.
CDI KURSF
TIPO_CDI /PWS/ZYCBL480
----------------------------------------------------------------------------------------------------
Modificações efetuadas em TABD /PWS/ZYCBT234
MODIFICAR TABELA TRANSPARENTE: /PWS/ZYCBT234
DESCRIÇÃO BREVE: GL - Cotações de moedas
CARACTERÍSTICAS
CATEGORIA DA TABELA: TABELA TRANSPARENTE
CLASSE DE ENTREGA: A
(X) - AUTUALIZAÇÃO DE TABELAS PERMITIDA
CAMPOS NOVOS
CAMPOS: TP. CAMPO CH: INI: TAB.VERIF.: TAB.REF.: CPO.RE
QTDE_DIAS_CDI /PWS/ZYGLL1381
LINHA /PWS/ZYGLL1382
PERIODO_LINHA /PWS/ZYGLL1383
QTDE_DIAS_LINHA /PWS/ZYGLL1384
TAXA_FINAL /PWS/ZYGLL1385
CAMPOS ALTERADOS (ANTIGOS)
CAMPOS: TP. CAMPO CH: INI: TAB.VERIF.: TAB.REF.: CPO.RE
CDI KURSF
TIPO_CDI /PWS/ZYCBL480 /PWS/ZYCBT010
CAMPOS ALTERADOS (NOVOS)
CAMPOS: TP. CAMPO CH: INI: TAB.VERIF.: TAB.REF.: CPO.RE
CDI /PWS/ZYGLL1380
PERIODO_CDI /PWS/ZYGLL1386 ' '
OPÇÕES TÉCNICAS
TIPO DE DADOS: APPL0
CATEGOR. TAMANHO: 4
(X) - AR. BUFFER NÃO PERMITIDO
(_) - AR. BUFFER PERMITIDO, MAS DESATIVADO
(_) - AR. BUFFER ATIVADO
(_) - RGSTS. IND ARMAZENADOS
(_) - ÁREA GEN ARMAZENADA EM BUFFER Nº DE CPOS CHAVE: 0
(_) - TOTALMENTE ARMAZENADO
(_) - REGISTRAR MODIFICS. DDS. EM LOG.
----------------------------------------------------------------------------------------------------
Modificações efetuadas em TABD /PWS/ZYGLT009
MODIFICAR TABELA TRANSPARENTE: /PWS/ZYGLT009
DESCRIÇÃO BREVE: GL - Parâm Gerais Câmbio - continuação da ZYCBT007
CARACTERÍSTICAS
CATEGORIA DA TABELA: TABELA TRANSPARENTE
CLASSE DE ENTREGA: A
(X) - AUTUALIZAÇÃO DE TABELAS PERMITIDA
CAMPOS NOVOS
CAMPOS: TP. CAMPO CH: INI: TAB.VERIF.: TAB.REF.: CPO.RE
FLAG_CDI_COTACAO /PWS/ZYGLL1379
OPÇÕES TÉCNICAS
TIPO DE DADOS: APPL0
CATEGOR. TAMANHO: 0
(X) - AR. BUFFER NÃO PERMITIDO
(_) - AR. BUFFER PERMITIDO, MAS DESATIVADO
(_) - AR. BUFFER ATIVADO
(_) - RGSTS. IND ARMAZENADOS
(_) - ÁREA GEN ARMAZENADA EM BUFFER Nº DE CPOS CHAVE: 0
(_) - TOTALMENTE ARMAZENADO
(_) - REGISTRAR MODIFICS. DDS. EM LOG.