SAP R/3 форум ABAP консультантов
Russian ABAP Developer's Club

Home - FAQ - Search - Memberlist - Usergroups - Profile - Log in to check your private messages - Register - Log in - English
Blogs - Weblogs News

Как убрать POPUP окно?



 
Post new topic   Reply to topic    Russian ABAP Developer's Club Forum Index -> ABAP
View previous topic :: View next topic  
Author Message
Рустам
Специалист
Специалист



Joined: 26 Dec 2007
Posts: 73

PostPosted: Mon Mar 31, 2008 4:01 pm    Post subject: Как убрать POPUP окно? Reply with quote

Добрый день!
В событии START-OF-SELECTION делаю запрос пользователю на подтверждение вызовом функции:

Code:
CALL FUNCTION 'POPUP_TO_CONFIRM'
    EXPORTING
      titlebar      = 'MIRO Confirm'(001)
      text_question = 'Distribute difference?'(002)
      DISPLAY_CANCEL_BUTTON = ''
      default_button = '1'
  IMPORTING
      answer = w_answer
  EXCEPTIONS
      text_not_found = 1
      OTHERS = 2.


После получения ответа от пользователя, продолжается выбор данных. Он может идти несколько минут и на экране все это время висит POPUP окно. Существет ли способ убрать это окно, чтобы не смущать пользователя?
Back to top
View user's profile Send private message
John Doe
Модератор
Модератор


Age: 46
Joined: 05 Nov 2007
Posts: 725
Location: КраснАдар

PostPosted: Tue Apr 01, 2008 10:13 am    Post subject: Reply with quote

Можн таким способом сделать - скрыть режим, а потом поднять.
Code:
CALL FUNCTION 'SAPGUI_SET_PROPERTY'
  DESTINATION 'SAPGUI'
  EXPORTING PROPERTY = 'VISIBLE'
    VALUE = ' '.

Code:
CALL FUNCTION 'SAPGUI_SET_PROPERTY'
  DESTINATION 'SAPGUI'
  EXPORTING PROPERTY = 'VISIBLE'
    VALUE = 'X'.
Back to top
View user's profile Send private message Blog
vga
Мастер
Мастер


Age: 165
Joined: 04 Oct 2007
Posts: 1218
Location: Санкт-Петербург

PostPosted: Tue Apr 01, 2008 11:38 am    Post subject: Reply with quote

Как понимаю, задача заставить программу отправить изменения на GUI. У меня получилось так:

Создаете пустой экран без GUI status.
Запускаете так:
Code:
CALL FUNCTION 'POPUP_TO_CONFIRM'
....

CALL SCREEN 100.


В экранной логике пишите.

Code:
PROCESS BEFORE OUTPUT.
 MODULE STATUS_0100.
*
PROCESS AFTER INPUT.
 MODULE USER_COMMAND_0100.


В обработке экранной логике.

Code:
*&---------------------------------------------------------------------*
*&      Module  STATUS_0100  OUTPUT
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
module STATUS_0100 output.
*  SET PF-STATUS 'xxxxx'.
*  SET TITLEBAR 'xxx'.
  CALL FUNCTION 'SAPGUI_SET_FUNCTIONCODE'
    exporting functioncode = 'ENTER'
    exceptions function_not_supported = 1.


endmodule.                 " STATUS_0100  OUTPUT
*&---------------------------------------------------------------------*
*&      Module  USER_COMMAND_0100  INPUT
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
module USER_COMMAND_0100 input.
 set screen 0. leave screen.
endmodule.                 " USER_COMMAND_0100  INPUT
Back to top
View user's profile Send private message Blog Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic    Russian ABAP Developer's Club Forum Index -> ABAP All times are GMT + 4 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
You cannot attach files in this forum
You can download files in this forum


All product names are trademarks of their respective companies. SAPNET.RU websites are in no way affiliated with SAP AG.
SAP, SAP R/3, R/3 software, mySAP, ABAP, BAPI, xApps, SAP NetWeaver and any other are registered trademarks of SAP AG.
Every effort is made to ensure content integrity. Use information on this site at your own risk.