Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Liquidação de Fatura
Data/Hora da Publicação: 29/08/2008 00:00:00
Data/Hora Última Alteração: 11/03/2010 10:07:05
Descrição da Nota: LIQUIDAÇÃO DE CONTRATO
Sintoma
Na liquidação do contrato de CP o programa executa todas as etápas (f-30)corretamente mas no momento
de compensar as partidas do cliente e do contrato, que aparecem na tela, não consegue dar o duplo
clique na partida do cliente.
Solução
Foi incluído o duplo click no tratamento da seleção na partida do cliente.
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 07221 Data: 29/08/2008 Hora: 10:45:35
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 07221
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 7.0
Pacote : 00006
Agrupamento : 00062
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
LIQUIDAÇÃO DE CONTRATO
----------------------------------------------------------------------------------------------------
Palavras Chave:
LIQUIDAÇÃO DE CONTRATO, CONTRATO DE CP, COMPENSAR AS PARTIDAS DO CLIENTE
E DO CONTRATO
----------------------------------------------------------------------------------------------------
Objetos da nota:
FUNC /PWS/ZYCB_TRANSACAO_F_30_W
----------------------------------------------------------------------------------------------------
Modificações efetuadas em FUNC /PWS/ZYCB_TRANSACAO_F_30_W
...
PERFORM bdc_screen USING 'SAPDF05X' '3100'.
PERFORM bdc_field USING 'BDC_CURSOR' 'RF05A-ABPOS'.
PERFORM bdc_field USING 'BDC_OKCODE' '=OSE'.
PERFORM bdc_screen USING 'SAPDF05X' '3100'.
PERFORM bdc_field USING 'BDC_CURSOR' 'RF05A-ABPOS'.
PERFORM bdc_field USING 'BDC_OKCODE' '=OSE'.
ENDIF.
PERFORM bdc_screen USING 'SAPDF05X' '3100'.
PERFORM bdc_field USING: 'BDC_OKCODE' '=DBR'.
PERFORM bdc_screen USING 'SAPDF05X' '3100'.
* >> Início da inclusão: FUNCTION /PWS/ZYCB_TRANSACAO_F_30_W
PERFORM bdc_field USING 'BDC_CURSOR' 'RF05A-ABPOS'.
PERFORM bdc_field USING 'BDC_OKCODE' '=Z+'.
PERFORM bdc_screen USING 'SAPDF05X' '3100'.
* << Fim da inclusão
PERFORM bdc_field USING: 'BDC_CURSOR' 'DF05B-PSDIF(01)',
'BDC_OKCODE' '=PI'.
PERFORM bdc_screen USING 'SAPDF05X' '3100'.
IF t_dados-flag_nc EQ 'X'.
PERFORM bdc_field USING: 'BDC_OKCODE' '=BU'.
ELSE.
PERFORM bdc_field USING: 'BDC_OKCODE' '=BS'.
IF v_desc_rec IS INITIAL.
SORT itab_parts BY shkzg agkoa agkon agums DESCENDING.
ELSE.
...