REPORT zabapgit LINE-SIZE 100. * See http://www.abapgit.org ******************************************************************************** * The MIT License (MIT) * * Copyright (c) 2014 abapGit Contributors * * Permission is hereby granted, free of charge, to any person obtaining a copy * of this software and associated documentation files (the "Software"), to deal * in the Software without restriction, including without limitation the rights * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell * copies of the Software, and to permit persons to whom the Software is * furnished to do so, subject to the following conditions: * * The above copyright notice and this permission notice shall be included in all * copies or substantial portions of the Software. * * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE * SOFTWARE. ******************************************************************************** SELECTION-SCREEN BEGIN OF SCREEN 1001. * dummy for triggering screen on Java SAP GUI SELECTION-SCREEN END OF SCREEN 1001. TABLES sscrfields. INCLUDE zabapgit_password_dialog. " !!! Contains SELECTION SCREEN * create class ZCL_ABAPGIT_AUTH_EXIT implementing ZIF_ABAPGIT_AUTH in following include, * if using the development version of abapGit create a global class instead * place the object in a different package than ZABAPGIT INCLUDE zabapgit_authorizations_exit IF FOUND. * create class ZCL_ABAPGIT_USER_EXIT implementing ZIF_ABAPGIT_EXIT in following include, * if using the development version of abapGit create a global class instead * place the object in a different package than ZABAPGIT INCLUDE zabapgit_user_exit IF FOUND. INCLUDE zabapgit_gui_pages_userexit IF FOUND. INCLUDE zabapgit_forms. ********************************************************************** INITIALIZATION. PERFORM remove_toolbar USING '1001'. " Remove toolbar on html screen lcl_password_dialog=>on_screen_init( ). START-OF-SELECTION. PERFORM run. * Hide Execute button from screen AT SELECTION-SCREEN OUTPUT. IF sy-dynnr = lcl_password_dialog=>c_dynnr. lcl_password_dialog=>on_screen_output( ). ELSE. PERFORM output. ENDIF. * SAP back command re-direction AT SELECTION-SCREEN ON EXIT-COMMAND. PERFORM exit. AT SELECTION-SCREEN. IF sy-dynnr = lcl_password_dialog=>c_dynnr. lcl_password_dialog=>on_screen_event( sscrfields-ucomm ). ENDIF.