CE PLUS - Nota 000840

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.

 

Versões Tratadas

6.0


Pré-Requisitos

Produto:

Nota

Descrição

AUTORIZAÇÃO PARA EXECUÇÃO DE BATCH INPUT EM MODO VISÍVEL

VERIFICAÇÃO DE AUTORIZAÇÃO PARA EXECUTAR BATCH VIA SHFT F9.

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.