CE PLUS - Nota 001196
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DSI
Data/Hora da Publicação: 12/04/2006 00:00:00
Data/Hora Última Alteração: 20/06/2011 12:30:19
Descrição da Nota: FATURAS DO TIPO "P", CRIAÇÃO DA DSI O NÃO É EXIBIDA A MGS DE CONT. FAT.
Sintoma
Para as faturas do tipo "P", no momento em que a DSI é criada e o número e data de registros
informados, o sistema não exibe a informação "A Fatura foi contabilizada com sucesso", e o usuário
fica sem saber se a fatura foi contabilizada ou não.
Solução
Ajustes de mensagem para exibição na DSI ao contabilizar fatura tipo P.
Versões Tratadas
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 01196 Data: 12/04/2006 Hora: 16:38:07
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 01196
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00023
Agrupamento : 00109
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
FATURAS DO TIPO "P", CRIAÇÃO DA DSI O NÃO É EXIBIDA A MGS DE CONT. FAT.
----------------------------------------------------------------------------------------------------
Palavras Chave:
FATURAS, DSI
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI058F03
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI058F03
...
endif.
call transaction '/PWS/ZYCI003_A' using itab_bdc
mode v_modo
update 'S'
messages into itab_msg.
* >> Início da exclusão: FORM SALVA_FATURA
if sy-subrc eq 0.
* << Fim da exclusão
* >> Início da inclusão: FORM SALVA_FATURA
DATA: BEGIN OF itab_zycbt117 OCCURS 0.
INCLUDE STRUCTURE /pws/zycbt117.
DATA: END OF itab_zycbt117.
COMMIT WORK.
* << Fim da inclusão
select * from /pws/zycit132
into table itab_132
where nrseq eq /pws/zycie006-nrseq.
if sy-subrc eq 0.
loop at itab_132 where belnr_p is initial.
* >> Início da exclusão: FORM SALVA_FATURA
message w015 with text-206 text-207.
* << Fim da exclusão
* >> Início da inclusão: FORM SALVA_FATURA
MESSAGE i015 WITH text-206 text-207.
* << Fim da inclusão
exit.
endloop.
* >> Início da inclusão: FORM SALVA_FATURA
IF sy-subrc NE 0.
MESSAGE i015 WITH text-225.
ENDIF.
SELECT * FROM /pws/zycbt117
INTO TABLE itab_zycbt117
FOR ALL ENTRIES IN itab_zycit003
WHERE ebeln = itab_zycit003-ebeln
AND slpgant > 0
AND status NE 'E'.
IF sy-subrc EQ 0.
MESSAGE i015 WITH text-224.
ENDIF.
* << Fim da inclusão
else.
select single belnr_p from /pws/zycit006
into v_belnr_p
where nrseq eq /pws/zycie006-nrseq.
if v_belnr_p is initial.
* >> Início da exclusão: FORM SALVA_FATURA
message w015 with text-206 text-207.
* << Fim da exclusão
* >> Início da inclusão: FORM SALVA_FATURA
MESSAGE i015 WITH text-206 text-207.
ELSE.
MESSAGE i015 WITH text-225.
SELECT * FROM /pws/zycbt117
INTO TABLE itab_zycbt117
FOR ALL ENTRIES IN itab_zycit003
WHERE ebeln = itab_zycit003-ebeln
AND slpgant > 0
AND status NE 'E'.
IF sy-subrc EQ 0.
MESSAGE i015 WITH text-224.
* << Fim da inclusão
endif.
endif.
* >> Início da exclusão: FORM SALVA_FATURA
else.
message w015 with text-206 text-207.
* << Fim da exclusão
* >> Início da inclusão: FORM SALVA_FATURA
itab_zycit006-belnr_p = v_belnr_p.
MODIFY itab_zycit006.
* << Fim da inclusão
endif.
endif.
endloop.
endform.
form deleta_variacao.
...