Very, very messy and broken. It does work somewhat, but I can see just what a mess it's going to be to carry it out, so I'm abandoning.

git-svn-id: file:///svn-source/pmgr/branches/reconcile_entry_to_receipt_20090629@187 97e9348a-65ac-dc4b-aefc-98561f571b83
Branch to work on another possible solution to this mess
2009-06-30 00:59:09 +00:00 · 2009-06-30 00:57:11 +00:00 · 2009-06-24 00:33:39 +00:00 · 2009-06-23 19:04:41 +00:00 · 2009-06-22 23:46:03 +00:00
23 changed files with 1034 additions and 623 deletions
--- a/db/schema.sql
+++ b/db/schema.sql
@@ -866,15 +866,18 @@ LOCK TABLES `pmgr_accounts` WRITE;
 INSERT INTO `pmgr_accounts` (`type`, `name`, `trackable`)
  VALUES
  ('ASSET', 'A/R', 1),
+  ('ASSET', 'Invoice', 1),
+  ('ASSET', 'Receipt', 1),
  ('LIABILITY', 'A/P', 1),
  ('LIABILITY', 'Tax', 0),
  ('LIABILITY', 'Customer Credit', 1),
  ('ASSET', 'Bank', 0),
-  ('ASSET', 'Payment', 0),
+  ('ASSET', 'Till', 0),
  ('LIABILITY', 'Security Deposit', 1),
  ('INCOME', 'Rent', 0),
  ('INCOME', 'Late Charge', 0),
-  ('EXPENSE', 'Concession', 0);
+  ('EXPENSE', 'Concession', 0),
+  ('EXPENSE', 'Bad Debt', 0);
 UNLOCK TABLES;


@@ -965,6 +968,8 @@ CREATE TABLE `pmgr_ledger_entries` (
  `name`                 VARCHAR(80) DEFAULT NULL,
  `monetary_source_id`   INT(10) UNSIGNED DEFAULT NULL, -- NULL if internal transfer
  `transaction_id`       INT(10) UNSIGNED NOT NULL,
+  `customer_id`          INT(10) UNSIGNED DEFAULT NULL,
+  `lease_id`             INT(10) UNSIGNED DEFAULT NULL,
  `amount`               FLOAT(12,2) NOT NULL,

  `debit_ledger_id`      INT(10) UNSIGNED NOT NULL,
@@ -984,10 +989,16 @@ DROP TABLE IF EXISTS `pmgr_reconciliations`;
 CREATE TABLE `pmgr_reconciliations` (
  `id`                   INT(10) UNSIGNED NOT NULL AUTO_INCREMENT,

-  `debit_ledger_entry_id`    INT(10) UNSIGNED NOT NULL,
-  `credit_ledger_entry_id`   INT(10) UNSIGNED NOT NULL,
-  `terminal_ledger_entry_id` INT(10) UNSIGNED DEFAULT NULL,
-  `amount`                  FLOAT(12,2) NOT NULL,
+  `type`                 ENUM('DEBIT',
+                              'CREDIT')
+                           NOT NULL,
+
+  -- Match up the ledger entry to the transaction that
+  -- reconciles it.  For example, this could be a charge
+  -- matching up with a receipt.
+  `ledger_entry_id`      INT(10) UNSIGNED NOT NULL,
+  `transaction_id`       INT(10) UNSIGNED NOT NULL,
+  `amount`               FLOAT(12,2) NOT NULL,

  PRIMARY KEY (`id`)
 ) ENGINE=MyISAM DEFAULT CHARSET=utf8;
--- a/scripts/sitelink2pmgr.pl
+++ b/scripts/sitelink2pmgr.pl
@@ -92,6 +92,32 @@ sub addRow {
 }


+######################################################################
+######################################################################
+## updateRow
+
+sub updateRow {
+   my ($table, $id, $cols) = @_;
+   die unless $table;
+   die unless $id;
+   die unless ref($cols) eq 'HASH';
+
+   die "Table `$table` is unknown!"
+      unless defined $newdb{'tables'}{$table};
+
+   die "Table `$table` : ID `$id` does not exist!"
+		unless $newdb{'tables'}{$table}{'rows'}[$id];
+
+   # For debug purposes
+   my $line = (caller())[2];
+   $cols->{'--UPDATE-LINE--'} = [] unless $cols->{'--UPDATE-LINE--'};
+   push(@{$cols->{'--UPDATE-LINE--'}}, "updateRow called from line: $line");
+
+   #$newdb{'tables'}{$table}{'rows'}[$id] = $cols;
+   return $id;
+}
+
+
 ######################################################################
 ######################################################################
 ## query
@@ -145,7 +171,13 @@ sub executeSchema {

 sub buildTables {
   foreach my $table (values %{$newdb{'tables'}}) {
-		printf(STDERR "%-30s : %d rows\n", $table->{'name'}, int(@{$table->{'rows'}}));
+		my $count = 0;
+      foreach (@{$table->{'rows'}}) {
+			next unless defined $_;
+			++$count;
+		}
+		
+		printf(STDERR "%-30s : %d rows\n", $table->{'name'}, $count);

      foreach (@{$table->{'rows'}}) {
 			next unless defined $_;
@@ -437,9 +469,9 @@ foreach $row (@$result) {
 	    'comment' => undef });

   $newdb{'lookup'}{'account'}{$row->{'name'}}
-   = {'account' => $row->{'id'},
+   = {'account_id' => $row->{'id'},
 		'tillable' => $row->{'tillable'},
-      'ledger' => $newdb{'tables'}{'ledgers'}{'autoid'} };
+      'ledger_id' => $newdb{'tables'}{'ledgers'}{'autoid'} };

   if ((!defined $newdb{'tables'}{'accounts'}{'autoid'}) ||
       $row->{'id'} > $newdb{'tables'}{'accounts'}{'autoid'}) {
@@ -449,7 +481,7 @@ foreach $row (@$result) {

 # For compatibility, while deciding on account names
 $newdb{'lookup'}{'account'}{'Cash'}
-= $newdb{'lookup'}{'account'}{'Payment'};
+= $newdb{'lookup'}{'account'}{'Till'};

 $newdb{'lookup'}{'charge_type'} = {};
 $newdb{'lookup'}{'charge_type'}{'Rent'} =
@@ -474,15 +506,15 @@ foreach $row (@$result) {

 $newdb{'lookup'}{'payment_type'} = {};
 $newdb{'lookup'}{'payment_type'}{1}
-= { 'name' => 'Cash', 'account' => 'Cash', 'monetary_type' => $newdb{'lookup'}{'monetary_type'}{'Cash'} };
+= { 'name' => 'Cash', 'account_name' => 'Cash', 'monetary_type' => $newdb{'lookup'}{'monetary_type'}{'Cash'} };
 $newdb{'lookup'}{'payment_type'}{2}
-= { 'name' => 'Check', 'account' => 'Cash', 'monetary_type' => $newdb{'lookup'}{'monetary_type'}{'Check'} };
+= { 'name' => 'Check', 'account_name' => 'Cash', 'monetary_type' => $newdb{'lookup'}{'monetary_type'}{'Check'} };
 $newdb{'lookup'}{'payment_type'}{3}
-= { 'name' => 'Money Order', 'account' => 'Cash', 'monetary_type' => $newdb{'lookup'}{'monetary_type'}{'Money Order'} };
+= { 'name' => 'Money Order', 'account_name' => 'Cash', 'monetary_type' => $newdb{'lookup'}{'monetary_type'}{'Money Order'} };
 $newdb{'lookup'}{'payment_type'}{4}
-= { 'name' => 'ACH', 'account' => 'Bank', 'monetary_type' => $newdb{'lookup'}{'monetary_type'}{'ACH'} };
+= { 'name' => 'ACH', 'account_name' => 'Bank', 'monetary_type' => $newdb{'lookup'}{'monetary_type'}{'ACH'} };
 $newdb{'lookup'}{'payment_type'}{12}
-= { 'name' => 'Concession', 'account' => 'Concession', 'monetary_type' => $newdb{'lookup'}{'monetary_type'}{'Other Non-Tillable'} };
+= { 'name' => 'Concession', 'account_name' => 'Concession', 'monetary_type' => $newdb{'lookup'}{'monetary_type'}{'Other Non-Tillable'} };


 $newdb{'ids'}{'monetary_source'} = {};
@@ -490,14 +522,14 @@ $newdb{'ids'}{'monetary_source'}{'internal'} = undef;

 addRow('monetary_sources',
       { 'monetary_type_id' => $newdb{'lookup'}{'monetary_type'}{'Cash'}{'id'},
-	 'name' => 'Cash Source',
+	 'name' => 'Cash',
 	 'comment' => 'Monetary source used for any cash transaction' });
 $newdb{'ids'}{'monetary_source'}{'Cash'} =
   $newdb{'tables'}{'monetary_sources'}{'autoid'};

 addRow('monetary_sources',
       { 'monetary_type_id' => $newdb{'lookup'}{'monetary_type'}{'Other Non-Tillable'}{'id'},
-	 'name' => 'Closing Monies Credited',
+	 'name' => 'Closing',
 	 'comment' => 'Credited at the closing table' });
 $newdb{'ids'}{'monetary_source'}{'Closing'} =
   $newdb{'tables'}{'monetary_sources'}{'autoid'};
@@ -660,35 +692,21 @@ foreach $row (@{query($sdbh, $query)}) {

   $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'id'} =
      $newdb{'tables'}{'contacts'}{'autoid'};
-
-   # Every customer gets their own account
-   addRow('accounts',
-	  { 'type' => 'ASSET',
-		 'trackable' => 1,
-	    'name' => ('Customer #' . ($newdb{'tables'}{'customers'}{'autoid'}+1) .
-						' ('.$newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'name'} . ')'),
-			 'comment' => undef });
-			 #'comment' => 'For direct customer transaction, NOT lease charges!' });
-   addRow('ledgers',
-	  { 'account_id' => $newdb{'tables'}{'accounts'}{'autoid'},
-		 'open_stamp' => '2009-01-01',
-		 'comment' => undef });
-
-   $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'account'} =
-      $newdb{'tables'}{'accounts'}{'autoid'};
-   $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'ledger'} =
-      $newdb{'tables'}{'ledgers'}{'autoid'};
+   $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'account_id'} =
+		$newdb{'lookup'}{'account'}{'A/R'}{'account_id'};
+   $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'ledger_id'} =
+		$newdb{'lookup'}{'account'}{'A/R'}{'ledger_id'};

   addRow('customers',
 	  { 'name' => "$row->{'LastName'}, $row->{'FirstName'}",
 	    'primary_contact_id' => $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'id'},
-	    'account_id' => $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'account'} });
+	    'account_id' => $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'account_id'} });

-   $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'cust'} =
+   $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'customer_id'} =
      $newdb{'tables'}{'customers'}{'autoid'};

   addRow('contacts_customers',
-	  { 'customer_id' => $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'cust'},
+	  { 'customer_id' => $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'customer_id'},
 	    'contact_id' => $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'id'},
 	    'type' => 'TENANT' },
 	  1);
@@ -754,7 +772,7 @@ foreach $row (@{query($sdbh, $query)}) {
      $newdb{'tables'}{'contacts'}{'autoid'};

   addRow('contacts_customers',
-	  { 'customer_id' => $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'cust'},
+	  { 'customer_id' => $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'customer_id'},
 	    'contact_id' => $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'alt'},
 	    'type' => 'ALTERNATE' },
 	  1);
@@ -800,52 +818,26 @@ $query = "SELECT L.*, A.TenantID FROM TenantLedger L LEFT JOIN `Access` A ON A.L
 foreach $row (@{query($sdbh, $query)}) {

   $newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}
-   = { 'cust'    => $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'cust'} };
+   = { 'customer_id'  => $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'customer_id'} };

-	if (1) {
-   # Every lease gets its own account
-   addRow('accounts',
-	  { 'type' => 'ASSET',
-		 'trackable' => 1,
-	    'name' => ('Lease #' . $row->{'LedgerID'}
-						. ' ('.$newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'name'} . ')'),
-			 'comment' => undef });
-			 #'comment' => 'For lease related transaction, NOT personal charges!' });
-   addRow('ledgers',
-	  { 'account_id' => $newdb{'tables'}{'accounts'}{'autoid'},
-		 'open_stamp' => datefmt($row->{'DateIn'}),
-	    'comment' => undef });
-
-	$newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}{'account'}
-	= $newdb{'tables'}{'accounts'}{'autoid'};
-	$newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}{'ledger'}
-	= $newdb{'tables'}{'ledgers'}{'autoid'};
-	}
-	else {
-	$newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}{'account'}
-   = $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'account'};
-	$newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}{'ledger'}
-   = $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'ledger'};
-	}
-
-	$newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}{'cust_account'}
-   = $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'account'};
-	$newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}{'cust_ledger'}
-   = $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'ledger'};
+	$newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}{'account_id'}
+   = $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'account_id'};
+	$newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}{'ledger_id'}
+   = $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'ledger_id'};

   addRow('leases',
 	  { 'number' => $row->{'LedgerID'},
 	    'lease_type_id' => $newdb{'tables'}{'lease_types'}{'autoid'},
 	    'unit_id' => $newdb{'lookup'}{'unit'}{$row->{'UnitID'}}{'id'},
-	    'customer_id' => $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'cust'},
-	    'account_id' => $newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}{'account'},
+	    'customer_id' => $newdb{'lookup'}{'tenant'}{$row->{'TenantID'}}{'customer_id'},
+	    'account_id' => $newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}{'account_id'},
 	    'lease_date' => datefmt($row->{'DateIn'}),
 	    'movein_date' => datefmt($row->{'DateIn'}),
 	    'moveout_date' => datefmt($row->{'DateOut'}),
 	    'close_date' => datefmt($row->{'DateClosed'}),
 	    'amount' => $row->{'Rent'} });

-   $newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}{'lease'} =
+   $newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}{'lease_id'} =
 		$newdb{'tables'}{'leases'}{'autoid'};
 }

@@ -868,6 +860,8 @@ $newdb{'lookup'}{'charge'} = {};

 $query = "SELECT * FROM Charges ORDER BY ChargeID";
 foreach $row (@{query($sdbh, $query)}) {
+	my $credit_ledger_id;
+	my $ledger_entry_id;

   addRow('transactions',
 	  { 'stamp' => datefmt($row->{'ChargeDate'}),
@@ -875,56 +869,45 @@ foreach $row (@{query($sdbh, $query)}) {

   $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}
   = { 'tx' => $newdb{'tables'}{'transactions'}{'autoid'},
-       'ledger' => $newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}{'ledger'},
+       'ledger_id' => $newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}{'ledger_id'},
+	    #'ledger_id' => $newdb{'lookup'}{'account'}{'Invoice'}{'ledger_id'},
       'amount' => $row->{'ChargeAmount'},
       'tax_amount' => $row->{'TaxAmount'},
+		 'customer_id' => $newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}{'customer_id'},
+		 'lease_id' => $newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}{'lease_id'},
     };

-   addRow('ledger_entries',
-	  { 'monetary_source_id' => $newdb{'ids'}{'monetary_source'}{'internal'},
-	    'transaction_id' => $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'tx'},
-	    'debit_ledger_id' => $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'ledger'},
-	    'credit_ledger_id' => $newdb{'lookup'}{'charge_type'}{$row->{'ChargeDescription'}}{'ledger'},
-	    'amount' => $row->{'ChargeAmount'},
-	    'comment' => "Charge: $row->{'ChargeID'}; Ledger: $row->{'LedgerID'}" });
-
-   my $debit_entry_id = $newdb{'tables'}{'ledger_entries'}{'autoid'},
+	$credit_ledger_id = $newdb{'lookup'}{'charge_type'}{$row->{'ChargeDescription'}}{'ledger_id'};

   addRow('ledger_entries',
 	  { 'monetary_source_id' => $newdb{'ids'}{'monetary_source'}{'internal'},
 	    'transaction_id' => $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'tx'},
-	    'debit_ledger_id' => $newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}{'cust_ledger'},
-	    'credit_ledger_id' => $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'ledger'},
+	    'debit_ledger_id' => $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'ledger_id'},
+		 'credit_ledger_id' => $credit_ledger_id,
+		 'customer_id' => $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'customer_id'},
+		 'lease_id' => $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'lease_id'},
 	    'amount' => $row->{'ChargeAmount'},
 	    'comment' => "Charge: $row->{'ChargeID'}; Ledger: $row->{'LedgerID'}" });

-	$newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'terminal'}
-	= $debit_entry_id;
-   $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'entry'}
-   = $newdb{'tables'}{'ledger_entries'}{'autoid'},
-	$newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'ledger'}
-	= $newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}{'cust_ledger'};
-
-   addRow('reconciliations',
-	  { 'debit_ledger_entry_id'  => $debit_entry_id,
-	    'credit_ledger_entry_id' => $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'entry'},
-		 'terminal_ledger_entry_id' => $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'terminal'},
-	    'amount' => $row->{'ChargeAmount'},
-	  });
-
+   $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'ledger_entry_id'}
+   = $newdb{'tables'}{'ledger_entries'}{'autoid'};

   next unless $row->{'TaxAmount'};

+	$credit_ledger_id = $newdb{'lookup'}{'charge_type'}{'Tax'}{'ledger_id'};
+
   addRow('ledger_entries',
 	  { 'monetary_source_id' => $newdb{'ids'}{'monetary_source'}{'internal'},
 	    'transaction_id' => $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'tx'},
-	    'debit_ledger_id' => $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'ledger'},
-	    'credit_ledger_id' => $newdb{'lookup'}{'charge_type'}{'Tax'}{'ledger'},
+	    'debit_ledger_id' => $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'ledger_id'},
+		 'credit_ledger_id' => $credit_ledger_id,
+		 'customer_id' => $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'customer_id'},
+		 'lease_id' => $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'lease_id'},
 	    'amount' => $row->{'TaxAmount'},
 	    'comment' => undef });

   $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'tax_entry'}
-   = $newdb{'tables'}{'ledger_entries'}{'autoid'},
+   = $newdb{'tables'}{'ledger_entries'}{'autoid'};

 }

@@ -944,10 +927,10 @@ $query =
 foreach $row (@{query($sdbh, $query)}) {

   if ($newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}) {
-      die unless ($newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{'cust'}
-		  == $newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{'cust'});
+      die unless ($newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{'customer_id'}
+		  == $newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{'customer_id'});
      push(@{$newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{'ledgers'}},
-	   $newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}{'ledger'});
+	   $newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}{'ledger_id'});
      #print Dumper $receipt_map{$row->{'ReceiptNum'}};
      next;
   }
@@ -958,8 +941,12 @@ foreach $row (@{query($sdbh, $query)}) {

   $newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}
   = {'tx' => $newdb{'tables'}{'transactions'}{'autoid'},
-      'cust' => $newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}{'cust'},
-      'ledgers' => [ $newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}{'ledger'} ] };
+		# NOTE: Use of 'lease_id' would be invalid, since the
+		#       receipt could be for multiple leases. 'customer_id'
+		#       could be OK, but better to avoid this issue all
+		#       together by excluding them both from this lookup.
+      'ledgers' => [ $newdb{'lookup'}{'ledger'}{$row->{'LedgerID'}}{'ledger_id'} ] };
+
 }


@@ -975,50 +962,90 @@ $newdb{'lookup'}{'payment'} = {};
 $query = "SELECT * FROM Payments ORDER BY PaymentID";
 foreach $row (@{query($sdbh, $query)})
 {
-   my $monetary_source_id;
+	$newdb{'lookup'}{'payment'}{$row->{'PaymentID'}} = {};
+
   if ($row->{'PaymentDate'} =~ m%3/25/2009%) {
-      $monetary_source_id = $newdb{'ids'}{'monetary_source'}{'closing'};
+		$newdb{'lookup'}{'payment'}{$row->{'PaymentID'}}{'monetary_source_id'}
+		= $newdb{'ids'}{'monetary_source'}{'Closing'};
+		$newdb{'lookup'}{'payment'}{$row->{'PaymentID'}}{'account_name'}
+		= 'Bank';
   }
   else {
-      $monetary_source_id = $newdb{'ids'}{'monetary_source'}{
-	 $newdb{'lookup'}{'payment_type'}{$row->{'PaymentType'}}{'name'}
+		$newdb{'lookup'}{'payment'}{$row->{'PaymentID'}}{'monetary_source_id'}
+		= $newdb{'ids'}{'monetary_source'}{
+			$newdb{'lookup'}{'payment_type'}{$row->{'PaymentType'}}{'name'}
      };
+		$newdb{'lookup'}{'payment'}{$row->{'PaymentID'}}{'account_name'}
+		= $newdb{'lookup'}{'payment_type'}{$row->{'PaymentType'}}{'account_name'};
   }

-   if (!defined $monetary_source_id) {
-      addRow('monetary_sources',
-	     { 'monetary_type_id' => $newdb{'lookup'}{'payment_type'}{$row->{'PaymentType'}}{'monetary_type'}{'id'},
-	       'name' => $row->{'RecdFrom'},
-	       'comment' => "Payment: $row->{'PaymentID'}; Type: $row->{'PaymentType'}; Check: $row->{'CheckNum'}; $row->{'Memo'}" });
-      $monetary_source_id = $newdb{'tables'}{'monetary_sources'}{'autoid'};
-   }
+   if (!$newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{$row->{'PaymentType'}}{'monetary_source_id'}) {
+		if (!defined $newdb{'lookup'}{'payment'}{$row->{'PaymentID'}}{'monetary_source_id'}) {
+			my $name;
+			$name = $newdb{'lookup'}{'payment_type'}{$row->{'PaymentType'}}{'name'};
+			if ($name eq 'Check') {
+				$name = 'Check #' . $row->{'CheckNum'};
+			}
+			addRow('monetary_sources',
+					 { 'monetary_type_id' => $newdb{'lookup'}{'payment_type'}{$row->{'PaymentType'}}{'monetary_type'}{'id'},
+						'name' => $name,
+						'comment' => "Payment: $row->{'PaymentID'}; Type: $row->{'PaymentType'}; Check: $row->{'CheckNum'}; $row->{'Memo'}" });
+			$newdb{'lookup'}{'payment'}{$row->{'PaymentID'}}{'monetary_source_id'}
+			= $newdb{'tables'}{'monetary_sources'}{'autoid'};
+		}

-	my $payment_acct = $newdb{'lookup'}{'payment_type'}{$row->{'PaymentType'}}{'account'};
+		$newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{$row->{'PaymentType'}}{'monetary_source_id'}
+		= $newdb{'lookup'}{'payment'}{$row->{'PaymentID'}}{'monetary_source_id'};
+	}

-   addRow('ledger_entries',
-	  { 'monetary_source_id' => $monetary_source_id,
-	    'transaction_id' => $newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{'tx'},
-	    'debit_ledger_id' => $newdb{'lookup'}{'account'}{$payment_acct}{'ledger'},
-	    'credit_ledger_id' => $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'ledger'},
-	    'amount' => $row->{'PaymentAmount'},
-	    'comment' => "Receipt: $row->{'ReceiptNum'}; Payment: $row->{'PaymentID'}; Charge: $row->{'ChargeID'}" });
+	$newdb{'lookup'}{'payment'}{$row->{'PaymentID'}}{'debit_ledger_id'}
+	= $newdb{'lookup'}{'account'}{$newdb{'lookup'}{'payment'}{
+		$row->{'PaymentID'}}{'account_name'}
+	}{'ledger_id'};

-   $newdb{'lookup'}{'payment'}{$row->{'PaymentID'}}
-   = { 'entry' => $newdb{'tables'}{'ledger_entries'}{'autoid'} };
+	# Sitelink splits one physical payment into multiple "payments" to match each charge
+	# This is kludgy, but for our cases at least, brings those pseudo-payments back into
+	# a single one.  It presumes that there is only one PaymentType per receipt.
+   if (!$newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{$row->{'PaymentType'}}{'ledger_entry_id'}) {
+		addRow('ledger_entries',
+				 { 'monetary_source_id' => $newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{$row->{'PaymentType'}}{'monetary_source_id'},
+					'transaction_id' => $newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{'tx'},
+					'debit_ledger_id' => $newdb{'lookup'}{'payment'}{$row->{'PaymentID'}}{'debit_ledger_id'},
+					'credit_ledger_id' => $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'ledger_id'},
+					'customer_id' => $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'customer_id'},
+					#'lease_id' => $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'lease_id'},
+					'amount' => 0,
+					'comment' => "Receipt: $row->{'ReceiptNum'}; " });

-   # Reconcile Payment to the Charge.  Since tracking is due to
-   # the A/R account (Lease Account in this case), credit/debit
-   # is from the perspective of that account.  Namely, the charge
-   # was the debit to the A/R, and the payment was the credit.
+		$newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{$row->{'PaymentType'}}{'ledger_entry_id'}
+		= $newdb{'tables'}{'ledger_entries'}{'autoid'};
+	}
+
+	$newdb{'tables'}{'ledger_entries'}{'rows'}[
+		$newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{$row->{'PaymentType'}}{'ledger_entry_id'}
+	]{'amount'} += $row->{'PaymentAmount'};
+
+	$newdb{'tables'}{'ledger_entries'}{'rows'}[
+		$newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{$row->{'PaymentType'}}{'ledger_entry_id'}
+	]{'comment'} .= 'P:'.$row->{'PaymentID'} . '-&gt;C:' . $row->{'ChargeID'} . '; ';
+
+	# OK, now that the receipt is reconciled, update
+	# payment to reference the true ledger_entry_id
+	$newdb{'lookup'}{'payment'}{$row->{'PaymentID'}}{'ledger_entry_id'}
+	= $newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{$row->{'PaymentType'}}{'ledger_entry_id'};
+
+	# Figure out how much of the charge can be reconciled
   my $reconcile_amount = $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'amount'};
   $reconcile_amount = $row->{'PaymentAmount'} if $row->{'PaymentAmount'} <= $reconcile_amount;

+	# Reconcile the A/R account.  Since this is from the perspective
+	# of the A/R, charge is the debit, and payment is the credit
   addRow('reconciliations',
-	  { 'debit_ledger_entry_id'  => $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'entry'},
-	    'credit_ledger_entry_id' => $newdb{'lookup'}{'payment'}{$row->{'PaymentID'}}{'entry'},
-		 'terminal_ledger_entry_id' => $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'terminal'},
-	    'amount' => $reconcile_amount,
-	  });
+			 { 'type' => 'DEBIT',
+				'ledger_entry_id' => $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'ledger_entry_id'},
+				'transaction_id'  => $newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{'tx'},
+				'amount' => $reconcile_amount,
+			 });

   # Update the transaction to use the memo from this payment
   if ($row->{'Memo'}) {
@@ -1033,11 +1060,12 @@ foreach $row (@{query($sdbh, $query)})
 ## Fake Data for Testing

 my %fake =
-   ('custid' => 2,
+   ('customer_id' => 4,
+	 'ledger_id' => 4,
    'invoice' => [ { 'id'      => 1000,
 		     'date'    => '2009-05-05',
 		     'entry'   => [ { 'id'      => 2100,
-				      'account' => 'Security Deposit',
+				      'account_name' => 'Security Deposit',
 				      'amount'  => 10,
 				      'tax'     => 0 },
 				  ],
@@ -1046,7 +1074,7 @@ my %fake =
 		     'date'    => '2009-05-01',
 		     'thru'    => '2009-05-31',
 		     'entry'   => [ { 'id'      => 2110,
-				      'account' => 'Rent',
+				      'account_name' => 'Rent',
 				      'amount'  => 100,
 				      'tax'     => 5 },
 				  ],
@@ -1054,7 +1082,7 @@ my %fake =
 		   { 'id'      => 1002,
 		     'date'    => '2009-05-11',
 		     'entry'   => [ { 'id'      => 2120,
-				      'account' => 'Late Charge',
+				      'account_name' => 'Late Charge',
 				      'amount'  => 25,
 				      'tax'     => 0 },
 				  ],
@@ -1115,105 +1143,138 @@ my %fake =

   );		  

+sub fakeTesting {
+	$newdb{'ids'}{'ledger'}{'Cash-Old'} =
+		$newdb{'lookup'}{'account'}{'Cash'}{'ledger_id'};

-$newdb{'ids'}{'ledger'}{'Cash-Old'} =
-   $newdb{'lookup'}{'account'}{'Cash'}{'ledger'};
+	addRow('ledgers',
+			 { 'account_id' => $newdb{'lookup'}{'account'}{'Cash'}{'account_id'},
+				'open_stamp' => 'NOW()',
+				'sequence' => 2,
+				'comment' => 'Opened new ledger for testing' });

-addRow('ledgers',
-       { 'account_id' => $newdb{'lookup'}{'account'}{'Cash'}{'account'},
-			'open_stamp' => 'NOW()',
-			'sequence' => 2,
-			'comment' => 'Opened new ledger for testing' });
+	$newdb{'lookup'}{'account'}{'Cash'}{'ledger_id'} =
+		$newdb{'tables'}{'ledgers'}{'autoid'};

-$newdb{'lookup'}{'account'}{'Cash'}{'ledger'} =
-   $newdb{'tables'}{'ledgers'}{'autoid'};
+	my $balance = 0;
+	foreach $row (@{$newdb{'tables'}{'ledger_entries'}{'rows'}}) {
+		next unless defined $row;
+		$balance += $row->{'amount'}
+		if $row->{'debit_ledger_id'} == $newdb{'ids'}{'ledger'}{'Cash-Old'};
+		$balance -= $row->{'amount'}
+		if $row->{'credit_ledger_id'} == $newdb{'ids'}{'ledger'}{'Cash-Old'};
+	}

-my $balance = 0;
-foreach $row (@{$newdb{'tables'}{'ledger_entries'}{'rows'}}) {
-   next unless defined $row;
-   $balance += $row->{'amount'}
-     if $row->{'debit_ledger_id'} == $newdb{'ids'}{'ledger'}{'Cash-Old'};
-   $balance -= $row->{'amount'}
-     if $row->{'credit_ledger_id'} == $newdb{'ids'}{'ledger'}{'Cash-Old'};
-}
+	addRow('transactions',
+			 { 'stamp' => '2009-05-10' });

-addRow('transactions',
-       { 'stamp' => '2009-05-10' });
-
-addRow('ledger_entries',
-       { 'monetary_source_id' => $newdb{'ids'}{'monetary_source'}{'internal'},
-	 'transaction_id' => $newdb{'tables'}{'transactions'}{'autoid'},
-	 'debit_ledger_id' => $newdb{'lookup'}{'account'}{'Cash'}{'ledger'},
-	 'credit_ledger_id' => $newdb{'ids'}{'ledger'}{'Cash-Old'},
-	 'amount' => $balance,
-	 'name' => "Close Out ($newdb{'ids'}{'ledger'}{'Cash-Old'} -> $newdb{'tables'}{'transactions'}{'autoid'})",
-	 'comment' => "Carrying forward old ledger balance onto new ledger" });
+	addRow('ledger_entries',
+			 { 'monetary_source_id' => $newdb{'ids'}{'monetary_source'}{'internal'},
+				'transaction_id' => $newdb{'tables'}{'transactions'}{'autoid'},
+				'debit_ledger_id' => $newdb{'lookup'}{'account'}{'Cash'}{'ledger_id'},
+				'credit_ledger_id' => $newdb{'ids'}{'ledger'}{'Cash-Old'},
+				'amount' => $balance,
+				'name' => "Close Out ($newdb{'ids'}{'ledger'}{'Cash-Old'} -> $newdb{'tables'}{'transactions'}{'autoid'})",
+				'comment' => "Carrying forward old ledger balance onto new ledger" });
 # NOTE: no tracking for the Cash account

-$newdb{'tables'}{'ledgers'}{'rows'}[$newdb{'ids'}{'ledger'}{'Cash-Old'}]{'closed'} = 1;
-$newdb{'tables'}{'ledgers'}{'rows'}[$newdb{'ids'}{'ledger'}{'Cash-Old'}]{'close_stamp'} = 'NOW()';
+	$newdb{'tables'}{'ledgers'}{'rows'}[$newdb{'ids'}{'ledger'}{'Cash-Old'}]{'closed'} = 1;
+	$newdb{'tables'}{'ledgers'}{'rows'}[$newdb{'ids'}{'ledger'}{'Cash-Old'}]{'close_stamp'} = 'NOW()';

-foreach my $ir ('invoice', 'receipt') {
-   foreach my $tx (@{$fake{$ir}}) {
-      #print Dumper ${%$tx{'date'}};
-      #exit;
-      addRow('transactions',
-	     { 'id' => $tx->{'id'},
-	       'stamp' => $tx->{'date'},
-	       'through_date' => $tx->{'thru'},
-	       'comment' => "Fake $ir" },
-	     1);
+	foreach my $ir ('invoice', 'receipt') {
+		foreach my $tx (@{$fake{$ir}}) {
+			#print Dumper ${%$tx{'date'}};
+			#exit;
+			addRow('transactions',
+					 { 'id' => $tx->{'id'},
+						'stamp' => $tx->{'date'},
+						'through_date' => $tx->{'thru'},
+						'comment' => "Fake $ir" },
+					 1);

-      foreach my $e (@{$tx->{'entry'}}) {
-	 my $dr = ($ir eq 'invoice') ? 'A/R' : 'Cash';
-	 my $cr = ($ir eq 'invoice') ? $e->{'account'} : 'A/R';
-	 my $monetary_source_id;
+			foreach my $e (@{$tx->{'entry'}}) {
+				my $crdr = ($ir eq 'invoice') ? 'Invoice' : 'Receipt';
+				my $dr = ($ir eq 'invoice') ? 'A/R' : 'Cash';
+				$crdr = $dr;
+				my $cr = ($ir eq 'invoice') ? $e->{'account_name'} : 'A/R';
+				my $monetary_source_id;

-	 if (defined $e->{'type'}) {
-	    addRow('monetary_sources',
-		   { 'monetary_type_id' => $e->{'type'},
-		     'name' => "Money of type " . $e->{'type'},
-		     'comment' => "Fake Money For " . $e->{'id'} });
-	    $monetary_source_id = $newdb{'tables'}{'monetary_sources'}{'autoid'};
-	 }
-	 else {
-	    $monetary_source_id = $newdb{'ids'}{'monetary_source'}{'internal'};
-	 }
+				if (defined $e->{'type'}) {
+					addRow('monetary_sources',
+							 { 'monetary_type_id' => $e->{'type'},
+								'name' => "Money of type " . $e->{'type'},
+								'comment' => "Fake Money For " . $e->{'id'} });
+					$monetary_source_id = $newdb{'tables'}{'monetary_sources'}{'autoid'};
+				}
+				else {
+					$monetary_source_id = $newdb{'ids'}{'monetary_source'}{'internal'};
+				}

-	 addRow('ledger_entries',
-		{ 'id' => $e->{'id'},
-		  'monetary_source_id' => $monetary_source_id,
-		  'transaction_id' => $tx->{'id'},
-		  'debit_ledger_id' => $newdb{'lookup'}{'account'}{$dr}{'ledger'},
-		  'credit_ledger_id' => $newdb{'lookup'}{'account'}{$cr}{'ledger'},
-		  'amount' => $e->{'amount'},
-		  'comment' => "Fake $ir entry" },
-		1);
+				addRow('ledger_entries',
+						 { 'id' => $e->{'id'},
+							'monetary_source_id' => $monetary_source_id,
+							'transaction_id' => $tx->{'id'},
+							'debit_ledger_id' => $newdb{'lookup'}{'account'}{$crdr}{'ledger_id'},
+							'credit_ledger_id' => $newdb{'lookup'}{'account'}{$cr}{'ledger_id'},
+							'customer_id' => $fake{'customer_id'},
+							'lease_id' => $fake{'lease_id'},
+							'amount' => $e->{'amount'},
+							'comment' => "Fake $ir entry" },
+						 1);

-	 foreach my $t (@{$e->{'track'}}) {
-	    addRow('reconciliations',
-		   { 'debit_ledger_entry_id'  => $t->{'debit'},
-		     'credit_ledger_entry_id' => $e->{'id'},
-			  'terminal_ledger_entry_id' => $t->{'debit'},
-		     'amount' => $t->{'amount'}
-		   });
-	 }
+# 	 addRow('ledger_entries',
+# 		{ 'id' => $e->{'id'},
+# 		  'monetary_source_id' => $monetary_source_id,
+# 		  'transaction_id' => $tx->{'id'},
+# 		  'debit_ledger_id' => $newdb{'lookup'}{'account'}{$dr}{'ledger_id'},
+# 		  'credit_ledger_id' => $newdb{'lookup'}{'account'}{$crdr}{'ledger_id'},
+# 		  'customer_id' => $fake{'customer_id'},
+# 		  'lease_id' => $fake{'lease_id'},
+# 		  'amount' => $e->{'amount'},
+# 		  'comment' => "Fake $ir entry" },
+# 		1);

-	 next unless $e->{'tax'};
+				foreach my $t (@{$e->{'track'}}) {
+					addRow('reconciliations',
+							 { 'type' => 'DEBIT',
+								'ledger_entry_id' => $t->{'debit'},
+								'transaction_id'  => $tx->{'id'},
+								'amount' => $t->{'amount'}
+							 });
+				}

-	 addRow('ledger_entries',
-		{ 'id' => $e->{'id'}+1,
-		  'monetary_source_id' => $monetary_source_id,
-		  'transaction_id' => $tx->{'id'},
-		  'debit_ledger_id' => $newdb{'lookup'}{'account'}{$dr}{'ledger'},
-		  'credit_ledger_id' => $newdb{'lookup'}{'account'}{'Tax'}{'ledger'},
-		  'amount' => $e->{'tax'},
-		  'comment' => "Fake Tax" },
-		1);
-      }
-   }
+				next unless $e->{'tax'};
+
+				addRow('ledger_entries',
+						 { 'id' => $e->{'id'}+1,
+							'monetary_source_id' => $monetary_source_id,
+							'transaction_id' => $tx->{'id'},
+							'debit_ledger_id' => $newdb{'lookup'}{'account'}{$crdr}{'ledger_id'},
+							'credit_ledger_id' => $newdb{'lookup'}{'account'}{'Tax'}{'ledger_id'},
+							'customer_id' => $fake{'customer_id'},
+							'lease_id' => $fake{'lease_id'},
+							'amount' => $e->{'amount'},
+							'comment' => "Fake Tax" },
+						 1);
+
+# 	 addRow('ledger_entries',
+# 		{ 'id' => $e->{'id'}+1,
+# 		  'monetary_source_id' => $monetary_source_id,
+# 		  'transaction_id' => $tx->{'id'},
+# 		  'debit_ledger_id' => $newdb{'lookup'}{'account'}{$dr}{'ledger_id'},
+# 		  'credit_ledger_id' => $newdb{'lookup'}{'account'}{$crdr}{'ledger_id'},
+# 		  'customer_id' => $fake{'customer_id'},
+# 		  'lease_id' => $fake{'lease_id'},
+# 		  'amount' => $e->{'tax'},
+# 		  'comment' => "Fake Tax" },
+# 		1);
+			}
+		}
+	}
 }

+#fakeTesting();
+
 $Data::Dumper::Sortkeys = 1;
 print Dumper \%newdb;
 # exit;
--- a/site/app_controller.php
+++ b/site/app_controller.php
@@ -305,7 +305,13 @@ class AppController extends Controller {
      $id = 'id';
      extract(array_intersect_key($fields, array_flip($special)));
      foreach ($records AS &$record) {
+	if (!isset($record[$table]))
+	  continue;
+
 	foreach (array_diff_key($fields, array_flip($special)) AS $field) {
+	  if (!isset($record[$table][$id]) || !isset($record[$table][$field]))
+	    continue;
+
 	  // DEBUG PURPOSES ONLY!
 	  //$params['linkrecord'][] = compact('table', 'field', 'id', 'controller', 'record');
 	  $record[$table][$field] =
@@ -338,30 +344,40 @@ class AppController extends Controller {
  }

  function jqGridDataOutputRecords(&$params, &$model, &$records) {
-    $model_alias = $model->alias;
-    $id          = 'jqGrid_id';
-
+    $id_field    = 'jqGrid_id';
    foreach ($records AS $record) {
-      echo " <row id='{$record[$id]}'>\n";
-      foreach ($params['fields'] AS $field) {
-	if (preg_match("/\./", $field)) {
-	  list($tbl, $col) = explode(".", $field);
-	  $data = $record[$tbl][$col];
-	}
-	else {
-	  $data = $record[$model_alias][$field];
-	}
-
-	// be sure to put text data in CDATA
-	if (preg_match("/^\d*$/", $data))
-	  echo "  <cell>$data</cell>\n"; 
-	else
-	  echo "  <cell><![CDATA[$data]]></cell>\n"; 
-      }
-      echo " </row>\n";
+      $this->jqGridDataOutputRecord($params, $model, $record,
+				    $record[$id_field], $params['fields']);
    }
  }

+  function jqGridDataOutputRecord(&$params, &$model, &$record, $id, $fields) {
+    echo " <row id='$id'>\n";
+    foreach ($fields AS $field) {
+      $this->jqGridDataOutputRecordField($params, $model, $record, $field);
+    }
+    echo " </row>\n";
+  }
+
+  function jqGridDataOutputRecordField(&$params, &$model, &$record, $field) {
+    if (preg_match("/\./", $field)) {
+      list($tbl, $col) = explode(".", $field);
+      $data = $record[$tbl][$col];
+    }
+    else {
+      $data = $record[$model->alias][$field];
+    }
+    $this->jqGridDataOutputRecordCell($params, $model, $record, $field, $data);
+  }
+
+  function jqGridDataOutputRecordCell(&$params, &$model, &$record, $field, $data) {
+    // be sure to put text data in CDATA
+    if (preg_match("/^\d*$/", $data))
+      echo "  <cell>$data</cell>\n"; 
+    else
+      echo "  <cell><![CDATA[$data]]></cell>\n"; 
+  }
+
  function jqGridDataFinalize(&$params) {
    if ($params['debug']) {
      $xml = ob_get_contents();
--- a/site/controllers/leases_controller.php
+++ b/site/controllers/leases_controller.php
@@ -71,6 +71,7 @@ class LeasesController extends AppController {
  function jqGridRecordLinks(&$params, &$model, &$records, $links) {
    $links['Lease'] = array('number');
    $links['Unit'] = array('name');
+    $links['Customer'] = array('name');
    return parent::jqGridRecordLinks($params, $model, $records, $links);
  }

@@ -107,7 +108,6 @@ class LeasesController extends AppController {
 	     array(// Models
 		   'LeaseType',
 		   'Unit',
-		   'Account' => array('CurrentLedger'),
 		   'Customer',
 		   ),
 	     'conditions' => array(array('Lease.id' => $id)),
@@ -115,23 +115,15 @@ class LeasesController extends AppController {
 	     )
       );

-    // Summarize each ledger
-    $this->Lease->statsMerge($lease, 
-			     $this->Lease->stats($lease['Lease']['id']));
-
    // Obtain the overall lease balance
    $this->Lease->statsMerge($lease['Lease'],
 			     array('stats' => $this->Lease->stats($id)));
-    $outstanding_balance = $lease['Lease']['stats']['Account']['Ledger']['balance'];
+    $outstanding_balance = $lease['Lease']['stats']['balance'];

    // Determine the lease security deposit
    $deposits = $this->Lease->findSecurityDeposits($lease['Lease']['id']);
    $outstanding_deposit = $deposits['summary']['balance'];

-    // Move the Leder stats into our alias 'CurrentLedger'
-    $lease['Account']['CurrentLedger'] += $lease['Account']['Ledger'];
-    unset($lease['Account']['Ledger']);
-
    // Prepare to render
    $title = 'Lease: #' . $lease['Lease']['id'];
    $this->set(compact('lease', 'title',
--- a/site/controllers/ledger_entries_controller.php
+++ b/site/controllers/ledger_entries_controller.php
@@ -25,7 +25,15 @@ class LedgerEntriesController extends AppController {
   *    to jqGrid.
   */

-  function jqGridDataTables(&$params, &$model) {
+  function jqGridDataSetup(&$params) {
+    parent::jqGridDataSetup($params);
+    if (isset($params['custom']['ar_account'])) {
+      $params['custom']['account_id'] = 
+	$this->LedgerEntry->DebitLedger->Account->accountReceivableAccountID();
+    }
+  }
+
+  function jqGridDataCountTables(&$params, &$model) {
    $link =
      array(// Models
 	     'Transaction' =>
@@ -36,6 +44,16 @@ class LedgerEntriesController extends AppController {
 	     array('fields' => array('id', 'name'),
 		   ),

+	     'Customer' =>
+	     array('fields' => array('id', 'name'),
+		   ),
+
+	     'Lease' =>
+	     array('fields' => array('id', 'number'),
+		   'Unit' => 
+		   array('fields' => array('id', 'name'),
+			 ),
+		   ),
 	    );

    if (isset($params['custom']['account_ftype'])) {
@@ -77,26 +95,86 @@ class LedgerEntriesController extends AppController {
 	      );
    }

+    if (isset($params['custom']['account_id']) || isset($params['custom']['lease_id'])) {
+      if (isset($params['custom']['account_id']))
+	$account_id = $params['custom']['account_id'];
+      else
+	$account_id =
+	  $this->LedgerEntry->DebitLedger->Account->accountReceivableAccountID();
+
+      $link['Ledger'] =
+	array('fields' => array('id', 'sequence'),
+	      'conditions' => ("Ledger.id = IF(DebitLedger.account_id = $account_id," .
+			       "               LedgerEntry.credit_ledger_id," .
+			       "               LedgerEntry.debit_ledger_id)"),
+	      'Account' => array(
+				 'fields' => array('id', 'name'),
+				 ),
+	      );
+    }
+
+    if (isset($params['custom']['lease_id'])) {
+      $account_id = $params['custom']['lease_id'];
+      $link['Transaction']['ReconciledLedgerEntry'] =
+	array('fields' => array('id', 'Reconciliation.amount', 'Reconciliation.type'),
+	      );
+    }
+
    if (isset($params['custom']['reconcile_id'])) {
      $ftype = $params['custom']['account_ftype'];
      $ftype = $this->LedgerEntry->DebitLedger->Account->fundamentalOpposite($ftype);
-      $ftype = ucfirst($ftype);
-      $link[$ftype.'ReconciliationLedgerEntry'] =
-	array('fields' => array('Reconciliation.amount'));
+      $link['ReconcilingTransaction'] =
+	array('fields' => array('Reconciliation.amount'),
+	      'conditions' => array('Reconciliation.type' => $ftype),
+	      );
    }

    return array('link' => $link);
  }

+  function jqGridDataTables(&$params, &$model) {
+    return $this->jqGridDataCountTables($params, $model);
+  }
+
  function jqGridDataFields(&$params, &$model) {
+    if (isset($params['custom']['lease_id'])) {
+      $account_id =
+	$this->LedgerEntry->DebitLedger->Account->accountReceivableAccountID();
+
+      $fields = array('id', 'name', 'comment', 'amount');
+      $fields[] = ("IF(DebitLedger.account_id = $account_id," .
+		   "   SUM(IF(ReconciledLedgerEntry.amount IS NULL," .
+		   "          LedgerEntry.amount," .
+		   "          ReconciledLedgerEntry.amount))," .
+		   "   NULL) AS debit");
+      $fields[] = ("IF(CreditLedger.account_id = $account_id," .
+		   "   SUM(IF(ReconciledLedgerEntry.amount IS NULL," .
+		   "          LedgerEntry.amount," .
+		   "          ReconciledLedgerEntry.amount))," .
+		   "   NULL) AS credit");
+
+      $Account = new Account();
+      $account_ftype = ucfirst($Account->fundamentalType($account_id));
+      $fields[] = ("(IF({$account_ftype}Ledger.account_id = $account_id, 1, -1)" .
+		   " * SUM(IF(ReconciledLedgerEntry.amount IS NULL," .
+		   "          LedgerEntry.amount," .
+		   "          ReconciledLedgerEntry.amount)))" .
+		   " AS balance");
+
+      return $fields;
+    }
+
    $ledger_id = (isset($params['custom']['ledger_id'])
 		  ? $params['custom']['ledger_id']
 		  : null);
+    $account_id = (isset($params['custom']['account_id'])
+		     ? $params['custom']['account_id']
+		     : null);
    $account_type = (isset($params['custom']['account_type'])
 		     ? $params['custom']['account_type']
 		     : null);

-    return $model->ledgerContextFields2($ledger_id, $account_type);
+    return $model->ledgerContextFields2($ledger_id, $account_id, $account_type);
  }

  function jqGridDataConditions(&$params, &$model) {
@@ -109,13 +187,44 @@ class LedgerEntriesController extends AppController {

    $conditions = parent::jqGridDataConditions($params, $model);

-    if ($params['action'] === 'ledger') {
+    if ($params['action'] === 'ledger' && isset($ledger_id)) {
      $conditions[] = $model->ledgerContextConditions($ledger_id, $account_type);
    }
+
    if (isset($params['custom']['reconcile_id'])) {
      $ftype = $params['custom']['account_ftype'];
      //$ftype = $this->LedgerEntry->DebitLedger->Account->fundamentalOpposite($ftype);
-      $conditions[] = array('Reconciliation.'.$ftype.'_ledger_entry_id' => $params['custom']['reconcile_id']);
+      //$link['ReconcilingTransaction']['conditions'][] = array('Reconciliation.type' => $ftype);
+      $conditions[] = array('Reconciliation.ledger_entry_id' => $params['custom']['reconcile_id']);
+	
+    }
+
+    if (isset($params['custom']['account_id'])) {
+      $conditions[] =
+	array('OR' =>
+	      array(array('CreditAccount.id' => $params['custom']['account_id']),
+		    array('DebitAccount.id' => $params['custom']['account_id'])));
+/*       $conditions[] = */
+/* 	array('Account.id' => $params['custom']['account_id']); */
+
+    }
+
+    if (isset($params['custom']['customer_id'])) {
+      $conditions[] = 
+	array('Customer.id' => $params['custom']['customer_id']);
+    }
+
+    if (isset($params['custom']['lease_id'])) {
+      $conditions[] = 
+	array('OR' => array
+	      (array('Lease.id' => $params['custom']['lease_id']),
+	       array('ReconciledLedgerEntry.lease_id' => $params['custom']['lease_id']),
+	       ));
+    }
+
+    if (isset($params['custom']['transaction_id'])) {
+      $conditions[] = 
+	array('Transaction.id' => $params['custom']['transaction_id']);
    }

    return $conditions;
@@ -124,14 +233,13 @@ class LedgerEntriesController extends AppController {
  function jqGridRecordLinks(&$params, &$model, &$records, $links) {
    $links['Transaction']    = array('id');
    $links['LedgerEntry']    = array('id');
-    if (isset($params['custom']['account_ftype']) || isset($params['custom']['ledger_id'])) {
-      $links['Account']   = array('controller' => 'accounts', 'name');
-    }
-    else {
-      $links['DebitAccount']   = array('controller' => 'accounts', 'name');
-      $links['CreditAccount']  = array('controller' => 'accounts', 'name');
-    }
+    $links['Account']        = array('controller' => 'accounts', 'name');
+    $links['DebitAccount']   = array('controller' => 'accounts', 'name');
+    $links['CreditAccount']  = array('controller' => 'accounts', 'name');
    $links['MonetarySource'] = array('name');
+    $links['Customer']       = array('name');
+    $links['Lease']          = array('number');
+    $links['Unit']           = array('name');
    return parent::jqGridRecordLinks($params, $model, $records, $links);
  }

@@ -145,8 +253,39 @@ class LedgerEntriesController extends AppController {
  function jqGridDataOrder(&$params, &$model, $index, $direction) {
 /*     if ($index === 'balance') */
 /*       return ($index .' '. $direction); */
+    $order = parent::jqGridDataOrder($params, $model, $index, $direction);

-    return parent::jqGridDataOrder($params, $model, $index, $direction);
+    if ($index === 'Transaction.stamp') {
+      $order[] = 'LedgerEntry.id ' . $direction;
+    }
+
+    return $order;
+  }
+
+  function jqGridRecordsPostProcess(&$params, &$model, &$records) {
+    parent::jqGridRecordsPostProcess($params, $model, $records);
+
+    $subtotal = 0;
+    foreach ($records AS &$record) {
+      $amount = (isset($record['LedgerEntry']['balance'])
+		 ? $record['LedgerEntry']['balance']
+		 : $record['LedgerEntry']['amount']);
+      $record['LedgerEntry']['subtotal'] = ($subtotal += $amount);
+
+      continue;
+      // Experiment to minimize columns by putting the monetary source
+      // as the Account, when available
+      if ($record['MonetarySource']['name'])
+	$record['Account']['name'] = $record['MonetarySource']['name'];
+    }
+  }
+
+  function jqGridDataOutputRecordCell(&$params, &$model, &$record, $field, $data) {
+/*     if ($field === 'CreditAccount.name') { */
+/*       $data .= '-OK'; */
+/*     } */
+
+    parent::jqGridDataOutputRecordCell($params, $model, $record, $field, $data);
  }


@@ -167,6 +306,7 @@ class LedgerEntriesController extends AppController {
    $entry = $this->LedgerEntry->find
      ('first',
       array('contain' => array('MonetarySource.id',
+				'MonetarySource.name',
 				'MonetarySource.MonetaryType.id',
 				'Transaction.id',
 				'Transaction.stamp',
@@ -176,6 +316,9 @@ class LedgerEntriesController extends AppController {
 				'CreditLedger.id',
 				'CreditLedger.sequence',
 				'CreditLedger.account_id',
+				'Customer.id',
+				'Customer.name',
+				'Lease.id',
 				),

 	     'fields' => array('LedgerEntry.id',
@@ -184,6 +327,7 @@ class LedgerEntriesController extends AppController {

 	     'conditions' => array('LedgerEntry.id' => $id),
 	     ));
+    //pr($entry);

    // Because 'DebitLedger' and 'CreditLedger' both relate to 'Account',
    // CakePHP will not include them in the LedgerEntry->find (or so it
@@ -213,8 +357,8 @@ class LedgerEntriesController extends AppController {
      $stats['credit_amount_remaining'] = $entry['LedgerEntry']['amount'] - $stats['credit_amount_reconciled'];
    //pr($stats);

-    $reconciled = $this->LedgerEntry->findReconciledLedgerEntries($id);
-    //pr($reconciled);
+    $reconciled = $this->LedgerEntry->findReconcilingTransactions($id);
+    //pr(compact('reconciled'));

    // Prepare to render.
    $title = "Ledger Entry #{$entry['LedgerEntry']['id']}";
--- a/site/controllers/transactions_controller.php
+++ b/site/controllers/transactions_controller.php
@@ -41,6 +41,43 @@ class TransactionsController extends AppController {
   *    to jqGrid.
   */

+  function jqGridDataSetup(&$params) {
+    parent::jqGridDataSetup($params);
+  }
+
+  function jqGridDataTables(&$params, &$model) {
+    $link = array();
+
+    if (isset($params['custom']['reconcile_ledger_entry_id'])) {
+      $ftype = $params['custom']['reconcile_type'];
+      //$ftype = $this->Transaction->LedgerEntry->DebitLedger->Account->fundamentalOpposite($ftype);
+      $link['ReconciledLedgerEntry'] =
+	array('fields' => array('Reconciliation.amount'),
+	      'conditions' => array('Reconciliation.type' => $ftype)
+	      );
+    }
+
+    return array('link' => $link);
+  }
+
+  function jqGridDataFields(&$params, &$model) {
+    return parent::jqGridDataFields($params, $model);
+  }
+
+  function jqGridDataConditions(&$params, &$model) {
+    $conditions = parent::jqGridDataConditions($params, $model);
+
+    if (isset($params['custom']['reconcile_ledger_entry_id'])) {
+/*       $ftype = $params['custom']['reconcile_type']; */
+/*       $ftype = $this->LedgerEntry->DebitLedger->Account->fundamentalOpposite($ftype); */
+/*       $conditions[] = array('Reconciliation.type' => $ftype); */
+      $conditions[] = array('Reconciliation.ledger_entry_id'
+			    => $params['custom']['reconcile_ledger_entry_id']);
+    }
+
+    return $conditions;
+  }
+
  function jqGridRecordLinks(&$params, &$model, &$records, $links) {
    $links['Transaction'] = array('id');
    return parent::jqGridRecordLinks($params, $model, $records, $links);
--- a/site/controllers/units_controller.php
+++ b/site/controllers/units_controller.php
@@ -121,7 +121,7 @@ class UnitsController extends AppController {
    // Get the balance on each lease.
    foreach ($unit['Lease'] AS &$lease) {
      $stats = $this->Unit->Lease->stats($lease['id']);
-      $lease['balance'] = $stats['Account']['Ledger']['balance'];
+      $lease['balance'] = $stats['balance'];
    }

    $outstanding_balance = 0;
@@ -130,7 +130,7 @@ class UnitsController extends AppController {
      // Figure out the outstanding balance of the current lease.
      $stats = $this->Unit->stats($id);
      $outstanding_balance =
-	$stats['CurrentLease']['Account']['Ledger']['balance'];
+	$stats['CurrentLease']['balance'];

      // Figure out the total security deposit for the current lease.
      $deposits = $this->Unit->Lease->findSecurityDeposits($unit['CurrentLease']['id']);
--- a/site/models/account.php
+++ b/site/models/account.php
@@ -82,37 +82,26 @@ class Account extends AppModel {
  /**************************************************************************
   **************************************************************************
   **************************************************************************
-   * function: securityDepositAccountID
-   *  - Returns the ID of the Security Deposit Account
+   * function: accountNameToID
+   *  - Returns the ID of the named account
   */
-  function securityDepositAccountID() {
+  function accountNameToID($name) {
    $this->cacheQueries = true;
    $account = $this->find('first', array
 			   ('recursive' => -1,
-			    'conditions' => array
-			    (array('name' => 'Security Deposit')),
+			    'conditions' => compact('name'),
 			    ));
    $this->cacheQueries = false;
    return $account['Account']['id'];
  }

-
-  /**************************************************************************
-   **************************************************************************
-   **************************************************************************
-   * function:rentAccountID
-   *  - Returns the ID of the Rent Account
-   */
-  function rentAccountID() {
-    $this->cacheQueries = true;
-    $account = $this->find('first', array
-			   ('recursive' => -1,
-			    'conditions' => array
-			    (array('name' => 'Rent')),
-			    ));
-    $this->cacheQueries = false;
-    return $account['Account']['id'];
-  }
+  function securityDepositAccountID()   { return $this->accountNameToID('Security Deposit'); }
+  function rentAccountID()              { return $this->accountNameToID('Rent'); }
+  function accountReceivableAccountID() { return $this->accountNameToID('A/R'); }
+  function invoiceAccountID()           { return $this->accountReceivableAccountID(); }
+  function receiptAccountID()           { return $this->accountReceivableAccountID(); }
+  //function invoiceAccountID()           { return $this->accountNameToID('Invoice'); }
+  //function receiptAccountID()           { return $this->accountNameToID('Receipt'); }


  /**************************************************************************
@@ -122,22 +111,19 @@ class Account extends AppModel {
   *  - Returns an array of ledger ids from the given account
   */
  function ledgers($id, $all = false) {
-    $cachekey = $all ? 'all' : 'current';
-    if (isset($this->cache[$id]['ledgers'][$cachekey])) {
-      return $this->cache[$id]['ledgers'][$cachekey];
-    }
-
    if ($all) {
      $contain = array('Ledger' => array('fields' => array('Ledger.id')));
    } else {
      $contain = array('CurrentLedger' => array('fields' => array('CurrentLedger.id')));
    }

+    $this->cacheQueries = true;
    $account = $this->find('first', array
 			   ('contain' => $contain,
 			    'fields' => array(),
 			    'conditions' => array(array('Account.id' => $id)),
 			    ));
+    $this->cacheQueries = false;

    if ($all) {
      $ledger_ids = array();
@@ -148,14 +134,11 @@ class Account extends AppModel {
      $ledger_ids = array($account['CurrentLedger']['id']);
    }

-    // Save the ledgers in our cache for future reference
-    $this->cache[$id]['ledgers'][$cachekey] = $ledger_ids;
-
 /*     pr(array('function' => 'Account::ledgers', */
 /* 	     'args' => compact('id', 'all'), */
-/* 	     'return' => $this->cache[$id]['ledgers'][$cachekey])); */
+/* 	     'return' => $ledger_ids)); */

-    return $this->cache[$id]['ledgers'][$cachekey];
+    return $ledger_ids;
  }


@@ -234,25 +217,29 @@ class Account extends AppModel {
   *    (such as charges not paid).
   */

-  function findUnreconciledLedgerEntries($id = null, $fundamental_type = null) {
+  function findUnreconciledLedgerEntries($id = null, $fundamental_type = null, $cond = null) {
+    if (!isset($cond))
+      $cond = array();
+    $cond[] = array('Account.id' => $id);
+
    foreach (($fundamental_type
 	      ? array($fundamental_type)
 	      : array('debit', 'credit')) AS $fund) {
      $ucfund = ucfirst($fund);
-      $unreconciled[$fund]['entry'] = $this->find
+      $unreconciled[$fund]['LedgerEntry'] = $this->find
 	('all', array
 	 ('link' => array
 	  ('Ledger' => array
 	   ('fields' => array(),
-	    "LedgerEntry" => array
+	    'LedgerEntry' => array
 	    ('class' => "{$ucfund}LedgerEntry",
 	     'fields' => array('id', 'amount'),
-	     "ReconciliationLedgerEntry" => array
-	     ('class' => "{$ucfund}ReconciliationLedgerEntry",
-	      'fields' => array
+	     'ReconcilingTransaction' => array
+	     ('fields' => array
 	      ("COALESCE(SUM(Reconciliation.amount),0) AS 'reconciled'",
 	       "LedgerEntry.amount - COALESCE(SUM(Reconciliation.amount),0) AS 'balance'",
 	       ),
+	      'conditions' => array('Reconciliation.type' => $fund),
 	      ),
 	     ),
 	    ),
@@ -260,11 +247,11 @@ class Account extends AppModel {
 	  'group' => ("LedgerEntry.id" .
 		      " HAVING LedgerEntry.amount" .
 		      " <> COALESCE(SUM(Reconciliation.amount),0)"),
-	  'conditions' => array('Account.id' => $id),
+	  'conditions' => $cond,
 	  'fields' => array(),
 	  ));
      $balance = 0;
-      foreach ($unreconciled[$fund]['entry'] AS &$entry) {
+      foreach ($unreconciled[$fund]['LedgerEntry'] AS &$entry) {
 	$entry = array_merge(array_diff_key($entry["LedgerEntry"], array(0=>true)),
 			     $entry[0]);
 	$balance += $entry['balance'];
@@ -290,24 +277,24 @@ class Account extends AppModel {
   *    whatever algorithm is simplest.
   */

-  function reconcileNewLedgerEntry($id, $fundamental_type, $amount) {
+  function reconcileNewLedgerEntry($id, $fundamental_type, $amount, $cond = null) {
    $ofund = $this->fundamentalOpposite($fundamental_type);
-    $unreconciled = array($ofund => array('entry'=>array(), 'balance'=>0));
+    $unreconciled = array($ofund => array('LedgerEntry'=>array(), 'balance'=>0));
    $applied = 0;

    // if there is no money in the entry, it can reconcile nothing
    // don't bother wasting time sifting ledger entries.
    if ($amount > 0) {
-      $unreconciled = $this->findUnreconciledLedgerEntries($id, $ofund);
+      $unreconciled = $this->findUnreconciledLedgerEntries($id, $ofund, $cond);

-      foreach ($unreconciled[$ofund]['entry'] AS $i => &$entry) {
+      foreach ($unreconciled[$ofund]['LedgerEntry'] AS $i => &$entry) {
 	// Determine if amount is sufficient to cover the entry
 	if ($amount > $entry['balance'])
 	  $apply = $entry['balance'];
 	elseif ($amount > 0)
 	  $apply = $amount;
 	else {
-	  unset($unreconciled[$ofund]['entry'][$i]);
+	  unset($unreconciled[$ofund]['LedgerEntry'][$i]);
 	  continue;
 	}

--- a/site/models/behaviors/linkable.php
+++ b/site/models/behaviors/linkable.php
@@ -85,6 +85,28 @@ class LinkableBehavior extends ModelBehavior {

 	protected $_defaults = array('type' => 'LEFT');
 	
+	function pr($lev, $mixed) {
+		if ($lev >= 5)
+			return;
+
+		pr($mixed);
+		return;
+
+		$trace = debug_backtrace(false);
+		//array_shift($trace);
+		$calls = array();
+		foreach ($trace AS $call) {
+			$call = array_intersect_key($call,
+						    array('file'=>1,
+							  'line'=>1,
+							  //'class'=>1,
+							  'function'=>1,
+							  ));
+			$calls[] = implode("; ", $call);
+		}
+		pr(array('debug' => $mixed, 'stack' => $calls));
+	}
+
 	/*
 	 * This is a function for made recursive str_replaces in an array
 	 * NOTE: The palacement of this function is terrible, but I don't
@@ -108,7 +130,10 @@ class LinkableBehavior extends ModelBehavior {
 	}

 	public function beforeFind(&$Model, $query) {
-/* 	  pr("Linkable::beforeFind() begin"); pr($query); */
+		$this->pr(10,
+			  array('function' => 'Linkable::beforeFind',
+				'args' => array('Model->alias' => '$Model->alias') + compact('query'),
+				));
 		if (isset($query[$this->_key])) {
 			$optionsDefaults = $this->_defaults + array('reference' =>
 			                                            array('class' => $Model->alias,
@@ -132,7 +157,10 @@ class LinkableBehavior extends ModelBehavior {
 					unset($iterator['defaults']);
 				}
 				$iterations = Set::normalize($iterator);
-/* 				pr(array('checkpoint' => 'Iterations', compact('iterations'))); */
+				$this->pr(25,
+					  array('checkpoint' => 'Iterations',
+						compact('iterations'),
+						));
 				foreach ($iterations as $alias => $options) {
 					if (is_null($options)) {
 						$options = array();
@@ -145,7 +173,15 @@ class LinkableBehavior extends ModelBehavior {
 					if (empty($options['class']))
 						$options['class'] = $alias;

-/* 					pr(array('checkpoint' => 'Begin Model Work', compact('alias', 'options'))); */
+					if (!isset($options['conditions']))
+						$options['conditions'] = array();
+					elseif (!is_array($options['conditions']))
+						$options['conditions'] = array($options['conditions']);
+
+					$this->pr(20,
+						  array('checkpoint' => 'Begin Model Work',
+							compact('alias', 'options'),
+							));

 					$modelClass     = $options['class'];
 					$modelAlias     = $options['alias'];
@@ -154,11 +190,13 @@ class LinkableBehavior extends ModelBehavior {

 					$_Model =& ClassRegistry::init($modelClass);         // the incoming model to be linked in query
 					$Reference =& ClassRegistry::init($referenceClass);  // the already in query model that links to $_Model
-/* 					pr(array('checkpoint' => 'Aliases Established', */
-/* 						 'Model' => ($modelAlias .' : '. $modelClass . */
-/* 							     ' ('. $_Model->alias .' : '. $_Model->name .')'), */
-/* 						 'Reference' => ($referenceAlias .' : '. $referenceClass . */
-/* 								 ' ('. $Reference->alias .' : '. $Reference->name .')'))); */
+					$this->pr(12,
+						  array('checkpoint' => 'Aliases Established',
+							'Model' => ($modelAlias .' : '. $modelClass .
+								    ' ('. $_Model->alias .' : '. $_Model->name .')'),
+							'Reference' => ($referenceAlias .' : '. $referenceClass .
+									' ('. $Reference->alias .' : '. $Reference->name .')'),
+							));

 					$db =& $_Model->getDataSource();

@@ -169,20 +207,20 @@ class LinkableBehavior extends ModelBehavior {
 					// a relationship if one doesn't otherwise already exists.
 				        if (($associations = $Reference->getAssociated()) &&
 					    isset($associations[$_Model->alias])) {
-/* 						pr("Reference defines association to _Model"); */
+						$this->pr(12, array('checkpoint' => "Reference defines association to _Model"));
 						$associatedThroughReference = 1;
 						$type = $associations[$_Model->alias];
 						$association = $Reference->{$type}[$_Model->alias];
 					}
 					elseif (($associations = $_Model->getAssociated()) &&
 					    isset($associations[$Reference->alias])) {
-/* 						pr("_Model defines association to Reference"); */
+						$this->pr(12, array('checkpoint' => "_Model defines association to Reference"));
 						$type = $associations[$Reference->alias];
 						$association = $_Model->{$type}[$Reference->alias];
 					}
 					else {
 						// No relationship... make our best effort to create one.
-/* 						pr("No assocation between _Model and Reference"); */
+						$this->pr(12, array('checkpoint' => "No assocation between _Model and Reference"));
 						$type = 'belongsTo';
 						$_Model->bind($Reference->alias);
 						// Grab the association now, since we'll unbind in a moment.
@@ -212,93 +250,119 @@ class LinkableBehavior extends ModelBehavior {
 								       $associationAlias,
 								       $association['conditions']);

-/* 					pr(array('checkpoint' => 'Models Established - Check Associations', */
-/* 						 'primaryModel' => $primaryAlias .' : '. $primaryModel->name, */
-/* 						 'foreignModel' => $foreignAlias .' : '. $foreignModel->name, */
-/* 						 compact('type', 'association'))); */
+					$this->pr(15,
+						  array('checkpoint' => 'Models Established - Check Associations',
+							'primaryModel' => $primaryAlias .' : '. $primaryModel->name,
+							'foreignModel' => $foreignAlias .' : '. $foreignModel->name,
+							compact('type', 'association'),
+							));

-					if (empty($options['conditions'])) {
-						if ($type === 'hasAndBelongsToMany') {
-							if (isset($association['with']))
-								$linkClass = $association['with'];
-							else
-								$linkClass = Inflector::classify($association['joinTable']);
+					if ($type === 'hasAndBelongsToMany') {
+						if (isset($association['with']))
+							$linkClass = $association['with'];
+						else
+							$linkClass = Inflector::classify($association['joinTable']);

-							$Link =& $_Model->{$linkClass};
+						$Link =& $_Model->{$linkClass};

-							if (isset($options['linkalias']))
-								$linkAlias = $options['linkalias'];
-							else
-								$linkAlias = $Link->alias;
+						if (isset($options['linkalias']))
+							$linkAlias = $options['linkalias'];
+						else
+							$linkAlias = $Link->alias;

-							// Get the foreign key fields (for the link table) directly from
-							// the defined model associations, if they exists.  This is the
-							// users direct specification, and therefore definitive if present.
-							$modelLink = $Link->escapeField($association['foreignKey'], $linkAlias);
-							$referenceLink = $Link->escapeField($association['associationForeignKey'], $linkAlias);
+						$this->pr(17,
+							  array('checkpoint' => 'Linking HABTM',
+								compact('linkClass', 'linkAlias'),
+								));

-							// If we haven't figured out the foreign keys, see if there is a
-							// model for the link table, and if it has the appropriate
-							// associations with the two tables we're trying to join.
-							if (empty($modelLink) && isset($Link->belongsTo[$_Model->alias]))
-								$modelLink = $Link->escapeField($Link->belongsTo[$_Model->alias]['foreignKey'], $linkAlias);
-							if (empty($referenceLink) && isset($Link->belongsTo[$Reference->alias]))
-								$referenceLink = $Link->escapeField($Link->belongsTo[$Reference->alias]['foreignKey'], $linkAlias);
+						// Get the foreign key fields (for the link table) directly from
+						// the defined model associations, if they exists.  This is the
+						// users direct specification, and therefore definitive if present.
+						$modelLink = $Link->escapeField($association['foreignKey'], $linkAlias);
+						$referenceLink = $Link->escapeField($association['associationForeignKey'], $linkAlias);

-							// We're running quite thin here.  None of the models spell
-							// out the appropriate linkages.  We'll have to SWAG it.
-							if (empty($modelLink))
-								$modelLink = $Link->escapeField(Inflector::underscore($_Model->alias) . '_id', $linkAlias);
-							if (empty($referenceLink))
-								$referenceLink = $Link->escapeField(Inflector::underscore($Reference->alias) . '_id', $linkAlias);
+						// If we haven't figured out the foreign keys, see if there is a
+						// model for the link table, and if it has the appropriate
+						// associations with the two tables we're trying to join.
+						if (empty($modelLink) && isset($Link->belongsTo[$_Model->alias]))
+							$modelLink = $Link->escapeField($Link->belongsTo[$_Model->alias]['foreignKey'], $linkAlias);
+						if (empty($referenceLink) && isset($Link->belongsTo[$Reference->alias]))
+							$referenceLink = $Link->escapeField($Link->belongsTo[$Reference->alias]['foreignKey'], $linkAlias);

-							// Get the primary key from the tables we're joining.
-							$referenceKey = $Reference->escapeField(null, $referenceAlias);
-							$modelKey = $_Model->escapeField(null, $modelAlias);
+						// We're running quite thin here.  None of the models spell
+						// out the appropriate linkages.  We'll have to SWAG it.
+						if (empty($modelLink))
+							$modelLink = $Link->escapeField(Inflector::underscore($_Model->alias) . '_id', $linkAlias);
+						if (empty($referenceLink))
+							$referenceLink = $Link->escapeField(Inflector::underscore($Reference->alias) . '_id', $linkAlias);
+
+						// Get the primary key from the tables we're joining.
+						$referenceKey = $Reference->escapeField(null, $referenceAlias);
+						$modelKey = $_Model->escapeField(null, $modelAlias);
 								
-							// Join the linkage table to our model.  We'll use an inner join,
-							// as the whole purpose of the linkage table is to make this
-							// connection.  As we are embedding this join, the INNER will not
-							// cause any problem with the overall query, should the user not
-							// be concerned with whether or not the join has any results.
-							// They control that with the 'type' parameter which will be at
-							// the top level join.
-							$options['joins'][] = array('type'  => 'INNER',
-							                            'alias' => $modelAlias,
-							                            'conditions' => "{$modelKey} = {$modelLink}",
-							                            'table' => $db->fullTableName($_Model, true));
-
-							// Now for the top level join.  This will be added into the list
-							// of joins down below, outside of the HABTM specific code.
-							$options['class'] = $linkClass;
-							$options['alias'] = $linkAlias;
-							$options['table'] = $Link->getDataSource()->fullTableName($Link);
-							$options['conditions'][] = "{$referenceLink} = {$referenceKey}";
-						}
-						elseif (isset($association['foreignKey']) && $association['foreignKey']) {
-							$foreignKey = $primaryModel->escapeField($association['foreignKey'], $primaryAlias);
-							$primaryKey = $foreignModel->escapeField($foreignModel->primaryKey, $foreignAlias);
-
-							// Only differentiating to help show the logical flow.
-							// Either way works and this test can be tossed out
-							if (($type === 'hasMany' || $type === 'hasOne') ^ $associatedThroughReference)
-								$options['conditions'][] = "{$primaryKey} = {$foreignKey}";
-							else
-								$options['conditions'][] = "{$foreignKey} = {$primaryKey}";
-						}
-						else {
-							// No Foreign Key... nothing we can do.
-							$options['conditions'] = array();
-						}
-
-						// The user may have specified conditions directly in the model
-						// for this join.  Make sure to adhere to those conditions.
-						if (isset($association['conditions']) && is_array($association['conditions']))
-							$options['conditions'] = array_merge($options['conditions'], $association['conditions']);
-						elseif (!empty($association['conditions']))
-							$options['conditions'][] = $association['conditions'];
+						// Join the linkage table to our model.  We'll use an inner join,
+						// as the whole purpose of the linkage table is to make this
+						// connection.  As we are embedding this join, the INNER will not
+						// cause any problem with the overall query, should the user not
+						// be concerned with whether or not the join has any results.
+						// They control that with the 'type' parameter which will be at
+						// the top level join.
+						$options['joins'][] = array('type'  => 'INNER',
+									    'alias' => $modelAlias,
+									    'conditions' => "{$modelKey} = {$modelLink}",
+									    'table' => $db->fullTableName($_Model, true));

+						// Now for the top level join.  This will be added into the list
+						// of joins down below, outside of the HABTM specific code.
+						$options['class'] = $linkClass;
+						$options['alias'] = $linkAlias;
+						$options['table'] = $Link->getDataSource()->fullTableName($Link);
+						$options['conditions'][] = "{$referenceLink} = {$referenceKey}";
 					}
+					elseif (isset($association['foreignKey']) && $association['foreignKey']) {
+						$foreignKey = $primaryModel->escapeField($association['foreignKey'], $primaryAlias);
+						$primaryKey = $foreignModel->escapeField($foreignModel->primaryKey, $foreignAlias);
+
+						$this->pr(17,
+							  array('checkpoint' => 'Linking due to foreignKey',
+								compact('foreignKey', 'primaryKey'),
+								));
+
+						// Only differentiating to help show the logical flow.
+						// Either way works and this test can be tossed out
+						if (($type === 'hasMany' || $type === 'hasOne') ^ $associatedThroughReference)
+							$options['conditions'][] = "{$primaryKey} = {$foreignKey}";
+						else
+							$options['conditions'][] = "{$foreignKey} = {$primaryKey}";
+					}
+					else {
+						$this->pr(17,
+							  array('checkpoint' => 'Linking with no logic (expecting user defined)',
+								));
+
+						// No Foreign Key... nothing we can do.
+					}
+
+					$this->pr(19,
+						  array('checkpoint' => 'Conditions',
+							array('options[conditions]' => $options['conditions'],
+							      'association[conditions]' => $association['conditions'],
+							      ),
+							));
+
+					// The user may have specified conditions directly in the model
+					// for this join.  Make sure to adhere to those conditions.
+					if (isset($association['conditions']) && is_array($association['conditions']))
+						$options['conditions'] = array_merge($options['conditions'], $association['conditions']);
+					elseif (!empty($association['conditions']))
+						$options['conditions'][] = $association['conditions'];
+
+					$this->pr(19,
+						  array('checkpoint' => 'Conditions2',
+							array('options[conditions]' => $options['conditions'],
+							      ),
+							));
+
 					if (empty($options['table'])) {
 						$options['table'] = $db->fullTableName($_Model, true);
 					}
@@ -312,26 +376,31 @@ class LinkableBehavior extends ModelBehavior {
 								       (empty($association['fields']) 
 									? array() : $db->fields($_Model, $modelAlias, $association['fields'])));
 									       
-/* 					pr(array('checkpoint' => 'Model Work Complete', compact('options', 'modelClass', 'modelAlias'))); */
-
 					$options[$this->_key] = am($options[$this->_key], array_diff_key($options, $optionsKeys));
 					$options = array_intersect_key($options, $optionsKeys);
 					if (!empty($options[$this->_key])) {
 						$iterators[] = $options[$this->_key] +
 							array('defaults' =>
-										array_merge($defaults,
+							      array_merge($defaults,
 							                  array('reference' =>
 							                        array('class' => $modelClass,
 							                              'alias' => $modelAlias))));
 					}
 					$query['joins'][] = array_intersect_key($options, array('type' => true, 'alias' => true, 'table' => true, 'joins' => true, 'conditions' => true));
+
+					$this->pr(19,
+						  array('checkpoint' => 'Model Join Complete',
+							compact('options', 'modelClass', 'modelAlias', 'query'),
+							));
 				}
 				++$cont;
 				$notDone = isset($iterators[$cont]);
 			} while ($notDone);
 		}
-/* 		pr(array('checkpoint' => 'Linkable::beforeFind() end', */
-/* 		         compact('query'))); */
+		$this->pr(20,
+			  array('function' => 'Linkable::beforeFind',
+				'return' => compact('query'),
+				));
 		return $query;
 	}
 }
--- a/site/models/customer.php
+++ b/site/models/customer.php
@@ -8,7 +8,6 @@ class Customer extends AppModel {
 	);

 	var $belongsTo = array(
-		'Account',
 		'PrimaryContact' => array(
 			'className' => 'Contact',
 		),
@@ -20,11 +19,19 @@ class Customer extends AppModel {
 			'conditions' => 'CurrentLease.close_date IS NULL',
 		),
 		'Lease',
-		'Transaction',
+		'LedgerEntry',
+
+		// Cheat to get Account set as part of this class
+		'Account',
 	);

 	var $hasAndBelongsToMany = array(
 		'Contact',
+		'Transaction' => array(
+			'joinTable' => 'ledger_entries',
+			'foreignKey' => 'customer_id',
+			'associationForeignKey' => 'transaction_id',
+		),
 	);


@@ -80,16 +87,9 @@ class Customer extends AppModel {
 /* 	     )); */

    $entries = $this->Account->findLedgerEntriesRelatedToAccount
-      ($this->accountId($id),
+      ($this->Account->invoiceAccountID(),
       $this->Account->securityDepositAccountID(),
-       true, null, $link);
-
-    foreach ($this->leaseIds($id) AS $lease_id) {
-      $ledger_entries = $this->Lease->findSecurityDeposits($lease_id, $link);
-      $this->statsMerge($entries['summary'], $ledger_entries['summary']);
-      $entries['Entries'] = array_merge($entries['Entries'],
-					$ledger_entries['Entries']);
-    }
+       true, array('LedgerEntry.customer_id' => $id), $link);

 /*     pr(array('function' => 'Customer::findSecurityDeposits', */
 /* 	     'args' => compact('id', 'link'), */
@@ -110,22 +110,10 @@ class Customer extends AppModel {
   */

  function findUnreconciledLedgerEntries($id = null, $fundamental_type = null) {
-
    $unreconciled = $this->Account->findUnreconciledLedgerEntries
-      ($this->accountId($id), $fundamental_type);
-
-    foreach ($this->leaseIds($id) AS $lease_id) {
-      $unrec = $this->Lease->findUnreconciledLedgerEntries($lease_id,
-							   $fundamental_type);
-
-      foreach (array_keys($unreconciled) AS $type) {
-	$left  = &$unreconciled[$type];
-	$right = &$unrec[$type];
-
-	$left['entry']    = array_merge($left['entry'], $right['entry']);
-	$left['balance'] += $right['balance'];
-      }
-    }
+      ($this->Account->accountReceivableAccountID(),
+       $fundamental_type,
+       array('LedgerEntry.customer_id' => $id));

    return $unreconciled;
  }
@@ -146,25 +134,11 @@ class Customer extends AppModel {
   */

  function reconcileNewLedgerEntry($id, $fundamental_type, $amount) {
-
    $reconciled = $this->Account->reconcileNewLedgerEntry
-      ($this->accountId($id), $fundamental_type, $amount);
-
-    foreach ($this->leaseIds($id) AS $lease_id) {
-      foreach (array_keys($reconciled) AS $type) {
-	$rec = $this->Lease->reconcileNewLedgerEntry($lease_id,
-						     $fundamental_type,
-						     $reconciled[$type]['unapplied']);
-
-	$left  = &$reconciled[$type];
-	$right = &$rec[$type];
-
-	$left['entry']      = array_merge($left['entry'], $right['entry']);
-	$left['balance']   += $right['balance'];
-	$left['applied']   += $right['applied'];
-	$left['unapplied']  = $right['unapplied'];
-      }
-    }
+      ($this->Account->accountReceivableAccountID(),
+       $fundamental_type,
+       $amount,
+       array('LedgerEntry.customer_id' => $id));

    return $reconciled;
  }
@@ -189,7 +163,6 @@ class Customer extends AppModel {
 	       'ContactEmail',
 	       'ContactAddress',
 	       ),
-	 'Account',
 	 'Lease' =>
 	 array('Unit' =>
 	       array('order'  => array('sort_order'),
@@ -201,22 +174,12 @@ class Customer extends AppModel {
 	'conditions' => array('Customer.id' => $id),
 	));

-    // Add the lease balance to each lease.
-    foreach ($customer['Lease'] AS &$lease) {
-      $stats = $this->Lease->stats($lease['id']);
-      $lease['balance'] = $stats['Account']['Ledger']['balance'];
-    }
-
-    // Figure out the outstanding balance of the current lease.
+    // Figure out the outstanding balance for this customer
    $customer['stats'] = $this->stats($id);

    // Figure out the total security deposit for the current lease.
    $customer['deposits'] = $this->findSecurityDeposits($id);

-    // Add statistics into the customer account.
-    $customer['Account'] = array_merge($customer['Account'],
-				       $customer['stats']['Account']['Ledger']);
-
    return $customer;
  }

@@ -232,29 +195,11 @@ class Customer extends AppModel {
    if (!$id)
      return null;

-    // Get the basic information necessary
-    $customer = $this->find('first',
-			    array('contain' =>
-				  array('Account' => array
-					('fields' => array('Account.id')),
-
-					'Lease'   => array
-					('fields' => array('Lease.id'))
-					),
-				  'conditions' => array
-				  (array('Customer.id' => $id))));
-
-    // Get stats from the customer account, and each lease
-    $stats['Account'] = $this->Account->stats($customer['Account']['id']);
-    foreach ($customer['Lease'] AS $lease) {
-      $this->statsMerge($stats['Lease'], $this->Lease->stats($lease['id']));
-    }
-
-    // Merge the stats from both the customer specific account, as
-    // well as the leases.  This will provide current customer standing.
-    $this->statsMerge($stats, $stats['Account']['Ledger']);
-    $this->statsMerge($stats, $stats['Lease']['Account']['Ledger']);
+    $stats = $this->Account->stats($this->Account->accountReceivableAccountID(), true,
+				   array('LedgerEntry.customer_id' => $id));

+    // Pull to the top level and return
+    $stats = $stats['Ledger'];
    return $stats;
  }

--- a/site/models/lease.php
+++ b/site/models/lease.php
@@ -25,11 +25,18 @@ class Lease extends AppModel {
 	var $belongsTo = array(
 		'LeaseType',
 		'Unit',
-		'Account',
 		'Customer',
 		'LateSchedule',
 	);

+	var $hasMany = array(
+		'LedgerEntry',
+
+		// Cheat to get Account set as part of this class
+		'Account',
+	);
+
+
  /**************************************************************************
   **************************************************************************
   **************************************************************************
@@ -37,15 +44,7 @@ class Lease extends AppModel {
   *  - Returns the accountId of the given lease
   */
  function accountId($id) {
-    $this->cacheQueries = true;
-    $lease = $this->find('first', array
-			  ('recursive' => -1,
-			   'fields' => array('account_id'),
-			   'conditions' => array(array('id' => $id)),
-			   ));
-    $this->cacheQueries = false;
-
-    return $lease['Lease']['account_id'];
+    return $this->Account->invoiceAccountID();
  }


@@ -61,6 +60,10 @@ class Lease extends AppModel {
 /* 	     'args' => compact('id', 'all', 'cond', 'link'), */
 /* 	     )); */

+    if (!isset($cond))
+      $cond = array();
+    $cond[] = array('LedgerEntry.lease_id' => $id);
+
    $entries = $this->Account->findLedgerEntries($this->accountId($id),
 						 $all, $cond, $link);

@@ -87,7 +90,7 @@ class Lease extends AppModel {
    $entries = $this->Account->findLedgerEntriesRelatedToAccount
      ($this->accountId($id),
       $this->Account->securityDepositAccountID(),
-       true, null, $link);
+       true, array('LedgerEntry.lease_id' => $id), $link);

 /*     pr(array('function' => 'Lease::findSecurityDeposits', */
 /* 	     'args' => compact('id', 'link'), */
@@ -108,7 +111,7 @@ class Lease extends AppModel {

  function findUnreconciledLedgerEntries($id = null, $fundamental_type = null) {
    return $this->Account->findUnreconciledLedgerEntries
-      ($this->accountId($id), $fundamental_type);
+      ($this->accountId($id), $fundamental_type, array('LedgerEntry.lease_id' => $id));
  }


@@ -128,7 +131,7 @@ class Lease extends AppModel {

  function reconcileNewLedgerEntry($id, $fundamental_type, $amount) {
    return $this->Account->reconcileNewLedgerEntry
-      ($this->accountId($id), $fundamental_type, $amount);
+      ($this->accountId($id), $fundamental_type, $amount, array('LedgerEntry.lease_id' => $id));
  }


@@ -143,18 +146,15 @@ class Lease extends AppModel {
    if (!$id)
      return null;

-    // Find the associated account.
-    $lease = $this->find('first',
-			 array('recursive' => -1,
-			       'conditions' => array(array('Lease.id' => $id))));
-
-    // Pull the stats from the account.
-    $stats['Account'] = $this->Account->stats($lease['Lease']['account_id']);
-
-    // Place a summary of the stats (one lease account in this case)
-    // at the top level for easy summarized access.
-    $this->statsMerge($stats, $stats['Account']['Ledger']);
+    $stats = $this->Account->stats($this->Account->accountReceivableAccountID(), true,
+				   array('OR' => array
+					 (array('LedgerEntry.lease_id' => $id),
+					  array('ReconciledLedgerEntry.lease_id' => $id),
+					  ),
+					 ));

+    // Pull to the top level and return
+    $stats = $stats['Ledger'];
    return $stats;
  }

--- a/site/models/ledger.php
+++ b/site/models/ledger.php
@@ -115,6 +115,9 @@ class Ledger extends AppModel {
   *  - Returns summary data from the requested ledger.
   */
  function stats($id, $cond = null) {
+    if (!isset($cond))
+      $cond = array();
+    $cond[] = array('Ledger.id' => $id);

    $stats = $this->find
      ('first', array
@@ -138,8 +141,7 @@ class Ledger extends AppModel {
                      ) * IF(LedgerEntry.amount, LedgerEntry.amount, 0)
                   ) AS balance",
 	      "COUNT(LedgerEntry.id) AS entries"),
-	'conditions' => array(isset($cond) ? $cond : array(),
-			      array('Ledger.id' => $id)),
+	'conditions' => $cond,
 	'group' => 'Ledger.id',
 	));

--- a/site/models/ledger_entry.php
+++ b/site/models/ledger_entry.php
@@ -11,6 +11,8 @@ class LedgerEntry extends AppModel {
 	var $belongsTo = array(
 		'MonetarySource',
 		'Transaction',
+		'Customer',
+		'Lease',

 		'DebitLedger' => array(
 			'className' => 'Ledger',
@@ -23,17 +25,11 @@ class LedgerEntry extends AppModel {
 	);

 	var $hasAndBelongsToMany = array(
-		'DebitReconciliationLedgerEntry' => array(
-			'className' => 'LedgerEntry',
+		'ReconcilingTransaction' => array(
+			'className' => 'Transaction',
 			'joinTable' => 'reconciliations',
-			'foreignKey' => 'credit_ledger_entry_id',
-			'associationForeignKey' => 'debit_ledger_entry_id',
-		),
-		'CreditReconciliationLedgerEntry' => array(
-			'className' => 'LedgerEntry',
-			'joinTable' => 'reconciliations',
-			'foreignKey' => 'debit_ledger_entry_id',
-			'associationForeignKey' => 'credit_ledger_entry_id',
+			'foreignKey' => 'transaction_id',
+			'associationForeignKey' => 'ledger_entry_id',
 		),
 	);

@@ -84,7 +80,7 @@ class LedgerEntry extends AppModel {
    return $fields;
  }

-  function ledgerContextFields2($ledger_id = null, $account_type = null) {
+  function ledgerContextFields2($ledger_id = null, $account_id = null, $account_type = null) {
    $fields = array('id', 'name', 'comment', 'amount');

    if (isset($ledger_id)) {
@@ -93,20 +89,29 @@ class LedgerEntry extends AppModel {
      $fields[] = ("IF(LedgerEntry.credit_ledger_id = $ledger_id," .
 		   "   SUM(LedgerEntry.amount), NULL) AS credit");

-      if (isset($account_type)) {
-	if (in_array($account_type, array('ASSET', 'EXPENSE')))
-	  $ledger_type = 'debit';
-	else
-	  $ledger_type = 'credit';
-
-	$fields[] = ("(IF(LedgerEntry.{$ledger_type}_ledger_id = $ledger_id," .
+      if (isset($account_id) || isset($account_type)) {
+	$Account = new Account();
+	$account_ftype = $Account->fundamentalType($account_id ? $account_id : $account_type);
+	$fields[] = ("(IF(LedgerEntry.{$account_ftype}_ledger_id = $ledger_id," .
 		     "    1, -1) * SUM(LedgerEntry.amount)) AS balance");
      }
    }
+    elseif (isset($account_id)) {
+      $fields[] = ("IF(DebitLedger.account_id = $account_id," .
+		   "   SUM(LedgerEntry.amount), NULL) AS debit");
+      $fields[] = ("IF(CreditLedger.account_id = $account_id," .
+		   "   SUM(LedgerEntry.amount), NULL) AS credit");
+
+      $Account = new Account();
+      $account_ftype = ucfirst($Account->fundamentalType($account_id));
+      $fields[] = ("(IF({$account_ftype}Ledger.account_id = $account_id," .
+		   "    1, -1) * SUM(LedgerEntry.amount)) AS balance");
+    }

    return $fields;
  }

+
  function ledgerContextConditions($ledger_id, $account_type) {
    if (isset($ledger_id)) {
      return array
@@ -156,36 +161,36 @@ class LedgerEntry extends AppModel {
  /**************************************************************************
   **************************************************************************
   **************************************************************************
-   * function: findReconciledLedgerEntries
-   *  - Returns ledger entries that are reconciled to the given entry.
-   *    (such as payments towards a charge).
+   * function: findReconcilingTransactions
+   *  - Returns transactions that reconcile the given entry
+   *    (such as receipts that reconcile a charge).
   */

-  function findReconciledLedgerEntries($id = null, $fundamental_type = null) {
+  function findReconcilingTransactions($id = null, $fundamental_type = null) {
    foreach (($fundamental_type
 	      ? array($fundamental_type)
 	      : array('debit', 'credit')) AS $fund) {
-      $ucfund = ucfirst($fund);
-      $reconciled[$fund]['entry'] = $this->find
+      $reconciled[$fund]['LedgerEntry'] = $this->find
 	('all', array
 	 ('link' => array
-	  ("ReconciliationLedgerEntry" => array
-	   ('class' => "{$ucfund}ReconciliationLedgerEntry",
-	    'fields' => array
+	  ('ReconcilingTransaction' => array
+	   ('fields' => array
 	    ('id',
 	     "COALESCE(SUM(Reconciliation.amount),0) AS 'reconciled'",
-	     "LedgerEntry.amount - COALESCE(SUM(Reconciliation.amount),0) AS 'balance'",
+	     //"ReconcilingTransaction.amount - COALESCE(SUM(Reconciliation.amount),0) AS 'balance'",
+	     "COALESCE(7) AS 'balance'",
 	     ),
+	    'conditions' => array('Reconciliation.type' => $fund),
 	    ),
 	   ),
-	  'group' => ("ReconciliationLedgerEntry.id"),
+	  'group' => ('ReconcilingTransaction.id'),
 	  'conditions' => array('LedgerEntry.id' => $id),
 	  'fields' => array(),
 	  ));
      //pr($reconciled);
      $balance = 0;
-      foreach ($reconciled[$fund]['entry'] AS &$entry) {
-	$entry = array_merge($entry["ReconciliationLedgerEntry"], $entry[0]);
+      foreach ($reconciled[$fund]['LedgerEntry'] AS &$entry) {
+	$entry = array_merge($entry["ReconcilingTransaction"], $entry[0]);
 	$balance += $entry['balance'];
      }
      $reconciled[$fund]['balance'] = $balance;
@@ -201,27 +206,31 @@ class LedgerEntry extends AppModel {
   * function: stats
   *  - Returns summary data from the requested ledger entry
   */
-  function stats($id) {
+  function stats($id, $cond = null) {
+
+    if (!isset($cond))
+      $cond = array();
+
+    $cond[] = array('LedgerEntry.id' => $id);

    $query = array
      (
+       'link' => array('ReconcilingTransaction'),
       'fields' => array("SUM(Reconciliation.amount) AS 'reconciled'"),
-
-       'conditions' => array(isset($cond) ? $cond : array(),
-			     array('LedgerEntry.id' => $id)),
-
       'group' => 'LedgerEntry.id',
       );

    // Get the applied amounts on the debit side
-    $query['link'] =
-      array('DebitReconciliationLedgerEntry' => array('alias' => 'DRLE', 'DRLETransaction' => array('class' => 'Transaction')));
+    $qcond = $cond;
+    $qcond[] = array('Reconciliation.type' => 'DEBIT');
+    $query['conditions'] = $qcond;
    $tmpstats = $this->find('first', $query);
    $stats['debit_amount_reconciled'] = $tmpstats[0]['reconciled'];

    // Get the applied amounts on the credit side
-    $query['link'] =
-      array('CreditReconciliationLedgerEntry' => array('alias' => 'CRLE', 'CRLETransaction' => array('class' => 'Transaction')));
+    $qcond = $cond;
+    $qcond[] = array('Reconciliation.type' => 'CREDIT');
+    $query['conditions'] = $qcond;
    $tmpstats = $this->find('first', $query);
    $stats['credit_amount_reconciled'] = $tmpstats[0]['reconciled'];

--- a/site/models/transaction.php
+++ b/site/models/transaction.php
@@ -14,6 +14,14 @@ class Transaction extends AppModel {
 		'LedgerEntry',
 	);

+	var $hasAndBelongsToMany = array(
+		'ReconciledLedgerEntry' => array(
+			'className' => 'LedgerEntry',
+			'joinTable' => 'reconciliations',
+			'foreignKey' => 'ledger_entry_id',
+			'associationForeignKey' => 'transaction_id',
+		),
+	);

 	function beforeSave() {
    
@@ -24,5 +32,40 @@ class Transaction extends AppModel {
 		return true;
 	}

+  /**************************************************************************
+   **************************************************************************
+   **************************************************************************
+   * function: findReconciledLedgerEntries
+   *  - Returns ledger entries that are reconciled by the given
+   *    transaction (such as charges reconciled by a receipt)
+   */
+
+  function findReconciledLedgerEntries($id = null) {
+    $reconciled['LedgerEntry'] = $this->find
+      ('all', array
+       ('link' => array
+	('ReconciledLedgerEntry' => array
+	 ('fields' => array
+	  ('id',
+	   "COALESCE(SUM(Reconciliation.amount),0) AS 'reconciled'",
+	   "ReconciledLedgerEntry.amount - COALESCE(SUM(Reconciliation.amount),0) AS 'balance'",
+	   ),
+	  ),
+	 ),
+	'group' => ('ReconciledLedgerEntry.id'),
+	'conditions' => array('Transaction.id' => $id),
+	'fields' => array(),
+	));
+    //pr($reconciled);
+    $balance = 0;
+    foreach ($reconciled['LedgerEntry'] AS &$entry) {
+      $entry = array_merge($entry["ReconciledLedgerEntry"], $entry[0]);
+      $balance += $entry['balance'];
+    }
+    $reconciled['balance'] = $balance;
+
+  return $reconciled;
+  }
+
 }
 ?>
--- a/site/views/customers/view.ctp
+++ b/site/views/customers/view.ctp
@@ -63,12 +63,14 @@ echo $this->element('leases',


 /**********************************************************************
- * Account
+ * Customer Account History
 */

-echo $this->element('accounts',
+echo $this->element('ledger_entries',
 		    array('caption' => 'Account',
-			  'accounts' => array($customer['Account'])));
+			  'customer_id' => $customer['Customer']['id'],
+			  'ar_account' => true,
+			  ));


 /* End "detail supporting" div */
--- a/site/views/elements/jqGrid.ctp
+++ b/site/views/elements/jqGrid.ctp
@@ -119,7 +119,7 @@ foreach ($jqGridColumns AS &$col) {
    }
    elseif ($col['formatter'] === 'date') {
      $default['formatoptions'] = array('newformat' => 'm/d/Y');
-      $default['width'] = 90;
+      $default['width'] = 100;
      $default['align'] = 'center';
    }
    elseif ($col['formatter'] === 'name' || $col['formatter'] === 'longname') {
@@ -143,8 +143,12 @@ foreach ($jqGridColumns AS &$col) {
 }

 // Set the default sort column
-reset($jqGridColumns);
-$sortname = current($jqGridColumns);
+if (isset($sort_column)) {
+  $sortname = $jqGridColumns[$sort_column];
+} else {
+  reset($jqGridColumns);
+  $sortname = current($jqGridColumns);
+}
 $sortname = $sortname['index'];

 // Configure the grid setup, giving priority to user defined parameters
@@ -185,10 +189,14 @@ $jqGrid_setup = array_merge

 jQuery(document).ready(function(){ 
  currencyFormatter = function(el, cellval, opts) {
+    if (!cellval)
+      return;
    $(el).html(fmtCurrency(cellval));
  }

  idFormatter = function(el, cellval, opts) {
+    if (!cellval)
+      return;
    $(el).html('#'+cellval);
  }

--- a/site/views/elements/ledger_entries.ctp
+++ b/site/views/elements/ledger_entries.ctp
@@ -1,5 +1,37 @@
 <?php /* -*- mode:PHP -*- */

+if (isset($account_ftype) || isset($ledger_id) || isset($lease_id) || isset($account_id) || isset($ar_account)) {
+  $single_account = true;
+} else {
+  $single_account = false;
+}
+
+if (isset($ledger_id) || isset($lease_id) || isset($account_id) || isset($ar_account)) {
+  $single_amount = false;
+} else {
+  $single_amount = true;
+}
+
+if (isset($lease_id) || isset($customer_id)) {
+  $references = false;
+}
+else {
+  $references = true;
+}
+
+if (isset($reconcile_id)) {
+  $applied_amount = true;
+} else {
+  $applied_amount = false;
+}
+
+if (isset($account_ftype)) {
+  $subtotal_amount = false;
+} else {
+  $subtotal_amount = true;
+}
+
+
 // Define the table columns
 $cols = array();
 if (0) {
@@ -8,33 +40,49 @@ if (isset($notxgroup))
 else
  $cols['Transaction']    = array('index' => 'Transaction.id',      'formatter' => 'id');
 } else {
-  $notxgroup = true;
+  $notxgroup = false;
  $cols['Transaction']    = array('index' => 'Transaction.id',      'formatter' => 'id');
  $cols['Entry']          = array('index' => 'LedgerEntry.id',      'formatter' => 'id');
 }

 $cols['Date']           = array('index' => 'Transaction.stamp',   'formatter' => 'date');
-if (isset($account_ftype) || isset($ledger_id)) {
-  $cols['Account']      = array('index' => 'Account.name',        'formatter' => 'longname');
+
+if ($single_account) {
+  $cols['Account']      = array('index' => 'Account.name',        'formatter' => 'name');
 }
 else {
-  $cols['Debit Account']  = array('index' => 'DebitAccount.name',   'formatter' => 'longname');
-  $cols['Credit Account'] = array('index' => 'CreditAccount.name',  'formatter' => 'longname');
+  $cols['Debit Account']  = array('index' => 'DebitAccount.name',   'formatter' => 'name');
+  $cols['Credit Account'] = array('index' => 'CreditAccount.name',  'formatter' => 'name');
 }
+
+if ($references) {
+  $cols['Customer']       = array('index' => 'Customer.name',       'formatter' => 'longname');
+  $cols['Lease']          = array('index' => 'Lease.number',        'formatter' => 'id');
+  $cols['Unit']           = array('index' => 'Unit.name',           'formatter' => 'name');
+}
+
 $cols['Source']         = array('index' => 'MonetarySource.name', 'formatter' => 'name');
 $cols['Comment']        = array('index' => 'LedgerEntry.comment', 'formatter' => 'comment', 'width'=>150);
-if (isset($ledger_id)) {
+
+if ($single_amount) {
+  $cols['Amount']       = array('index' => 'LedgerEntry.amount',  'formatter' => 'currency');
+}
+else {
  $cols['Debit']        = array('index' => 'debit',               'formatter' => 'currency');
  $cols['Credit']       = array('index' => 'credit',              'formatter' => 'currency');
 }
-else {
-  $cols['Amount']       = array('index' => 'LedgerEntry.amount',  'formatter' => 'currency');
-}
-if (isset($reconcile_id)) {
+
+if ($applied_amount) {
  $cols['Applied']      = array('index' => "Reconciliation.amount", 'formatter' => 'currency');
 }

-$custom_post_data = compact('ledger_id', 'account_type', 'account_ftype', 'notxgroup');
+if ($subtotal_amount) {
+  $cols['Sub-Total']    = array('index' => 'subtotal',  'formatter' => 'currency', 'sortable' => false);
+}
+
+$custom_post_data = compact('ledger_id', 'account_id', 'ar_account',
+			    'account_type', 'account_ftype',
+			    'customer_id', 'lease_id', 'transaction_id', 'notxgroup');

 $jqGrid_options = array('jqGridColumns' => $cols,
 			'controller' => 'ledger_entries',
@@ -42,11 +90,6 @@ $jqGrid_options = array('jqGridColumns' => $cols,

 $jqGrid_options += compact('grid_div_id', 'grid_id', 'caption', 'grid_setup', 'limit');

-if (isset($ledger_id)) {
-  $jqGrid_options += array('action' => 'ledger',
-			   'limit' => 50);
-}
-
 if (isset($ledger_entries)) {
  $jqGrid_options += array('custom_ids' =>
 			   array_map(create_function('$data',
@@ -54,6 +97,10 @@ if (isset($ledger_entries)) {
 				     $ledger_entries),
 			   'limit' => 10);
 }
+else {
+  $jqGrid_options += array('action' => 'ledger',
+			   'limit' => 50);
+}

 if (isset($reconcile_id)) {
  $custom_post_data += compact('reconcile_id');
@@ -61,5 +108,6 @@ if (isset($reconcile_id)) {
 }

 $jqGrid_options += compact('custom_post_data');
+$jqGrid_options['sort_column'] = 'Date';
 echo $this->element('jqGrid', $jqGrid_options);

--- a/site/views/elements/transactions.ctp
+++ b/site/views/elements/transactions.ctp
@@ -1,17 +1,38 @@
 <?php /* -*- mode:PHP -*- */

+if (isset($reconcile_ledger_entry_id)) {
+  $applied_amount = true;
+} else {
+  $applied_amount = false;
+}
+
+$subtotal_amount = false;
+
 // Define the table columns
 $cols = array();
 $cols['ID']        = array('index' => 'Transaction.id',            'formatter' => 'id');
 //$cols['Customer']  = array('index' => 'Customer.name',             'formatter' => 'longname');
-$cols['Timesamp']  = array('index' => 'Transaction.stamp',         'formatter' => 'date');
+$cols['Timestamp'] = array('index' => 'Transaction.stamp',         'formatter' => 'date');
 $cols['Through']   = array('index' => 'Transaction.through_date',  'formatter' => 'date');
 $cols['Due']       = array('index' => 'Transaction.due_date',      'formatter' => 'date');
 $cols['Comment']   = array('index' => 'Transaction.comment',       'formatter' => 'comment');

+if ($applied_amount) {
+  $cols['Applied']      = array('index' => "Reconciliation.amount", 'formatter' => 'currency');
+}
+
+if ($subtotal_amount) {
+  $cols['Sub-Total']    = array('index' => 'subtotal',  'formatter' => 'currency', 'sortable' => false);
+}
+
 $jqGrid_options = array('jqGridColumns' => $cols,
 			'controller' => 'transactions',
-			'caption' => isset($caption) ? $caption : null);
+			);
+
+$jqGrid_options += compact('grid_div_id', 'grid_id', 'caption', 'grid_setup', 'limit');
+
+$custom_post_data = compact('reconcile_type', 'reconcile_ledger_entry_id');
+

 if (isset($transactions)) {
  $jqGrid_options += array('custom_ids' =>
@@ -20,8 +41,14 @@ if (isset($transactions)) {
 				     $transactions),
 			   'limit' => 5);
 }
+elseif (isset($reconcile_ledger_entry_id)) {
+  $jqGrid_options += array('limit' => 5);
+}
 else {
  $jqGrid_options += array('search_fields' => array('Due', 'Comment'));
 }

+$jqGrid_options += compact('custom_post_data');
+$jqGrid_options['sort_column'] = 'Timestamp';
+
 echo $this->element('jqGrid', $jqGrid_options);
--- a/site/views/leases/view.ctp
+++ b/site/views/leases/view.ctp
@@ -11,7 +11,6 @@ echo '<div class="lease view">' . "\n";

 $lease_type  = $lease['LeaseType'];
 $customer    = $lease['Customer'];
-$account     = $lease['Account'];
 $unit        = $lease['Unit'];

 if (isset($lease['Lease']))
@@ -20,7 +19,7 @@ if (isset($lease['Lease']))
 $rows = array(array('ID',               $lease['id']),
 	      array('Number',           $lease['number']),
 	      array('Lease Type',       $lease_type['name']),
-	      array('Unit',             $html->link($unit['id'],
+	      array('Unit',             $html->link($unit['name'],
 						    array('controller' => 'units',
 							  'action'     => 'view',
 							  $unit['id']))),
@@ -36,10 +35,6 @@ $rows = array(array('ID',               $lease['id']),
 	      array('Notice Given',     FormatHelper::date($lease['notice_given_date'], true)),
 	      array('Notice Received',  FormatHelper::date($lease['notice_received_date'], true)),
 	      array('Closed',           FormatHelper::date($lease['close_date'], true)),
-	      array('Account',          $html->link($account['name'],
-						    array('controller' => 'accounts',
-							  'action'     => 'view',
-							  $account['id']))),
 	      array('Deposit',          FormatHelper::currency($lease['deposit'])),
 	      array('Rent',             FormatHelper::currency($lease['amount'])),
 	      array('Comment',          $lease['comment']));
@@ -53,7 +48,7 @@ echo $this->element('table',


 /**********************************************************************
- * Account Info Box
+ * Lease Info Box
 */

 echo '<div class="infobox">' . "\n";
@@ -80,15 +75,16 @@ echo '<div CLASS="detail supporting">' . "\n";


 /**********************************************************************
- * Current Ledger
+ * Lease Account History
 */

 echo $this->element('ledger_entries',
-		    array('caption' => "Current Ledger: (#{$account['id']}-{$account['CurrentLedger']['sequence']})",
-			  'ledger_id' => $account['CurrentLedger']['id'],
-			  'account_type' => $account['type'],
+		    array('caption' => 'Account',
+			  'lease_id' => $lease['id'],
+			  //'ar_account' => true,
 			  ));

+
 /* End "detail supporting" div */
 echo '</div>' . "\n";

--- a/site/views/ledger_entries/view.ctp
+++ b/site/views/ledger_entries/view.ctp
@@ -13,6 +13,8 @@ $transaction    = $entry['Transaction'];
 $debit_ledger   = $entry['DebitLedger'];
 $credit_ledger  = $entry['CreditLedger'];
 $source         = $entry['MonetarySource'];
+$customer       = $entry['Customer'];
+$lease          = $entry['Lease'];
 $entry          = $entry['LedgerEntry'];

 $rows = array(array('ID',               $entry['id']),
@@ -21,8 +23,20 @@ $rows = array(array('ID',               $entry['id']),
 							  'action'     => 'view',
 							  $transaction['id']))),
 	      array('Timestamp',        FormatHelper::datetime($transaction['stamp'])),
-	      array('Monetary Source',  (isset($source['id'])
-					 ? $html->link('#'.$source['id'],
+	      array('Customer',         (isset($customer['name'])
+					 ? $html->link($customer['name'],
+						       array('controller' => 'customers',
+							     'action'     => 'view',
+							     $customer['id']))
+					 : null)),
+	      array('Lease',            (isset($lease['id'])
+					 ? $html->link('#'.$lease['id'],
+						       array('controller' => 'leases',
+							     'action'     => 'view',
+							     $lease['id']))
+					 : null)),
+	      array('Monetary Source',  (isset($source['name'])
+					 ? $html->link($source['name'],
 						       array('controller' => 'monetary_sources',
 							     'action'     => 'view',
 							     $source['id']))
@@ -97,26 +111,23 @@ echo '<div CLASS="detail supporting">' . "\n";
 * Reconciliation Ledger Entries
 */

-echo $this->element('ledger_entries',
-		    array('caption'   => "Debit Applications",
-			  'grid_div_id'   => 'debit_reconciliation_ledger_entries',
-			  //'ledger_id'     => $debit_ledger['id'],
-			  //'account_type'  => $debit_ledger['Account']['type'],
-			  'account_ftype' => 'debit',
-			  'reconcile_id' => $entry['id'],
-			  'ledger_entries' => $reconciled['debit']['entry'],
-			  ));
+if ($debit_ledger['Account']['trackable']) {
+  echo $this->element('transactions',
+		      array('caption'   => "Payments Received",
+			    'grid_div_id'   => 'debit_reconciliation_ledger_entries',
+			    'reconcile_type' => 'debit',
+			    'reconcile_ledger_entry_id' => $entry['id'],
+			    ));
+}

-echo $this->element('ledger_entries',
-		    array('caption'   => "Credit Applications",
-			  'grid_div_id'  => 'credit_reconciliation_ledger_entries',
-			  //'ledger_id'    => $credit_ledger['id'],
-			  //'account_type' => $credit_ledger['Account']['type'],
-			  //'account_ftype'  => 'debit', // Looking for debits to match this credit
-			  'account_ftype'  => 'credit',
-			  'reconcile_id' => $entry['id'],
-			  'ledger_entries' => $reconciled['credit']['entry'],
-			  ));
+if ($credit_ledger['Account']['trackable']) {
+  echo $this->element('transactions',
+		      array('caption'   => "Charges Paid",
+			    'grid_div_id'  => 'credit_reconciliation_ledger_entries',
+			    'reconcile_type' => 'credit',
+			    'reconcile_ledger_entry_id' => $entry['id'],
+			    ));
+}


 /* End "detail supporting" div */
--- a/site/views/transactions/view.ctp
+++ b/site/views/transactions/view.ctp
@@ -54,7 +54,8 @@ echo '<div CLASS="detail supporting">' . "\n";

 echo $this->element('ledger_entries',
 		    array('caption' => 'Entries in Transaction',
-			  'ledger_entries' => $transaction['LedgerEntry'],
+			  //'ledger_entries' => $transaction['LedgerEntry'],
+			  'transaction_id' => $transaction['Transaction']['id'],
 			  'notxgroup' => true,
 			  ));

--- a/site/views/units/view.ctp
+++ b/site/views/units/view.ctp
@@ -57,16 +57,16 @@ echo $this->element('leases',


 /**********************************************************************
- * Ledger History
+ * Current Tenant Lease Account History
 */
-/* foreach($unit['Lease'] AS $lease) { */
-/*   pr($lease); */
-/*   $caption = 'Lease #'.$lease['number'].' (Tenant: '.$lease['Customer']['name'].')'; */
-/*   echo $this->element('lease', */
-/* 		      array('caption' => $caption, */
-/* 			    'entries' => $lease['Customer']['Transaction'], */
-/* 			    'ledger'  => array('mix'=>1))); */
-/* } */
+
+echo $this->element('ledger_entries',
+		    array('caption' => ('Current Lease Account (' .
+					$unit['CurrentLease']['Customer']['name']
+					. ')'),
+			  'ar_account' => true,
+			  'lease_id' => $unit['CurrentLease']['id'],
+			  ));


 /* End "detail supporting" div */
--- a/site/webroot/css/layout.css
+++ b/site/webroot/css/layout.css
@@ -65,8 +65,10 @@ tr.evnrow      { background: #f4f4f4; }
 */

 table.detail           { width :  60%;
-			 float: left; }
-table.detail td.field  { width: 10em; }
+			 float : left; }
+table.detail td.field  { width : 10em; }
+
+table.item.detail td.value { white-space : normal; }

 div.detail.supporting  { clear : both;
 			 padding-top: 1.5em; }
Author	SHA1	Message	Date
abijah	c9ade62536	Very, very messy and broken. It does work somewhat, but I can see just what a mess it's going to be to carry it out, so I'm abandoning. git-svn-id: file:///svn-source/pmgr/branches/reconcile_entry_to_receipt_20090629@187 97e9348a-65ac-dc4b-aefc-98561f571b83	2009-06-30 00:59:09 +00:00
abijah	4f0b5ffc28	Branch to work on another possible solution to this mess git-svn-id: file:///svn-source/pmgr/branches/reconcile_entry_to_receipt_20090629@186 97e9348a-65ac-dc4b-aefc-98561f571b83	2009-06-30 00:57:11 +00:00
abijah	ce4fa4131a	More changes. I just can't seem to come up with a solution that works that I like. The problem now, without invoice/receipt, is that one check cannot cleanly pay for two units. git-svn-id: file:///svn-source/pmgr/branches/single_AR_20090622@182 97e9348a-65ac-dc4b-aefc-98561f571b83	2009-06-24 00:33:39 +00:00
abijah	80f8bd36d5	Nowhere near done yet, but checking in a snapshot of semi-working code. There is some simultaneous support for both with and without use of the Invoice/Receipt account. I want to do away with them completely, but will need to change how sitelink payments are mapped (right now, they split a payment into multiple parts to match the charge). git-svn-id: file:///svn-source/pmgr/branches/single_AR_20090622@181 97e9348a-65ac-dc4b-aefc-98561f571b83	2009-06-23 19:04:41 +00:00
abijah	7aa1100cac	Moving to the standard accounting method of a single Account Receiveable. git-svn-id: file:///svn-source/pmgr/branches/single_AR_20090622@180 97e9348a-65ac-dc4b-aefc-98561f571b83	2009-06-22 23:46:03 +00:00