Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Nota Fiscal
Data/Hora da Publicação: 09/02/2006 00:00:00
Data/Hora Última Alteração: 20/06/2011 12:12:50
Descrição da Nota: MELHORIA NA MENSAGEM DO BATCH INPUT VIA SHIFT F9
Sintoma
A funcionalidade de SHIFT+F9 deverá ser definida por usuário na Nota Fiscal global, de remessa e
complementar, isto é, definir o usuário que poderá
se utilizar da ferramenta SHIFT+F9.
Solução
Ajuste no programa para Verificar autorização do Usuario Via tabela
de parametro - /PWS/ZYGLT384.
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 00840 Data: 09/02/2006 Hora: 09:05:29
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 00840
Categoria : Melhoria
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00022
Agrupamento : 00100
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
00876 - 00002 - 6.0 - 00022 - VERIFICAÇÃO DE AUTORIZAÇÃO PARA EXECUTAR BATCH VIA SHFT F9.
01187 - 00001 - 6.0 - 00023 - AUTORIZAÇÃO PARA EXECUÇÃO DE BATCH INPUT EM MODO VISÍVEL
----------------------------------------------------------------------------------------------------
MELHORIA NA MENSAGEM DO BATCH INPUT VIA SHIFT F9
----------------------------------------------------------------------------------------------------
Palavras Chave:
MENSAGEM - BATCH - INPUT - SHIFT - F9
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI016I01
REPS /PWS/MZYCI029I01
REPT /PWS/SAPMZYCI016
REPT /PWS/SAPMZYCI029
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI016I01
...
LOOP AT itab_zycit044.
itab_zycit044-mark = ' '.
MODIFY itab_zycit044.
ENDLOOP.
WHEN 'MODO'.
* >> Início da inclusão: MODULE USER_COMMAND_0200
DATA: v_autoriza TYPE feld.
CALL FUNCTION '/PWS/ZYGL_AUTORIZA_MODO_BATCH'
EXPORTING
codmod = 'D'
usuario = sy-uname
func = 'NFR'
IMPORTING
autoriza = v_autoriza.
IF v_autoriza = 'X'.
* << Fim da inclusão
PERFORM modo_batch_input.
* >> Início da inclusão: MODULE USER_COMMAND_0200
ELSE.
MESSAGE w013 WITH text-094 text-095.
ENDIF.
* << Fim da inclusão
WHEN 'CRIARNFR'.
IF /pws/zycie043-transpnac IS INITIAL.
SELECT SINGLE * FROM /pws/zyglt217
WHERE arbgb EQ '/PWS/ZYCIM'
AND msgnr EQ '111'.
...
...
WHEN 'ENTE'.
IF /pws/zycie041-nfexterna NE wa_zycit048-nfext.
v_ok = 'A'.
ENDIF.
WHEN 'MODO'.
* >> Início da exclusão: MODULE USER_COMMAND_0050
DATA: v_autoriza TYPE feld.
* << Fim da exclusão
CALL FUNCTION '/PWS/ZYGL_AUTORIZA_MODO_BATCH'
EXPORTING
codmod = 'D'
usuario = sy-uname
* >> Início da exclusão: MODULE USER_COMMAND_0050
func = 'NF'
* << Fim da exclusão
* >> Início da inclusão: MODULE USER_COMMAND_0050
func = 'NFG'
* << Fim da inclusão
IMPORTING
autoriza = v_autoriza.
IF v_autoriza = 'X'.
PERFORM modo_batch_input.
ELSE.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI029I01
...
WHEN 'DRAFT'.
PERFORM DRAFT.
WHEN 'SELE'.
PERFORM SELE.
WHEN 'MODO'.
* >> Início da inclusão: MODULE USER_COMMAND_0100
DATA: v_autoriza TYPE feld.
CALL FUNCTION '/PWS/ZYGL_AUTORIZA_MODO_BATCH'
EXPORTING
codmod = 'D'
usuario = sy-uname
func = 'NFC'
IMPORTING
autoriza = v_autoriza.
IF v_autoriza = 'X'.
* << Fim da inclusão
PERFORM MODO_BATCH_INPUT.
* >> Início da inclusão: MODULE USER_COMMAND_0100
ELSE.
MESSAGE w013 WITH text-035 text-036.
ENDIF.
* << Fim da inclusão
WHEN 'CANCC'.
PERFORM ESTORNA_NFC.
WHEN 'ATUALNFC'.
IF /PWS/ZYCIE264-BELNR_F_02_C IS INITIAL.
PERFORM ATUALI_NFC.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPT /PWS/SAPMZYCI016
Incluidos os textos abaixo:
094 Usuario não tem autorização
095 para Executar Via Shif F9.
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPT /PWS/SAPMZYCI029
Incluidos os textos abaixo:
035 Usuario não tem autorização
036 para Executar Via Shif F9.