private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
int MinAge = Convert.ToInt32(txtFromYears.Text); // 0
int MaxAge = Convert.ToInt32(txtToYears.Text); // 17
DateTime EarliestBirthday;
DateTime LatestBirthday;
DateTime StartDate = DateTime.Today;
DateTime EndDate = DateTime.Today;
DateTime EarliestArrivalDate = DateTime.Today;
DateTime LatestDepartureDate = DateTime.Today;
bool IsSuccessful;
if (ucoConferenceSelection.AllConferenceSelected)
{
IsSuccessful = TRemote.MConference.WebConnectors.GetEarliestAndLatestDate(-1,
out EarliestArrivalDate, out LatestDepartureDate, out StartDate, out EndDate);
}
else
{
long ConferenceKey = Convert.ToInt64(ucoConferenceSelection.ConferenceKey);
IsSuccessful = TRemote.MConference.WebConnectors.GetEarliestAndLatestDate(ConferenceKey,
out EarliestArrivalDate, out LatestDepartureDate, out StartDate, out EndDate);
}
if (IsSuccessful)
{
EarliestBirthday = StartDate.AddYears(-MaxAge - 1);
LatestBirthday = EndDate.AddYears(-MinAge);
ACalc.AddParameter("param_earliest_birthday", EarliestBirthday.Date);
ACalc.AddParameter("param_latest_birthday", LatestBirthday.Date);
}
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddParameter("param_recipientkey", txtRecipient.Text);
ACalc.AddParameter("param_extract_name", txtExtract.Text);
if (dtpToDate.Date.HasValue)
{
Int32 ToDateYear = dtpToDate.Date.Value.Year;
//TODO: Calendar vs Financial Date Handling - Confirm that these should not be ledger dates, i.e. allowing for >12 periods and non-calendar period boundaries
DateTime FromDateThisYear = new DateTime(ToDateYear, 1, 1);
DateTime ToDatePreviousYear = new DateTime(ToDateYear - 1, 12, 31);
DateTime FromDatePreviousYear = new DateTime(ToDateYear - 1, 1, 1);
ACalc.AddParameter("param_from_date_this_year", FromDateThisYear);
ACalc.AddParameter("param_to_date_previous_year", ToDatePreviousYear);
ACalc.AddParameter("param_from_date_previous_year", FromDatePreviousYear);
}
int MaxColumns = ACalc.GetParameters().Get("MaxDisplayColumns").ToInt();
for (int Counter = 0; Counter <= MaxColumns; ++Counter)
{
String ColumnName = ACalc.GetParameters().Get("param_calculation", Counter, 0).ToString();
if (ColumnName == "Gift Amount")
{
ACalc.AddParameter("param_gift_amount_column", Counter);
}
}
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddParameter("param_recipientkey", txtRecipient.Text);
ACalc.AddParameter("param_extract_name", txtExtract.Text);
if (dtpToDate.Date.HasValue)
{
Int32 ToDateYear = dtpToDate.Date.Value.Year;
DateTime FromDateThisYear = new DateTime(ToDateYear, 1, 1);
DateTime ToDatePreviousYear = new DateTime(ToDateYear - 1, 12, 31);
DateTime FromDatePreviousYear = new DateTime(ToDateYear - 1, 1, 1);
ACalc.AddParameter("param_from_date_this_year", FromDateThisYear);
ACalc.AddParameter("param_to_date_previous_year", ToDatePreviousYear);
ACalc.AddParameter("param_from_date_previous_year", FromDatePreviousYear);
}
int MaxColumns = ACalc.GetParameters().Get("MaxDisplayColumns").ToInt();
for (int Counter = 0; Counter <= MaxColumns; ++Counter)
{
String ColumnName = ACalc.GetParameters().Get("param_calculation", Counter, 0).ToString();
if (ColumnName == "Gift Amount")
{
ACalc.AddParameter("param_gift_amount_column", Counter);
}
}
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
int ColumnCounter = 0;
ACalc.AddParameter("param_calculation", "Code", ColumnCounter);
ACalc.AddParameter("ColumnWidth", "2", ColumnCounter);
ColumnCounter++;
ACalc.AddParameter("param_calculation", "Total", ColumnCounter);
ACalc.AddParameter("ColumnWidth", "2", ColumnCounter);
ColumnCounter++;
ACalc.AddParameter("param_calculation", "Female", ColumnCounter);
ACalc.AddParameter("ColumnWidth", "2", ColumnCounter);
ColumnCounter++;
ACalc.AddParameter("param_calculation", "Male", ColumnCounter);
ACalc.AddParameter("ColumnWidth", "2", ColumnCounter);
ColumnCounter++;
ACalc.AddParameter("param_calculation", "Couple", ColumnCounter);
ACalc.AddParameter("ColumnWidth", "2", ColumnCounter);
ColumnCounter++;
ACalc.AddParameter("param_calculation", "Family", ColumnCounter);
ACalc.AddParameter("ColumnWidth", "2", ColumnCounter);
ColumnCounter++;
ACalc.AddParameter("MaxDisplayColumns", ColumnCounter);
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddParameter("param_extract_name", txtExtract.Text);
if ((AReportAction == TReportActionEnum.raGenerate)
&& rbtExtract.Checked
&& (txtExtract.Text.Length == 0))
{
TVerificationResult VerificationResult = new TVerificationResult(
Catalog.GetString("No recipient selected."),
Catalog.GetString("Please select a recipient."),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
int MaxColumns = ACalc.GetParameters().Get("MaxDisplayColumns").ToInt();
for (int Counter = 0; Counter <= MaxColumns; ++Counter)
{
String ColumnName = ACalc.GetParameters().Get("param_calculation", Counter, 0).ToString();
if (ColumnName == "Gift Amount")
{
ACalc.AddParameter("param_gift_amount_column", Counter);
}
}
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
if ((AReportAction == TReportActionEnum.raGenerate)
&& (rbtPartner.Checked && (txtRecipient.Text == "0000000000")))
{
TVerificationResult VerificationResult = new TVerificationResult(
Catalog.GetString("No recipient selected."),
Catalog.GetString("Please select a recipient."),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
if ((AReportAction == TReportActionEnum.raGenerate)
&& rbtExtract.Checked
&& (txtExtract.Text == ""))
{
TVerificationResult VerificationMessage = new TVerificationResult(
Catalog.GetString("Enter an extract name."),
Catalog.GetString("No extract name entered!"), TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationMessage);
}
ACalc.AddParameter("param_recipient_key", txtRecipient.Text);
ACalc.AddParameter("param_extract_name", txtExtract.Text);
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddParameter("param_all_partners", rbtAllPartners.Checked);
ACalc.AddParameter("param_extract", rbtExtract.Checked);
if (rbtExtract.Checked)
{
ACalc.AddParameter("param_extract_name", txtExtract.Text);
}
if ((txtThisYear.Text != "0")
&& (txtLastYear.Text != "0"))
{
int LastYear = Convert.ToInt32(txtLastYear.Text);
int ThisYear = Convert.ToInt32(txtThisYear.Text);
if (LastYear >= ThisYear)
{
TVerificationResult VerificationResult = new TVerificationResult(
Catalog.GetString("Wrong year entered."),
Catalog.GetString("'Gift given in year' must be less than 'No gifts in year'"),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
//TODO: Calendar vs Financial Date Handling - Confirm if year end is assumed wrongly, i.e. financial year end does not necessarily = calendar year end
ACalc.AddParameter("param_this_year_start_date", new DateTime(ThisYear, 1, 1));
ACalc.AddParameter("param_this_year_end_date", new DateTime(ThisYear, 12, 31));
ACalc.AddParameter("param_last_year_start_date", new DateTime(LastYear - 1, 1, 1));
ACalc.AddParameter("param_last_year_end_date", new DateTime(LastYear - 1, 12, 31));
}
}
/// <summary>
/// Reads the selected values from the controls, and stores them into the parameter system of FCalculator
/// </summary>
/// <param name="ACalc"></param>
/// <param name="AReportAction"></param>
public void ReadControls(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
ACalc.AddParameter("param_active", this.chkActivePartners.Checked);
ACalc.AddParameter("param_mailing_addresses_only", this.chkMailingAddressesOnly.Checked);
ACalc.AddParameter("param_families_only", this.chkFamiliesOnly.Checked);
ACalc.AddParameter("param_exclude_no_solicitations", this.chkExcludeNoSolicitations.Checked);
}
private void tpgGroups_ReadControls(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
if (rbtAllGroups.Checked && rbtParticipantsIgnoreAll.Checked)
{
rbtParticipantsAll.Checked = true;
}
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
if ((AReportAction == TReportActionEnum.raGenerate)
&& (dtpFromDate.Date > dtpToDate.Date))
{
TVerificationResult VerificationResult = new TVerificationResult(
Catalog.GetString("From date is later than to date."),
Catalog.GetString("Please change from date or to date."),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
ACalc.AddParameter("param_currency", "Base");
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
// Set the values for accumulating the costs to 0
ACalc.AddParameter("CostCentreCredit", 0);
ACalc.AddParameter("CostCentreDebit", 0);
ACalc.AddParameter("AccountCodeCredit", 0);
ACalc.AddParameter("AccountCodeDebit", 0);
ACalc.AddParameter("TotalCredit", 0);
ACalc.AddParameter("TotalDebit", 0);
int MaxColumns = ACalc.GetParameters().Get("MaxDisplayColumns").ToInt();
// we need to know some indices of the columns
for (int Counter = 0; Counter < MaxColumns; ++Counter)
{
String ColumnName = "param_column_" + ACalc.GetParameters().Get("param_calculation", Counter, 0).ToString();
ACalc.AddParameter(ColumnName, Counter);
}
}
private void grdStatuses_ReadControls(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
String DocumentTypeList = "";
foreach (DataRow Row in FCommitmentStatusTable.Rows)
{
if ((Row["Selection"].GetType() == Type.GetType("System.Boolean"))
&& ((bool)Row["Selection"]))
{
DocumentTypeList = DocumentTypeList + (String)Row[PmCommitmentStatusTable.GetCodeDBName()] + ',';
}
}
if (DocumentTypeList.Length > 0)
{
// Remove the last comma
DocumentTypeList = DocumentTypeList.Remove(DocumentTypeList.Length - 1, 1);
ACalc.AddParameter("param_commitmentstatuses", DocumentTypeList);
}
else if ((AReportAction == TReportActionEnum.raGenerate)
&& (chkSelectedStatus.Checked)
&& (!chkNoSelectedStatus.Checked))
{
// at least one commitment status must be checked
TVerificationResult VerificationResult = new TVerificationResult("Select at least one commitment status.",
"No commitment status selected!",
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
if ((AReportAction == TReportActionEnum.raGenerate)
&& (dtpFromDate.Date > dtpToDate.Date))
{
TVerificationResult VerificationResult = new TVerificationResult(
Catalog.GetString("From date is later than to date."),
Catalog.GetString("Please change from date or to date."),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddParameter("TransactionCount", 0);
ACalc.AddParameter("TransactionCountAccount", 0);
ACalc.AddParameter("SumDebitAccount", 0);
ACalc.AddParameter("SumCreditAccount", 0);
int MaxColumns = ACalc.GetParameters().Get("MaxDisplayColumns").ToInt();
for (int Counter = 0; Counter <= MaxColumns; ++Counter)
{
String ColumnName = ACalc.GetParameters().Get("param_calculation", Counter, 0).ToString();
if (ColumnName == "Debits")
{
ACalc.AddParameter("param_debit_column", Counter);
}
if (ColumnName == "Credits")
{
ACalc.AddParameter("param_credit_column", Counter);
}
}
}
/// <summary>
/// read the values from the controls and give them to the calculator
/// </summary>
/// <param name="ACalculator"></param>
/// <param name="AReportAction"></param>
public void ReadControls(TRptCalculator ACalculator, TReportActionEnum AReportAction)
{
if (rbtPartner.Checked)
{
ACalculator.AddParameter("param_selection", "one partner");
}
else if (rbtExtract.Checked)
{
ACalculator.AddParameter("param_selection", "an extract");
}
ACalculator.AddParameter("param_extract", txtExtract.Text);
ACalculator.AddParameter("param_partnerkey", txtPartnerKey.Text);
if ((AReportAction == TReportActionEnum.raGenerate)
&& rbtPartner.Checked
&& (txtPartnerKey.Text == "0000000000"))
{
TVerificationResult VerificationMessage = new TVerificationResult(
Catalog.GetString("Enter a valid Partner Key."),
Catalog.GetString("No Partner Key entered!"),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationMessage);
}
if ((AReportAction == TReportActionEnum.raGenerate)
&& rbtExtract.Checked
&& (txtExtract.Text == ""))
{
TVerificationResult VerificationMessage = new TVerificationResult(
Catalog.GetString("Enter an extract name."),
Catalog.GetString("No extract name entered!"), TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationMessage);
}
}
/// <summary>
///
/// </summary>
/// <param name="ACalculator"></param>
/// <param name="AReportAction"></param>
private void ReadControlsManual(TRptCalculator ACalculator, TReportActionEnum AReportAction)
{
int ColumnCounter = 0;
double ColumnPosition = 0;
String SpecialValues = "County,Donors,ExParticipants,Churches,Applicants";
// Get the columns
List <KeyValuePair <String, Double>>ColumnDefinitions = ucoReportColumns.GetColumnHeadings();
// store the column values in ACalculator
foreach (KeyValuePair <String, Double>ColumnDefinition in ColumnDefinitions)
{
String ColumnType = "Publication";
if (SpecialValues.Contains(ColumnDefinition.Key))
{
// the column is one of the special columns County, Donors, ExParticipants, Churches or Applicants
ColumnType = ColumnDefinition.Key;
}
if (AReportAction == TReportActionEnum.raGenerate)
{
// Add these only to the calculator if we generate the report. Not used
// when the report is saved.
ACalculator.AddParameter("param_calculation", ColumnType, ColumnCounter);
ACalculator.AddParameter("param_label", ColumnType, ColumnCounter);
ACalculator.AddParameter("ColumnAlign", "left", ColumnCounter);
ACalculator.AddParameter("ColumnCaption", ColumnDefinition.Key, ColumnCounter);
ACalculator.AddParameter("ColumnPosition", ColumnPosition.ToString(), ColumnCounter);
}
++ColumnCounter;
ColumnPosition += ColumnDefinition.Value;
}
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddParameter("param_currency", "base");
ACalc.AddParameter("param_ytd", "mixed");
ACalc.AddParameter("param_depth", "standard");
ACalc.AddParameter("param_calculation", "Amount", 0);
ACalc.AddParameter("param_ytd", false, 0);
ACalc.AddParameter("ColumnWidth", "2", 0);
ACalc.AddParameter("ColumnPositionIndented", (float)0.5, 0);
ACalc.AddParameter("param_calculation", "% of Grand Income", 1);
ACalc.AddParameter("FirstColumn", 0, 1);
ACalc.AddParameter("param_ytd", false, 1);
ACalc.AddParameter("ColumnWidth", "2", 1);
ACalc.AddParameter("ColumnPositionIndented", (float)0.5, 1);
ACalc.AddParameter("param_calculation", "AmountYTD", 2);
ACalc.AddParameter("param_ytd", true, 2);
ACalc.AddParameter("ColumnWidth", 2, 2);
ACalc.AddParameter("ColumnPositionIndented", (float)0.5, 2);
ACalc.AddParameter("param_calculation", "% of Grand Income", 3);
ACalc.AddParameter("FirstColumn", 2, 3);
ACalc.AddParameter("param_ytd", true, 3);
ACalc.AddParameter("ColumnWidth", 2, 3);
ACalc.AddParameter("ColumnPositionIndented", (float)0.5, 3);
ACalc.AddParameter("MaxDisplayColumns", 4);
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
int ColumnCounter = 0;
// Add the columns to the report
ACalc.AddParameter("param_calculation", "Nationalities", ColumnCounter);
ACalc.AddParameter("ColumnWidth", "5", ColumnCounter);
ColumnCounter++;
ACalc.AddParameter("param_calculation", "Total", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)1.5, ColumnCounter);
ColumnCounter++;
ACalc.AddParameter("param_calculation", "Female", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)1.5, ColumnCounter);
ColumnCounter++;
ACalc.AddParameter("param_calculation", "Male", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)1.4, ColumnCounter);
ColumnCounter++;
ACalc.AddParameter("param_calculation", "Other", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)1.5, ColumnCounter);
ColumnCounter++;
ACalc.AddParameter("param_calculation", "Languages", ColumnCounter);
ACalc.AddParameter("ColumnWidth", "8", ColumnCounter);
ColumnCounter++;
ACalc.AddParameter("MaxDisplayColumns", ColumnCounter);
}
/// <summary>
/// Reads the selected values from the controls, and stores them into the parameter system of FCalculator
/// </summary>
/// <param name="ACalc"></param>
/// <param name="AReportAction"></param>
public void ReadControls(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
ACalc.AddParameter("param_active", this.chkActivePartners.Checked);
ACalc.AddParameter("param_mailing_addresses_only", this.chkMailingAddressesOnly.Checked);
ACalc.AddParameter("param_persons_only", this.chkPersonsOnly.Checked);
ACalc.AddParameter("param_families_only", this.chkFamiliesOnly.Checked);
ACalc.AddParameter("param_exclude_no_solicitations", this.chkExcludeNoSolicitations.Checked);
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
if (rbtNow.Checked)
{
ACalc.AddParameter("param_from_date", DateTime.Today.Date);
ACalc.AddParameter("param_until_date", DateTime.Today.Date);
}
}
/// <summary>
/// Reads the selected values from the controls,
/// and stores them into the parameter system of FCalculator
///
/// </summary>
/// <param name="ACalculator"></param>
/// <param name="AReportAction"></param>
/// <returns>void</returns>
public void ReadControls(TRptCalculator ACalculator, TReportActionEnum AReportAction)
{
System.Int32 MaxDisplayColumns;
MaxDisplayColumns = TUC_ColumnHelper.ReadControls(ref FColumnParameters, ref ACalculator);
FPetraUtilsObject.FMaxDisplayColumns = MaxDisplayColumns;
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
ACalc.AddParameter("ControlSource", "", ReportingConsts.HEADERCOLUMN);
// TODO: If you want to export only the lines with relevant data and not the higher level lines
// in csv export then enable this line
// ACalc.AddParameter("csv_export_only_lowest_level", true);
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
ACalc.AddParameter("ControlSource", "", ReportingConsts.HEADERCOLUMN);
// TODO: If you want to export only the lines with relevant data and not the higher level lines
// in csv export then enable this line
// ACalc.AddParameter("csv_export_only_lowest_level", true);
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
if ((AReportAction == TReportActionEnum.raGenerate)
&& (clbFields.GetCheckedStringList().Length == 0))
{
TVerificationResult VerificationMessage = new TVerificationResult(
Catalog.GetString("Please select at least one field."),
Catalog.GetString("No fields selected!"), TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationMessage);
}
int Years = Convert.ToInt16(txtYears.Text);
if ((AReportAction == TReportActionEnum.raGenerate)
&& ((Years > 4) || (Years < 1)))
{
TVerificationResult VerificationMessage = new TVerificationResult(
Catalog.GetString("Set the year range between 1 and 4"),
Catalog.GetString("Wrong year range entered"), TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationMessage);
}
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddParameter("Year0", DateTime.Today.Year);
ACalc.AddParameter("param_Year0", DateTime.Today.Year);
ACalc.AddParameter("Year3", DateTime.Today.Year - 3);
ACalc.AddParameter("Month0", 1);
ACalc.AddParameter("Month1", 2);
ACalc.AddParameter("MonthCombined", 0);
ACalc.AddParameter("CountCombined", 0);
int ColumnCounter = 0;
ACalc.AddParameter("param_calculation", "Month", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)4, ColumnCounter);
++ColumnCounter;
ACalc.AddParameter("param_calculation", "AmountWorker", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)3.0, ColumnCounter);
++ColumnCounter;
ACalc.AddParameter("param_calculation", "CountWorker", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)1, ColumnCounter);
++ColumnCounter;
ACalc.AddParameter("param_calculation", "AmountField", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)3.0, ColumnCounter);
++ColumnCounter;
ACalc.AddParameter("param_calculation", "CountField", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)1, ColumnCounter);
++ColumnCounter;
ACalc.AddParameter("param_calculation", "AmountCombined", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)3.0, ColumnCounter);
++ColumnCounter;
ACalc.AddParameter("param_calculation", "CountCombined", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)1, ColumnCounter);
++ColumnCounter;
ACalc.SetMaxDisplayColumns(ColumnCounter);
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddParameter("param_cost_centre_breakdown", false);
ACalc.AddParameter("param_cost_centre_summary", false);
ACalc.AddParameter("param_cost_centre_codes", "");
ACalc.AddParameter("param_costcentreoptions", "AccountLevel");
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddParameter("param_cost_centre_breakdown", false);
ACalc.AddParameter("param_cost_centre_summary", false);
ACalc.AddParameter("param_cost_centre_codes", "");
ACalc.AddParameter("param_costcentreoptions", "AccountLevel");
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
if ((AReportAction == TReportActionEnum.raGenerate) &&
rbtSelectedFields.Checked &&
(clbFields.GetCheckedStringList().Length == 0))
{
TVerificationResult VerificationMessage = new TVerificationResult(
Catalog.GetString("Please select at least one field."),
Catalog.GetString("No fields selected!"), TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationMessage);
}
if ((AReportAction == TReportActionEnum.raGenerate) && (rbtAllFields.Checked))
{
ACalc.AddParameter("param_clbFields", this.clbFields.GetAllStringList());
}
if ((AReportAction == TReportActionEnum.raGenerate) &&
(dtpFromDate.Date > dtpToDate.Date))
{
TVerificationResult VerificationResult = new TVerificationResult(
Catalog.GetString("From date is later than to date."),
Catalog.GetString("Please change from date or to date."),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
int Years = Convert.ToInt16(txtYears.Text);
if ((AReportAction == TReportActionEnum.raGenerate) &&
((Years > 4) || (Years < 1)))
{
TVerificationResult VerificationMessage = new TVerificationResult(
Catalog.GetString("Set the year range between 1 and 4"),
Catalog.GetString("Wrong year range entered"), TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationMessage);
}
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddParameter("Year0", DateTime.Today.Year);
ACalc.AddParameter("Year1", DateTime.Today.Year - 1);
ACalc.AddParameter("Year2", DateTime.Today.Year - 2);
ACalc.AddParameter("Year3", DateTime.Today.Year - 3);
int MaxColumns = ACalc.GetParameters().Get("MaxDisplayColumns").ToInt();
for (int Counter = 0; Counter <= MaxColumns; ++Counter)
{
String ColumnName = ACalc.GetParameters().Get("param_calculation", Counter, 0).ToString();
if (ColumnName == "Gift Amount")
{
ACalc.AddParameter("param_gift_amount_column", Counter);
}
}
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
if ((clbIncludePublication.GetCheckedStringList().Length == 0) && (AReportAction != TReportActionEnum.raSave))
{
TVerificationResult VerificationResult = new TVerificationResult(
Catalog.GetString("Select at least one subscription"),
Catalog.GetString("Please select at least one subscription, to avoid listing the whole database!"),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
if ((dtpDateOfSendingCopy.Date == null) && (AReportAction == TReportActionEnum.raGenerate))
{
TVerificationResult VerificationResult = new TVerificationResult(
Catalog.GetString("Enter a valid date"),
Catalog.GetString("Please enter a valid date for 'Date Of Sending Copy'."),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
if (dtpStartDateFrom.Date != null)
{
ACalc.AddParameter("param_start_date_from_notnull", true);
}
else
{
ACalc.AddParameter("param_start_date_from_notnull", false);
}
if (dtpStartDateTo.Date != null)
{
ACalc.AddParameter("param_start_date_to_notnull", true);
}
else
{
ACalc.AddParameter("param_start_date_to_notnull", false);
}
if (dtpExpiryDateFrom.Date != null)
{
ACalc.AddParameter("param_expiry_date_from_notnull", true);
}
else
{
ACalc.AddParameter("param_expiry_date_from_notnull", false);
}
if (dtpExpiryDateTo.Date != null)
{
ACalc.AddParameter("param_expiry_date_to_notnull", true);
}
else
{
ACalc.AddParameter("param_expiry_date_to_notnull", false);
}
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddParameter("param_with_analysis_attributes", false);
ACalc.AddColumnLayout(0, 8, 0, 3);
ACalc.AddColumnLayout(1, 11, 0, 3);
ACalc.SetMaxDisplayColumns(2);
ACalc.AddColumnCalculation(0, "Debit");
ACalc.AddColumnCalculation(1, "Credit");
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddParameter("param_with_analysis_attributes", true);
ACalc.AddColumnLayout(6, 23, 0, 3);
ACalc.AddColumnLayout(7, 26, 0, 3);
ACalc.SetMaxDisplayColumns(8);
ACalc.AddColumnCalculation(6, "AnalysisType");
ACalc.AddColumnCalculation(7, "AnalysisValue");
}
/// <summary>
/// Adds the selected columns to the calculation.
/// </summary>
/// <param name="ACalc"></param>
/// <param name="AReportAction"></param>
private void ReadLocalDataLabel(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
ACalc.AddParameter("param_label_type", "partner");
ACalc.AddParameter("param_labeluse", "Personnel");
// TODO: do we need to cater here for applications as well?
// ACalc.AddParameter("param_label_type", "application");
// ACalc.AddParameter("param_labeluse", "LongTermApp,ShortTermApp");
String SelectedColumns = "";
DataTable ColumnTable = ACalc.GetParameters().ToDataTable();
foreach (DataRow Row in ColumnTable.Rows)
{
if ((Row["name"].ToString() == "param_calculation") &&
(Row["level"].ToString() == "-1") &&
(Row["subreport"].ToString() == "-1") &&
(Row["value"].ToString().Contains("eString:")))
{
int ColumnIndex = Convert.ToInt32(Row["column"].ToString());
int Index = Row["value"].ToString().IndexOf("eString:");
String ColumnName = Row["value"].ToString().Substring(Index + 8);
if ((ColumnName == "Partner Key") ||
(ColumnName == "Partner Name"))
{
// don't add partner key and partner name because these are not data labels
continue;
}
if (ColumnName == "DataLabelColumn")
{
ColumnName = ACalc.GetParameters().Get("param_label", ColumnIndex, -1, eParameterFit.eExact).ToString();
}
SelectedColumns = SelectedColumns + ColumnName + ",";
double ColumnWidth = ACalc.GetParameters().Get("ColumnWidth", ColumnIndex, -1, eParameterFit.eExact).ToDouble();
ACalc.AddParameter("param_calculation", "DataLabelColumn", ColumnIndex);
ACalc.AddParameter("ColumnWidth", ColumnWidth, ColumnIndex);
ACalc.AddParameter("param_label", ColumnName, ColumnIndex);
}
}
if (SelectedColumns.Length > 0)
{
SelectedColumns.Substring(0, SelectedColumns.Length - 1);
}
ACalc.AddParameter("param_labels", SelectedColumns);
}
private void ReadControlsVerify(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
if (clbField.GetCheckedStringList().Length == 0)
{
TVerificationResult VerificationResult = new TVerificationResult(
Catalog.GetString("Select at least one Field"),
Catalog.GetString("Please select at least one Field as otherwise the Extract cannot be created!"),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
}
private void ReadControlsVerify(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
//if (true)
//{
// TVerificationResult VerificationResult = new TVerificationResult(
// Catalog.GetString("Please enter some criteria."),
// Catalog.GetString("No criteria added!"),
// TResultSeverity.Resv_Critical);
// FPetraUtilsObject.AddVerificationResult(VerificationResult);
//}
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddColumnLayout(0, 8, 0, 3);
ACalc.AddColumnLayout(1, 11, 0, 3);
ACalc.AddColumnLayout(2, 14, 0, 7);
ACalc.SetMaxDisplayColumns(3);
ACalc.AddColumnCalculation(0, "Debit");
ACalc.AddColumnCalculation(1, "Credit");
ACalc.AddParameter("param_daterange", "false");
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddColumnLayout(0, 8, 0, 3);
ACalc.AddColumnLayout(1, 11, 0, 3);
ACalc.AddColumnLayout(2, 14, 0, 7);
ACalc.SetMaxDisplayColumns(3);
ACalc.AddColumnCalculation(0, "Debit");
ACalc.AddColumnCalculation(1, "Credit");
ACalc.AddParameter("param_daterange", "false");
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
if ((clbIncludePublication.GetCheckedStringList().Length == 0) && (AReportAction != TReportActionEnum.raSave))
{
TVerificationResult VerificationResult = new TVerificationResult(
Catalog.GetString("Select at least one subscription"),
Catalog.GetString("Please select at least one subscription, to avoid listing the whole database!"),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
if (clbLedger.GetCheckedStringList().Length == 0)
{
TVerificationResult VerificationResult = new TVerificationResult(
Catalog.GetString("Generate Extract"),
Catalog.GetString("Please select at least one Field!"),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
}
private void ReadControlsVerify(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
if (clbEvent.GetCheckedStringList().Length == 0)
{
TVerificationResult VerificationResult = new TVerificationResult(
Catalog.GetString("Select at least one Event"),
Catalog.GetString("Please select at least one Event, to avoid listing the whole database!"),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
}
private void ReadControlsVerify(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
if (txtMinAmount.NumberValueInt > txtMaxAmount.NumberValueInt)
{
TVerificationResult VerificationResult = new TVerificationResult(
Catalog.GetString("Gift Limit wrong."),
Catalog.GetString("Minimum Amount can't be greater than Maximum Amount."),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
}
private void ReadControlsVerify(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
//if (true)
//{
// TVerificationResult VerificationResult = new TVerificationResult(
// Catalog.GetString("Please enter some criteria."),
// Catalog.GetString("No criteria added!"),
// TResultSeverity.Resv_Critical);
// FPetraUtilsObject.AddVerificationResult(VerificationResult);
//}
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddParameter("param_with_analysis_attributes", false);
// if rbtSortByCostCentre is checked then these parameters are added in generated code
if (!rbtSortByCostCentre.Checked)
{
ACalc.AddParameter("param_paginate", false);
ACalc.AddParameter("param_auto_email", false);
}
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddParameter("param_quarter", false);
ACalc.AddParameter("param_start_period_i", 1);
ACalc.AddParameter("param_end_period_i", 12);
ACalc.AddParameter("param_ytd", true);
ACalc.AddParameter("param_multiperiod", true);
ACalc.AddParameter("ColumnWidth", 1.4, 0);
ACalc.AddParameter("ColumnPositionIndented", 0.3, 0);
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddParameter("param_with_analysis_attributes", false);
// if rbtSortByCostCentre is checked then these parameters are added in generated code
if (!rbtSortByCostCentre.Checked)
{
ACalc.AddParameter("param_paginate", false);
ACalc.AddParameter("param_auto_email", false);
}
}
private void ReadControlsVerify(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
if (!FDirectRelationshipTable.Select(FDirectRelationshipTable.DefaultView.RowFilter).Any(r => (bool)r["Selection"]) &&
!FReciprocalRelationshipTable.Select(FReciprocalRelationshipTable.DefaultView.RowFilter).Any(r => (bool)r["Selection"]))
{
TVerificationResult VerificationResult = new TVerificationResult(
Catalog.GetString("Select at least one Relationship Type to run the report."),
Catalog.GetString("No Relationship Type selected!"),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
}
private void ReadControlsVerify(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
if (!FDirectRelationshipTable.Select(FDirectRelationshipTable.DefaultView.RowFilter).Any(r => (bool)r["Selection"])
&& !FReciprocalRelationshipTable.Select(FReciprocalRelationshipTable.DefaultView.RowFilter).Any(r => (bool)r["Selection"]))
{
TVerificationResult VerificationResult = new TVerificationResult(
Catalog.GetString("Select at least one Relationship Type to run the report."),
Catalog.GetString("No Relationship Type selected!"),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
}
private void ReadControlsVerify(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
if ((txtThisYear.Text == "0")
|| (txtLastYear.Text == "0"))
{
TVerificationResult VerificationResult = new TVerificationResult(
Catalog.GetString("No valid year entered."),
Catalog.GetString("Please enter a valid year."),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
}
private void ReadControlsVerify(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
if ((txtThisYear.Text == "0") ||
(txtLastYear.Text == "0"))
{
TVerificationResult VerificationResult = new TVerificationResult(
Catalog.GetString("No valid year entered."),
Catalog.GetString("Please enter a valid year."),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
// Matching Pattern of the outreach code for sql search.
// The first two characters refer to the "prefix"
// The 3. and 4. character refer to the year
string MatchingPatern = "";
switch (txtOutreachCode.Text.Length)
{
case 1:
MatchingPatern = txtOutreachCode.Text + "_";
break;
case 2:
MatchingPatern = txtOutreachCode.Text;
break;
default:
break;
}
if (txtYear.Text.Length > 0)
{
CompleteYearBox();
int year = Convert.ToInt32(txtYear.Text);
if ((year < 1900)
|| (year > 3000))
{
TVerificationResult VerificationResult = new TVerificationResult("Please insert a reasonable year or leave the year box empty.",
"For example correct year value is 2012",
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
else
{
if (MatchingPatern.Length == 0)
{
MatchingPatern = "__";
}
MatchingPatern = MatchingPatern + txtYear.Text.Substring(2, 2);
}
}
if (MatchingPatern.Length > 0)
{
MatchingPatern = MatchingPatern + "%";
}
ACalc.AddParameter("param_matching_pattern", MatchingPatern);
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
// Matching Pattern of the outreach code for sql search.
// The first two characters refer to the "prefix"
// The 3. and 4. character refer to the year
string MatchingPatern = "";
switch (txtOutreachCode.Text.Length)
{
case 1:
MatchingPatern = txtOutreachCode.Text + "_";
break;
case 2:
MatchingPatern = txtOutreachCode.Text;
break;
default:
break;
}
if (txtYear.Text.Length > 0)
{
CompleteYearBox();
int year = Convert.ToInt32(txtYear.Text);
if ((year < 1900) ||
(year > 3000))
{
TVerificationResult VerificationResult = new TVerificationResult("Please insert a reasonable year or leave the year box empty.",
"For example correct year value is 2012",
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
else
{
if (MatchingPatern.Length == 0)
{
MatchingPatern = "__";
}
MatchingPatern = MatchingPatern + txtYear.Text.Substring(2, 2);
}
}
if (MatchingPatern.Length > 0)
{
MatchingPatern = MatchingPatern + "%";
}
ACalc.AddParameter("param_matching_pattern", MatchingPatern);
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddParameter("param_all_partners", rbtAllPartners.Checked);
ACalc.AddParameter("param_extract", rbtExtract.Checked);
if (rbtExtract.Checked)
{
ACalc.AddParameter("param_extract_name", txtExtract.Text);
}
string GiftsInRange = string.Empty;
string NoGiftsInRange = string.Empty;
// get range of dates that gifts must be in
if ((ucoGiftsInRange.RangeTable != null) && (ucoGiftsInRange.RangeTable.Rows.Count > 0))
{
foreach (DataRow Row in ucoGiftsInRange.RangeTable.Rows)
{
if (!string.IsNullOrEmpty(GiftsInRange))
{
GiftsInRange += ",";
}
GiftsInRange += Row["From"].ToString() + " - " + Row["To"].ToString();
}
}
ACalc.AddParameter("param_gifts_in_range", GiftsInRange);
// get range of dates that gifts must not be in
if ((ucoNoGiftsInRange.RangeTable != null) && (ucoNoGiftsInRange.RangeTable.Rows.Count > 0))
{
foreach (DataRow Row in ucoNoGiftsInRange.RangeTable.Rows)
{
if (!string.IsNullOrEmpty(NoGiftsInRange))
{
NoGiftsInRange += ",";
}
NoGiftsInRange += Row["From"].ToString() + " - " + Row["To"].ToString();
}
}
ACalc.AddParameter("param_nogifts_in_range", NoGiftsInRange);
if (string.IsNullOrEmpty(txtMinimumAmount.Text))
{
ACalc.AddParameter("param_minimum_amount", 0);
}
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddParameter("param_quarter", false);
ACalc.AddParameter("param_start_period_i", 1);
//TODO: Calendar vs Financial Date Handling - Confirm that below is correct, i.e. has a 12 period financial year been assumed
ACalc.AddParameter("param_end_period_i", 12);
ACalc.AddParameter("param_ytd", true);
ACalc.AddParameter("param_multiperiod", true);
ACalc.AddParameter("ColumnWidth", 1.4, 0);
ACalc.AddParameter("ColumnPositionIndented", 0.3, 0);
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
ACalc.AddColumnLayout(0, 8, 0, 3);
ACalc.AddColumnLayout(1, 11, 0, 3);
ACalc.SetMaxDisplayColumns(2);
ACalc.AddColumnCalculation(0, "Debit");
ACalc.AddColumnCalculation(1, "Credit");
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddParameter("param_with_analysis_attributes", false);
ACalc.AddParameter("param_depth", "summary");
ACalc.AddParameter("param_sortby", "Cost Centre");
}
/// <summary>
/// Reads the selected values from the controls, and stores them into the parameter system of FCalculator
/// </summary>
/// <param name="ACalc"></param>
/// <param name="AReportAction"></param>
public void ReadControls(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
if (chkShowDetailedMotivationInformation.Checked)
{
ACalc.AddParameter("param_chkShowDetailedMotivationInformation", true);
}
else
{
ACalc.AddParameter("param_chkShowDetailedMotivationInformation", false);
}
FSelectMotDialog.ReadControls(ACalc, AReportAction);
}
private void ReadControlsVerify(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
// make sure that for each group one radio button is selected
TFrmPetraReportingUtils.VerifyRadioButtonSelection(grpLevel, FPetraUtilsObject);
TFrmPetraReportingUtils.VerifyRadioButtonSelection(rgrRecipientSelection, FPetraUtilsObject);
TFrmPetraReportingUtils.VerifyRadioButtonSelection(rgrDonorSelection, FPetraUtilsObject);
if (!dtpEndDate.ValidDate(false) ||
!dtpStartDate.ValidDate(false))
{
TVerificationResult VerificationResult = new TVerificationResult(
Catalog.GetString("Date format problem"),
Catalog.GetString("Please check the date entry."),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
else
{
if (dtpStartDate.Date > dtpEndDate.Date)
{
TVerificationResult VerificationResult = new TVerificationResult(
Catalog.GetString("From date is later than to date."),
Catalog.GetString("Please change from date or to date."),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
}
if (rbtMiddleDonor.Checked)
{
int From = Convert.ToInt32(txtPercentage.Text);
int To = Convert.ToInt32(txtToPercentage.Text);
if (To > From)
{
// From must be bigger than to
int TmpNumber = Convert.ToInt32(txtPercentage.Text);
txtPercentage.NumberValueInt = Convert.ToInt32(txtToPercentage.Text);
txtToPercentage.NumberValueInt = TmpNumber;
}
}
if (!ucoMotivationCriteria.IsAnyMotivationDetailSelected())
{
TVerificationResult VerificationResult = new TVerificationResult(
Catalog.GetString("No Motivation Detail selected"),
Catalog.GetString("Please select at least one Motivation Detail."),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
}
private void grdFields_ReadControls(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
int ColumnCounter = 0;
DataTable ParaTable = ACalc.GetParameters().ToDataTable();
// We need at least 14 columns (for the details)
foreach (DataRow Row in ParaTable.Rows)
{
if ((String)Row[0] == "param_calculation")
{
ColumnCounter++;
}
}
if (ColumnCounter < 15)
{
for (int Counter = ColumnCounter; Counter < 15; ++Counter)
{
ACalc.AddParameter("param_calculation", "DummyValue" + Counter.ToString(), Counter);
}
ACalc.AddParameter("MaxDisplayColumns", 15);
}
if (rbtFull.Checked)
{
ACalc.AddParameter("param_report_detail", "Full");
}
else if (rbtSummaries.Checked)
{
ACalc.AddParameter("param_report_detail", "Summary");
}
String SelectedFields = GetSelectedFieldKeysCSV();
ACalc.AddStringParameter("param_selected_keys_csv", SelectedFields);
if ((SelectedFields.Length < 1) &&
(AReportAction == TReportActionEnum.raGenerate))
{
TVerificationResult VerificationResult = new TVerificationResult(
Catalog.GetString("Select at least one Unit Key from the Additional Settings tab."),
Catalog.GetString("No Field for the report selected"),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
ACalc.AddParameter("param_today", DateTime.Today);
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddParameter("param_recipientkey", txtRecipient.Text);
ACalc.AddParameter("param_extract_name", txtExtract.Text);
if (!dtpFromDate.Date.HasValue || !dtpToDate.Date.HasValue)
{
FPetraUtilsObject.AddVerificationResult(new TVerificationResult(
Catalog.GetString("Please check the entry of the Start and End dates."),
Catalog.GetString("Invalid Date entered."),
TResultSeverity.Resv_Critical));
}
else
{
if (dtpFromDate.Date.Value > dtpToDate.Date.Value)
{
FPetraUtilsObject.AddVerificationResult(new TVerificationResult(
Catalog.GetString("Start Date must not be later than End Date"),
Catalog.GetString("Invalid Date period."),
TResultSeverity.Resv_Critical));
}
}
if (dtpToDate.Date.HasValue)
{
Int32 ToDateYear = dtpToDate.Date.Value.Year;
//TODO: Calendar vs Financial Date Handling - Confirm that these should not be ledger dates, i.e. allowing for >12 periods and non-calendar period boundaries
DateTime FromDateThisYear = new DateTime(ToDateYear, 1, 1);
DateTime ToDatePreviousYear = new DateTime(ToDateYear - 1, 12, 31);
DateTime FromDatePreviousYear = new DateTime(ToDateYear - 1, 1, 1);
ACalc.AddParameter("param_from_date_this_year", FromDateThisYear);
ACalc.AddParameter("param_to_date_previous_year", ToDatePreviousYear);
ACalc.AddParameter("param_from_date_previous_year", FromDatePreviousYear);
}
int MaxColumns = ACalc.GetParameters().Get("MaxDisplayColumns").ToInt();
for (int Counter = 0; Counter <= MaxColumns; ++Counter)
{
String ColumnName = ACalc.GetParameters().Get("param_calculation", Counter, 0).ToString();
if (ColumnName == "Gift Amount")
{
ACalc.AddParameter("param_gift_amount_column", Counter);
}
}
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
DateTime SelDate = DateTime.Today;
if (dtpDateSelection.Date.HasValue)
{
SelDate = dtpDateSelection.Date.Value;
}
ACalc.AddParameter("param_currency", "Base");
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddParameter("param_date_selection30", SelDate.AddDays(30));
ACalc.AddParameter("param_date_selectionSub30", SelDate.AddDays(-30));
ACalc.AddParameter("param_date_selection60", SelDate.AddDays(60));
ACalc.AddParameter("DueDate", DateTime.Today);
int ColumnCounter = 0;
if (chkInvoice.Checked)
{
ACalc.AddParameter("param_calculation", "Document Code", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)3.0, ColumnCounter++);
ACalc.AddParameter("param_calculation", "Reference", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)2.0, ColumnCounter++);
ACalc.AddParameter("param_calculation", "Discount", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)0.5, ColumnCounter++);
}
else
{
ACalc.AddParameter("param_calculation", "Supplier", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)5.0, ColumnCounter++);
}
ACalc.AddParameter("param_calculation", "Overdue 30+", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)2.0, ColumnCounter++);
ACalc.AddParameter("param_calculation", "Overdue", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)2.0, ColumnCounter++);
ACalc.AddParameter("param_calculation", "Due", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)2.0, ColumnCounter++);
ACalc.AddParameter("param_calculation", "Due 30+", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)2.0, ColumnCounter++);
ACalc.AddParameter("param_calculation", "Due 60+", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)2.0, ColumnCounter++);
ACalc.AddParameter("param_calculation", "Total Due", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)2.0, ColumnCounter++);
ACalc.AddParameter("MaxDisplayColumns", ColumnCounter);
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
DateTime SelDate = DateTime.Today;
if (dtpDateSelection.Date.HasValue)
{
SelDate = dtpDateSelection.Date.Value;
}
ACalc.AddParameter("param_currency", "Base");
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddParameter("param_date_selection30", SelDate.AddDays(30));
ACalc.AddParameter("param_date_selectionSub30", SelDate.AddDays(-30));
ACalc.AddParameter("param_date_selection60", SelDate.AddDays(60));
ACalc.AddParameter("DueDate", DateTime.Today);
int ColumnCounter = 0;
if (chkInvoice.Checked)
{
ACalc.AddParameter("param_calculation", "Document Code", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)3.0, ColumnCounter++);
ACalc.AddParameter("param_calculation", "Reference", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)2.0, ColumnCounter++);
ACalc.AddParameter("param_calculation", "Discount", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)0.5, ColumnCounter++);
}
else
{
ACalc.AddParameter("param_calculation", "Supplier", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)5.0, ColumnCounter++);
}
ACalc.AddParameter("param_calculation", "Overdue 30+", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)2.0, ColumnCounter++);
ACalc.AddParameter("param_calculation", "Overdue", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)2.0, ColumnCounter++);
ACalc.AddParameter("param_calculation", "Due", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)2.0, ColumnCounter++);
ACalc.AddParameter("param_calculation", "Due 30+", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)2.0, ColumnCounter++);
ACalc.AddParameter("param_calculation", "Due 60+", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)2.0, ColumnCounter++);
ACalc.AddParameter("param_calculation", "Total Due", ColumnCounter);
ACalc.AddParameter("ColumnWidth", (float)2.0, ColumnCounter++);
ACalc.AddParameter("MaxDisplayColumns", ColumnCounter);
}
private void ReadControlsManual(TRptCalculator ACalc, TReportActionEnum AReportAction)
{
if (AReportAction == TReportActionEnum.raGenerate)
{
if (!dtpFromDate.ValidDate() || !dtpToDate.ValidDate())
{
TVerificationResult VerificationResult = new TVerificationResult(
Catalog.GetString("Date format problem"),
Catalog.GetString("Please check the date entry."),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
if (dtpFromDate.Date > dtpToDate.Date)
{
TVerificationResult VerificationResult = new TVerificationResult(
Catalog.GetString("From date is later than to date."),
Catalog.GetString("Please change from date or to date."),
TResultSeverity.Resv_Critical);
FPetraUtilsObject.AddVerificationResult(VerificationResult);
}
}
ACalc.AddParameter("param_ledger_number_i", FLedgerNumber);
ACalc.AddParameter("TransactionCount", 0);
ACalc.AddParameter("TransactionCountAccount", 0);
ACalc.AddParameter("SumDebitAccount", 0);
ACalc.AddParameter("SumCreditAccount", 0);
ACalc.AddParameter("SumTotalDebitAccount", 0);
ACalc.AddParameter("SumTotalCreditAccount", 0);
int MaxColumns = ACalc.GetParameters().Get("MaxDisplayColumns").ToInt();
for (int Counter = 0; Counter <= MaxColumns; ++Counter)
{
String ColumnName = ACalc.GetParameters().Get("param_calculation", Counter, 0).ToString();
if (ColumnName == "Debits")
{
ACalc.AddParameter("param_debit_column", Counter);
}
if (ColumnName == "Credits")
{
ACalc.AddParameter("param_credit_column", Counter);
}
}
}
