diff --git a/Modules/mip_quotation.pck b/Modules/mip_quotation.pck index 4e41e5d..754685b 100644 --- a/Modules/mip_quotation.pck +++ b/Modules/mip_quotation.pck @@ -1215,6 +1215,7 @@ RECEIVED AT THIS ADDRESS CANNOT BE RESPONDED TO.'); FUNCTION ready_for_quote(p_enqu_id IN enquiries.id%TYPE) RETURN BOOLEAN IS l_mandatory_checks mip_mandatory.t_mandatory_checks; l_enquiry_is_ready BOOLEAN; + l_idx BINARY_INTEGER; BEGIN pl('ready_for_quote(2) - enqu_id=' || p_enqu_id ,$$PLSQL_LINE); @@ -1222,6 +1223,15 @@ RECEIVED AT THIS ADDRESS CANNOT BE RESPONDED TO.'); ready_for_quote(p_enqu_id => p_enqu_id ,p_mandatory_checks => l_mandatory_checks ,p_enquiry_is_ready => l_enquiry_is_ready); + + l_idx := l_mandatory_checks.FIRST; + LOOP + EXIT WHEN l_idx IS NULL; + pl(l_mandatory_checks(l_idx) + .field_name || ':' || l_mandatory_checks(l_idx).error_message); + l_idx := l_mandatory_checks.NEXT(l_idx); + END LOOP; + RETURN l_enquiry_is_ready; END ready_for_quote; @@ -1460,7 +1470,7 @@ RECEIVED AT THIS ADDRESS CANNOT BE RESPONDED TO.'); BEGIN pl('get_existing_metr_details:entry' ,$$PLSQL_LINE); - + IF nvl(p_enqu.existing_metr_code ,'OTHER') <> 'OTHER' THEN l_rec_metr_details := get_metr_details(p_enqu.existing_metr_code);