Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Recebimento
Data/Hora da Publicação: 08/02/2006 00:00:00
Data/Hora Última Alteração: 20/06/2011 12:12:21
Descrição da Nota: A FUNCIONALIDADE DE SHIFT+F9 DEVERÁ SER DEFINIDA POR USUÁRIO
Sintoma
A funcionalidade de SHIFT+F9 deverá ser definida por usuário para o recebimento, na tabela zyglt384.
Solução
Criar a restrição da funcionalidade de SHIFT+F9.
6.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 00827 Data: 08/02/2006 Hora: 09:25:28
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 00827
Categoria : Melhoria
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00022
Agrupamento : 00100
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
A FUNCIONALIDADE DE SHIFT+F9 DEVERÁ SER DEFINIDA POR USUÁRIO
----------------------------------------------------------------------------------------------------
Palavras Chave:
SHIFT+F9 - RECEBIMENTO
----------------------------------------------------------------------------------------------------
Objetos da nota:
DYNP /PWS/SAPMZYCI017 0200
REPS /PWS/MZYCI017F01
REPT /PWS/SAPMZYCI017
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DYNP /PWS/SAPMZYCI017 0200
*<< Mudança na logica do processamento >>
PROCESS BEFORE OUTPUT.
MODULE:
* STATUS_0200,
load_data200,
* << Início Inclusão >> <---Nota
set_screen,
exit_tela.
* << Fim Inclusão >> <---Nota
LOOP AT ITAB_ZYCIT044
CURSOR TC_ITENS_NFR-CURRENT_LINE.
MODULE CARREGA_ZYCIE044.
module set_screen_tc_nfr.
ENDLOOP.
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI017F01
...< FORM EXECUTAR_EVENTO >
tc_itens_nfg-top_line = tc_itens_nfg-top_line + tc_itens_nfg-lines.
WHEN 'RECEB'.
PERFORM executa_batch_input.
CLEAR v_modo_bi.
WHEN 'MODO'.
* << Início inclusão >> <---Nota
DATA: v_autoriza TYPE feld,
v_uname LIKE sy-uname.
CLEAR v_uname.
v_uname = sy-uname.
CALL FUNCTION '/PWS/ZYGL_AUTORIZA_MODO_BATCH'
EXPORTING
codmod = 'D'
usuario = v_uname
func = 'REC'
IMPORTING
autoriza = v_autoriza.
IF v_autoriza = 'X'.
* << Fim inclusão >> <---Nota
PERFORM modo_batch_input.
* << Início inclusão >> <---Nota
ELSE.
MESSAGE w013 WITH text-105 text-106.
ENDIF.
* << Fim inclusão >> <---Nota
WHEN 'ESTOR'.
IF /pws/zycie041 IS INITIAL.
SELECT SINGLE * FROM /pws/zycit041 INTO /pws/zycie041
WHERE nrseq = /pws/zycie043-nrseq AND
cancel = space.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPT /PWS/SAPMZYCI017
*Foram inseridos:
*ID Chave Comprimento Txt.
I 105 27 Usuario não tem autorização
I 106 26 para Executar Via Shif F9.