/// <summary>
/// only run this code once during activation
/// </summary>
private void RunOnceOnActivationManual()
{
// no columns tab needed if called from extracts
if (CalledFromExtracts)
{
tabReportSettings.Controls.Remove(tpgColumns);
}
ucoChkFilter.ShowFamiliesOnly(false);
ucoChkFilter.ShowPersonsOnly(false);
// enable autofind in list for first character (so the user can press character to find list entry)
// from Sep 2015 this is handled automatically by the code generator
clbEvent.SpecialKeys =
((SourceGrid.GridSpecialKeys)((((((SourceGrid.GridSpecialKeys.Arrows |
SourceGrid.GridSpecialKeys.PageDownUp) |
SourceGrid.GridSpecialKeys.Enter) |
SourceGrid.GridSpecialKeys.Escape) |
SourceGrid.GridSpecialKeys.Control) | SourceGrid.GridSpecialKeys.Shift)));
// set controls in filter to default values
ucoFilter.InitialiseUserControl();
// Hook up EventFilterChanged Event to be able to react to changed filter
ucoFilter.EventFilterChanged += new TEventHandlerEventFilterChanged(this.EventFilterChanged);
// populate list with data to be loaded
this.LoadEventListData();
FPetraUtilsObject.LoadDefaultSettings();
}
/// <summary>
/// only run this code once during activation
/// </summary>
private void RunOnceOnActivationManual()
{
// no columns tab needed if called from extracts
if (CalledFromExtracts)
{
tabReportSettings.Controls.Remove(tpgColumns);
}
ucoChkFilter.ShowFamiliesOnly(false);
ucoAddress.ShowCountyStateField(true);
ucoAddress.ShowAddressDateFields(true);
// enable autofind in list for first character (so the user can press character to find list entry)
this.clbLocationType.AutoFindColumn = ((Int16)(1));
this.clbLocationType.AutoFindMode = Ict.Common.Controls.TAutoFindModeEnum.FirstCharacter;
clbLocationType.SpecialKeys =
((SourceGrid.GridSpecialKeys)((((((SourceGrid.GridSpecialKeys.Arrows |
SourceGrid.GridSpecialKeys.PageDownUp) |
SourceGrid.GridSpecialKeys.Enter) |
SourceGrid.GridSpecialKeys.Escape) |
SourceGrid.GridSpecialKeys.Control) | SourceGrid.GridSpecialKeys.Shift)));
// populate list with data to be loaded
this.LoadListData();
// make sure date fields are not initialized with today's date but later on with default settings
dtpCreatedFrom.Text = "";
dtpCreatedTo.Text = "";
dtpModifiedFrom.Text = "";
dtpModifiedTo.Text = "";
FPetraUtilsObject.LoadDefaultSettings();
}
/// <summary>
/// Sets the xml reporting parameters in FPetraUtilsObject
/// This is needed for the derived classes (Charged Field Report, Sending Field Report, ...)
/// </summary>
protected void SetReportParameters(String AXmlfile, String AReportName)
{
FPetraUtilsObject.FXMLFiles = AXmlfile;
FPetraUtilsObject.FReportName = AReportName;
FPetraUtilsObject.FCurrentReport = AReportName;
FPetraUtilsObject.InitialiseData("");
FPetraUtilsObject.LoadDefaultSettings();
}
/// <summary>Automatically print this Batch Detail Report with displaying the UI</summary>
/// <param name="AledgerNumber"></param>
/// <param name="AgiftBatchNumber"></param>
public void PrintReportNoUi(Int32 AledgerNumber, Int32 AgiftBatchNumber)
{
FLedgerNumber = AledgerNumber;
FBatchNumber = AgiftBatchNumber;
FPetraUtilsObject.LoadDefaultSettings();
FPetraUtilsObject.FFastReportsPlugin.SetDataGetter(LoadReportData);
Dictionary <String, TVariant> paramsDictionary = new Dictionary <string, TVariant>();
TRptCalculator Calc = new TRptCalculator();
FPetraUtilsObject.FFastReportsPlugin.GenerateReport(Calc);
}
/// <summary>Automatically print this Posting Register without displaying the UI</summary>
/// <param name="AledgerNumber"></param>
/// <param name="AbatchNumber"></param>
public void PrintReportNoUi(Int32 AledgerNumber, Int32 AbatchNumber)
{
FLedgerNumber = AledgerNumber;
FBatchNumber = AbatchNumber;
FPetraUtilsObject.LoadDefaultSettings();
FPetraUtilsObject.FFastReportsPlugin.SetDataGetter(LoadReportData);
Dictionary <String, TVariant> paramsDictionary = new Dictionary <string, TVariant>();
TRptCalculator Calc = new TRptCalculator();
Calc.AddStringParameter("param_sortby", "Transaction"); // always by transaction number with no UI
FPetraUtilsObject.FFastReportsPlugin.GenerateReport(Calc);
}
/// <summary>
/// only run this code once during activation
/// </summary>
private void RunOnceOnActivationManual()
{
// no columns tab needed if called from extracts
if (CalledFromExtracts)
{
tabReportSettings.Controls.Remove(tpgColumns);
}
ucoChkFilter.ShowFamiliesOnly(false);
ucoChkFilter.ShowPersonsOnly(false);
ucoChkFilter.AddChkActivePartnersChangedEventHandler(this.OnActivePartnersCheckedChanged);
ucoAddress.ShowCountyStateField(true);
ucoAddress.ShowAddressDateFields(true);
// enable autofind in list for first character (so the user can press character to find list entry)
// from Sep 2015 this is handled automatically by the code generator
clbLocationType.SpecialKeys =
((SourceGrid.GridSpecialKeys)((((((SourceGrid.GridSpecialKeys.Arrows |
SourceGrid.GridSpecialKeys.PageDownUp) |
SourceGrid.GridSpecialKeys.Enter) |
SourceGrid.GridSpecialKeys.Escape) |
SourceGrid.GridSpecialKeys.Control) | SourceGrid.GridSpecialKeys.Shift)));
// populate list with data to be loaded
this.LoadListData();
// make sure date fields are not initialized with today's date but later on with default settings
dtpCreatedFrom.Text = "";
dtpCreatedTo.Text = "";
dtpModifiedFrom.Text = "";
dtpModifiedTo.Text = "";
FPetraUtilsObject.LoadDefaultSettings();
cmbPartnerClass.cmbCombobox.AllowBlankValue = true;
cmbPartnerStatus.cmbCombobox.AllowBlankValue = true;
cmbPartnerStatus.Enabled = false;
cmbPartnerStatus.SetSelectedString("ACTIVE");
// Remove 'MERGED' status
cmbPartnerStatus.Filter = "p_status_code_c NOT LIKE 'MERGED'";
cmbDenomination.cmbCombobox.AllowBlankValue = true;
cmbBusiness.cmbCombobox.AllowBlankValue = true;
cmbLanguage.cmbCombobox.AllowBlankValue = true;
cmbUserCreated.cmbCombobox.AllowBlankValue = true;
cmbUserModified.cmbCombobox.AllowBlankValue = true;
}
/// <summary>
/// only run this code once during activation
/// </summary>
private void RunOnceOnActivationManual()
{
// no columns tab needed if called from extracts
if (CalledFromExtracts)
{
tabReportSettings.Controls.Remove(tpgColumns);
}
// enable autofind in list for first character (so the user can press character to find list entry)
this.clbEvent.AutoFindColumn = ((Int16)(1));
this.clbEvent.AutoFindMode = Ict.Common.Controls.TAutoFindModeEnum.FirstCharacter;
clbEvent.SpecialKeys =
((SourceGrid.GridSpecialKeys)((((((SourceGrid.GridSpecialKeys.Arrows |
SourceGrid.GridSpecialKeys.PageDownUp) |
SourceGrid.GridSpecialKeys.Enter) |
SourceGrid.GridSpecialKeys.Escape) |
SourceGrid.GridSpecialKeys.Control) | SourceGrid.GridSpecialKeys.Shift)));
// set controls in filter to default values
ucoFilter.InitialiseUserControl();
// Hook up EventFilterChanged Event to be able to react to changed filter
ucoFilter.EventFilterChanged += new TEventHandlerEventFilterChanged(this.EventFilterChanged);
// populate list with data to be loaded
this.LoadEventListData();
// enable autofind in list for first character (so the user can press character to find list entry)
this.clbEventRole.AutoFindColumn = ((Int16)(1));
this.clbEventRole.AutoFindMode = Ict.Common.Controls.TAutoFindModeEnum.FirstCharacter;
clbEventRole.SpecialKeys =
((SourceGrid.GridSpecialKeys)((((((SourceGrid.GridSpecialKeys.Arrows |
SourceGrid.GridSpecialKeys.PageDownUp) |
SourceGrid.GridSpecialKeys.Enter) |
SourceGrid.GridSpecialKeys.Escape) |
SourceGrid.GridSpecialKeys.Control) | SourceGrid.GridSpecialKeys.Shift)));
// populate list with data to be loaded
this.LoadEventRoleListData();
FPetraUtilsObject.LoadDefaultSettings();
}
private void RunOnceOnActivationManual() // Formerly InitFieldList
{
string CheckedMember = "CHECKED";
string DisplayMember = "Field Name";
string ValueMember = "Field Key";
FFieldTable = TRemote.MFinance.Reporting.WebConnectors.GetReceivingFields(FLedgerNumber, out DisplayMember, out ValueMember, false);
DataColumn FirstColumn = new DataColumn(CheckedMember, typeof(bool));
FirstColumn.DefaultValue = false;
FFieldTable.Columns.Add(FirstColumn);
rbtAllFields.Select();
cmbCurrency.SelectedIndex = 0;
clbFields.Columns.Clear();
clbFields.AddCheckBoxColumn("", FFieldTable.Columns[CheckedMember], 17, false);
clbFields.AddTextColumn(Catalog.GetString("Field Key"), FFieldTable.Columns[ValueMember], 100);
clbFields.AddTextColumn(Catalog.GetString("Field Name"), FFieldTable.Columns[DisplayMember], 200);
clbFields.DataBindGrid(FFieldTable, ValueMember, CheckedMember, ValueMember, false, true, false);
FPetraUtilsObject.LoadDefaultSettings(); // This was done previously, but it was too early.
}
