This commit is contained in:
2020-06-28 17:12:59 +08:00
parent c2251573db
commit f653eddf5b
9 changed files with 216 additions and 50 deletions

View File

@@ -5,8 +5,14 @@ CREATE OR REPLACE PACKAGE data_import_util_pkg IS
-- Purpose : <20><><EFBFBD>ݵ<EFBFBD><DDB5><EFBFBD><EBB9A4>
--<2D><><EFBFBD><EFBFBD><EFBFBD>
no_cardealer_code_excpt CONSTANT INTEGER := -20000;
no_cardealer_code_message CONSTANT VARCHAR2(100) := 'ȱ<>ٳ<EFBFBD><D9B3>̴<EFBFBD><CCB4>롣';
no_cardealer_code_excpt CONSTANT INTEGER := -20000;
no_cardealer_code_text CONSTANT VARCHAR2(100) := 'ȱ<>ٳ<EFBFBD><D9B3>̴<EFBFBD><CCB4>롣';
no_order_no_excpt CONSTANT INTEGER := -20001;
no_order_no_text CONSTANT VARCHAR2(100) := 'ȱ<>ٹ<EFBFBD><D9B9><EFBFBD><EFBFBD><EFBFBD>';
no_notify_no_excpt CONSTANT INTEGER := -20002;
no_notify_no_text CONSTANT VARCHAR2(100) := 'ȱ<>ٱ<EFBFBD><D9B1><EFBFBD><EFBFBD><EFBFBD>';
PROCEDURE import_cardealer_achvmnt
(
@@ -63,6 +69,21 @@ CREATE OR REPLACE PACKAGE data_import_util_pkg IS
a_surveyor_recomm_status VARCHAR2
);
PROCEDURE import_repairing_suggestion
(
a_order_no VARCHAR2,
a_order_type VARCHAR2,
a_notify_no VARCHAR2,
a_<61>Ƽ<EFBFBD><C6BC><EFBFBD><EFBFBD>̴<EFBFBD><CCB4><EFBFBD> VARCHAR2,
a_<61>Ƽ<EFBFBD><C6BC><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> VARCHAR2,
a_damage_date VARCHAR2,
a_plateNo VARCHAR2,
a_brand_name VARCHAR2,
a_message_type VARCHAR2,
a_sending_date VARCHAR2,
a_data_source VARCHAR2
);
END data_import_util_pkg;
/
CREATE OR REPLACE PACKAGE BODY data_import_util_pkg IS
@@ -83,7 +104,8 @@ CREATE OR REPLACE PACKAGE BODY data_import_util_pkg IS
--<2D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>֤
IF a_car_dealer_code IS NULL
THEN
raise_application_error(no_cardealer_code_excpt, no_cardealer_code_message);
raise_application_error(no_cardealer_code_excpt,
no_cardealer_code_text);
END IF;
--<2D><>ɾ<EFBFBD><C9BE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
@@ -137,7 +159,8 @@ CREATE OR REPLACE PACKAGE BODY data_import_util_pkg IS
--<2D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>֤
IF a_car_dealer_code IS NULL
THEN
raise_application_error(no_cardealer_code_excpt, no_cardealer_code_message);
raise_application_error(no_cardealer_code_excpt,
no_cardealer_code_text);
END IF;
--ɾ<><C9BE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
@@ -211,7 +234,8 @@ CREATE OR REPLACE PACKAGE BODY data_import_util_pkg IS
--<2D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>֤
IF a_order_no IS NULL
THEN
raise_application_error(no_cardealer_code_excpt, no_cardealer_code_message);
raise_application_error(no_cardealer_code_excpt,
no_cardealer_code_text);
END IF;
--<2D><>ɾ<EFBFBD><C9BE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
@@ -224,35 +248,40 @@ CREATE OR REPLACE PACKAGE BODY data_import_util_pkg IS
--<2D><><EFBFBD>ڴ<EFBFBD><DAB4><EFBFBD>
BEGIN
l_damage_date := to_date(a_damage_date, 'yyyy-mm-dd hh24:mi:ss');
l_damage_date := to_date(a_damage_date,
'yyyy-mm-dd hh24:mi:ss');
EXCEPTION
WHEN OTHERS THEN
l_damage_date := NULL;
END;
BEGIN
l_gen_date := to_date(a_generating_date, 'yyyy-mm-dd hh24:mi:ss');
l_gen_date := to_date(a_generating_date,
'yyyy-mm-dd hh24:mi:ss');
EXCEPTION
WHEN OTHERS THEN
l_gen_date := NULL;
END;
BEGIN
l_repairing_start_date := to_date(a_repairing_start_date, 'yyyy-mm-dd hh24:mi:ss');
l_repairing_start_date := to_date(a_repairing_start_date,
'yyyy-mm-dd hh24:mi:ss');
EXCEPTION
WHEN OTHERS THEN
l_repairing_start_date := NULL;
END;
BEGIN
l_repairing_finish_date := to_date(a_repairing_finish_date, 'yyyy-mm-dd hh24:mi:ss');
l_repairing_finish_date := to_date(a_repairing_finish_date,
'yyyy-mm-dd hh24:mi:ss');
EXCEPTION
WHEN OTHERS THEN
l_repairing_finish_date := NULL;
END;
BEGIN
l_check_date := to_date(a_check_date, 'yyyy-mm-dd hh24:mi:ss');
l_check_date := to_date(a_check_date,
'yyyy-mm-dd hh24:mi:ss');
EXCEPTION
WHEN OTHERS THEN
l_check_date := NULL;
@@ -317,6 +346,74 @@ CREATE OR REPLACE PACKAGE BODY data_import_util_pkg IS
COMMIT;
END;
PROCEDURE import_repairing_suggestion
(
a_order_no VARCHAR2,
a_order_type VARCHAR2,
a_notify_no VARCHAR2,
a_<61>Ƽ<EFBFBD><C6BC><EFBFBD><EFBFBD>̴<EFBFBD><CCB4><EFBFBD> VARCHAR2,
a_<61>Ƽ<EFBFBD><C6BC><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> VARCHAR2,
a_damage_date VARCHAR2,
a_plateNo VARCHAR2,
a_brand_name VARCHAR2,
a_message_type VARCHAR2,
a_sending_date VARCHAR2,
a_data_source VARCHAR2
) IS
BEGIN
--<2D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>֤
IF a_order_no IS NULL
THEN
raise_application_error(no_order_no_excpt,
no_order_no_text);
END IF;
IF a_notify_no IS NULL
THEN
raise_application_error(no_notify_no_excpt,
no_notify_no_text);
END IF;
--ɾ<><C9BE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
BEGIN
DELETE FROM car_dealer.<2E>ͷ<EFBFBD><CDB7><EFBFBD><EFBFBD>Ƽ<EFBFBD><C6BC><EFBFBD> a
WHERE a.<2E><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> = a_order_no
AND a.<2E><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> = a_notify_no;
EXCEPTION
WHEN OTHERS THEN
NULL;
END;
--<2D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
INSERT INTO car_dealer.<2E>ͷ<EFBFBD><CDB7><EFBFBD><EFBFBD>Ƽ<EFBFBD><C6BC><EFBFBD>
(<28><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>,
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>,
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>,
<20>Ƽ<EFBFBD><C6BC><EFBFBD><EFBFBD>̴<EFBFBD><CCB4><EFBFBD>,
<20>Ƽ<EFBFBD><C6BC><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>,
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>,
<20><><EFBFBD>ƺ<EFBFBD>,
Ʒ<><C6B7><EFBFBD><EFBFBD><EFBFBD><EFBFBD>,
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>,
<20><><EFBFBD><EFBFBD>ʱ<EFBFBD><CAB1>,
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Դ)
VALUES
(a_order_no,
a_order_type,
a_notify_no,
a_<61>Ƽ<EFBFBD><C6BC><EFBFBD><EFBFBD>̴<EFBFBD><CCB4><EFBFBD>,
a_<61>Ƽ<EFBFBD><C6BC><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>,
to_date(a_damage_date,
'yyyy-mm-dd hh24:mi:ss'),
a_plateNo,
a_brand_name,
a_message_type,
to_date(a_sending_date,
'yyyy-mm-dd hh24:mi:ss'),
a_data_source);
END;
BEGIN
-- Initialization
NULL;