Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Rotina de Pagamento
Data/Hora da Publicação: 01/11/2007 00:00:00
Data/Hora Última Alteração: 10/03/2010 17:29:01
Descrição da Nota: COMPLEMENTO DO BOLETO - TIPO DOC.
Sintoma
Na criação do complemento do boleto de uma despesa financeira, criada no programa de despesa,
o sistema está emitindo a msg="Campo Tipo doc. não está preenchido. Lançamento não será realizado.
Evento 006DB", antes de entrar no BI.
Solução
Alterado include /PWS/MZYCA110F01, form get_parameters_118e031cd, para que informe 'Conta Crédito'
ao invés de 'Tipo Doc'.
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 05135 Data: 01/11/2007 Hora: 17:32:47
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 05135
Categoria : Consultoria
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00003
Agrupamento : 00019
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
COMPLEMENTO DO BOLETO - TIPO DOC.
----------------------------------------------------------------------------------------------------
Palavras Chave:
COMPLEMENTO DO BOLETO - TIPO DOC.
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCA110F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCA110F01
...
EXCEPTIONS
key_not_found = 1
rules_not_found = 2
OTHERS = 3.
IF sy-subrc EQ 0.
READ TABLE itab_zyglt316 INDEX 1.
itab_zycbe033-d_newko = itab_zyglt316-konts.
ENDIF.
PERFORM verify_null_field USING itab_zycbe033-d_newko
'NEWKO'
* >> Início da exclusão: FORM GET_PARAMETERS_118E031CD
text-012.
* << Fim da exclusão
* >> Início da inclusão: FORM GET_PARAMETERS_118E031CD
text-021.
* << Fim da inclusão
ENDIF.
IF wa_zycbt118-frpagto = 'C'.
itab_zycbe033-newbs = '31'.
itab_zycbe033-c_newko = /pws/zycbe031-bcooper.
itab_zycbe033-agkoa = 'K'.
itab_zycbe033-agkon = wa_zycbt118-benefic.
PERFORM verify_null_field USING itab_zycbe033-agkon
'AGKON'
text-021.
ELSEIF wa_zycbt118-frpagto = 'R'.
...