pgsql/investigations/ar-cash.sql

diff --git a/pgsql/investigations/ar-cash.sql b/pgsql/investigations/ar-cash.sql
index f68d9cc..a3065a3 100644 (file)
--- a/pgsql/investigations/ar-cash.sql
+++ b/pgsql/investigations/ar-cash.sql
@@ -9,7 +9,9 @@ CREATE OR REPLACE FUNCTION x_ar_verify_cash(i_arapply_id integer)
 AS $BODY$
 DECLARE    
     _ar RECORD;
-    
+    _citem RECORD;
+    _rcpt RECORD;
+
     v_sales_accnt_id INTEGER;
     v_ar_accnt_id INTEGER;
     v_credit_accnt_id INTEGER;
@@ -41,15 +43,15 @@ DECLARE
     
 BEGIN
    
-    SELECT * INTO _ar FROM aropen where aropen_id = i_aropen_id;
+    SELECT * INTO _ar FROM arapply where arapply_id = i_arapply_id;
     
     
     IF NOT FOUND THEN
-        RAISE EXCEPTION 'not a valid open id..';
+        RAISE EXCEPTION 'not a valid apply id..';
     END IF;
     
     IF _ar.aropen_journalnumber IS NULL THEN
-        RAISE EXCEPTION 'not a valid open id..';
+        RAISE EXCEPTION 'not a valid apply id..';
     END IF;
 
     SELECT