Implementation for #396

As suggested by @Jitsuryoku
This commit is contained in:
Gregor Wolf 2019-01-29 15:41:43 +01:00
parent aaad50440d
commit 8699a5ce48

View File

@ -2169,6 +2169,7 @@ METHOD load_worksheet.
scale TYPE string,
fittoheight TYPE string,
fittowidth TYPE string,
papersize TYPE string,
END OF lty_page_setup.
TYPES: BEGIN OF lty_sheetformatpr,
@ -2711,6 +2712,7 @@ METHOD load_worksheet.
cp_structure = ls_pagesetup ).
io_worksheet->sheet_setup->orientation = ls_pagesetup-orientation.
io_worksheet->sheet_setup->scale = ls_pagesetup-scale.
io_worksheet->sheet_setup->paper_size = ls_pagesetup-papersize.
IF io_worksheet->sheet_setup->fit_to_page = 'X'.
IF ls_pagesetup-fittowidth IS NOT INITIAL.
io_worksheet->sheet_setup->fit_to_width = ls_pagesetup-fittowidth.