CE PLUS - Nota 009661

Módulo: CÂMBIO EXPORTAÇÃO

Funcionalidade: Captação

Data/Hora da Publicação: 08/01/2010 00:00:00

Data/Hora Última Alteração: 16/12/2010 09:00:46

Descrição da Nota: CAPTAÇÃO - CANCELAMENTO-MSG BANCO FINANCIADOR/NEGOCIADOR NÃO PREENCHIDO

Sintoma

Ao efetuar um cancelamento de um contrato, exibe a mensagem de que o campo Banco Financiador não

esta preenchido. O mesmo não esta, mas não deveria influenciar neste cenário. O mesmo ocorre para

banco negociador.

 

 

Solução

Retirar consistência que exige o preenchimento dos campos Banco Financiador e Banco Negociador, ao

tentar efetuar o cancelamento do contrato, pois os mesmos não influenciam em nada na contabilização,

apenas o banco crédito.

 

Versões Tratadas

8.0

Informações Complementares

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

Nota Número 09661 Data: 08/01/2010 Hora: 10:17:10

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

 

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

Nota Número              : 09661

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 8.0

Pacote                   : 00002

Agrupamento              : 00003

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

 

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

CAPTAÇÃO - CANCELAMENTO-MSG BANCO FINANCIADOR/NEGOCIADOR NÃO PREENCHIDO

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

Palavras Chave:

CAPTAÇÃO - CANCELAMENTO MSG BANCO FINANCIADOR NEGOCIADOR NÃO PREENCHIDO

BCOFINAN BCONEGOC BANCO NEGOCIADOR

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

Objetos da nota:

REPS /PWS/MZYCB001F01

REPS /PWS/MZYCB001F04

 

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

Modificações efetuadas em REPS /PWS/MZYCB001F01

 

...

form verifica_dados.

  perform verify_null_field_c using /pws/zycbe001-bukrs

                                    'BUKRS'

                                    text-018.

  perform verify_null_field_c using /pws/zycbe001-waers

                                    'WAERS'

                                    text-019.

  perform verify_null_field_c using /pws/zycbe001-txcneg

                                    'KURSF'

                                    text-027.

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

  perform verify_null_field_c using /pws/zycbe001-bconegoc

                                        'BCONEGOC'

                                        text-014.

  perform verify_null_field_c using /pws/zycbe001-bcofinan

                                        'BCOFINAN'

                                        text-013.

* << Fim da exclusão

  perform verify_null_field_c using /pws/zycbe001-bcocred

                                        'BCOCRED'

                                        text-016.

  if not itab_dados is initial.

    loop at itab_dados.

      message i227 with itab_dados-descricao.

    endloop.

    clear itab_dados.

    refresh itab_dados.

    leave to screen '100'.

...

 

 

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

Modificações efetuadas em REPS /PWS/MZYCB001F04

 

...

  endif.

  if /pws/zycbe001-tpcontr+0(1) = 'D'.

    itab_zycbe033-d_newko = /pws/zycbe001-kunnr.

  else.

    read table itab_zyglt316 index 1.

    itab_zycbe033-d_newko = itab_zyglt316-konts.

  endif.

  perform verify_null_field using itab_zycbe033-d_newko

                                  'NEWKO'

                                  text-012.

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

  clear itab_zycbt012.

  case /pws/zycbe001-tpcontr+0(1).

    when 'A' or 'E' or 'C' or 'D' or 'T'.

      perform verify_null_field using /pws/zycbe001-bconegoc

                                      'BCONEGOC'

                                      text-014.

      v_banco_c = /pws/zycbe001-bconegoc.

    when 'P' or 'S'.

      perform verify_null_field using /pws/zycbe001-bcofinan

                                      'BCOFINAN'

                                      text-013.

      v_banco_c = /pws/zycbe001-bcofinan.

  endcase.

* << Fim da exclusão

  screen-input = 0.

  clear itab_zycbt012.

  itab_zycbe033-agkon = itab_zycbt012-saknr1.

  clear itab_zyglt316.

  refresh itab_zyglt316.

  concatenate /pws/zycbe001-tpcontr /pws/zycbe001-przcontr

              into v_codaux separated by space.

  call function '/PWS/ZYGL_READ_ACCOUNT_NUMBER'

       exporting

            bukrs           = /pws/zycbe001-bukrs

...