void WriteAnalysisAttributesSuffix(ATransactionRow transaction)
{
FMainDS.ATransAnalAttrib.DefaultView.Sort = ATransAnalAttribTable.GetAnalysisTypeCodeDBName();
FMainDS.ATransAnalAttrib.DefaultView.RowFilter =
String.Format("{0}={1} and {2}={3} and {4}={5} and {6}={7}",
ATransAnalAttribTable.GetLedgerNumberDBName(),
transaction.LedgerNumber,
ATransAnalAttribTable.GetBatchNumberDBName(),
transaction.BatchNumber,
ATransAnalAttribTable.GetJournalNumberDBName(),
transaction.JournalNumber,
ATransAnalAttribTable.GetTransactionNumberDBName(),
transaction.TransactionNumber);
DataView anaView = FMainDS.ATransAnalAttrib.DefaultView;
for (int i = 1; i <= maxNumValuesExport; i++)
{
if (i <= anaView.Count)
{
ATransAnalAttribRow ar = (ATransAnalAttribRow)anaView[i - 1].Row;
WriteStringQuoted(ar.AnalysisTypeCode, false);
WriteStringQuoted(ar.AnalysisAttributeValue, (i == maxNumValuesExport));
}
else
{
WriteStringQuoted("", false);
WriteStringQuoted("", (i == maxNumValuesExport));
}
}
}
// delete highlighted row/s
private void DeleteRecord(Object Sender, EventArgs e)
{
ATransactionRow RowToDelete = FMainDS.ATransaction.NewRowTyped();
RowToDelete.ItemArray = (object[])FPreviouslySelectedDetailRow.ItemArray.Clone();
this.DeleteATransaction();
if (grdDetails.Rows.Count <= 2)
{
btnOK.Enabled = false;
}
ATransAnalAttribTable TempTable = new ATransAnalAttribTable();
TempTable.Merge(FMainDS.ATransAnalAttrib);
foreach (ATransAnalAttribRow Row in TempTable.Rows)
{
if ((Row.RowState != DataRowState.Deleted) &&
(Row.LedgerNumber == RowToDelete.LedgerNumber) &&
(Row.BatchNumber == RowToDelete.BatchNumber) &&
(Row.JournalNumber == RowToDelete.JournalNumber))
{
if (Row.TransactionNumber == RowToDelete.TransactionNumber)
{
// delete row as no longer used
FMainDS.ATransAnalAttrib.Rows.Find(
new object[] { Row.LedgerNumber, Row.BatchNumber, Row.JournalNumber, Row.TransactionNumber,
Row.AnalysisTypeCode }).Delete();
}
else if (Row.TransactionNumber > RowToDelete.TransactionNumber)
{
// transaction number needs updated
((ATransAnalAttribRow)FMainDS.ATransAnalAttrib.Rows.Find(
new object[] { Row.LedgerNumber, Row.BatchNumber, Row.JournalNumber, Row.TransactionNumber,
Row.AnalysisTypeCode })).TransactionNumber -= 1;
}
}
}
foreach (ATransactionRow Row in FMainDS.ATransaction.Rows)
{
if ((Row.RowState != DataRowState.Deleted) &&
(Row.LedgerNumber == RowToDelete.LedgerNumber) &&
(Row.BatchNumber == RowToDelete.BatchNumber) &&
(Row.JournalNumber == RowToDelete.JournalNumber) &&
(Row.TransactionNumber > RowToDelete.TransactionNumber))
{
// transaction number needs updated
Row.TransactionNumber -= 1;
}
}
FPetraUtilsObject.DisableSaveButton();
}
/// <summary>
/// Used for the validation of Analysis Attributes
/// </summary>
/// <param name="ATransactionNumber"></param>
/// <param name="AAccountCode"></param>
/// <param name="AGLBatchDS"></param>
/// <param name="ValueRequiredForType"></param>
/// <param name="AIsUnposted"></param>
/// <returns></returns>
public bool AccountAnalysisAttributesValuesExist(int ATransactionNumber,
string AAccountCode,
GLBatchTDS AGLBatchDS,
out String ValueRequiredForType,
bool AIsUnposted = true)
{
ValueRequiredForType = "";
if (!AIsUnposted || string.IsNullOrEmpty(AAccountCode) || (AGLBatchDS.ATransAnalAttrib.DefaultView.Count == 0))
{
return(true);
}
StringCollection RequiredAnalAttrCodes = TRemote.MFinance.Setup.WebConnectors.RequiredAnalysisAttributesForAccount(FLedgerNumber,
AAccountCode, true);
string AnalysisCodeFilterValues = TAnalysisAttributes.ConvertStringCollectionToCSV(RequiredAnalAttrCodes, "'");
DataView analAttrib = new DataView(AGLBatchDS.ATransAnalAttrib);
analAttrib.RowFilter = String.Format("{0}={1} AND {2}={3} AND {4}={5} AND {6} IN ({7})",
ATransAnalAttribTable.GetBatchNumberDBName(),
FBatchNumber,
ATransAnalAttribTable.GetJournalNumberDBName(),
FJournalNumber,
ATransAnalAttribTable.GetTransactionNumberDBName(),
ATransactionNumber,
ATransAnalAttribTable.GetAnalysisTypeCodeDBName(),
AnalysisCodeFilterValues);
foreach (DataRowView drv in analAttrib)
{
ATransAnalAttribRow rw = (ATransAnalAttribRow)drv.Row;
string analysisCode = rw.AnalysisTypeCode;
if (TRemote.MFinance.Setup.WebConnectors.AccountAnalysisAttributeRequiresValues(FLedgerNumber, analysisCode, true))
{
if (rw.IsAnalysisAttributeValueNull() || (rw.AnalysisAttributeValue == string.Empty))
{
ValueRequiredForType = rw.AnalysisTypeCode;
return(false);
}
}
}
return(true);
}
/// <summary>
///
/// </summary>
/// <param name="AGLBatchDS"></param>
/// <param name="AActiveOnly"></param>
/// <param name="ATransactionNumber"></param>
/// <param name="AAnalysisCodeFilterValues"></param>
public void SetTransAnalAttributeDefaultView(GLBatchTDS AGLBatchDS,
bool AActiveOnly,
Int32 ATransactionNumber = 0,
String AAnalysisCodeFilterValues = "")
{
if (FBatchNumber != -1)
{
if (ATransactionNumber > 0)
{
if (AActiveOnly && (AAnalysisCodeFilterValues.Length > 0))
{
AGLBatchDS.ATransAnalAttrib.DefaultView.RowFilter = String.Format("{0}={1} AND {2}={3} AND {4}={5} AND {6} IN ({7})",
ATransAnalAttribTable.GetBatchNumberDBName(),
FBatchNumber,
ATransAnalAttribTable.GetJournalNumberDBName(),
FJournalNumber,
ATransAnalAttribTable.GetTransactionNumberDBName(),
ATransactionNumber,
ATransAnalAttribTable.GetAnalysisTypeCodeDBName(),
AAnalysisCodeFilterValues);
}
else
{
AGLBatchDS.ATransAnalAttrib.DefaultView.RowFilter = String.Format("{0}={1} AND {2}={3} AND {4}={5}",
ATransAnalAttribTable.GetBatchNumberDBName(),
FBatchNumber,
ATransAnalAttribTable.GetJournalNumberDBName(),
FJournalNumber,
ATransAnalAttribTable.GetTransactionNumberDBName(),
ATransactionNumber);
}
}
else
{
AGLBatchDS.ATransAnalAttrib.DefaultView.RowFilter = String.Format("{0}={1} AND {2}={3}",
ATransAnalAttribTable.GetBatchNumberDBName(),
FBatchNumber,
ATransAnalAttribTable.GetJournalNumberDBName(),
FJournalNumber);
}
AGLBatchDS.ATransAnalAttrib.DefaultView.Sort = String.Format("{0} ASC, {1} ASC",
ATransAnalAttribTable.GetTransactionNumberDBName(),
ATransAnalAttribTable.GetAnalysisTypeCodeDBName()
);
}
}
/// <summary>
/// Used for the validation of Analysis Attributes
/// </summary>
/// <param name="ATransactionNumber"></param>
/// <param name="AAccountCode"></param>
/// <param name="AGLBatchDS"></param>
/// <param name="AIsUnposted"></param>
/// <returns></returns>
public bool AccountAnalysisAttributeCountIsCorrect(int ATransactionNumber,
string AAccountCode,
GLBatchTDS AGLBatchDS,
bool AIsUnposted = true)
{
bool RetVal = true;
if (!AIsUnposted || string.IsNullOrEmpty(AAccountCode))
{
return(RetVal);
}
int NumberOfAttributes = 0;
TRemote.MFinance.Setup.WebConnectors.AccountHasAnalysisAttributes(FLedgerNumber, AAccountCode, out NumberOfAttributes, true);
if (NumberOfAttributes == 0)
{
return(RetVal);
}
DataView analAttrib = new DataView(AGLBatchDS.ATransAnalAttrib);
analAttrib.RowFilter = String.Format("{0}={1} AND {2}={3} AND {4}={5} AND {6}={7}",
ATransAnalAttribTable.GetBatchNumberDBName(),
FBatchNumber,
ATransAnalAttribTable.GetJournalNumberDBName(),
FJournalNumber,
ATransAnalAttribTable.GetTransactionNumberDBName(),
ATransactionNumber,
ATransAnalAttribTable.GetAccountCodeDBName(),
AAccountCode);
RetVal = (analAttrib.Count == NumberOfAttributes);
return(RetVal);
}
// delete highlighted row/s
private void DeleteRecord(Object Sender, EventArgs e)
{
ATransactionRow RowToDelete = FMainDS.ATransaction.NewRowTyped();
RowToDelete.ItemArray = (object[])FPreviouslySelectedDetailRow.ItemArray.Clone();
this.DeleteATransaction();
if (grdDetails.Rows.Count <= 2)
{
btnOK.Enabled = false;
}
ATransAnalAttribTable TempTable = new ATransAnalAttribTable();
TempTable.Merge(FMainDS.ATransAnalAttrib);
foreach (ATransAnalAttribRow Row in TempTable.Rows)
{
if ((Row.RowState != DataRowState.Deleted)
&& (Row.LedgerNumber == RowToDelete.LedgerNumber)
&& (Row.BatchNumber == RowToDelete.BatchNumber)
&& (Row.JournalNumber == RowToDelete.JournalNumber))
{
if (Row.TransactionNumber == RowToDelete.TransactionNumber)
{
// delete row as no longer used
FMainDS.ATransAnalAttrib.Rows.Find(
new object[] { Row.LedgerNumber, Row.BatchNumber, Row.JournalNumber, Row.TransactionNumber,
Row.AnalysisTypeCode }).Delete();
}
else if (Row.TransactionNumber > RowToDelete.TransactionNumber)
{
// transaction number needs updated
((ATransAnalAttribRow)FMainDS.ATransAnalAttrib.Rows.Find(
new object[] { Row.LedgerNumber, Row.BatchNumber, Row.JournalNumber, Row.TransactionNumber,
Row.AnalysisTypeCode })).TransactionNumber -= 1;
}
}
}
foreach (ATransactionRow Row in FMainDS.ATransaction.Rows)
{
if ((Row.RowState != DataRowState.Deleted)
&& (Row.LedgerNumber == RowToDelete.LedgerNumber)
&& (Row.BatchNumber == RowToDelete.BatchNumber)
&& (Row.JournalNumber == RowToDelete.JournalNumber)
&& (Row.TransactionNumber > RowToDelete.TransactionNumber))
{
// transaction number needs updated
Row.TransactionNumber -= 1;
}
}
FPetraUtilsObject.DisableSaveButton();
}
/// <summary>
/// export all GL Transactions in the given year, towards the specified cost centres
/// </summary>
public static void ExportGLTransactions(string AOutputPath,
char ACSVSeparator,
string ANewLine,
Int32 ALedgerNumber,
Int32 AFinancialYear,
string ACostCentres,
string AIgnoreAccounts,
string AIgnoreReferences,
ref List <string> ACostCentresInvolved,
ref List <string> AAccountsInvolved)
{
string filename = Path.GetFullPath(Path.Combine(AOutputPath, "transaction.csv"));
Console.WriteLine("Writing file: " + filename);
TDBTransaction Transaction = new TDBTransaction();
ATransactionTable transactions = new ATransactionTable();
ATransAnalAttribTable TransAnalAttrib = new ATransAnalAttribTable();
ATransactionTable allTransactionsInJournal = new ATransactionTable();
AGiftBatchTable giftbatches = new AGiftBatchTable();
AAccountTable accounts = new AAccountTable();
DBAccess.ReadTransaction(ref Transaction,
delegate
{
TDataBase db = Transaction.DataBaseObj;
string sql =
String.Format("SELECT T.*, B.{4} AS a_transaction_date_d " +
"FROM PUB_{8} AS B, PUB_{7} AS T " +
"WHERE B.{9} = {10} AND B.{15} = {16} AND B.{11}='{12}' " +
"AND T.{9} = B.{9} AND T.{0} = B.{0} " +
"AND T.{13} IN ({14}) " +
"AND NOT T.{17} IN ({19}) " +
"AND NOT T.{20} IN ({21}) " +
"ORDER BY {0}, {1}, {2}",
ATransactionTable.GetBatchNumberDBName(),
ATransactionTable.GetJournalNumberDBName(),
ATransactionTable.GetTransactionNumberDBName(),
ATransactionTable.GetTransactionAmountDBName(),
ABatchTable.GetDateEffectiveDBName(),
ATransactionTable.GetNarrativeDBName(),
ATransactionTable.GetReferenceDBName(),
ATransactionTable.GetTableDBName(),
ABatchTable.GetTableDBName(),
ATransactionTable.GetLedgerNumberDBName(),
ALedgerNumber,
ABatchTable.GetBatchStatusDBName(),
MFinanceConstants.BATCH_POSTED,
ATransactionTable.GetCostCentreCodeDBName(),
"'" + ACostCentres.Replace(",", "','") + "'",
ABatchTable.GetBatchYearDBName(),
AFinancialYear,
ATransactionTable.GetAccountCodeDBName(),
ATransactionTable.GetDebitCreditIndicatorDBName(),
"'" + AIgnoreAccounts.Replace(",", "','") + "'",
ATransactionTable.GetReferenceDBName(),
"'" + AIgnoreReferences.Replace(",", "','") + "'");
transactions = (ATransactionTable)db.SelectDT(transactions, sql, Transaction, null, 0, 0);
// get the analysis attributes
sql =
String.Format("SELECT A.* from PUB_{1} AS B, PUB_{13} AS T, PUB_{0} AS A " +
"WHERE B.{2} = {3} AND B.{4} = {5} AND B.{6}='{7}' " +
"AND T.{2} = B.{2} AND T.{8} = B.{8} " +
"AND T.{9} IN ({10}) " +
"AND A.{2} = T.{2} AND A.{8} = T.{8} AND A.{11} = T.{11} AND A.{12} = T.{12}",
ATransAnalAttribTable.GetTableDBName(),
ABatchTable.GetTableDBName(),
ABatchTable.GetLedgerNumberDBName(),
ALedgerNumber,
ABatchTable.GetBatchYearDBName(),
AFinancialYear,
ABatchTable.GetBatchStatusDBName(),
MFinanceConstants.BATCH_POSTED,
ATransactionTable.GetBatchNumberDBName(),
ATransactionTable.GetCostCentreCodeDBName(),
"'" + ACostCentres.Replace(",", "','") + "'",
ATransactionTable.GetJournalNumberDBName(),
ATransactionTable.GetTransactionNumberDBName(),
ATransactionTable.GetTableDBName(),
ABatchTable.GetBatchYearDBName());
db.SelectDT(TransAnalAttrib, sql, Transaction, null, 0, 0);
TransAnalAttrib.DefaultView.Sort =
ATransAnalAttribTable.GetBatchNumberDBName() + "," +
ATransAnalAttribTable.GetJournalNumberDBName() + "," +
ATransAnalAttribTable.GetTransactionNumberDBName();
// get a list of all batches involved
List <Int64> batches = new List <Int64>();
StringBuilder batchnumbers = new StringBuilder();
foreach (ATransactionRow r in transactions.Rows)
{
if (!batches.Contains(r.BatchNumber))
{
batches.Add(r.BatchNumber);
batchnumbers.Append(r.BatchNumber.ToString() + ",");
}
}
// get the other transactions in the same journal for finding the opposite cc/acc involved
// for performance reasons, get all transactions of the whole batch
sql =
String.Format("SELECT DISTINCT TJ.* " +
"FROM PUB_{0} AS TJ " +
"WHERE TJ.{1} = {2} AND TJ.{3} IN ({4})",
ATransactionTable.GetTableDBName(),
ATransactionTable.GetLedgerNumberDBName(),
ALedgerNumber,
ATransactionTable.GetBatchNumberDBName(),
batchnumbers.ToString() + "-1");
allTransactionsInJournal =
(ATransactionTable)db.SelectDT(allTransactionsInJournal, sql, Transaction, null, 0, 0);
allTransactionsInJournal.DefaultView.Sort =
ATransactionTable.GetBatchNumberDBName() + "," +
ATransactionTable.GetJournalNumberDBName();
// get all names of gift batches
sql =
String.Format("SELECT * FROM PUB_{0} " +
"WHERE {1} = {2} " +
"AND {3} = {4}",
AGiftBatchTable.GetTableDBName(),
AGiftBatchTable.GetLedgerNumberDBName(),
ALedgerNumber,
AGiftBatchTable.GetBatchYearDBName(),
AFinancialYear);
db.SelectDT(giftbatches, sql, Transaction, null, 0, 0);
giftbatches.DefaultView.Sort = AGiftBatchTable.GetBatchNumberDBName();
sql =
String.Format("SELECT * FROM PUB_{0} " +
"WHERE {1} = {2}",
AAccountTable.GetTableDBName(),
AAccountTable.GetLedgerNumberDBName(),
ALedgerNumber);
db.SelectDT(accounts, sql, Transaction, null, 0, 0);
accounts.DefaultView.Sort = AAccountTable.GetAccountCodeDBName();
});
StringBuilder sb = new StringBuilder();
int rowCounter = 0;
foreach (ATransactionRow row in transactions.Rows)
{
if (row.DebitCreditIndicator)
{
row.TransactionAmount *= -1.0m;
}
StringBuilder attributes = new StringBuilder();
DataRowView[] RelatedTransactions = allTransactionsInJournal.DefaultView.FindRows(new object[] { row.BatchNumber, row.JournalNumber });
ATransactionRow[] OtherTransactions = GetOtherTransactions(row, RelatedTransactions);
string OtherCostCentres = string.Empty;
string OtherAccountCodes = string.Empty;
if (OtherTransactions.Length < 30)
{
foreach (ATransactionRow r in OtherTransactions)
{
OtherCostCentres = StringHelper.AddCSV(OtherCostCentres, r.CostCentreCode);
OtherAccountCodes = StringHelper.AddCSV(OtherAccountCodes, r.AccountCode);
}
}
if (!ACostCentresInvolved.Contains(row.CostCentreCode))
{
ACostCentresInvolved.Add(row.CostCentreCode);
}
if (!AAccountsInvolved.Contains(row.AccountCode))
{
AAccountsInvolved.Add(row.AccountCode);
}
// we are using gift batch for receiving payments
string Narrative = row.Narrative;
if (Narrative.StartsWith("GB - Gift Batch ") && row.Reference.StartsWith("GB"))
{
// find the account and set the account description into the narrative
try
{
DataRowView[] acc = accounts.DefaultView.FindRows(row.AccountCode);
Narrative = ((AAccountRow)acc[0].Row).AccountCodeLongDesc;
}
catch (Exception)
{
}
try
{
DataRowView[] gb = giftbatches.DefaultView.FindRows(Convert.ToInt32(row.Reference.Substring(2)));
Narrative += " " + ((AGiftBatchRow)gb[0].Row).BatchDescription;
}
catch (Exception)
{
}
}
sb.Append(StringHelper.StrMerge(
new string[] {
"B" + row.BatchNumber.ToString() + "_J" + row.JournalNumber.ToString() + "_T" + row.TransactionNumber.ToString(),
row.CostCentreCode,
row.AccountCode,
row.TransactionDate.ToString("yyyyMMdd"),
OtherCostCentres,
OtherAccountCodes,
Narrative,
row.Reference,
String.Format("{0:N}", row.TransactionAmount),
attributes.ToString()
}, ACSVSeparator));
sb.Append(ANewLine);
rowCounter++;
if (rowCounter % 500 == 0)
{
TLogging.Log("Processing transactions " + rowCounter.ToString());
}
}
TLogging.Log("Processing transactions " + rowCounter.ToString());
StreamWriter sw = new StreamWriter(filename, false, Encoding.GetEncoding(1252));
sw.Write(sb.ToString());
sw.Close();
}
private bool AllowInactiveFieldValues(int ABatchNumber, out int ANumInactiveValues)
{
bool RetVal = false;
TVerificationResultCollection VerificationResult = new TVerificationResultCollection();
string VerificationMessage = string.Empty;
DataView TransDV = new DataView(FMainDS.ATransaction);
DataView AttribDV = new DataView(FMainDS.ATransAnalAttrib);
int NumInactiveAccounts = 0;
int NumInactiveCostCentres = 0;
int NumInactiveAccountTypes = 0;
int NumInactiveAccountValues = 0;
try
{
//Check for inactive account or cost centre codes
TransDV.RowFilter = String.Format("{0}={1}",
ATransactionTable.GetBatchNumberDBName(),
ABatchNumber);
TransDV.Sort = String.Format("{0} ASC, {1} ASC",
ATransactionTable.GetJournalNumberDBName(),
ATransactionTable.GetTransactionNumberDBName());
foreach (DataRowView drv in TransDV)
{
ATransactionRow transRow = (ATransactionRow)drv.Row;
if (!AccountIsActive(transRow.AccountCode))
{
VerificationMessage += String.Format(" Account '{0}' in Journal:{1} Transaction:{2}.{3}",
transRow.AccountCode,
transRow.JournalNumber,
transRow.TransactionNumber,
Environment.NewLine);
NumInactiveAccounts++;
}
if (!CostCentreIsActive(transRow.CostCentreCode))
{
VerificationMessage += String.Format(" Cost Centre '{0}' in Journal:{1} Transaction:{2}.{3}",
transRow.CostCentreCode,
transRow.JournalNumber,
transRow.TransactionNumber,
Environment.NewLine);
NumInactiveCostCentres++;
}
}
//Check anlysis attributes
AttribDV.RowFilter = String.Format("{0}={1}",
ATransAnalAttribTable.GetBatchNumberDBName(),
ABatchNumber);
AttribDV.Sort = String.Format("{0} ASC, {1} ASC, {2} ASC",
ATransAnalAttribTable.GetJournalNumberDBName(),
ATransAnalAttribTable.GetTransactionNumberDBName(),
ATransAnalAttribTable.GetAnalysisTypeCodeDBName());
foreach (DataRowView drv2 in AttribDV)
{
ATransAnalAttribRow analAttribRow = (ATransAnalAttribRow)drv2.Row;
if (!AnalysisCodeIsActive(analAttribRow.AccountCode, analAttribRow.AnalysisTypeCode))
{
VerificationMessage += String.Format(" Analysis Code '{0}' in Journal:{1} Transaction:{2}.{3}",
analAttribRow.AnalysisTypeCode,
analAttribRow.JournalNumber,
analAttribRow.TransactionNumber,
Environment.NewLine);
NumInactiveAccountTypes++;
}
if (!AnalysisAttributeValueIsActive(analAttribRow.AnalysisTypeCode, analAttribRow.AnalysisAttributeValue))
{
VerificationMessage += String.Format(" Analysis Value '{0}' in Journal:{1} Transaction:{2}.{3}",
analAttribRow.AnalysisAttributeValue,
analAttribRow.JournalNumber,
analAttribRow.TransactionNumber,
Environment.NewLine);
NumInactiveAccountValues++;
}
}
}
catch (Exception ex)
{
TLogging.LogException(ex, Utilities.GetMethodSignature());
throw;
}
ANumInactiveValues = (NumInactiveAccounts + NumInactiveCostCentres + NumInactiveAccountTypes + NumInactiveAccountValues);
if (ANumInactiveValues > 0)
{
VerificationResult.Add(new TVerificationResult(string.Format(Catalog.GetString("Inactive Values:{0}"), Environment.NewLine),
VerificationMessage,
TResultSeverity.Resv_Noncritical));
StringBuilder errorMessages = new StringBuilder();
errorMessages.AppendFormat(Catalog.GetString("{0} inactive value(s) found in GL Batch {1}. Do you still want to post?{2}"),
ANumInactiveValues,
ABatchNumber,
Environment.NewLine);
foreach (TVerificationResult message in VerificationResult)
{
errorMessages.AppendFormat("{0}{1}",
Environment.NewLine,
message.ResultText);
}
TFrmExtendedMessageBox extendedMessageBox = new TFrmExtendedMessageBox(FMyForm);
RetVal = (extendedMessageBox.ShowDialog(errorMessages.ToString(),
Catalog.GetString("Post Batch"), string.Empty,
TFrmExtendedMessageBox.TButtons.embbYesNo,
TFrmExtendedMessageBox.TIcon.embiQuestion) == TFrmExtendedMessageBox.TResult.embrYes);
}
else
{
RetVal = true;
}
return(RetVal);
}
/// <summary>
/// Re-show the specified row
/// </summary>
/// <param name="ACurrentBatch"></param>
/// <param name="AJournalToCancel"></param>
/// <param name="ARedisplay"></param>
public void PrepareJournalDataForCancelling(Int32 ACurrentBatch, Int32 AJournalToCancel, Boolean ARedisplay)
{
//This code will only be called when the Journal tab is active.
DataView JournalDV = new DataView(FMainDS.AJournal);
DataView TransDV = new DataView(FMainDS.ATransaction);
DataView TransAnalDV = new DataView(FMainDS.ATransAnalAttrib);
JournalDV.RowFilter = String.Format("{0}={1} And {2}={3}",
AJournalTable.GetBatchNumberDBName(),
ACurrentBatch,
AJournalTable.GetJournalNumberDBName(),
AJournalToCancel);
TransDV.RowFilter = String.Format("{0}={1} And {2}={3}",
ATransactionTable.GetBatchNumberDBName(),
ACurrentBatch,
ATransactionTable.GetJournalNumberDBName(),
AJournalToCancel);
TransAnalDV.RowFilter = String.Format("{0}={1} And {2}={3}",
ATransAnalAttribTable.GetBatchNumberDBName(),
ACurrentBatch,
ATransAnalAttribTable.GetJournalNumberDBName(),
AJournalToCancel);
//Work from lowest level up
if (TransAnalDV.Count > 0)
{
TransAnalDV.Sort = String.Format("{0}, {1}",
ATransAnalAttribTable.GetTransactionNumberDBName(),
ATransAnalAttribTable.GetAnalysisTypeCodeDBName());
foreach (DataRowView drv in TransAnalDV)
{
ATransAnalAttribRow transAnalRow = (ATransAnalAttribRow)drv.Row;
if (transAnalRow.RowState == DataRowState.Added)
{
//Do nothing
}
else if (transAnalRow.RowState != DataRowState.Unchanged)
{
transAnalRow.RejectChanges();
}
}
}
if (TransDV.Count > 0)
{
TransDV.Sort = String.Format("{0}", ATransactionTable.GetTransactionNumberDBName());
foreach (DataRowView drv in TransDV)
{
ATransactionRow transRow = (ATransactionRow)drv.Row;
if (transRow.RowState == DataRowState.Added)
{
//Do nothing
}
else if (transRow.RowState != DataRowState.Unchanged)
{
transRow.RejectChanges();
}
}
}
if (JournalDV.Count > 0)
{
GLBatchTDSAJournalRow journalRow = (GLBatchTDSAJournalRow)JournalDV[0].Row;
//No need to check for Added state as new journals are always saved
// on creation
if (journalRow.RowState != DataRowState.Unchanged)
{
journalRow.RejectChanges();
}
if (ARedisplay)
{
ShowDetails(journalRow);
}
}
if (TransDV.Count == 0)
{
//Load all related data for journal ready to delete/cancel
FMainDS.Merge(TRemote.MFinance.GL.WebConnectors.LoadATransactionAndRelatedTablesForJournal(FLedgerNumber, ACurrentBatch,
AJournalToCancel));
}
}
private void SetupAnalysisAttributeGrid(TSgrdDataGridPaged AGrid, ref SourceGrid.Cells.Editors.ComboBox AGridCombo)
{
AGrid.DataSource = null;
GLBatchTDS DS = null;
TCmbAutoPopulated AccountCombo = null;
SourceGrid.Cells.Editors.ComboBox ATempCombo = null;
if (AGrid.Name == grdFromAnalAttributes.Name)
{
FTempFromDS = (GLBatchTDS)FMainDS.Clone();
DS = FTempFromDS;
AccountCombo = cmbFromAccountCode;
}
else
{
DS = FMainDS;
AccountCombo = cmbDetailAccountCode;
}
if (AGrid.Columns.Count == 0)
{
ATempCombo = new SourceGrid.Cells.Editors.ComboBox(typeof(string));
ATempCombo.EnableEdit = true;
ATempCombo.EditableMode = EditableMode.Focus;
AGrid.Columns.Clear();
AGrid.AddTextColumn(Catalog.GetString("Type"), FMainDS.ATransAnalAttrib.ColumnAnalysisTypeCode, 99);
AGrid.AddTextColumn(Catalog.GetString("Value"),
DS.ATransAnalAttrib.Columns[ATransAnalAttribTable.GetAnalysisAttributeValueDBName()], 150,
ATempCombo);
}
FAnalysisAttributesLogic.SetTransAnalAttributeDefaultView(DS);
DS.ATransAnalAttrib.DefaultView.AllowNew = false;
AGrid.DataSource = new DevAge.ComponentModel.BoundDataView(DS.ATransAnalAttrib.DefaultView);
AGrid.SetHeaderTooltip(0, Catalog.GetString("Type"));
AGrid.SetHeaderTooltip(1, Catalog.GetString("Value"));
AGrid.Selection.SelectionChanged += AnalysisAttributesGrid_RowSelected;
//Prepare Analysis attributes grid to highlight inactive analysis codes
// Create a cell view for special conditions
SourceGrid.Cells.Views.Cell strikeoutCell2 = new SourceGrid.Cells.Views.Cell();
strikeoutCell2.Font = new System.Drawing.Font(AGrid.Font, FontStyle.Strikeout);
// Create a condition, apply the view when true, and assign a delegate to handle it
SourceGrid.Conditions.ConditionView conditionAnalysisCodeActive = new SourceGrid.Conditions.ConditionView(strikeoutCell2);
conditionAnalysisCodeActive.EvaluateFunction = delegate(SourceGrid.DataGridColumn column2, int gridRow2, object itemRow2)
{
DataRowView row2 = (DataRowView)itemRow2;
string analysisCode = row2[ATransAnalAttribTable.ColumnAnalysisTypeCodeId].ToString();
return(!FAnalysisAttributesLogic.AnalysisCodeIsActive(AccountCombo.GetSelectedString(), FCacheDS.AAnalysisAttribute, analysisCode));
};
// Create a condition, apply the view when true, and assign a delegate to handle it
SourceGrid.Conditions.ConditionView conditionAnalysisAttributeValueActive = new SourceGrid.Conditions.ConditionView(strikeoutCell2);
conditionAnalysisAttributeValueActive.EvaluateFunction = delegate(SourceGrid.DataGridColumn column2, int gridRow2, object itemRow2)
{
if (itemRow2 != null)
{
DataRowView row2 = (DataRowView)itemRow2;
string analysisCode = row2[ATransAnalAttribTable.ColumnAnalysisTypeCodeId].ToString();
string analysisAttributeValue = row2[ATransAnalAttribTable.ColumnAnalysisAttributeValueId].ToString();
return(!TAnalysisAttributes.AnalysisAttributeValueIsActive(ref ATempCombo,
FCacheDS.AFreeformAnalysis,
analysisCode,
analysisAttributeValue));
}
else
{
return(false);
}
};
//Add conditions to columns
int indexOfAnalysisCodeColumn = 0;
int indexOfAnalysisAttributeValueColumn = 1;
AGrid.Columns[indexOfAnalysisCodeColumn].Conditions.Add(conditionAnalysisCodeActive);
AGrid.Columns[indexOfAnalysisAttributeValueColumn].Conditions.Add(conditionAnalysisAttributeValueActive);
AGridCombo = ATempCombo;
}
/// <summary>
/// export all GL Transactions in the given year, towards the specified cost centres
/// </summary>
public static void ExportGLTransactions(string AOutputPath,
char ACSVSeparator,
string ANewLine,
Int32 ALedgerNumber,
Int32 AFinancialYear,
string ACostCentres,
string AIgnoreAccounts,
string AIgnoreReferences,
SortedList <string, string>ATaxAnalysisAttributes,
ref List <string>ACostCentresInvolved,
ref List <string>AAccountsInvolved)
{
string filename = Path.GetFullPath(Path.Combine(AOutputPath, "transaction.csv"));
Console.WriteLine("Writing file: " + filename);
StringBuilder sb = new StringBuilder();
TDBTransaction Transaction = DBAccess.GDBAccessObj.BeginTransaction(IsolationLevel.ReadCommitted);
string sql =
String.Format("SELECT T.*, B.{4} AS a_transaction_date_d " +
"FROM PUB_{8} AS B, PUB_{7} AS T " +
"WHERE B.{9} = {10} AND B.{15} = {16} AND B.{11}='{12}' " +
"AND T.{9} = B.{9} AND T.{0} = B.{0} " +
"AND T.{13} IN ({14}) " +
"AND NOT T.{17} IN ({19}) " +
"AND NOT T.{20} IN ({21}) " +
"ORDER BY {0}, {1}, {2}",
ATransactionTable.GetBatchNumberDBName(),
ATransactionTable.GetJournalNumberDBName(),
ATransactionTable.GetTransactionNumberDBName(),
ATransactionTable.GetTransactionAmountDBName(),
ABatchTable.GetDateEffectiveDBName(),
ATransactionTable.GetNarrativeDBName(),
ATransactionTable.GetReferenceDBName(),
ATransactionTable.GetTableDBName(),
ABatchTable.GetTableDBName(),
ATransactionTable.GetLedgerNumberDBName(),
ALedgerNumber,
ABatchTable.GetBatchStatusDBName(),
MFinanceConstants.BATCH_POSTED,
ATransactionTable.GetCostCentreCodeDBName(),
"'" + ACostCentres.Replace(",", "','") + "'",
ABatchTable.GetBatchYearDBName(),
AFinancialYear,
ATransactionTable.GetAccountCodeDBName(),
ATransactionTable.GetDebitCreditIndicatorDBName(),
"'" + AIgnoreAccounts.Replace(",", "','") + "'",
ATransactionTable.GetReferenceDBName(),
"'" + AIgnoreReferences.Replace(",", "','") + "'");
ATransactionTable transactions = new ATransactionTable();
transactions = (ATransactionTable)DBAccess.GDBAccessObj.SelectDT(transactions, sql, Transaction, null, 0, 0);
// get the analysis attributes
sql =
String.Format("SELECT A.* from PUB_{1} AS B, PUB_{13} AS T, PUB_{0} AS A " +
"WHERE B.{2} = {3} AND B.{4} = {5} AND B.{6}='{7}' " +
"AND T.{2} = B.{2} AND T.{8} = B.{8} " +
"AND T.{9} IN ({10}) " +
"AND A.{2} = T.{2} AND A.{8} = T.{8} AND A.{11} = T.{11} AND A.{12} = T.{12}",
ATransAnalAttribTable.GetTableDBName(),
ABatchTable.GetTableDBName(),
ABatchTable.GetLedgerNumberDBName(),
ALedgerNumber,
ABatchTable.GetBatchYearDBName(),
AFinancialYear,
ABatchTable.GetBatchStatusDBName(),
MFinanceConstants.BATCH_POSTED,
ATransactionTable.GetBatchNumberDBName(),
ATransactionTable.GetCostCentreCodeDBName(),
"'" + ACostCentres.Replace(",", "','") + "'",
ATransactionTable.GetJournalNumberDBName(),
ATransactionTable.GetTransactionNumberDBName(),
ATransactionTable.GetTableDBName(),
ABatchTable.GetBatchYearDBName());
ATransAnalAttribTable TransAnalAttrib = new ATransAnalAttribTable();
DBAccess.GDBAccessObj.SelectDT(TransAnalAttrib, sql, Transaction, null, 0, 0);
TransAnalAttrib.DefaultView.Sort =
ATransAnalAttribTable.GetBatchNumberDBName() + "," +
ATransAnalAttribTable.GetJournalNumberDBName() + "," +
ATransAnalAttribTable.GetTransactionNumberDBName();
// get a list of all batches involved
List <Int64>batches = new List <Int64>();
StringBuilder batchnumbers = new StringBuilder();
foreach (ATransactionRow r in transactions.Rows)
{
if (!batches.Contains(r.BatchNumber))
{
batches.Add(r.BatchNumber);
batchnumbers.Append(r.BatchNumber.ToString() + ",");
}
}
// get the other transactions in the same journal for finding the opposite cc/acc involved
// for performance reasons, get all transactions of the whole batch
sql =
String.Format("SELECT DISTINCT TJ.* " +
"FROM PUB_{0} AS TJ " +
"WHERE TJ.{1} = {2} AND TJ.{3} IN ({4})",
ATransactionTable.GetTableDBName(),
ATransactionTable.GetLedgerNumberDBName(),
ALedgerNumber,
ATransactionTable.GetBatchNumberDBName(),
batchnumbers.ToString() + "-1");
ATransactionTable allTransactionsInJournal = new ATransactionTable();
allTransactionsInJournal = (ATransactionTable)DBAccess.GDBAccessObj.SelectDT(allTransactionsInJournal, sql, Transaction, null, 0, 0);
allTransactionsInJournal.DefaultView.Sort =
ATransactionTable.GetBatchNumberDBName() + "," +
ATransactionTable.GetJournalNumberDBName();
// get all names of gift batches
sql =
String.Format("SELECT * FROM PUB_{0} " +
"WHERE {1} = {2} " +
"AND {3} = {4}",
AGiftBatchTable.GetTableDBName(),
AGiftBatchTable.GetLedgerNumberDBName(),
ALedgerNumber,
AGiftBatchTable.GetBatchYearDBName(),
AFinancialYear);
AGiftBatchTable giftbatches = new AGiftBatchTable();
DBAccess.GDBAccessObj.SelectDT(giftbatches, sql, Transaction, null, 0, 0);
giftbatches.DefaultView.Sort = AGiftBatchTable.GetBatchNumberDBName();
sql =
String.Format("SELECT * FROM PUB_{0} " +
"WHERE {1} = {2}",
AAccountTable.GetTableDBName(),
AAccountTable.GetLedgerNumberDBName(),
ALedgerNumber);
AAccountTable accounts = new AAccountTable();
DBAccess.GDBAccessObj.SelectDT(accounts, sql, Transaction, null, 0, 0);
accounts.DefaultView.Sort = AAccountTable.GetAccountCodeDBName();
DBAccess.GDBAccessObj.RollbackTransaction();
int rowCounter = 0;
StringCollection costcentreCollection = StringHelper.StrSplit(ACostCentres, ",");
foreach (ATransactionRow row in transactions.Rows)
{
if (row.DebitCreditIndicator)
{
row.TransactionAmount *= -1.0m;
}
StringBuilder attributes = new StringBuilder();
DataRowView[] attribs = TransAnalAttrib.DefaultView.FindRows(new object[] { row.BatchNumber, row.JournalNumber, row.TransactionNumber });
decimal TaxOnIncome = 0.0m;
decimal TaxOnExpense = 0.0m;
// only mention tax codes, if this transaction was against a costcentre that has to pay taxes
if (costcentreCollection.Contains(row.CostCentreCode))
{
foreach (DataRowView rv in attribs)
{
ATransAnalAttribRow attribRow = (ATransAnalAttribRow)rv.Row;
// also export attribRow.AnalysisTypeCode?
attributes.Append(attribRow.AnalysisAttributeValue);
if (attribRow.AnalysisAttributeValue == "v19")
{
TaxOnExpense = row.TransactionAmount * 0.19m;
}
else if (attribRow.AnalysisAttributeValue == "v7")
{
TaxOnExpense = row.TransactionAmount * 0.07m;
}
else if (attribRow.AnalysisAttributeValue == "70v7")
{
TaxOnExpense = row.TransactionAmount * 0.7m * 0.07m;
}
else if (attribRow.AnalysisAttributeValue == "70v19")
{
TaxOnExpense = row.TransactionAmount * 0.7m * 0.19m;
}
else if (attribRow.AnalysisAttributeValue == "m19")
{
TaxOnIncome = row.TransactionAmount * 0.19m;
}
else if (attribRow.AnalysisAttributeValue == "m7")
{
TaxOnIncome = row.TransactionAmount * 0.07m;
}
}
}
DataRowView[] RelatedTransactions = allTransactionsInJournal.DefaultView.FindRows(new object[] { row.BatchNumber, row.JournalNumber });
ATransactionRow[] OtherTransactions = GetOtherTransactions(row, RelatedTransactions);
string OtherCostCentres = string.Empty;
string OtherAccountCodes = string.Empty;
if (OtherTransactions.Length < 30)
{
foreach (ATransactionRow r in OtherTransactions)
{
OtherCostCentres = StringHelper.AddCSV(OtherCostCentres, r.CostCentreCode);
OtherAccountCodes = StringHelper.AddCSV(OtherAccountCodes, r.AccountCode);
}
}
if (!ACostCentresInvolved.Contains(row.CostCentreCode))
{
ACostCentresInvolved.Add(row.CostCentreCode);
}
if (!AAccountsInvolved.Contains(row.AccountCode))
{
AAccountsInvolved.Add(row.AccountCode);
}
// we are using gift batch for receiving payments
string Narrative = row.Narrative;
if (Narrative.StartsWith("GB - Gift Batch ") && row.Reference.StartsWith("GB"))
{
// find the account and set the account description into the narrative
try
{
DataRowView[] acc = accounts.DefaultView.FindRows(row.AccountCode);
Narrative = ((AAccountRow)acc[0].Row).AccountCodeLongDesc;
}
catch (Exception)
{
}
try
{
DataRowView[] gb = giftbatches.DefaultView.FindRows(Convert.ToInt32(row.Reference.Substring(2)));
Narrative += " " + ((AGiftBatchRow)gb[0].Row).BatchDescription;
}
catch (Exception)
{
}
}
sb.Append(StringHelper.StrMerge(
new string[] {
"B" + row.BatchNumber.ToString() + "_J" + row.JournalNumber.ToString() + "_T" + row.TransactionNumber.ToString(),
row.CostCentreCode,
row.AccountCode,
row.TransactionDate.ToString("yyyyMMdd"),
OtherCostCentres,
OtherAccountCodes,
Narrative,
row.Reference,
String.Format("{0:N}", row.TransactionAmount),
attributes.ToString(),
TaxOnIncome.ToString(),
TaxOnExpense.ToString()
}, ACSVSeparator));
sb.Append(ANewLine);
rowCounter++;
if (rowCounter % 500 == 0)
{
TLogging.Log("Processing transactions " + rowCounter.ToString());
}
}
TLogging.Log("Processing transactions " + rowCounter.ToString());
StreamWriter sw = new StreamWriter(filename, false, Encoding.GetEncoding(1252));
sw.Write(sb.ToString());
sw.Close();
}
/// <summary>
/// Method to cancel a specified journal
/// </summary>
/// <param name="ACurrentJournalRow">The row to cancel</param>
/// <param name="AJournalDescriptionTextBox">Pass a reference to a TextBox that is used to display the journal description text. This is required
/// to ensure that validation passes when the cancelled journal is saved.</param>
/// <param name="AExchangeRateToBaseTextBox">Pass a reference to a TextBox that is used to display the exchange rate to base. This is required
/// to ensure that validation passes when the cancelled journal is saved.</param>
/// <returns>True if the journal is cancelled.</returns>
public bool CancelRow(GLBatchTDSAJournalRow ACurrentJournalRow,
TextBox AJournalDescriptionTextBox,
TTxtNumericTextBox AExchangeRateToBaseTextBox)
{
if ((ACurrentJournalRow == null) || !FMyForm.SaveChanges())
{
return(false);
}
int CurrentBatchNumber = ACurrentJournalRow.BatchNumber;
int CurrentJournalNumber = ACurrentJournalRow.JournalNumber;
if ((MessageBox.Show(String.Format(Catalog.GetString(
"You have chosen to cancel this journal ({0}).\n\nDo you really want to cancel it?"),
CurrentJournalNumber),
Catalog.GetString("Confirm Cancel"),
MessageBoxButtons.YesNo) == System.Windows.Forms.DialogResult.Yes))
{
try
{
//clear any transactions currently being editied in the Transaction Tab
FMyForm.GetTransactionsControl().ClearCurrentSelection();
//Load any new data
FMainDS.Merge(TRemote.MFinance.GL.WebConnectors.LoadATransactionATransAnalAttrib(FLedgerNumber, CurrentBatchNumber,
CurrentJournalNumber));
DataView dvAA = new DataView(FMainDS.ATransAnalAttrib);
dvAA.RowFilter = String.Format("{0}={1} AND {2}={3}",
ATransAnalAttribTable.GetBatchNumberDBName(),
CurrentBatchNumber,
ATransAnalAttribTable.GetJournalNumberDBName(),
CurrentJournalNumber);
//Delete Analysis Attribs
foreach (DataRowView dvr in dvAA)
{
dvr.Delete();
}
DataView dvTr = new DataView(FMainDS.ATransaction);
dvTr.RowFilter = String.Format("{0}={1} AND {2}={3}",
ATransactionTable.GetBatchNumberDBName(),
CurrentBatchNumber,
ATransactionTable.GetJournalNumberDBName(),
CurrentJournalNumber);
//Delete Transactions
foreach (DataRowView dvr in dvTr)
{
dvr.Delete();
}
ACurrentJournalRow.BeginEdit();
ACurrentJournalRow.JournalStatus = MFinanceConstants.BATCH_CANCELLED;
//Ensure validation passes
if (ACurrentJournalRow.JournalDescription.Length == 0)
{
AJournalDescriptionTextBox.Text = " ";
}
if (ACurrentJournalRow.ExchangeRateToBase == 0)
{
AExchangeRateToBaseTextBox.NumberValueDecimal = 1;
}
ABatchRow CurrentBatchRow = FMyForm.GetBatchControl().GetSelectedDetailRow();
CurrentBatchRow.BatchCreditTotal -= ACurrentJournalRow.JournalCreditTotal;
CurrentBatchRow.BatchDebitTotal -= ACurrentJournalRow.JournalDebitTotal;
if (CurrentBatchRow.BatchControlTotal != 0)
{
CurrentBatchRow.BatchControlTotal -= ACurrentJournalRow.JournalCreditTotal;
}
ACurrentJournalRow.JournalCreditTotal = 0;
ACurrentJournalRow.JournalDebitTotal = 0;
ACurrentJournalRow.EndEdit();
FPetraUtilsObject.SetChangedFlag();
//Need to call save
if (FMyForm.SaveChanges())
{
MessageBox.Show(Catalog.GetString("The journal has been cancelled successfully!"),
Catalog.GetString("Success"),
MessageBoxButtons.OK, MessageBoxIcon.Information);
FMyForm.DisableTransactions();
}
else
{
// saving failed, therefore do not try to post
MessageBox.Show(Catalog.GetString(
"The journal has been cancelled but there were problems during saving; ") + Environment.NewLine +
Catalog.GetString("Please try and save the cancellation immediately."),
Catalog.GetString("Failure"), MessageBoxButtons.OK, MessageBoxIcon.Error);
}
return(true);
}
catch (Exception ex)
{
MessageBox.Show(ex.Message);
}
}
return(false);
}
/// <summary>
/// load the transactions into the grid
/// </summary>
/// <param name="ALedgerNumber"></param>
/// <param name="ABatchNumber"></param>
/// <param name="AJournalNumber"></param>
/// <param name="ATransactionNumber"></param>
public void LoadAttributes(Int32 ALedgerNumber, Int32 ABatchNumber, Int32 AJournalNumber, Int32 ATransactionNumber)
{
//Check if the same batch is selected, so no need to apply filter
if ((FLedgerNumber == ALedgerNumber) && (FBatchNumber == ABatchNumber) && (FJournalNumber == AJournalNumber) &&
(FTransactionNumber == ATransactionNumber) && (FMainDS.ATransAnalAttrib.DefaultView.Count > 0))
{
GetDataFromControls();
return;
}
FLedgerNumber = ALedgerNumber;
FBatchNumber = ABatchNumber;
FJournalNumber = AJournalNumber;
FTransactionNumber = ATransactionNumber;
FPreviouslySelectedDetailRow = null;
FActiveOnly = (GetBatchRow().BatchStatus == MFinanceConstants.BATCH_UNPOSTED);
if (!cmbDetailAnalysisAttributeValue.Enabled)
{
cmbDetailAnalysisAttributeValue.Enabled = true;
}
// only load from server if there are no attributes loaded yet for this journal
// otherwise we would overwrite attributes that have already been modified
FMainDS.ATransAnalAttrib.DefaultView.RowFilter = string.Empty;
FMainDS.ATransAnalAttrib.DefaultView.Sort = StringHelper.StrMerge(TTypedDataTable.GetPrimaryKeyColumnStringList(
ATransactionTable.TableId), ',');
if (FMainDS.ATransAnalAttrib.DefaultView.Find(new object[] { FLedgerNumber, FBatchNumber, FJournalNumber, FTransactionNumber }) == -1)
{
FMainDS.ATransAnalAttrib.Clear();
FMainDS.Merge(TRemote.MFinance.GL.WebConnectors.LoadATransAnalAttrib(ALedgerNumber, ABatchNumber, AJournalNumber, ATransactionNumber));
}
CheckFCacheInitialised();
FMainDS.ATransAnalAttrib.DefaultView.RowFilter = String.Format("{0}={1} AND {2}={3} AND {4}={5}",
ATransAnalAttribTable.GetBatchNumberDBName(),
FBatchNumber,
ATransAnalAttribTable.GetJournalNumberDBName(),
FJournalNumber,
ATransAnalAttribTable.GetTransactionNumberDBName(),
FTransactionNumber);
FMainDS.ATransAnalAttrib.DefaultView.Sort = String.Format("{0} ASC",
ATransAnalAttribTable.GetAnalysisTypeCodeDBName()
);
grdDetails.DataSource = null;
grdDetails.DataSource = new DevAge.ComponentModel.BoundDataView(FMainDS.ATransAnalAttrib.DefaultView);
FMainDS.ATransAnalAttrib.DefaultView.AllowNew = false;
if (FMainDS.ATransAnalAttrib.DefaultView.Count > 0)
{
SelectRowInGrid(1);
pnlDetails.Enabled = !FPetraUtilsObject.DetailProtectedMode && !pnlDetailsProtected;
UpdateLabels();
}
else
{
ClearControls();
}
}
public static Boolean CanDetachTypeCodeFromAccount(Int32 ALedgerNumber, String AAccountCode, String ATypeCode, out String Message)
{
TDBTransaction ReadTrans = DBAccess.GDBAccessObj.BeginTransaction(IsolationLevel.ReadCommitted);
try
{
{
AApAnalAttribTable tbl = new AApAnalAttribTable();
AApAnalAttribRow Template = tbl.NewRowTyped(false);
Template.LedgerNumber = ALedgerNumber;
Template.AccountCode = AAccountCode;
Template.AnalysisTypeCode = ATypeCode;
tbl = AApAnalAttribAccess.LoadUsingTemplate(Template, ReadTrans);
if (tbl.Rows.Count > 0)
{
Message = String.Format(Catalog.GetString("Cannot remove {0} from {1}: "), ATypeCode, AAccountCode) +
String.Format(Catalog.GetString("Analysis Type is used in AP documents ({0} entries)."), tbl.Rows.Count);
return false;
}
}
{
ATransAnalAttribTable tbl = new ATransAnalAttribTable();
ATransAnalAttribRow Template = tbl.NewRowTyped(false);
Template.LedgerNumber = ALedgerNumber;
Template.AccountCode = AAccountCode;
Template.AnalysisTypeCode = ATypeCode;
tbl = ATransAnalAttribAccess.LoadUsingTemplate(Template, ReadTrans);
if (tbl.Rows.Count > 0)
{
Message = String.Format(Catalog.GetString("Cannot remove {0} from {1}: "), ATypeCode, AAccountCode) +
String.Format(Catalog.GetString("Analysis Type is used in Transactions ({0} entries)."), tbl.Rows.Count);
return false;
}
}
{
ARecurringTransAnalAttribTable tbl = new ARecurringTransAnalAttribTable();
ARecurringTransAnalAttribRow Template = tbl.NewRowTyped(false);
Template.LedgerNumber = ALedgerNumber;
Template.AccountCode = AAccountCode;
Template.AnalysisTypeCode = ATypeCode;
tbl = ARecurringTransAnalAttribAccess.LoadUsingTemplate(Template, ReadTrans);
if (tbl.Rows.Count > 0)
{
Message = String.Format(Catalog.GetString("Cannot remove {0} from {1}: "), ATypeCode, AAccountCode) +
String.Format(Catalog.GetString("Analysis Type is used in recurring Transactions ({0} entries)."), tbl.Rows.Count);
return false;
}
}
}
finally
{
DBAccess.GDBAccessObj.RollbackTransaction();
}
Message = "";
return true;
}
