Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 27/06/2011 00:00:00
Data/Hora Última Alteração: 11/07/2011 13:17:41
Descrição da Nota: MENSAGEM DE ERRO PARA FATURA TIPO P AO CRIAR DI
Sintoma
A fatura é P e dá mensagem de que não tem fatura contabilizada ao tentar criar DI
Solução
Excluir faturas tipo P ao verificar faturas não contabilizadas para criar a DI.
8.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 11272 Data: 27/06/2011 Hora: 11:42:05
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 11272
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 8.0
Pacote : 00008
Agrupamento : 00075
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
10052 - 00001 - 8.0 - 00003 - EMBARQUE NÃO VERIFICA SE FATURA FOI CONTABILZADA COM SUCESSO AO E
10647 - 00002 - 8.0 - 00005 - ERRO NA DI POR FORA DO EMBARQUE
----------------------------------------------------------------------------------------------------
MENSAGEM DE ERRO PARA FATURA TIPO P AO CRIAR DI
----------------------------------------------------------------------------------------------------
Palavras Chave:
MENSAGEM DE ERRO - FATURA TIPO P - DI - CRIAR
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI001I01
REPS /PWS/MZYCI023F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI001I01
...
LOOP AT itab_zycit006_aux WHERE eliminado NE 'X'
AND tpfatura EQ '01'
AND frpagto NE 'A'
* >> Início da inclusão: MODULE USER_COMMAND_0050
AND frpagto NE 'P'
* << Fim da inclusão
AND belnr_p EQ space.
SELECT SINGLE * FROM /pws/zycit132
WHERE nrseq = itab_zycit006_aux-nrseq AND
eliminado NE 'X' AND
belnr_p EQ space.
IF sy-subrc = 0.
v_fat = 'X'.
ELSE.
SELECT SINGLE * FROM /pws/zycit132
WHERE nrseq = itab_zycit006_aux-nrseq.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F01
...
SELECT * FROM /pws/zycit006
INTO TABLE itab_zycit006_aux
FOR ALL ENTRIES IN itab_zycit263
WHERE nrseq_pgfat EQ itab_zycit263-nrseq_pgfat
AND nrseqce EQ /pws/zycie085-nrbl.
LOOP AT itab_zycit006_aux WHERE eliminado NE 'X'
AND tpfatura EQ '01'
AND frpagto NE 'A'
* >> Início da inclusão: FORM VERIFY_BL
AND frpagto NE 'P'
* << Fim da inclusão
AND belnr_p EQ space.
SELECT SINGLE * FROM /pws/zycit132
WHERE nrseq EQ itab_zycit006_aux-nrseq
AND eliminado NE 'X'
AND belnr_p EQ space.
IF sy-subrc = 0.
CLEAR p_v_bl.
ELSE.
...