pgsql/investigations/ar-creditmemo.sql

diff --git a/pgsql/investigations/ar-creditmemo.sql b/pgsql/investigations/ar-creditmemo.sql
index 5c6f4a1..148363f 100644 (file)
--- a/pgsql/investigations/ar-creditmemo.sql
+++ b/pgsql/investigations/ar-creditmemo.sql
@@ -110,7 +110,7 @@ BEGIN
             v_diff
     INTO
             v_gl_id,
-            v_gl_ar_amount,
+            v_gltrans_amount,
             v_diff
     FROM
             gltrans
@@ -143,7 +143,6 @@ BEGIN
         RAISE EXCEPTION 'aropen is missing gltrans in A/R account aropen_id=%' ,i_aropen_id;
     END IF;
     
-    RAISE NOTICE 'v_gl_id %', v_gl_id;
 
 --     SELECT
 --             gltrans_sequence,
@@ -236,8 +235,8 @@ BEGIN
     -- if currency rate is off...
     IF v_diff != 0.00  THEN
     
-        v_new_rate := _ar.aropen_amount / v_gltrans_amount;
-        RAISE NOTICE '_ar.aropen_amount  % v_gltrans_amount % ', _ar.aropen_amount  ,v_gltrans_amount ;
+        v_new_rate := _ar.aropen_amount / v_gl_ar_amount;
+        
         RAISE NOTICE 'aropen_id  % change currency rate from % to %', i_aropen_id, _ar.aropen_curr_rate  ,v_new_rate ;
     
         UPDATE