CE PLUS - Nota 010476
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 09/08/2010 00:00:00
Data/Hora Última Alteração: 23/11/2010 16:42:56
Descrição da Nota: AO CRIAR A DI COM FATURA TIPO P, SISTEMA RECLAMA DE PAGTO ANTECIPADO.
Sintoma
Ao criar a DI com fatura tipo P, sistema exibe mensagem indicando existência de pagamento
antecipado.
Solução
Verificar dados na tabela /PWS/ZYCBT117 antes de dar mensagem de pagamento antecipado.
Versões Tratadas
8.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 10476 Data: 09/08/2010 Hora: 09:42:48
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 10476
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 8.0
Pacote : 00004
Agrupamento : 00034
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
09558 - 00001 - MENSAGEM REPETIDA EM FATURA TIPO P
----------------------------------------------------------------------------------------------------
AO CRIAR A DI COM FATURA TIPO P, SISTEMA RECLAMA DE PAGTO ANTECIPADO.
----------------------------------------------------------------------------------------------------
Palavras Chave:
DI - FATURA TIPO P - PAGAMENTO ANTECIPADO - MENSAGEM
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023F03
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F03
...
ELSE.
SELECT SINGLE belnr_p FROM /pws/zycit006
INTO v_belnr_p
WHERE nrseq EQ /pws/zycie006-nrseq.
* >> Início da inclusão: FORM SALVA_FATURA
IF sy-subrc EQ 0 .
* << Fim da inclusão
IF v_belnr_p IS INITIAL.
v_msg1 = 'X'.
ELSE.
v_msg2 = 'X' .
SELECT * FROM /pws/zycbt117
INTO TABLE itab_zycbt117
FOR ALL ENTRIES IN itab_zycit003
WHERE ebeln = itab_zycit003-ebeln
AND slpgant > 0
* >> Início da exclusão: FORM SALVA_FATURA
AND status NE 'E'. "#EC CI_NOFIELD
* << Fim da exclusão
* >> Início da inclusão: FORM SALVA_FATURA
AND status NE 'E'. "#EC CI_NOFIELD
* << Fim da inclusão
READ TABLE itab_zycbt117 INDEX 1.
* >> Início da inclusão: FORM SALVA_FATURA
IF sy-subrc EQ 0 .
* << Fim da inclusão
v_msg = 'X' .
* >> Início da inclusão: FORM SALVA_FATURA
ENDIF.
ENDIF.
* << Fim da inclusão
ENDIF.
...