andy/mip
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

mip_quotation.pck - create quote entries for manual quotes. Automatic quotes call PDF build routine. Mark automatic quotes as available.

Browse Source 
mip_bulk_load.pck - initial work on bulk data load .

git-svn-id: http://locode01.ad.dom/svn/WEBMIP/trunk@3181 248e525c-4dfb-0310-94bc-949c084e9493
This commit is contained in:
hardya
2008-01-09 20:06:30 +00:00
parent 8b2ced5818
commit a3765e8f3c
2 changed files with 665 additions and 40 deletions
Download Patch File Download Diff File Expand all files Collapse all files

58
Modules/mip_quotation.pck
View File

@@ -349,6 +349,7 @@ CREATE OR REPLACE PACKAGE BODY mip_quotation IS
l_regi_code regions.code%TYPE := mip_regions.get_region_for_postcode(p_enqu.install_postcode);
l_qute_id quotes.id%TYPE;
l_additional_costs t_rec_additional_costs;
l_quote_document VARCHAR2(240);
BEGIN
cout_assert.istrue(p_enqu.enty_code IN ('INSTALL', 'STD INSTALL')
,'Attempted to produce an install quote for enquiry of type ' ||
@@ -881,19 +882,68 @@ CREATE OR REPLACE PACKAGE BODY mip_quotation IS
,l_rec_module.lifting_gear_lead_time
,'AQI');
-- Generate the quote PDF
BEGIN
l_quote_document := mip_quotation_document.generate_quote_pdf(p_quote_id => l_qute_id);
EXCEPTION
WHEN OTHERS THEN
cout_err.report_and_stop;
END;
add_quote_reason(p_enqu_id => p_enqu.id
,p_reason => 'Produced Quote Document ' ||
l_quote_document || '.'
,p_internal_or_external => g_internal_reason);
INSERT INTO quote_events
(event_date
,qust_code
,qute_id)
VALUES
(SYSDATE
,'AV' -- Available
,l_qute_id);
END IF; -- automatic quote
END LOOP;
IF l_produced_automatic_quote THEN
add_quote_reason(p_enqu_id => p_enqu.id
,p_reason => 'Produced an automatic quote.'
,p_reason => '-- Produced an automatic quote.'
,p_internal_or_external => g_internal_reason);
ELSE
add_quote_reason(p_enqu_id => p_enqu.id
,p_reason => 'Manual quote required.'
,p_reason => '-- Manual quote required.'
,p_internal_or_external => g_internal_reason);
INSERT INTO quotes
(id
,qute_type
,enqu_id
,valid_from
,valid_until
,created_on
,created_by)
VALUES
(qute_seq.NEXTVAL
,'MQ' -- manual quote
,p_enqu.id
,trunc(SYSDATE)
,trunc(SYSDATE + 90)
,SYSDATE
,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);
END IF;
END produce_install_quotes;
@@ -941,6 +991,10 @@ CREATE OR REPLACE PACKAGE BODY mip_quotation IS
--
END IF; -- manual or automatic quote
EXCEPTION
WHEN OTHERS THEN
cout_err.report_and_stop;
END produce_quotes;
BEGIN