abijah/pmgr
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Added petty cash and a couple higher security accounts, Equity and Loan

Browse Source 
git-svn-id: file:///svn-source/pmgr/branches/invoice_receipt_20090629@291 97e9348a-65ac-dc4b-aefc-98561f571b83
This commit is contained in:
abijah
2009-07-09 16:37:16 +00:00
parent 6507009acc
commit de5f4208eb
2 changed files with 71 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
db/schema.sql
View File

@@ -849,7 +849,7 @@ CREATE TABLE `pmgr_accounts` (
`payable` TINYINT(1) UNSIGNED NOT NULL DEFAULT 0, -- Can be used for payments?
-- Security Level
`level` INT UNSIGNED DEFAULT 1,
`level` INT UNSIGNED DEFAULT 10,
`name` VARCHAR(80) NOT NULL,
`external_account` INT(10) UNSIGNED DEFAULT NULL,
@@ -861,6 +861,10 @@ CREATE TABLE `pmgr_accounts` (
) ENGINE=MyISAM DEFAULT CHARSET=utf8;
LOCK TABLES `pmgr_accounts` WRITE;
INSERT INTO `pmgr_accounts` (`type`, `name`, `level`)
VALUES
('EQUITY', 'Equity', 1),
('LIABILITY', 'Loan', 1);
INSERT INTO `pmgr_accounts` (`type`, `name`, `tillable`, `depositable`, `chargeable`, `payable`)
VALUES
('ASSET', 'A/R', 0, 0, 0, 0),
@@ -868,7 +872,7 @@ INSERT INTO `pmgr_accounts` (`type`, `name`, `tillable`, `depositable`, `chargea
('ASSET', 'Receipt', 0, 0, 0, 0),
('LIABILITY', 'A/P', 0, 0, 0, 0),
('LIABILITY', 'Tax', 0, 0, 1, 0),
('LIABILITY', 'Customer Credit', 0, 0, 1, 1),
-- ('LIABILITY', 'Customer Credit', 0, 0, 1, 1),
('ASSET', 'Petty Cash', 0, 0, 0, 0),
('ASSET', 'Bank', 0, 1, 0, 0),
('ASSET', 'ACH', 0, 0, 0, 1),
@@ -878,9 +882,9 @@ INSERT INTO `pmgr_accounts` (`type`, `name`, `tillable`, `depositable`, `chargea
('LIABILITY', 'Security Deposit', 0, 0, 1, 1),
('INCOME', 'Rent', 0, 0, 1, 0),
('INCOME', 'Late Charge', 0, 0, 1, 0),
('INCOME', 'Damage', 0, 0, 1, 0),
('EXPENSE', 'Concession', 0, 0, 0, 1),
('EXPENSE', 'Bad Debt', 0, 0, 0, 1),
('EXPENSE', 'Cleaning', 0, 0, 0, 0),
('EXPENSE', 'Maintenance', 0, 0, 0, 0);
UNLOCK TABLES;

64
scripts/sitelink2pmgr.pl
View File

@@ -1346,6 +1346,70 @@ foreach $row (@{query($sdbh, $query)})
}
######################################################################
## Special case - Equities / Loans / Petty Cash
my ($stamp, $effective_date, $through_date);
print("Set up Petty Cash...\n");
# Add the first loan
# debit: Equity credit: Loan
addRow('transactions',
{ 'stamp' => datefmt('03/25/2009 16:00'),
});
addRow('ledger_entries',
{ 'effective_date' => $effective_date,
'through_date' => $through_date,
'monetary_source_id' => $newdb{'ids'}{'monetary_source'}{'internal'},
'transaction_id' => $newdb{'tables'}{'transactions'}{'autoid'},
'debit_ledger_id' => $newdb{'lookup'}{'account'}{'Equity'}{'ledger_id'},
'credit_ledger_id' => $newdb{'lookup'}{'account'}{'Loan'}{'ledger_id'},
'customer_id' => undef,
'lease_id' => undef,
'amount' => 5000,
'comment' => "HTP Loan #1",
});
# Add the second loan
# debit: Equity credit: Loan
addRow('transactions',
{ 'stamp' => datefmt('04/01/2009 16:00'),
});
addRow('ledger_entries',
{ 'effective_date' => $effective_date,
'through_date' => $through_date,
'monetary_source_id' => $newdb{'ids'}{'monetary_source'}{'internal'},
'transaction_id' => $newdb{'tables'}{'transactions'}{'autoid'},
'debit_ledger_id' => $newdb{'lookup'}{'account'}{'Equity'}{'ledger_id'},
'credit_ledger_id' => $newdb{'lookup'}{'account'}{'Loan'}{'ledger_id'},
'customer_id' => undef,
'lease_id' => undef,
'amount' => 1000,
'comment' => "HTP Loan #2",
});
# Cheat for now, using equity for Petty Cash
# debit: Petty Cash credit: Equity
addRow('transactions',
{ 'stamp' => datefmt('03/25/2009 16:00'),
});
addRow('ledger_entries',
{ 'effective_date' => $effective_date,
'through_date' => $through_date,
'monetary_source_id' => $newdb{'ids'}{'monetary_source'}{'internal'},
'transaction_id' => $newdb{'tables'}{'transactions'}{'autoid'},
'debit_ledger_id' => $newdb{'lookup'}{'account'}{'Petty Cash'}{'ledger_id'},
'credit_ledger_id' => $newdb{'lookup'}{'account'}{'Equity'}{'ledger_id'},
'customer_id' => undef,
'lease_id' => undef,
'amount' => 750,
'comment' => "Petty Cash Funding",
});
######################################################################
## Fake Data for Testing