保存进度！

code/db/pkg/telsale_archievement_pkg.pck

@@ -15,6 +15,12 @@ CREATE OR REPLACE PACKAGE telsale_archievement_pkg IS
         a_mensual_cur     OUT cur_type
     );
 
+    PROCEDURE caller_arch_ranking_list
+    (
+        a_department_code IN VARCHAR2,
+        a_ranking_list    OUT cur_type
+    );
+
 END telsale_archievement_pkg;
 /
 CREATE OR REPLACE PACKAGE BODY telsale_archievement_pkg IS
@@ -93,6 +99,30 @@ CREATE OR REPLACE PACKAGE BODY telsale_archievement_pkg IS
              ORDER BY cf.<2E>·<EFBFBD>;
     END;
 
+    PROCEDURE caller_arch_ranking_list
+    (
+        a_department_code IN VARCHAR2,
+        a_ranking_list    OUT cur_type
+    ) IS
+        l_current_month VARCHAR2(10);
+    BEGIN
+        l_current_month := to_char(SYSDATE,
+                                   'mm') || '<27><>';
+    
+        OPEN a_ranking_list FOR
+            SELECT <20><>ϯ<EFBFBD><CFAF><EFBFBD><EFBFBD>,
+                   round(SUM(<28><><EFBFBD><EFBFBD><EFBFBD>ںϱ<DABA><CFB1><EFBFBD>) / SUM(<28><><EFBFBD>ո<EFBFBD><D5B8>˿ͻ<CBBF><CDBB><EFBFBD><EFBFBD><EFBFBD>) * 100,
+                         2) <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>͸<EFBFBD><CDB8>
+              FROM <20><><EFBFBD><EFBFBD>ÿ<EFBFBD>ձ<EFBFBD><D5B1><EFBFBD>
+             WHERE <20>·<EFBFBD> = l_current_month
+               AND <20><><EFBFBD>Ŵ<EFBFBD><C5B4><EFBFBD> = a_department_code
+             GROUP BY <20>·<EFBFBD>,
+                      <20><><EFBFBD>Ŵ<EFBFBD><C5B4><EFBFBD>,
+                      <20><>ϯ<EFBFBD><CFAF><EFBFBD><EFBFBD>
+            HAVING <20>·<EFBFBD> = '06<30><36>'
+             ORDER BY <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>͸<EFBFBD><CDB8> DESC;
+    END;
+
 BEGIN
     NULL;
 END telsale_archievement_pkg;