11: c_END_DATE CONSTANT VARCHAR2(30) := 'END_DATE';
12:
13: -- The module base for this package.
14: D_PACKAGE_BASE CONSTANT VARCHAR2(50) :=
15: PO_LOG.get_package_base('PO_VAL_PRICE_BREAKS');
16:
17: -- The module base for the subprogram.
18: D_at_least_one_required_field CONSTANT VARCHAR2(100) :=
19: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'at_least_one_required_field');
15: PO_LOG.get_package_base('PO_VAL_PRICE_BREAKS');
16:
17: -- The module base for the subprogram.
18: D_at_least_one_required_field CONSTANT VARCHAR2(100) :=
19: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'at_least_one_required_field');
20:
21: D_price_discount_in_percent CONSTANT VARCHAR2(100) :=
22: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'price_discount_in_percent');
23:
18: D_at_least_one_required_field CONSTANT VARCHAR2(100) :=
19: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'at_least_one_required_field');
20:
21: D_price_discount_in_percent CONSTANT VARCHAR2(100) :=
22: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'price_discount_in_percent');
23:
24: D_price_override_gt_zero CONSTANT VARCHAR2(100) :=
25: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'price_override_gt_zero');
26:
21: D_price_discount_in_percent CONSTANT VARCHAR2(100) :=
22: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'price_discount_in_percent');
23:
24: D_price_override_gt_zero CONSTANT VARCHAR2(100) :=
25: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'price_override_gt_zero');
26:
27: D_quantity_ge_zero CONSTANT VARCHAR2(100) :=
28: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'quantity_ge_zero');
29:
24: D_price_override_gt_zero CONSTANT VARCHAR2(100) :=
25: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'price_override_gt_zero');
26:
27: D_quantity_ge_zero CONSTANT VARCHAR2(100) :=
28: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'quantity_ge_zero');
29:
30: D_start_date_le_end_date CONSTANT VARCHAR2(100) :=
31: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'start_date_le_end_date');
32:
27: D_quantity_ge_zero CONSTANT VARCHAR2(100) :=
28: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'quantity_ge_zero');
29:
30: D_start_date_le_end_date CONSTANT VARCHAR2(100) :=
31: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'start_date_le_end_date');
32:
33: D_break_start_ge_blanket_start CONSTANT VARCHAR2(100) :=
34: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'break_start_ge_blanket_start');
35:
30: D_start_date_le_end_date CONSTANT VARCHAR2(100) :=
31: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'start_date_le_end_date');
32:
33: D_break_start_ge_blanket_start CONSTANT VARCHAR2(100) :=
34: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'break_start_ge_blanket_start');
35:
36: D_break_start_le_blanket_end CONSTANT VARCHAR2(100) :=
37: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'break_start_le_blanket_end');
38:
33: D_break_start_ge_blanket_start CONSTANT VARCHAR2(100) :=
34: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'break_start_ge_blanket_start');
35:
36: D_break_start_le_blanket_end CONSTANT VARCHAR2(100) :=
37: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'break_start_le_blanket_end');
38:
39: D_break_start_le_expiration CONSTANT VARCHAR2(100) :=
40: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'break_start_le_expiration');
41:
36: D_break_start_le_blanket_end CONSTANT VARCHAR2(100) :=
37: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'break_start_le_blanket_end');
38:
39: D_break_start_le_expiration CONSTANT VARCHAR2(100) :=
40: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'break_start_le_expiration');
41:
42: D_break_end_le_expiration CONSTANT VARCHAR2(100) :=
43: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'break_end_le_expiration');
44:
39: D_break_start_le_expiration CONSTANT VARCHAR2(100) :=
40: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'break_start_le_expiration');
41:
42: D_break_end_le_expiration CONSTANT VARCHAR2(100) :=
43: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'break_end_le_expiration');
44:
45: D_break_end_ge_blanket_start CONSTANT VARCHAR2(100) :=
46: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'break_end_ge_blanket_start');
47:
42: D_break_end_le_expiration CONSTANT VARCHAR2(100) :=
43: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'break_end_le_expiration');
44:
45: D_break_end_ge_blanket_start CONSTANT VARCHAR2(100) :=
46: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'break_end_ge_blanket_start');
47:
48: D_break_end_le_blanket_end CONSTANT VARCHAR2(100) :=
49: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'break_end_le_blanket_end');
50:
45: D_break_end_ge_blanket_start CONSTANT VARCHAR2(100) :=
46: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'break_end_ge_blanket_start');
47:
48: D_break_end_le_blanket_end CONSTANT VARCHAR2(100) :=
49: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'break_end_le_blanket_end');
50:
51:
52: -----------------------------------------------------------------------------
53: -- This procedure determines if for each price break, at least one of the
68: d_mod CONSTANT VARCHAR2(100) := D_at_least_one_required_field;
69: l_results_count NUMBER;
70: BEGIN
71:
72: IF PO_LOG.d_proc THEN
73: PO_LOG.proc_begin(d_mod,'p_line_loc_id_tbl',p_line_loc_id_tbl);
74: PO_LOG.proc_begin(d_mod,'p_start_date_tbl',p_start_date_tbl);
75: PO_LOG.proc_begin(d_mod,'p_end_date_tbl',p_end_date_tbl);
76: PO_LOG.proc_begin(d_mod,'p_quantity_tbl',p_quantity_tbl);
69: l_results_count NUMBER;
70: BEGIN
71:
72: IF PO_LOG.d_proc THEN
73: PO_LOG.proc_begin(d_mod,'p_line_loc_id_tbl',p_line_loc_id_tbl);
74: PO_LOG.proc_begin(d_mod,'p_start_date_tbl',p_start_date_tbl);
75: PO_LOG.proc_begin(d_mod,'p_end_date_tbl',p_end_date_tbl);
76: PO_LOG.proc_begin(d_mod,'p_quantity_tbl',p_quantity_tbl);
77: PO_LOG.proc_begin(d_mod,'p_ship_to_org_id_tbl',p_ship_to_org_id_tbl);
70: BEGIN
71:
72: IF PO_LOG.d_proc THEN
73: PO_LOG.proc_begin(d_mod,'p_line_loc_id_tbl',p_line_loc_id_tbl);
74: PO_LOG.proc_begin(d_mod,'p_start_date_tbl',p_start_date_tbl);
75: PO_LOG.proc_begin(d_mod,'p_end_date_tbl',p_end_date_tbl);
76: PO_LOG.proc_begin(d_mod,'p_quantity_tbl',p_quantity_tbl);
77: PO_LOG.proc_begin(d_mod,'p_ship_to_org_id_tbl',p_ship_to_org_id_tbl);
78: PO_LOG.proc_begin(d_mod,'p_ship_to_loc_id_tbl',p_ship_to_loc_id_tbl);
71:
72: IF PO_LOG.d_proc THEN
73: PO_LOG.proc_begin(d_mod,'p_line_loc_id_tbl',p_line_loc_id_tbl);
74: PO_LOG.proc_begin(d_mod,'p_start_date_tbl',p_start_date_tbl);
75: PO_LOG.proc_begin(d_mod,'p_end_date_tbl',p_end_date_tbl);
76: PO_LOG.proc_begin(d_mod,'p_quantity_tbl',p_quantity_tbl);
77: PO_LOG.proc_begin(d_mod,'p_ship_to_org_id_tbl',p_ship_to_org_id_tbl);
78: PO_LOG.proc_begin(d_mod,'p_ship_to_loc_id_tbl',p_ship_to_loc_id_tbl);
79: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
72: IF PO_LOG.d_proc THEN
73: PO_LOG.proc_begin(d_mod,'p_line_loc_id_tbl',p_line_loc_id_tbl);
74: PO_LOG.proc_begin(d_mod,'p_start_date_tbl',p_start_date_tbl);
75: PO_LOG.proc_begin(d_mod,'p_end_date_tbl',p_end_date_tbl);
76: PO_LOG.proc_begin(d_mod,'p_quantity_tbl',p_quantity_tbl);
77: PO_LOG.proc_begin(d_mod,'p_ship_to_org_id_tbl',p_ship_to_org_id_tbl);
78: PO_LOG.proc_begin(d_mod,'p_ship_to_loc_id_tbl',p_ship_to_loc_id_tbl);
79: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
80: END IF;
73: PO_LOG.proc_begin(d_mod,'p_line_loc_id_tbl',p_line_loc_id_tbl);
74: PO_LOG.proc_begin(d_mod,'p_start_date_tbl',p_start_date_tbl);
75: PO_LOG.proc_begin(d_mod,'p_end_date_tbl',p_end_date_tbl);
76: PO_LOG.proc_begin(d_mod,'p_quantity_tbl',p_quantity_tbl);
77: PO_LOG.proc_begin(d_mod,'p_ship_to_org_id_tbl',p_ship_to_org_id_tbl);
78: PO_LOG.proc_begin(d_mod,'p_ship_to_loc_id_tbl',p_ship_to_loc_id_tbl);
79: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
80: END IF;
81:
74: PO_LOG.proc_begin(d_mod,'p_start_date_tbl',p_start_date_tbl);
75: PO_LOG.proc_begin(d_mod,'p_end_date_tbl',p_end_date_tbl);
76: PO_LOG.proc_begin(d_mod,'p_quantity_tbl',p_quantity_tbl);
77: PO_LOG.proc_begin(d_mod,'p_ship_to_org_id_tbl',p_ship_to_org_id_tbl);
78: PO_LOG.proc_begin(d_mod,'p_ship_to_loc_id_tbl',p_ship_to_loc_id_tbl);
79: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
80: END IF;
81:
82: IF (x_results IS NULL) THEN
75: PO_LOG.proc_begin(d_mod,'p_end_date_tbl',p_end_date_tbl);
76: PO_LOG.proc_begin(d_mod,'p_quantity_tbl',p_quantity_tbl);
77: PO_LOG.proc_begin(d_mod,'p_ship_to_org_id_tbl',p_ship_to_org_id_tbl);
78: PO_LOG.proc_begin(d_mod,'p_ship_to_loc_id_tbl',p_ship_to_loc_id_tbl);
79: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
80: END IF;
81:
82: IF (x_results IS NULL) THEN
83: x_results := PO_VALIDATION_RESULTS_TYPE.new_instance();
107: ELSE
108: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
109: END IF;
110:
111: IF PO_LOG.d_proc THEN
112: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
113: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
114: END IF;
115:
108: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
109: END IF;
110:
111: IF PO_LOG.d_proc THEN
112: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
113: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
114: END IF;
115:
116: EXCEPTION
109: END IF;
110:
111: IF PO_LOG.d_proc THEN
112: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
113: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
114: END IF;
115:
116: EXCEPTION
117: WHEN OTHERS THEN
114: END IF;
115:
116: EXCEPTION
117: WHEN OTHERS THEN
118: IF PO_LOG.d_exc THEN
119: PO_LOG.exc(d_mod,0,NULL);
120: END IF;
121: RAISE;
122:
115:
116: EXCEPTION
117: WHEN OTHERS THEN
118: IF PO_LOG.d_exc THEN
119: PO_LOG.exc(d_mod,0,NULL);
120: END IF;
121: RAISE;
122:
123: END at_least_one_required_field;