/// <summary>
/// Program entry point.
/// </summary>
private static void Main(string[] args)
{
// need to call with config file as parameter: -C:/home/USERNAME/etc/PetraServerConsole.config
TPetraServerConnector.Connect();
TBankStatementImport import = new TBankStatementImport();
BankImportTDS StatementAndTransactionsDS = import.ImportBankStatementNonInteractive(
TAppSettingsManager.GetInt32("ledger"),
TAppSettingsManager.GetValue("bankaccount"),
TAppSettingsManager.GetValue("file"));
Int32 AFirstStatementKey;
TBankImportWebConnector.StoreNewBankStatement(StatementAndTransactionsDS, out AFirstStatementKey);
TPetraServerConnector.Disconnect();
}
public void TestMultipleGifts()
{
// import the test gift batch, and post it
TGiftImporting importer = new TGiftImporting();
string dirTestData = "../../csharp/ICT/Testing/lib/MFinance/server/BankImport/";
string testFile = dirTestData + "GiftBatch.csv";
StreamReader sr = new StreamReader(testFile);
string FileContent = sr.ReadToEnd();
sr.Close();
FileContent = FileContent.Replace("2010-09-30", DateTime.Now.Year.ToString("0000") + "-09-30");
Hashtable parameters = new Hashtable();
parameters.Add("Delimiter", ",");
parameters.Add("ALedgerNumber", FLedgerNumber);
parameters.Add("DateFormatString", "yyyy-MM-dd");
parameters.Add("NumberFormat", "American");
parameters.Add("NewLine", Environment.NewLine);
parameters.Add("DatesMayBeIntegers", false);
TVerificationResultCollection VerificationResult;
GiftBatchTDSAGiftDetailTable NeedRecipientLedgerNumber;
bool refreshRequired;
if (!importer.ImportGiftBatches(parameters, FileContent, out NeedRecipientLedgerNumber, out refreshRequired, out VerificationResult))
{
Assert.Fail("Gift Batch was not imported: " + VerificationResult.BuildVerificationResultString());
}
int BatchNumber = importer.GetLastGiftBatchNumber();
Assert.AreNotEqual(-1, BatchNumber, "Failed to import gift batch: " + VerificationResult.BuildVerificationResultString());
Int32 generatedGlBatchNumber;
if (!TGiftTransactionWebConnector.PostGiftBatch(FLedgerNumber, BatchNumber, out generatedGlBatchNumber, out VerificationResult))
{
Assert.Fail("Gift Batch was not posted: " + VerificationResult.BuildVerificationResultString());
}
// import the test csv file, will already do the training
testFile = dirTestData + "BankStatement.csv";
sr = new StreamReader(testFile);
FileContent = sr.ReadToEnd();
sr.Close();
FileContent = FileContent.Replace("30.09.2010", "30.09." + DateTime.Now.Year.ToString("0000"));
Int32 StatementKey;
BankImportTDS BankImportDS = TBankStatementImportCSV.ImportBankStatementHelper(
FLedgerNumber,
"6200",
";",
"DMY",
"European",
"EUR",
"unused,DateEffective,Description,Amount,Currency",
"",
"BankStatementSeptember.csv",
FileContent);
Assert.AreNotEqual(null, BankImportDS, "valid bank import dataset september");
Assert.AreEqual(TSubmitChangesResult.scrOK, TBankStatementImport.StoreNewBankStatement(
BankImportDS,
out StatementKey), "save statement September");
// revert the gift batch, so that the training does not get confused if the test is run again;
// the training needs only one gift batch for that date
Hashtable requestParams = new Hashtable();
requestParams.Add("Function", GiftAdjustmentFunctionEnum.ReverseGiftBatch);
requestParams.Add("ALedgerNumber", FLedgerNumber);
requestParams.Add("BatchNumber", BatchNumber);
requestParams.Add("GiftDetailNumber", -1);
requestParams.Add("GiftNumber", -1);
requestParams.Add("NewBatchSelected", false);
requestParams.Add("NoReceipt", true);
requestParams.Add("NewPct", 0.0m);
requestParams.Add("UpdateTaxDeductiblePct", new System.Collections.Generic.List <string[]>());
requestParams.Add("GlEffectiveDate", new DateTime(DateTime.Now.Year, 09, 30));
requestParams.Add("AutoCompleteComments", false);
requestParams.Add("ReversalCommentOne", String.Empty);
requestParams.Add("ReversalCommentTwo", String.Empty);
requestParams.Add("ReversalCommentThree", String.Empty);
requestParams.Add("ReversalCommentOneType", String.Empty);
requestParams.Add("ReversalCommentTwoType", String.Empty);
requestParams.Add("ReversalCommentThreeType", String.Empty);
int AdjustmentBatchNumber;
bool BatchIsUnposted;
GiftBatchTDS GiftReverseDS = TGiftTransactionWebConnector.LoadGiftTransactionsForBatch(FLedgerNumber, BatchNumber, out BatchIsUnposted);
Assert.AreEqual(true, TAdjustmentWebConnector.GiftRevertAdjust(requestParams, out AdjustmentBatchNumber, GiftReverseDS), "reversing the gift batch");
if (!TGiftTransactionWebConnector.PostGiftBatch(FLedgerNumber, AdjustmentBatchNumber, out generatedGlBatchNumber, out VerificationResult))
{
Assert.Fail("Gift Reverse Batch was not posted: " + VerificationResult.BuildVerificationResultString());
}
// duplicate the bank import file, for the next month
FileContent = FileContent.Replace("30.09." + DateTime.Now.Year.ToString("0000"),
"30.10." + DateTime.Now.Year.ToString("0000"));
BankImportDS = TBankStatementImportCSV.ImportBankStatementHelper(
FLedgerNumber,
"6200",
";",
"DMY",
"European",
"EUR",
"unused,DateEffective,Description,Amount,Currency",
"",
"BankStatementOctober.csv",
FileContent);
Assert.AreNotEqual(null, BankImportDS, "valid bank import dataset october");
Assert.AreEqual(TSubmitChangesResult.scrOK, TBankStatementImport.StoreNewBankStatement(
BankImportDS,
out StatementKey), "save statement October");
// create gift batch from imported statement
Int32 GiftBatchNumber;
TBankImportWebConnector.CreateGiftBatch(
FLedgerNumber,
StatementKey,
out VerificationResult,
out GiftBatchNumber);
CommonNUnitFunctions.EnsureNullOrOnlyNonCriticalVerificationResults(VerificationResult,
"cannot create gift batch from bank statement:");
// check if the gift batch is correct
GiftBatchTDS GiftDS = TGiftTransactionWebConnector.LoadAGiftBatchAndRelatedData(FLedgerNumber, GiftBatchNumber);
// since we are not able to match the split gifts, only 1 donation should be matched.
// TODO: allow 2 gifts to be merged in OpenPetra, even when they come separate on the bank statement.
// then 4 gifts could be matched.
Assert.AreEqual(1, GiftDS.AGift.Rows.Count, "expected two matched gifts");
}
public void TestMultipleGifts()
{
// import the test gift batch, and post it
TGiftImporting importer = new TGiftImporting();
string dirTestData = "../../csharp/ICT/Testing/lib/MFinance/server/BankImport/TestData/";
string testFile = dirTestData + "GiftBatch.csv";
StreamReader sr = new StreamReader(testFile);
string FileContent = sr.ReadToEnd();
sr.Close();
FileContent = FileContent.Replace("2010-09-30", DateTime.Now.Year.ToString("0000") + "-09-30");
Hashtable parameters = new Hashtable();
parameters.Add("Delimiter", ",");
parameters.Add("ALedgerNumber", FLedgerNumber);
parameters.Add("DateFormatString", "yyyy-MM-dd");
parameters.Add("NumberFormat", "American");
parameters.Add("NewLine", Environment.NewLine);
TVerificationResultCollection VerificationResult;
importer.ImportGiftBatches(parameters, FileContent, out VerificationResult);
int BatchNumber = importer.GetLastGiftBatchNumber();
Assert.AreNotEqual(-1, BatchNumber, "Failed to import gift batch: " + VerificationResult.BuildVerificationResultString());
if (!TGiftTransactionWebConnector.PostGiftBatch(FLedgerNumber, BatchNumber, out VerificationResult))
{
Assert.Fail("Gift Batch was not posted: " + VerificationResult.BuildVerificationResultString());
}
// import the test csv file, will already do the training
TBankStatementImport import = new TBankStatementImport();
testFile = dirTestData + "BankStatement.csv";
sr = new StreamReader(testFile);
FileContent = sr.ReadToEnd();
sr.Close();
FileContent = FileContent.Replace("30.09.2010", "30.09." + DateTime.Now.Year.ToString("0000"));
Int32 StatementKey;
BankImportTDS BankImportDS = import.ImportBankStatementNonInteractive(
FLedgerNumber,
"6200",
";",
"DMY",
TDlgSelectCSVSeparator.NUMBERFORMAT_EUROPEAN,
"unused,DateEffective,Description,Amount,Currency",
"BankStatementSeptember.csv",
FileContent);
Assert.AreNotEqual(null, BankImportDS, "valid bank import dataset september");
Assert.AreEqual(TSubmitChangesResult.scrOK, TBankImportWebConnector.StoreNewBankStatement(
BankImportDS,
out StatementKey), "save statement September");
// revert the gift batch, so that the training does not get confused if the test is run again;
// the training needs only one gift batch for that date
Hashtable requestParams = new Hashtable();
requestParams.Add("Function", "ReverseGiftBatch");
requestParams.Add("ALedgerNumber", FLedgerNumber);
requestParams.Add("BatchNumber", BatchNumber);
requestParams.Add("GiftDetailNumber", -1);
requestParams.Add("GiftNumber", -1);
requestParams.Add("NewBatchSelected", false);
requestParams.Add("GlEffectiveDate", new DateTime(DateTime.Now.Year, 09, 30));
Assert.AreEqual(true, TAdjustmentWebConnector.GiftRevertAdjust(requestParams, out VerificationResult), "reversing the gift batch");
CommonNUnitFunctions.EnsureNullOrOnlyNonCriticalVerificationResults(VerificationResult,
"Gift Batch was not reverted:");
// duplicate the bank import file, for the next month
FileContent = FileContent.Replace("30.09." + DateTime.Now.Year.ToString("0000"),
"30.10." + DateTime.Now.Year.ToString("0000"));
BankImportDS = import.ImportBankStatementNonInteractive(
FLedgerNumber,
"6200",
";",
"DMY",
TDlgSelectCSVSeparator.NUMBERFORMAT_EUROPEAN,
"unused,DateEffective,Description,Amount,Currency",
"BankStatementOcotober.csv",
FileContent);
Assert.AreNotEqual(null, BankImportDS, "valid bank import dataset october");
Assert.AreEqual(TSubmitChangesResult.scrOK, TBankImportWebConnector.StoreNewBankStatement(
BankImportDS,
out StatementKey), "save statement October");
// create gift batch from imported statement
Int32 GiftBatchNumber = TBankImportWebConnector.CreateGiftBatch(
FLedgerNumber,
StatementKey,
-1,
out VerificationResult);
CommonNUnitFunctions.EnsureNullOrOnlyNonCriticalVerificationResults(VerificationResult,
"cannot create gift batch from bank statement:");
// check if the gift batch is correct
GiftBatchTDS GiftDS = TGiftTransactionWebConnector.LoadGiftBatchData(FLedgerNumber, GiftBatchNumber);
// since we are not able to match the split gift, only 2 gifts should be matched.
// TODO: allow 2 gifts to be merged in OpenPetra, even when they come separate on the bank statement.
// then 4 gifts could be matched.
Assert.AreEqual(2, GiftDS.AGift.Rows.Count, "expected two matched gifts");
}
