Changes to schema and code to place 'id' as PK field in quote_events and enquiry_events as part of ticket #78.
Changed BULK_LOAD.xls to have two tabs to represent costs. Also includes QMAX against module - none of these changes are represented in the current code. git-svn-id: http://locode01.ad.dom/svn/WEBMIP/trunk@3480 248e525c-4dfb-0310-94bc-949c084e9493
This commit is contained in:
@@ -178,14 +178,35 @@ CREATE OR REPLACE PACKAGE BODY mip_quotation IS
|
||||
(qute_id
|
||||
,qust_code
|
||||
,event_date
|
||||
,description)
|
||||
,description
|
||||
,id)
|
||||
VALUES
|
||||
(p_qute_id
|
||||
,p_qust_code
|
||||
,p_event_date
|
||||
,p_description);
|
||||
,p_description
|
||||
,quev_seq.NEXTVAL);
|
||||
END add_quote_event;
|
||||
|
||||
PROCEDURE add_enquiry_event(p_enqu_id IN enquiries.id%TYPE
|
||||
,p_enst_code enquiry_status_types.code%TYPE
|
||||
,p_description enquiry_events.description%TYPE DEFAULT NULL
|
||||
,p_event_date DATE DEFAULT SYSDATE) IS
|
||||
BEGIN
|
||||
INSERT INTO enquiry_events
|
||||
(enqu_id
|
||||
,enst_code
|
||||
,event_date
|
||||
,description
|
||||
,id)
|
||||
VALUES
|
||||
(p_enqu_id
|
||||
,p_enst_code
|
||||
,p_event_date
|
||||
,p_description
|
||||
,enev_seq.NEXTVAL);
|
||||
END add_enquiry_event;
|
||||
|
||||
PROCEDURE add_quote_role(p_qute_id IN quotes.id%TYPE
|
||||
,p_prty_id IN parties.id%TYPE
|
||||
,p_rt_code quote_roles.rt_code%TYPE
|
||||
@@ -373,14 +394,9 @@ CREATE OR REPLACE PACKAGE BODY mip_quotation IS
|
||||
,USER)
|
||||
RETURNING id INTO l_qute_id;
|
||||
|
||||
INSERT INTO quote_events
|
||||
(event_date
|
||||
,qust_code
|
||||
,qute_id)
|
||||
VALUES
|
||||
(SYSDATE
|
||||
,'INP' -- In Progress
|
||||
,l_qute_id);
|
||||
add_quote_event(p_qute_id => l_qute_id
|
||||
,p_qust_code => 'INP'
|
||||
,p_event_date => SYSDATE);
|
||||
|
||||
INSERT INTO quote_roles
|
||||
(prty_id
|
||||
@@ -413,14 +429,9 @@ CREATE OR REPLACE PACKAGE BODY mip_quotation IS
|
||||
BEGIN
|
||||
pl('make_quote_available');
|
||||
|
||||
INSERT INTO quote_events
|
||||
(event_date
|
||||
,qust_code
|
||||
,qute_id)
|
||||
VALUES
|
||||
(SYSDATE
|
||||
,'AV' -- Available
|
||||
,p_qute_id);
|
||||
add_quote_event(p_qute_id => p_qute_id
|
||||
,p_qust_code => 'AV'
|
||||
,p_event_date => SYSDATE);
|
||||
|
||||
END make_quote_available;
|
||||
|
||||
@@ -428,28 +439,20 @@ CREATE OR REPLACE PACKAGE BODY mip_quotation IS
|
||||
BEGIN
|
||||
pl('mark_enquiry_submitted');
|
||||
|
||||
INSERT INTO enquiry_events
|
||||
(event_date
|
||||
,enst_code
|
||||
,enqu_id)
|
||||
VALUES
|
||||
(SYSDATE
|
||||
,'SUBMITTED'
|
||||
,p_enqu_id);
|
||||
add_enquiry_event(p_enqu_id => p_enqu_id
|
||||
,p_enst_code => 'SUBMITTED'
|
||||
,p_event_date => SYSDATE);
|
||||
|
||||
email_rfq_submitted(p_enqu_id);
|
||||
END mark_enquiry_submitted;
|
||||
|
||||
PROCEDURE mark_enquiry_quoted(p_enqu_id IN enquiries.id%TYPE) IS
|
||||
BEGIN
|
||||
INSERT INTO enquiry_events
|
||||
(event_date
|
||||
,enst_code
|
||||
,enqu_id)
|
||||
VALUES
|
||||
(SYSDATE
|
||||
,'QUOTED'
|
||||
,p_enqu_id);
|
||||
pl('mark_enquiry_quoted');
|
||||
|
||||
add_enquiry_event(p_enqu_id => p_enqu_id
|
||||
,p_enst_code => 'QUOTED'
|
||||
,p_event_date => SYSDATE);
|
||||
|
||||
email_quotes_available(p_enqu_id);
|
||||
|
||||
@@ -457,14 +460,11 @@ CREATE OR REPLACE PACKAGE BODY mip_quotation IS
|
||||
|
||||
PROCEDURE mark_enquiry_invalid(p_enqu_id IN enquiries.id%TYPE) IS
|
||||
BEGIN
|
||||
INSERT INTO enquiry_events
|
||||
(event_date
|
||||
,enst_code
|
||||
,enqu_id)
|
||||
VALUES
|
||||
(SYSDATE
|
||||
,'INVALID'
|
||||
,p_enqu_id);
|
||||
pl('mark_enquiry_invalid');
|
||||
|
||||
add_enquiry_event(p_enqu_id => p_enqu_id
|
||||
,p_enst_code => 'INVALID'
|
||||
,p_event_date => SYSDATE);
|
||||
END mark_enquiry_invalid;
|
||||
|
||||
FUNCTION get_system_configuration_value(p_parameter IN system_configuration.parameter%TYPE)
|
||||
@@ -1236,26 +1236,26 @@ RECEIVED AT THIS ADDRESS CANNOT BE RESPONDED TO.');
|
||||
END IF; -- RELOCATE
|
||||
|
||||
IF p_enqu.enty_code IN ('EXCHANGE', 'STD EXCHANGE') THEN
|
||||
-- SELECT svcpt_code
|
||||
-- INTO l_svcpt_code
|
||||
-- FROM service_pressures
|
||||
-- WHERE code = p_enqu.required_svcp_code;
|
||||
-- IF l_svcpt_code = 'LP' THEN
|
||||
l_existing_meter_size_code := p_enqu.existing_mesc_code;
|
||||
l_required_meter_size_code := p_enqu.required_mesc_code;
|
||||
IF l_required_meter_size_code IS NULL THEN
|
||||
l_required_meter_size_code := get_u_meter_size(p_enqu.qmax);
|
||||
END IF;
|
||||
IF NOT
|
||||
valid_meter_size_upgrade(p_existing_meter_size_code => l_existing_meter_size_code
|
||||
,p_required_meter_size_code => l_required_meter_size_code) THEN
|
||||
p_manual_or_automatic_quote := gc_manual_quote;
|
||||
add_quote_reason(p_enqu.id
|
||||
,'Site Survey is required for exchange of meter from size ' ||
|
||||
l_existing_meter_size_code || ' to ' ||
|
||||
l_required_meter_size_code || '.');
|
||||
END IF;
|
||||
-- END IF; -- svcpt_code = 'LP'
|
||||
-- SELECT svcpt_code
|
||||
-- INTO l_svcpt_code
|
||||
-- FROM service_pressures
|
||||
-- WHERE code = p_enqu.required_svcp_code;
|
||||
-- IF l_svcpt_code = 'LP' THEN
|
||||
l_existing_meter_size_code := p_enqu.existing_mesc_code;
|
||||
l_required_meter_size_code := p_enqu.required_mesc_code;
|
||||
IF l_required_meter_size_code IS NULL THEN
|
||||
l_required_meter_size_code := get_u_meter_size(p_enqu.qmax);
|
||||
END IF;
|
||||
IF NOT
|
||||
valid_meter_size_upgrade(p_existing_meter_size_code => l_existing_meter_size_code
|
||||
,p_required_meter_size_code => l_required_meter_size_code) THEN
|
||||
p_manual_or_automatic_quote := gc_manual_quote;
|
||||
add_quote_reason(p_enqu.id
|
||||
,'Site Survey is required for exchange of meter from size ' ||
|
||||
l_existing_meter_size_code || ' to ' ||
|
||||
l_required_meter_size_code || '.');
|
||||
END IF;
|
||||
-- END IF; -- svcpt_code = 'LP'
|
||||
END IF; -- EXCHANGE
|
||||
|
||||
END survey_required;
|
||||
|
||||
Reference in New Issue
Block a user