CE PLUS - Nota 001379
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Nota Fiscal
Data/Hora da Publicação: 22/05/2006 00:00:00
Data/Hora Última Alteração: 20/06/2011 12:38:28
Descrição da Nota: CRIAÇÃO DE PONTO DE EXIT NO PROGRAMA DE NOTA FISCAL.
Sintoma
Quebra de notas fiscais por campo especifico do cliente.
Solução
Iserir ponto de Exit para Nota Fiscal.
Versões Tratadas
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 01379 Data: 22/05/2006 Hora: 09:02:05
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 01379
Categoria : Melhoria
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00023
Agrupamento : 00114
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
CRIAÇÃO DE PONTO DE EXIT NO PROGRAMA DE NOTA FISCAL.
----------------------------------------------------------------------------------------------------
Palavras Chave:
EXIT - NOTA - FISCAL
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI016F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI016F01
...
ELSE.
it_zycee005-pstdat = v_last_date.
ENDIF.
PERFORM verifica_descricao_inco.
READ TABLE itab_zycit001_aux WITH KEY nrseq = itab_zycit042-nrseq.
* >> Início da inclusão: FORM CABECALHO_NF
REFRESH itab_zyglt100.
PERFORM verifica_exit USING 'D'
'/PWS/SAPMZYCI016'
'DNF010'.
CLEAR itab_zyglt100 .
READ TABLE itab_zyglt100 WITH KEY
zexit = 'DNF010' 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
ENDFORM.
FORM cabecalho_nf_r.
it_zycee005-tcode = text-065.
it_zycee005-tabela = text-025.
it_zycee005-nrseq = /pws/zycie043-nfremessa.
...