Visit the SAP Forum

Languages : English | Dutch | French | Portugese | Italian



INTERVIEW EBOOK
Get 30,000 Interview Questions & Answers in an eBook.

Interview Success Kit - Get Success in Job Interviews



Send your Resume to 6000 Companies
START YOUR WEBSITE
India's Best Web Hosting Company

Splash Screen in ABAP


Home »ABAP Programming » Splash Screen in ABAP


"Splash Screen in ABAP

I created 2 MODAL screens 0806 & 2009
0806 was for start of job spash & 20009 was an exit SPLASH
Used this effectively in a lrge DOI Excel download program..

2 JPG files with a nice Indian Welcome & fancy Bengali Text!
Each Modal scren had 2 Containers
CUSTOM_1 shaped for Picture control  
CUSTOM_2 for CL_GUI_TIMER control


* Create 2 MODAL screens 0806 and 2009 * 1 CUSTOM_1 shaped to hold JPG * and 1 CUSTOM_2 to hold TIMER REPORT zpp_r012 LINE-SIZE  160                 LINE-COUNT 72                 MESSAGE-ID zpp01. DATA: container1 TYPE REF TO cl_gui_custom_container,       container2 TYPE REF TO cl_gui_custom_container,       picture TYPE REF TO cl_gui_picture. DATA: graphic_url(255),       g_result   TYPE i,       g_linesz   TYPE i,       g_filesz   TYPE i,       g_name(100). TYPES: t_graphic_line(256) TYPE x. DATA: graphic_line TYPE t_graphic_line,       graphic_table TYPE TABLE OF t_graphic_line. *---------------------------------------------------------------------* *       CLASS lcl_event_handler DEFINITION *---------------------------------------------------------------------* CLASS lcl_event_handler DEFINITION.   PUBLIC SECTION.     CLASS-METHODS: on_finished FOR EVENT finished OF cl_gui_timer. ENDCLASS. "lcl_event_handler DEFINITION *---------------------------------------------------------------------* *       CLASS lcl_event_handler IMPLEMENTATION *---------------------------------------------------------------------* CLASS lcl_event_handler IMPLEMENTATION.   METHOD on_finished.     IF sy-dynnr = 2009.       LEAVE PROGRAM.     ELSE.       PERFORM f_excel_job.     ENDIF.   ENDMETHOD. "on_finished ENDCLASS. "lcl_event_handler IMPLEMENTATION DATA timer TYPE REF TO cl_gui_timer. DATA event_handler TYPE REF TO lcl_event_handler. DATA timeout TYPE i VALUE '3'. *&---------------------------------------------------------------------* *                      SELECTION-SCREEN DESIGN                          * *&---------------------------------------------------------------------* SELECTION-SCREEN: BEGIN OF BLOCK b2sels WITH FRAME TITLE text-002. PARAMETERS: pwerks  LIKE     mseg-werks OBLIGATORY,  "THIS Plant             pbudat  LIKE     mkpf-budat OBLIGATORY.  "THIS Date SELECTION-SCREEN: END OF BLOCK b2sels. *&---------------------------------------------------------------------* *                       INITIALIZATION EVENT                            * *&---------------------------------------------------------------------* INITIALIZATION. *&---------------------------------------------------------------------* *                     AT SELECTION-SCREEN EVENT                         * *&---------------------------------------------------------------------* **Use this EVENT to validate SELECTION-SCREEN AT SELECTION-SCREEN. *&---------------------------------------------------------------------* *                      START-OF-SELECTION EVENT                         * *&---------------------------------------------------------------------* START-OF-SELECTION.   CALL SCREEN 0806 STARTING AT 30 4. *&---------------------------------------------------------------------* *&      Form  f_excel_job *&---------------------------------------------------------------------* FORM f_excel_job. * LOTS of Code   CALL SCREEN 2009 STARTING AT 30 4. ENDFORM.                    "f_excel_job ** LOTS of CODE *&---------------------------------------------------------------------* *&      Form  getpicurl *&---------------------------------------------------------------------* FORM getpicurl.   OPEN DATASET g_name FOR INPUT IN BINARY MODE.   REFRESH graphic_table.   CLEAR   g_filesz.   DO.     CLEAR graphic_line.     READ DATASET g_name INTO graphic_line ACTUAL LENGTH g_linesz.     ADD g_linesz TO g_filesz.     APPEND graphic_line TO graphic_table.     IF sy-subrc <> 0.       EXIT.     ENDIF.   ENDDO.   CLOSE DATASET g_name.   CLEAR graphic_url.   CALL FUNCTION 'DP_CREATE_URL'     EXPORTING       type                 = 'IMAGE'       subtype              = 'GIF'     TABLES       data                 = graphic_table     CHANGING       url                  = graphic_url     EXCEPTIONS       dp_invalid_parameter = 1       dp_error_put_table   = 2       dp_error_general     = 3       OTHERS               = 4.   IF sy-subrc <> 0.     MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno             WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.     EXIT.   ENDIF.   IF graphic_url IS NOT INITIAL.     CALL METHOD picture->clear_picture       EXCEPTIONS         error = 1.     CALL METHOD picture->load_picture_from_url       EXPORTING         url    = graphic_url       IMPORTING         RESULT = g_result.     CALL METHOD picture->set_display_mode       EXPORTING         display_mode = picture->display_mode_normal_center       EXCEPTIONS         error        = 1.     CALL METHOD cl_gui_cfw=>update_view.   ENDIF. ENDFORM.                    "getpicurl *---------------------------------------------------------------------* *  MODULE zjncpbo OUTPUT screen 0806 *---------------------------------------------------------------------* MODULE zjncpbo OUTPUT.   MOVE 'NAMASTE.JPG' TO g_name.   CREATE OBJECT: container1 EXPORTING container_name = 'CUSTOM_1',                  container2 EXPORTING container_name = 'CUSTOM_2',                  picture    EXPORTING parent = container1,                  timer      EXPORTING parent = container2.   SET HANDLER lcl_event_handler=>on_finished FOR timer. * Start Timer   timer->interval = timeout.   CALL METHOD timer->run.   PERFORM getpicurl.   CALL METHOD cl_gui_cfw=>flush. ENDMODULE.                             " PBO *---------------------------------------------------------------------* *  MODULE zjncpbo2 OUTPUT screen 2009 *---------------------------------------------------------------------* MODULE zjncpbo2 OUTPUT.   MOVE 'THANKS.JPG' TO g_name.   CREATE OBJECT: container1 EXPORTING container_name = 'CUSTOM_1',                  container2 EXPORTING container_name = 'CUSTOM_2',                  picture    EXPORTING parent = container1,                  timer      EXPORTING parent = container2.   SET HANDLER lcl_event_handler=>on_finished FOR timer. * Start Timer   timer->interval = timeout.   CALL METHOD timer->run.   PERFORM getpicurl.   CALL METHOD cl_gui_cfw=>flush. ENDMODULE.           
A D V E R T I S E M E N T

A D V E R T I S E M E N T

S A P - R E S O U R C E S


Get Free SAP Resources:

Are you looking for:
  • SAP Jobs
  • Free SAP eBooks
  • SAP Softwares
  • SAP Tutorials
  • ERP Implementation Examples
Enter Email Address:
(Enter your email address above and we will instantly send you the download link to you, when you confirm your email.)
Search SAP Resources:
discussionDiscussion Center
Discuss
Discuss

Query

Feedback
Yahoo Groups
Y! Group
Sirfdosti Groups
Sirfdosti
Contact Us
Contact
Sign in

User Name:
Password:
Forget password? | Register


INTERVIEW EBOOK

Get 30,000 Interview Questions & Answers in an eBook.

Interview Success Kit - Get Success in Job Interviews


Send your Resume to 6000 Companies

SAP Resources

  • SAP Articles
  • SAP Books
  • SAP Certifications
  • SAP Companies
  • SAP Study Materials
  • SAP Events
  • SAP Faqs
  • SAP Jobs
  • SAP Job Consultants
  • SAP Links
  • SAP News
  • SAP Sample Papers
  • SAP Interview Questions
  • SAP Training Institutes
  •  
    SAP Tutorial

  • Introduction
  • SAP History
  • SAP Facts
  • SAP Tables
  • SAP Function
  • SAP Report
  • Reasons To Use SAP
  • SAP Landscape
  • SAP Transaction Code
  • SAP Lotus Notes Integration
  • Business Connector and XML
  • Enterprise Release 4.7

  • SAP Training Institutes

  • SAP Training Institutes
  • Job Consultants Address
  • SAP Companies Address

  • Business Process Cycle

  • Analyze
  • Design
  • Implement
  • Operate
  • Optimize
  • Skills And Education

  • Logistics Module

  • Sales and Distribution
  • Quality Management
  • Materail Management
  • Plant Maintenance
  • Financial Modules (FI/CO)
  • Project system
  • Production Planning
  • Service Management

  • SAP NetWeaver

  • Introduction
  • Object Model
  • Interoperability
  • Creating Web Apps
  • Java Connector
  • Advantages & Conclusion
  • Life Cycle Management
  • Composite Application Framework

  • SAP Tools

  • SQL Trace Tool
  • SAP CRM
  • SAP SRM
  • SAP SCM
  • SAP ERP
  • SAP BW

  • SAP Modules

  • SAP FI Module
  • SAP CO Module

  • SAP Technical

  • SAP ITS Architecture
  • Financial Management
  • Manufacturing Planning and Execution
  • Customer Order Management
  • Lackbox Processing
  • SD and Financial Accounting Integration
  • SAP - HR (Human Resource)

  • SAP Miscellanous

  • Web Application Server(WAS)
  • Data Archiving
  • Mobile Engine
  • SAP Script
  • SAP Transactions
  • SAP Business Warehouse(BW)

  • SAP Reference

  • SAP Facts
  • SAP Tables
  • SAP Function
  • SAP Report
  • SAP Landscape

  • SAP Others

  • SAP Treasury
  • SAP Finance
  • SAP WAS
  • SAP Data Archiving
  • SAP ALE
  • SAP EDI
  • SAP Exchange
  • SAP X-APPS
  • SAP Applications Components
  • SAP Software
  • Dunning
  • SAP IDES
  • SAP Payroll Basics
  • SAP BASIS and Security Authorization
  • SAP Backup
  • SAP Router

  • ABAP Tutorials

  • Introduction
  • ABAP Transaction
  • ABAP Function
  • ABAP File Processing
  • ABAP Objects
  • ABAP Syntax
  • ABAP Queries
  • SAPMail Using ABAP
  • ABAP Programming Hints

  • SAP Projects & Codes

  • Finding the user-exits
  • Purchase Order Display
  • Batch Input
  • Dynamic Open SQL
  • Creating Extract Dataset
  • Reading database tables
  • Load table from a UNIX file
  • Create subscreen

  • SAP Resources

  • SAP Books
  • SAP Links

  • Interview Question



  • Common Interview Que.
  • ABAP Interview Que.
  • ERP Interview Que.
  • HR Interview Que.
  • MM Interview Que.
  • PP Interview Que.
  • ALE Interview Que.
  • EDI Interview Que.
  • Basis Interview Questions
  • SAP-SD Interview Questions
  • FI&CO Interview Questions
  • BW Interview Questions
  • CRM Interview Questions
  • Interview Questions

  • Careers at SAP

  • Careers in SAP (SAP Jobs)
  • Advertise
  •