Posted: Fri Oct 03, 2008 3:07 pm Post subject: Отработка процедуры один раз при запуске программы
Всем привет.
Ситуация смешная. но не пойму как ее решить. есть: программа, запускаемая через Selection Screen (после запуска можно попадать в другие экраны и возвращаться обратно до SelScr, выход из SelScr с помощью стандартного GUI-Status ); процедура P1 котрая должна отработать при запуске программы (только один раз! желательно при старте SelScr).
что делал: вешал процедуру P1 на события Load-of-Programm, Initilaization.
Проблема: при возврате из других экранов обратно до SelScr возникают события LOP или INIT (причем все глобальные переменные снова обнуляются - так что выставить флаг что процедура уже отработала внутри программы не получается по сути программа автоматически перезагружается) и процедура отрабатывает всякий раз при выходе до SelScr.
Может все это как нибудь просто решается?
Благодарю всех откликнувшихся.
Age: 165 Joined: 04 Oct 2007 Posts: 1218 Location: Санкт-Петербург
Posted: Fri Oct 03, 2008 3:28 pm Post subject:
Хранить в abap памяти
Code:
REPORT Z_vga_one_run.
DATA: g_flag.
PARAMETER: p_bukrs LIKE bkpf-bukrs.
INITIALIZATION.
IMPORT g_flag FROM MEMORY ID sy-uname.
IF sy-subrc = 0 AND g_flag IS INITIAL.
PERFORM one_run. " will run once
g_flag = 'X'.
EXPORT g_flag TO MEMORY ID sy-uname.
ENDIF.
START-OF-SELECTION.
WRITE: / 'Test'.
*&---------------------------------------------------------------------*
*& Form one_run
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
form one_run.
endform. " one_run
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.
