Vincent,
I did make my own code and it showed quite easy. Here it is:
In my program before Send RunReport of oReport
Code:
// the values should be got from some initalizing table
Procedure SetParamOptions
Set piExportTo of oDRExportOptionsDialog to C_DRXLS
Set psFileName of oDRExportOptionsDialog to "D:\UTV\DF190\Kala\Reports\AutoFilNy.xlsx"
Set psXLSVersion of oDRExportOptionsDialog to "C_$DRXLS2007"
Set piPageSectionsCheckBox of oDRExportOptionsDialog to 0
Set piReportSectionsCheckBox of oDRExportOptionsDialog to 0
Set piGroupSectionsCheckBox of oDRExportOptionsDialog to 1
Set piDataOnlyCheckBox of oDRExportOptionsDialog to 1
Set piAllPagesCheckBox of oDRExportOptionsDialog to 0
Set piColumnWidthForm of oDRExportOptionsDialog to 30
Set piPageSpinForm of oDRExportOptionsDialog to 1
End_Procedure
In DRExportOptions.dg
Some properties:
Code:
// ADAKO-start: Linked properties, from the invoking program
// XLS-properties
Property String psFilename "Filename.xls"
Property Integer piExportTo C_DRXLS
Property String psXLSVersion "C_$DRXLS2007"
Property Integer piPageSectionsCheckBox 1
Property Integer piReportSectionsCheckBox 1
Property Integer piGroupSectionsCheckBox 1
Property Integer piDataOnlyCheckBox 1
Property Integer piAllPagesCheckBox 1
Property Integer piColumnWidthForm 30
Property Integer piPageSpinForm 1
// ADAKO end
...
Procedure Activating
Forward Send Activating
// set initial values from properties, feeded from the invoking program (ADAKO)
Set Value of oFileNameForm to (psFileName (Self))
Set Value of oXLSVersionComboForm to C_$DRXLS2007
Set Checked_State of oPageSectionsCheckBox to (piPageSectionsCheckBox (Self))
Set Checked_State of oReportSectionsCheckBox to (piReportSectionsCheckBox (Self))
Set Checked_State of oGroupSectionsCheckBox to (piGroupSectionsCheckBox (Self))
Set Checked_State of oDataOnlyCheckBox to (piDataOnlyCheckBox (Self))
Set Checked_State of oAllPagesCheckBox to (piAllPagesCheckBox (Self))
Set Value of oColumnWidthForm to (piColumnWidthForm (Self))
Set Value of oPageSpinForm to (piPageSpinForm (Self))
Set Enabled_State of oPageSpinForm to False
End_Procedure
This worked fine. I had (and still have) problem to set the combovalue with the right Excel-version. For now it will do.
This could of course be developed to be more flexible, but the user now don't need to fill in all every time.