SAP/abap2xlsx
1
0
Fork 0
mirror of https://github.com/abap2xlsx/abap2xlsx.git synced 2025-05-05 13:46:17 +08:00
Code Issues Actions Packages Projects Releases Wiki Activity

Update zcl_excel_rows.clas.abap

Browse Source
This commit is contained in:
Bilen 2018-03-20 20:50:10 +08:00 committed by GitHub
parent 66e4ef4793
commit cb1364b65f
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 2 additions and 21 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
src/zcl_excel_rows.clas.abap
View File

@ -15,7 +15,7 @@ CLASS ZCL_EXCEL_ROWS DEFINITION
*"* do not include other source files here!!! *"* do not include other source files here!!!
PUBLIC SECTION. PUBLIC SECTION.
TYPES: TYPES:
BEGIN OF T_ROWS, BEGIN OF T_ROWS, " performance improvement #527
ROW_INDEX TYPE INT4, ROW_INDEX TYPE INT4,
ROW TYPE REF TO ZCL_EXCEL_ROW, ROW TYPE REF TO ZCL_EXCEL_ROW,
END OF T_ROWS. END OF T_ROWS.
@ -64,17 +64,12 @@ CLASS ZCL_EXCEL_ROWS IMPLEMENTATION.
* | [--->] IO_ROW TYPE REF TO ZCL_EXCEL_ROW * | [--->] IO_ROW TYPE REF TO ZCL_EXCEL_ROW
* +--------------------------------------------------------------------------------------</SIGNATURE> * +--------------------------------------------------------------------------------------</SIGNATURE>
METHOD ADD. METHOD ADD.
* IF SY-UNAME = 'BILEN'.
DATA: DATA:
LS_ROW TYPE T_ROWS. LS_ROW TYPE T_ROWS.
LS_ROW-ROW_INDEX = IO_ROW->GET_ROW_INDEX( ). LS_ROW-ROW_INDEX = IO_ROW->GET_ROW_INDEX( ).
LS_ROW-ROW = IO_ROW. LS_ROW-ROW = IO_ROW.
INSERT LS_ROW INTO TABLE DT_ROWS. INSERT LS_ROW INTO TABLE DT_ROWS.
*
* ELSE.
* ROWS->ADD( IO_ROW ).
*
* ENDIF.
ENDMETHOD. "ADD ENDMETHOD. "ADD
@ -84,7 +79,6 @@ CLASS ZCL_EXCEL_ROWS IMPLEMENTATION.
* +-------------------------------------------------------------------------------------------------+ * +-------------------------------------------------------------------------------------------------+
* +--------------------------------------------------------------------------------------</SIGNATURE> * +--------------------------------------------------------------------------------------</SIGNATURE>
METHOD CLEAR. METHOD CLEAR.
* ROWS->CLEAR( ).
CLEAR DT_ROWS[]. CLEAR DT_ROWS[].
ENDMETHOD. "CLEAR ENDMETHOD. "CLEAR
@ -108,15 +102,10 @@ CLASS ZCL_EXCEL_ROWS IMPLEMENTATION.
* | [<-()] EO_ROW TYPE REF TO ZCL_EXCEL_ROW * | [<-()] EO_ROW TYPE REF TO ZCL_EXCEL_ROW
* +--------------------------------------------------------------------------------------</SIGNATURE> * +--------------------------------------------------------------------------------------</SIGNATURE>
METHOD GET. METHOD GET.
* IF SY-UNAME = 'BILEN'.
READ TABLE DT_ROWS ASSIGNING FIELD-SYMBOL(<LS_ROW>) WITH TABLE KEY ROW_INDEX = IP_INDEX. READ TABLE DT_ROWS ASSIGNING FIELD-SYMBOL(<LS_ROW>) WITH TABLE KEY ROW_INDEX = IP_INDEX.
IF SY-SUBRC = 0. IF SY-SUBRC = 0.
EO_ROW ?= <LS_ROW>-ROW. EO_ROW ?= <LS_ROW>-ROW.
ENDIF. ENDIF.
* ELSE.
* EO_ROW ?= ROWS->IF_OBJECT_COLLECTION~GET( IP_INDEX ).
*
* ENDIF.
ENDMETHOD. "GET ENDMETHOD. "GET
@ -143,7 +132,6 @@ CLASS ZCL_EXCEL_ROWS IMPLEMENTATION.
ELSE. ELSE.
IS_EMPTY = ' '. IS_EMPTY = ' '.
ENDIF. ENDIF.
* IS_EMPTY = ROWS->IF_OBJECT_COLLECTION~IS_EMPTY( ).
ENDMETHOD. "IS_EMPTY ENDMETHOD. "IS_EMPTY
@ -153,7 +141,6 @@ CLASS ZCL_EXCEL_ROWS IMPLEMENTATION.
* | [--->] IO_ROW TYPE REF TO ZCL_EXCEL_ROW * | [--->] IO_ROW TYPE REF TO ZCL_EXCEL_ROW
* +--------------------------------------------------------------------------------------</SIGNATURE> * +--------------------------------------------------------------------------------------</SIGNATURE>
METHOD REMOVE. METHOD REMOVE.
* ROWS->REMOVE( IO_ROW ).
DELETE DT_ROWS WHERE ROW_INDEX = IO_ROW->GET_ROW_INDEX( ). DELETE DT_ROWS WHERE ROW_INDEX = IO_ROW->GET_ROW_INDEX( ).
ENDMETHOD. "REMOVE ENDMETHOD. "REMOVE
@ -164,12 +151,6 @@ CLASS ZCL_EXCEL_ROWS IMPLEMENTATION.
* | [<-()] EP_SIZE TYPE I * | [<-()] EP_SIZE TYPE I
* +--------------------------------------------------------------------------------------</SIGNATURE> * +--------------------------------------------------------------------------------------</SIGNATURE>
METHOD SIZE. METHOD SIZE.
* IF sy-uname = 'BILEN'.
EP_SIZE = LINES( DT_ROWS ).. EP_SIZE = LINES( DT_ROWS )..
*
* else.
* EP_SIZE = ROWS->IF_OBJECT_COLLECTION~SIZE( ).
*
* ENDIF.
ENDMETHOD. "SIZE ENDMETHOD. "SIZE
ENDCLASS. ENDCLASS.