Added version of Aurynn's reconciliation logic

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1302 4979c152-3d1c-0410-bac9-87ea11338e46

1 files changed, 46 insertions, 5 deletions

diff --git a/sql/modules/Reconciliaton.sql b/sql/modules/Reconciliaton.sql
index 2700a2fb..1dfc7d7e 100644
--- a/sql/modules/Reconciliaton.sql
+++ b/sql/modules/Reconciliaton.sql
@@ -13,6 +13,15 @@ CREATE TABLE pending_reports (
     overlook boolean not null default 'f'
 );
 
+CREATE TABLE report_corrections (
+    id serial primary key not null,
+    correction_id int not null default 1,
+    entry references pending_reports(id) not null,
+    user text not null,
+    reason text not null,
+    insert_time timestamptz not null default now()
+);
+
 -- to correct OUR wrong amount.
 CREATE OR REPLACE FUNCTION reconciliation_correct_ledger (in_report_id INT, in_id int, in_new_amount NUMERIC, reason TEXT) returns INT AS $$
 
@@ -371,14 +380,46 @@ CREATE OR REPLACE FUNCTION reconciliation_get_total (in_report_id INT) returns s
         AND scn = -1;
         
         IF NOT FOUND THEN -- I think this is a fairly major error condition
-        
-            RAISE EXCEPTION "No Bank Total found."
-            
+            RAISE EXCEPTION "No Bank Total found.";
         ELSE
-            
             return row;
-        
         END IF;
     END;
 
 $$ language 'plpgsql';
+
+CREATE OR REPLACE FUNCTION reconciliation_corrections (in_report_id INT, in_id INT) returns setof report_corrections AS $$
+
+    DECLARE
+        corr report_corrections;
+    BEGIN
+    
+        SELECT INTO corr FROM report_corrections WHERE report_id = in_report_id AND id = in_id LIMIT 1;
+        IF NOT FOUND THEN
+            RAISE EXCEPTION "No corrections for selected entry.";
+        ELSE
+            FOR corr IN select * from report_corrections WHERE report_id = in_report_id AND id = in_id LOOP
+                RETURN NEXT corr;
+            END LOOP;
+        END IF;
+    END;
+
+$$ language 'plplsql';
+
+CREATE OR REPLACE FUNCTION reconciliation_single_entry (in_report_id INT, in_id INT) returns setof pending_reports AS
+
+    DECLARE
+        row pending_reports;
+    BEGIN
+    
+        SELECT INTO row FROM pending_reports WHERE report_id = in_report_id and id = in_id LIMIT 1; 
+        -- if there's more than one, that's a Bad Thing
+        
+        IF NOT FOUND THEN
+            RAISE EXCEPTION "Could not find selected report entry";
+        ELSE
+            RETURN row;
+        END IF;
+    END;
+
+$$ language 'plpgsql';
\ No newline at end of file