CLASS {{p}}cx_balloon_cloud DEFINITION PUBLIC INHERITING FROM {{p}}cx_balloon_flight FINAL CREATE PUBLIC. PUBLIC SECTION. METHODS constructor IMPORTING iv_cloud_base_m TYPE i iv_limit_m TYPE i. PRIVATE SECTION. CONSTANTS c_dummy TYPE i VALUE 0. ENDCLASS. CLASS {{p}}cx_balloon_cloud IMPLEMENTATION. METHOD constructor. super->constructor( iv_text = |Cloud base { iv_cloud_base_m } m is below the limit { iv_limit_m } m| ). ENDMETHOD. ENDCLASS.