Exemplo n.º 1
0
        private int LoadTransaction( StreamReader reader, int lineNumber, Ledger ledger, Account account )
        {
            Transaction trans = new Transaction();
            try
            {
                LineItem item;
                decimal transAmount = 0;
                string lineItemCategory = null;
                string lineItemMemo = null;
                decimal lineItemAmount = 0;
                string transCategory = null;
                bool isCleared = false;
                string checkNumber = null;
                string investmentName = null;
                string investmentPrice = null;
                string investmentShares = null;
                string investmentCommission = null;

                while( !reader.EndOfStream )
                {
                    string line = reader.ReadLine();
                    if( line[0] == '^' ) break;

                    switch( line[0] )
                    {
                        case 'D':
                            // Date
                            // MM/DD'YYYY
                            // We handle a bunch of different separators
                            // TODO: Handle DD/MM/YYYY European form ??
                            Regex regex = new Regex( "D(\\d+)['.-/]\\s*(\\d+)['.-/]\\s*(\\d+)" );
                            if( !regex.IsMatch( line ) )
                                throw new StorageException( "Cannot parse date " + line );
                            Match match = regex.Match( line );
                            int month = Int32.Parse( match.Groups[1].Value );
                            int day = Int32.Parse( match.Groups[2].Value );
                            int year = Int32.Parse( match.Groups[3].Value );
                            // Handle two-digit dates which are assumed to be 1900s
                            if( year < 100 ) year += 1900;
                            trans.Date = new DateTime( year, month, day );
                            break;
                        case 'T':
                            // Transaction amount (presumably dollars).
                            // This is actually the amount that involves this account,
                            // not necessarily the total transaction amount.
                            // Transactions with splits may have a different total amount.
                            // Particularly paychecks.
                            // The transaction total is the sum of the credits.

                            #region Split transaction sample
                            // Split sample, as exported from MS Money:
                            //
                            // D5/23'2006
                            // CX
                            // MPaycheck + cash out
                            // T384.04							<-- (debit) not the total!
                            // PEmmanuel Church
                            // LWages & Salary:Gross Pay-Cyn
                            // SWages & Salary:Gross Pay-Cyn
                            // EGross Salary
                            // $625.33							<-- (credit)
                            // STaxes:Federal Income
                            // EFederal
                            // $-15.45							<-- (debit)
                            // STaxes:Social Security
                            // EFica
                            // $-38.77							<-- (debit)
                            // STaxes:Medicare Tax 20
                            // EMedicare
                            // $-9.07							<-- (debit)
                            // STaxes:State Income Ta
                            // EState
                            // $-18.00							<-- (debit)
                            // SGroceries
                            // ECash for groceries
                            // $-150.00							<-- (debit)
                            // SCash Withdrawal
                            // ECash
                            // $-50.00							<-- (debit)
                            // SPiano Business
                            // EStudents?
                            // $40.00							<-- (credit)
                            // ^
                            #endregion

                            transAmount = Decimal.Parse( line.Substring( 1 ) );
                            trans.Amount = Math.Abs( transAmount );
                            break;
                        case 'C':
                            // Cleared status
                            // CX = cleared
                            if( line[1] == 'X' ) isCleared = true;
                            break;
                        case 'N':
                            // Check number
                            // If investment account, this is the action: buy, sell, etc.
                            checkNumber = line.Substring( 1 );
                            break;
                        case 'P':
                            // Payee
                            trans.Description = line.Substring( 1 );
                            break;
                        case 'M':
                            // Memo
                            trans.Memo = line.Substring( 1 );
                            break;
                        case 'L':
                            // Category/Account
                            transCategory = line.Substring( 1 );
                            break;
                        case 'S':
                            // Split line item category (like L above)
                            // (If there are splits, it changes the meaning of the T amount.)
                            lineItemCategory = line.Substring( 1 );
                            lineItemMemo = null;
                            lineItemAmount = 0;
                            break;
                        case 'E':
                            // Split line item memo (like M above)
                            lineItemMemo = line.Substring( 1 );
                            break;
                        case '$':
                            // Split line item amount (like T above)
                            lineItemAmount = Decimal.Parse( line.Substring( 1 ) );
                            item = BuildLineItem( ledger, trans, lineItemCategory, lineItemMemo, lineItemAmount );
                            item.IsReconciled = isCleared;
                            trans.LineItems.Add( item );
                            break;

                        // Investment indicators

                        case 'Y':	// security name
                            investmentName = line.Substring( 1 );
                            break;
                        case 'I':	// price
                            investmentPrice = line.Substring( 1 );
                            break;
                        case 'Q':	// quantity (shares)
                            investmentShares = line.Substring( 1 );
                            break;
                        case 'O':	// commission
                            investmentCommission = line.Substring( 1 );
                            break;

                        default:
                            // Unrecognized - ignore
                            break;
                    }

                    lineNumber++;
                }	// while

                if( trans.LineItems.Count > 0 )
                {
                    // Transaction had splits.
                    // Add the transaction amount as the final split.
                    item = BuildLineItem( ledger, trans, transCategory, trans.Memo, -transAmount );
                    item.Number = checkNumber;
                    item.Account = account;
                    item.CategoryObject = null;
                    item.IsReconciled = isCleared;
                    trans.LineItems.Add( item );
                    // Adjust total transaction amount.
                    trans.Amount = trans.GetCreditLineItemSum();
                }
                else
                {
                    // No splits. Must create a matching debit and credit.
                    Account otherAccount;
                    Category otherCategory;
                    otherAccount = ParseAccount( ledger, transCategory, transAmount, out otherCategory );
                    if( transAmount < 0 )
                    {
                        // Withdrawal
                        item = trans.CreateLineItem( TransactionType.Credit, account, Math.Abs( transAmount ), null );
                        item.Number = checkNumber;
                        item.IsReconciled = isCleared;
                        trans.LineItems.Add( item );
                        item = trans.CreateLineItem( TransactionType.Debit, otherAccount, Math.Abs( transAmount ), otherCategory );
                        trans.LineItems.Add( item );
                    }
                    else
                    {
                        // Deposit
                        item = trans.CreateLineItem( TransactionType.Credit, otherAccount, Math.Abs( transAmount ), otherCategory );
                        trans.LineItems.Add( item );
                        item = trans.CreateLineItem( TransactionType.Debit, account, Math.Abs( transAmount ), null );
                        item.IsReconciled = isCleared;
                        trans.LineItems.Add( item );
                    }
                }

                trans.LineItems.Sort();
                trans.Validate();

                // Special case "Opening Balance" line:
                if( trans.Description == "Opening Balance" && account.GetLineItems().Count == 0 )
                {
                    // The account name is given in the category
                    account.Name = transCategory.Trim( '[', ']' );
                    account.StartingBalance = account.IsLiability ? -transAmount : transAmount;
                    account.StartingDate = trans.Date;
                }
                else
                {
                    trans.Id = ledger.GetNextTransactionId();
                    ledger.AddTransaction( trans );
                }
            }
            catch( Exception ex )
            {
                // Don't add broken transactions
                Console.WriteLine( "Error on line number " + lineNumber.ToString() );
                Console.WriteLine( ex.ToString() );
                throw;
            }

            return lineNumber;
        }
Exemplo n.º 2
0
        private void AssignTransactionIdentifiers( Ledger ledger )
        {
            // Determine the next available Id by finding the maximum used Id
            foreach( Transaction trans in ledger.Transactions )
            {
                if( trans.Id >= ledger.NextTransactionId )
                    ledger.NextTransactionId = trans.Id + 1;
            }

            // Assign an Id to any transactions that don't have one
            foreach( Transaction trans in ledger.Transactions )
            {
                if( trans.Id == 0 )
                    trans.Id = ledger.GetNextTransactionId();
            }
        }
Exemplo n.º 3
0
    protected void SubmitPurchase_Click( object sender, EventArgs e )
    {
        try
        {
            dataMgr.Lock();
            try
            {
                // TODO: Remove obsolete DataManager code.

                // Make sure we have the very latest data file.
                ledger = dataMgr.Load( false, false );

                // Build a transaction object
                Transaction trans = new Transaction();
                trans.Id = ledger.GetNextTransactionId();
                trans.Date = DateTime.Parse( txtDate.Text );
                trans.Amount = Convert.ToDecimal( txtAmount.Text );
                trans.Description = txtPayee.Text;
                if( txtMemo.Text.Length > 0 ) trans.Memo = txtMemo.Text;

                // Populate line items
                Account account = ledger.FindAccount( Convert.ToInt32( ddlAccount.SelectedValue ) );
                LineItemCredit credit = new LineItemCredit( account, trans.Amount );
                credit.Id = ledger.GetNextLineItemId();
                credit.Transaction = trans;
                if( txtNumber.Text.Length > 0 ) credit.Number = txtNumber.Text;
                if( txtMemo.Text.Length > 0 ) credit.Memo = txtMemo.Text;
                trans.LineItems.Add( credit );

                Account expenseAccount = null;
                Category expenseCategory = null;
                if( !ledger.ParseCategory( txtCategory.Text, out expenseAccount, out expenseCategory ) )
                {
                    SubmitPurchaseStatusLabel.Text = "The category provided could not be found.";
                    return;
                }

                LineItemDebit debit = new LineItemDebit( expenseAccount, trans.Amount );
                debit.Id = ledger.GetNextLineItemId();
                debit.Transaction = trans;
                debit.CategoryObject = expenseCategory;
                trans.LineItems.Add( debit );

                // Add to ledger and save
                ledger.AddTransaction( trans );
                // HACK: Removing until we figure out how to fix this...
                // ledger.RefreshMissingTransactions();
                ledger.SortTransactions();
                dataMgr.Save( ledger );

                decimal newBalance = account.Balance;
                SubmitPurchaseStatusLabel.Text = string.Format( "Transaction #{0} saved. {2} balance {1:N2}.", trans.Id, newBalance, account.Name );

        #if DATASTORAGE
                try
                {
                    // DataLedger is initialized in BasePage.OnInit
                    DataLedger.Storage.BeginTransaction();
                    try
                    {
                        IAccount dbaccount = DataLedger.FindAccountByName( account.Name );
                        if( dbaccount == null )
                            throw new ApplicationException( "Account " + account.Name + " not found in data storage." );

                        IAccount dbexpense = DataLedger.FindAccountByName( expenseAccount.Name );
                        if( dbexpense == null )
                            throw new ApplicationException( "Expense account " + expenseAccount.Name + " not found in data storage." );

                        ITransaction dbtrans = DataLedger.Storage.CreateTransaction();
                        dbtrans.Amount = trans.Amount;
                        dbtrans.Date = trans.Date;
                        dbtrans.Memo = trans.Memo;
                        dbtrans.Payee = trans.Payee;
                        DataLedger.Storage.SaveTransaction( dbtrans );

                        ILineItem dbcredit = DataLedger.Storage.CreateLineItem( dbtrans );
                        dbcredit.AccountId = dbaccount.Id;
                        dbcredit.Amount = credit.Amount;
                        dbcredit.Category = null;
                        dbcredit.Memo = credit.Memo;
                        dbcredit.Number = credit.Number;
                        dbcredit.Type = TransactionType.Credit;
                        DataLedger.Storage.SaveLineItem( dbcredit );

                        ILineItem dbdebit = DataLedger.Storage.CreateLineItem( dbtrans );
                        dbdebit.AccountId = dbexpense.Id;
                        dbdebit.Amount = debit.Amount;
                        dbdebit.Category = debit.Category;
                        dbdebit.Type = TransactionType.Debit;
                        DataLedger.Storage.SaveLineItem( dbdebit );

                        DataLedger.Storage.CommitTransaction();

                        DataLedger.RefreshUnmatchedRecords();
                    }
                    catch( Exception )
                    {
                        DataLedger.Storage.RollbackTransaction();
                        throw;
                    }
                }
                catch( Exception ex )
                {
                    SubmitPurchaseStatusLabel.Text += "<br />An error occurred while saving to data storage: <br /><pre>" + ex.ToString() + "</pre>";
                }
        #endif

                // Reset text boxes
                txtNumber.Text = "";
                txtAmount.Text = "";
                txtPayee.Text = "";
                txtMemo.Text = "";
                txtCategory.Text = "";
            }
            finally
            {
                dataMgr.Unlock();
            }
        }
        catch( LockException ex )
        {
            SubmitPurchaseStatusLabel.Text = "The data file is in use by '" + ex.LockOwner + "'. Please try again in a moment.";
        }
        catch( Exception ex )
        {
            SubmitPurchaseStatusLabel.Text = "An error occurred while saving: " + ex.Message;
        }
    }