Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Fatura Mercadoria
Data/Hora da Publicação: 24/04/2009 00:00:00
Data/Hora Última Alteração: 22/02/2011 16:17:28
Descrição da Nota: FATURA - ASSOCIAÇÃO DE PAGAMENTO ANTECIPADO
Sintoma
Adicionada exit FAT015 ao form rotina_de_contabilizacao.
Solução
Adicionada exit FAT015 ao form rotina_de_contabilizacao.
7.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 08336 Data: 24/04/2009 Hora: 08:41:25
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 08336
Categoria : Melhoria
Prioridade : Baixa
Versão PW.CE : 7.0
Pacote : 00009
Agrupamento : 00095
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
02700 - 00001 - 6.0 - 00025 - CUSTO EFETIVO FATURA P PARCELADA NÃO GRAVA NO CUSTO E FRETEI COLU
----------------------------------------------------------------------------------------------------
FATURA - ASSOCIAÇÃO DE PAGAMENTO ANTECIPADO
----------------------------------------------------------------------------------------------------
Palavras Chave:
CRIADA - EXIT - FAT015
/PWS/SAPMZYCI003
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI003F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F01
...
ELSE.
LOOP AT itab_zycit132 WHERE status = 'C' OR status = space.
v_idx = sy-tabix.
PERFORM cria_remessa.
MODIFY itab_zycit132 INDEX v_idx.
ENDLOOP.
ENDIF.
ENDIF.
MODIFY /pws/zycit006 FROM /pws/zycie006.
PERFORM verifica_associacao.
* >> Início da inclusão: FORM ROTINA_DE_CONTABILIZACAO
PERFORM verifica_exit USING 'D'
'/PWS/SAPMZYCI003'
'FAT015'.
CLEAR itab_zyglt100 .
READ TABLE itab_zyglt100 WITH KEY
zexit = 'FAT015' BINARY SEARCH.
IF sy-subrc EQ 0.
IF NOT itab_zyglt100-zexit_ativa IS INITIAL.
PERFORM (itab_zyglt100-formulario) IN PROGRAM
(itab_zyglt100-programa) IF FOUND.
ENDIF.
ENDIF.
* << Fim da inclusão
CLEAR v_parcela.
REFRESH itab_matuse.
IF /pws/zycie006-flagdesc NE wa_zycie006_ini-flagdesc OR
/pws/zycie006-bcofav NE wa_zycie006_ini-bcofav OR
wa_zycbt078_ini IS INITIAL.
/pws/zycbt078-nrseq = /pws/zycie006-nrseq.
/pws/zycbt078-dtmodif = sy-datum.
/pws/zycbt078-username = sy-uname.
/pws/zycbt078-uzeit = sy-uzeit.
/pws/zycbt078-bcofav = /pws/zycie006-bcofav.
...