ABAP Objects - Exercise 1 - Classes and Objects (Global)

Exercise 1, Classes and Objects
Create a vehicle class

Create a class ZCL_VEHICLE_XX (where XX is your group number).
The class should have the protected instance attributes SPEED and MAX_SPEED for its speed and
maximum speed, and the public methods SPEED_UP, STOP, and SHOW. Furthermore there should be a
private attribute that contains a running number for an object ID.
SPEED_UP should have an IMPORTING parameter STEP. The method should increase the speed by
STEP, but not allow it to exceed the maximum speed.
STOP should reset the speed to zero.
WRITE should display a message containing the speed and the maximum speed.
Solution
1. Logon to the system and open the Object Navigator of the ABAP Workbench (Transaction SE80, enter
/nSE80 in the command field of the system task bar).
2. Select Local Objects in order to work in a test package that is not transported to other systems.
Hit Enter.
3. Right
Click the name of the local package and navigate to the creation of a class (where XX is your group
number).
4. Fill
the pop-up as follows ZCL_VEHICLE_XX (where XX is your group number) and select Save.
(Dont forget to uncheck Final)
5. Acknowledge
the following window without changes (select either Save or Local Object).
The same holds for all other development objects during this exercise.
6. Now
you enter the Class Builder
Here you can edit the class either in Form-Based mode (default) or in Source Code-Based mode. Use the
respective button to toggle between the modes.
7. Switch
to Source Code-Based mode

, switch to Change mode
existing template with the following code (where XX is your group number).
CLASS zcl_vehicle_xx DEFINITION PUBLIC CREATE PUBLIC.

PUBLIC SECTION.
METHODS constructor.
METHODS speed_up IMPORTING step TYPE i.
and replace the
METHODS stop.
METHODS show.
PROTECTED SECTION.
DATA: speed TYPE i,
max_speed TYPE i VALUE 50.
PRIVATE SECTION.
DATA id TYPE i .
CLASS-DATA object_count TYPE i.
ENDCLASS.
CLASS zcl_vehicle_xx IMPLEMENTATION.
METHOD constructor.
object_count = object_count + 1.
id = object_count.
ENDMETHOD.
METHOD show.
DATA msg TYPE string.
msg = `Vehicle ` && |{ id }| &&
`, Speed = ` && |{ speed }| &&
`, Max-Speed = ` && |{ max_speed }|.
MESSAGE msg TYPE 'I'.
ENDMETHOD.
METHOD speed_up.
speed = speed + step.
IF speed > max_speed.
speed = max_speed.
ENDIF.
ENDMETHOD.
METHOD stop.
speed = 0.
ENDMETHOD.
ENDCLASS.
Check
8. Switch
, Save
and Activate
back to Form-Based mode

class components.
the class (acknowledge all entries of the activation pop-up ).

and play around in that mode by double clicking the
Tip: Select Signature when displaying the implementation of a method.
Create an application class

Create a class ZCL_APPLICATION_XX (where XX is your group number).
This class should use your vehicle class.
It should have simply one static method START that creates and uses objects of ZCL_VEHICLE_XX.
Solution
1. Create the class in the object navigator, where you can directly right click Classes now
2. Fill
the pop-up as follows (where XX is your group number).
3. Implement
the class as follows:
CLASS zcl_application_xx DEFINITION PUBLIC ABSTRACT FINAL CREATE PUBLIC.

PUBLIC SECTION.
CLASS-METHODS start.
PROTECTED SECTION.
PRIVATE SECTION.
ENDCLASS.
CLASS ZCL_APPLICATION_XX IMPLEMENTATION.
METHOD start.
DATA vehicle TYPE REF TO zcl_vehicle_xx.
DATA vehicle_tab LIKE TABLE OF vehicle.
DATA tabindex TYPE i.
DO 10 TIMES.
CREATE OBJECT vehicle.
APPEND vehicle TO vehicle_tab.
ENDDO.
LOOP AT vehicle_tab INTO vehicle.
tabindex = sy-tabix * 10.
vehicle->speed_up( tabindex ).
vehicle->show( ).
ENDLOOP.
ENDMETHOD.
ENDCLASS.
Check
4. Select
, Save
and Activate
the class (acknowledge all entries of the activation pop-up ).
(F8) in the Class Builder and execute method START.
Now you can see the Ids and speed of the objects created.
To examine further, navigate to the source code of method START

and create a breakpoint at an
appropriate position. To add a breakpoint at a certain line, double-click in the left margin on the line that you
want a breakpoint.
A little
should appear in the margin on that line. Similarly, this is the same way you remove a breakpoint.
Test the method again and play around with the ABAP Debugger.

ABAP Objects - Exercise 1 - Classes and Objects (Global)

Uploaded by

ABAP Objects - Exercise 1 - Classes and Objects (Global)

Uploaded by

Exercise 1, Classes and Objects

Create a vehicle class

(Dont forget to uncheck Final)

you enter the Class Builder

to Source Code-Based mode

CLASS zcl_vehicle_xx DEFINITION PUBLIC CREATE PUBLIC.

and replace the

back to Form-Based mode

the class (acknowledge all entries of the activation pop-up ).

Tip: Select Signature when displaying the implementation of a method.

Create an application class

the pop-up as follows (where XX is your group number).

the class as follows:

CLASS zcl_application_xx DEFINITION PUBLIC ABSTRACT FINAL CREATE PUBLIC.

the class (acknowledge all entries of the activation pop-up ).

(F8) in the Class Builder and execute method START.

To examine further, navigate to the source code of method START

You might also like