mirror of
https://github.com/abap2xlsx/abap2xlsx.git
synced 2025-05-05 22:07:30 +08:00
85 lines
1.5 KiB
ABAP
85 lines
1.5 KiB
ABAP
CLASS zcl_excel_collection DEFINITION
|
|
PUBLIC
|
|
FINAL
|
|
CREATE PUBLIC .
|
|
|
|
PUBLIC SECTION.
|
|
|
|
TYPES:
|
|
ty_collection TYPE STANDARD TABLE OF REF TO object .
|
|
|
|
DATA collection TYPE ty_collection READ-ONLY .
|
|
|
|
METHODS size
|
|
RETURNING
|
|
VALUE(size) TYPE i .
|
|
METHODS is_empty
|
|
RETURNING
|
|
VALUE(is_empty) TYPE abap_bool .
|
|
METHODS get
|
|
IMPORTING
|
|
!index TYPE i
|
|
RETURNING
|
|
VALUE(object) TYPE REF TO object .
|
|
METHODS get_iterator
|
|
RETURNING
|
|
VALUE(iterator) TYPE REF TO zcl_excel_collection_iterator .
|
|
METHODS add
|
|
IMPORTING
|
|
!element TYPE REF TO object .
|
|
METHODS remove
|
|
IMPORTING
|
|
!element TYPE REF TO object .
|
|
METHODS clear .
|
|
PROTECTED SECTION.
|
|
PRIVATE SECTION.
|
|
ENDCLASS.
|
|
|
|
|
|
|
|
CLASS zcl_excel_collection IMPLEMENTATION.
|
|
|
|
|
|
METHOD add .
|
|
APPEND element TO collection.
|
|
ENDMETHOD.
|
|
|
|
|
|
METHOD clear .
|
|
CLEAR collection.
|
|
ENDMETHOD.
|
|
|
|
|
|
METHOD get .
|
|
READ TABLE collection INDEX index INTO object.
|
|
ENDMETHOD.
|
|
|
|
|
|
METHOD get_iterator .
|
|
CREATE OBJECT iterator
|
|
EXPORTING
|
|
collection = me.
|
|
ENDMETHOD.
|
|
|
|
|
|
METHOD is_empty.
|
|
is_empty = boolc( size( ) = 0 ).
|
|
ENDMETHOD.
|
|
|
|
|
|
METHOD remove .
|
|
DATA obj TYPE REF TO object.
|
|
LOOP AT collection INTO obj.
|
|
IF obj = element.
|
|
DELETE collection.
|
|
RETURN.
|
|
ENDIF.
|
|
ENDLOOP.
|
|
ENDMETHOD.
|
|
|
|
|
|
METHOD size.
|
|
size = lines( collection ).
|
|
ENDMETHOD.
|
|
ENDCLASS.
|