Fix for ticket #469 (SC2016) Meter type now looks up the description rather than the code (which was UPPERCASE)
git-svn-id: http://locode01.ad.dom/svn/WEBMIP/trunk@4717 248e525c-4dfb-0310-94bc-949c084e9493
This commit is contained in:
@@ -416,6 +416,11 @@ CREATE OR REPLACE PACKAGE BODY mip_quotation_document IS
|
|||||||
SELECT *
|
SELECT *
|
||||||
FROM quote_items
|
FROM quote_items
|
||||||
WHERE qute_id = cp_quoteid;
|
WHERE qute_id = cp_quoteid;
|
||||||
|
--Meter Description
|
||||||
|
CURSOR c_get_meter_type_desc(cp_metertypecode varchar2) IS
|
||||||
|
SELECT description
|
||||||
|
FROM meter_types
|
||||||
|
WHERE code = cp_metertypecode;
|
||||||
--Module data
|
--Module data
|
||||||
l_module_row modules%ROWTYPE;
|
l_module_row modules%ROWTYPE;
|
||||||
--Additional Items
|
--Additional Items
|
||||||
@@ -429,6 +434,7 @@ CREATE OR REPLACE PACKAGE BODY mip_quotation_document IS
|
|||||||
l_counter number;
|
l_counter number;
|
||||||
l_service_pressure varchar2(80); --these three used to determine whether to set
|
l_service_pressure varchar2(80); --these three used to determine whether to set
|
||||||
l_meter_type varchar2(80); --the lifting gear item or not
|
l_meter_type varchar2(80); --the lifting gear item or not
|
||||||
|
l_meter_type_desc meter_types.description%TYPE; --The description of the meter
|
||||||
l_enqu_type varchar2(80);
|
l_enqu_type varchar2(80);
|
||||||
begin
|
begin
|
||||||
|
|
||||||
@@ -526,7 +532,13 @@ CREATE OR REPLACE PACKAGE BODY mip_quotation_document IS
|
|||||||
end if;
|
end if;
|
||||||
--other module details
|
--other module details
|
||||||
l_module_row := get_module_row (quote_item_rec.modu_code);
|
l_module_row := get_module_row (quote_item_rec.modu_code);
|
||||||
l_works(3) := 'Meter Type: '|| l_meter_type || ' ' || p_quote_data.meter_reference;
|
IF NOT c_get_meter_type_desc%ISOPEN THEN
|
||||||
|
OPEN c_get_meter_type_desc(l_meter_type);
|
||||||
|
END IF;
|
||||||
|
FETCH c_get_meter_type_desc
|
||||||
|
INTO l_meter_type_desc;
|
||||||
|
CLOSE c_get_meter_type_desc;
|
||||||
|
l_works(3) := 'Meter Type: '|| l_meter_type_desc || ' ' || p_quote_data.meter_reference;
|
||||||
p_quote_data.outlet_termninal_size := l_module_row.outlet_size;
|
p_quote_data.outlet_termninal_size := l_module_row.outlet_size;
|
||||||
--module technical details
|
--module technical details
|
||||||
p_quote_data.module_dimensions(1) := l_module_row.dim_a;
|
p_quote_data.module_dimensions(1) := l_module_row.dim_a;
|
||||||
|
|||||||
Reference in New Issue
Block a user