32: c_EMAIL CONSTANT VARCHAR2(30) := 'EMAIL';
33:
34: -- The module base for this package.
35: D_PACKAGE_BASE CONSTANT VARCHAR2(50) :=
36: PO_LOG.get_package_base('PO_VAL_HEADERS');
37:
38: -- The module base for the subprogram.
39: D_price_update_tol_ge_zero CONSTANT VARCHAR2(100) :=
40: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'price_update_tol_ge_zero');
36: PO_LOG.get_package_base('PO_VAL_HEADERS');
37:
38: -- The module base for the subprogram.
39: D_price_update_tol_ge_zero CONSTANT VARCHAR2(100) :=
40: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'price_update_tol_ge_zero');
41:
42: D_amount_limit_ge_zero CONSTANT VARCHAR2(100) :=
43: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'amount_limit_ge_zero');
44:
39: D_price_update_tol_ge_zero CONSTANT VARCHAR2(100) :=
40: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'price_update_tol_ge_zero');
41:
42: D_amount_limit_ge_zero CONSTANT VARCHAR2(100) :=
43: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'amount_limit_ge_zero');
44:
45: D_amt_limit_ge_amt_agreed CONSTANT VARCHAR2(100) :=
46: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'amt_limit_ge_amt_agreed');
47:
42: D_amount_limit_ge_zero CONSTANT VARCHAR2(100) :=
43: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'amount_limit_ge_zero');
44:
45: D_amt_limit_ge_amt_agreed CONSTANT VARCHAR2(100) :=
46: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'amt_limit_ge_amt_agreed');
47:
48: D_amount_agreed_ge_zero CONSTANT VARCHAR2(100) :=
49: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'amount_agreed_ge_zero');
50:
45: D_amt_limit_ge_amt_agreed CONSTANT VARCHAR2(100) :=
46: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'amt_limit_ge_amt_agreed');
47:
48: D_amount_agreed_ge_zero CONSTANT VARCHAR2(100) :=
49: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'amount_agreed_ge_zero');
50:
51: D_amount_agreed_not_null CONSTANT VARCHAR2(100) :=
52: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'amount_agreed_not_null');
53:
48: D_amount_agreed_ge_zero CONSTANT VARCHAR2(100) :=
49: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'amount_agreed_ge_zero');
50:
51: D_amount_agreed_not_null CONSTANT VARCHAR2(100) :=
52: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'amount_agreed_not_null');
53:
54: D_warn_supplier_on_hold CONSTANT VARCHAR2(100) :=
55: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'warn_supplier_on_hold');
56:
51: D_amount_agreed_not_null CONSTANT VARCHAR2(100) :=
52: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'amount_agreed_not_null');
53:
54: D_warn_supplier_on_hold CONSTANT VARCHAR2(100) :=
55: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'warn_supplier_on_hold');
56:
57: D_rate_gt_zero CONSTANT VARCHAR2(100) :=
58: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'rate_gt_zero');
59:
54: D_warn_supplier_on_hold CONSTANT VARCHAR2(100) :=
55: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'warn_supplier_on_hold');
56:
57: D_rate_gt_zero CONSTANT VARCHAR2(100) :=
58: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'rate_gt_zero');
59:
60: D_fax_email_address_valid CONSTANT VARCHAR2(100) :=
61: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'fax_email_address_valid');
62:
57: D_rate_gt_zero CONSTANT VARCHAR2(100) :=
58: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'rate_gt_zero');
59:
60: D_fax_email_address_valid CONSTANT VARCHAR2(100) :=
61: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'fax_email_address_valid');
62:
63: D_rate_combination_valid CONSTANT VARCHAR2(100) :=
64: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'rate_combination_valid');
65:
60: D_fax_email_address_valid CONSTANT VARCHAR2(100) :=
61: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'fax_email_address_valid');
62:
63: D_rate_combination_valid CONSTANT VARCHAR2(100) :=
64: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'rate_combination_valid');
65:
66: D_effective_le_expiration CONSTANT VARCHAR2(100) :=
67: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'effective_le_expiration');
68:
63: D_rate_combination_valid CONSTANT VARCHAR2(100) :=
64: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'rate_combination_valid');
65:
66: D_effective_le_expiration CONSTANT VARCHAR2(100) :=
67: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'effective_le_expiration');
68:
69: D_effective_from_le_order_date CONSTANT VARCHAR2(100) :=
70: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'effective_from_le_order_date');
71:
66: D_effective_le_expiration CONSTANT VARCHAR2(100) :=
67: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'effective_le_expiration');
68:
69: D_effective_from_le_order_date CONSTANT VARCHAR2(100) :=
70: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'effective_from_le_order_date');
71:
72: D_effective_to_ge_order_date CONSTANT VARCHAR2(100) :=
73: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'effective_to_ge_order_date');
74:
69: D_effective_from_le_order_date CONSTANT VARCHAR2(100) :=
70: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'effective_from_le_order_date');
71:
72: D_effective_to_ge_order_date CONSTANT VARCHAR2(100) :=
73: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'effective_to_ge_order_date');
74:
75: D_contract_start_le_order_date CONSTANT VARCHAR2(100) :=
76: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'contract_start_le_order_date');
77:
72: D_effective_to_ge_order_date CONSTANT VARCHAR2(100) :=
73: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'effective_to_ge_order_date');
74:
75: D_contract_start_le_order_date CONSTANT VARCHAR2(100) :=
76: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'contract_start_le_order_date');
77:
78: D_contract_end_ge_order_date CONSTANT VARCHAR2(100) :=
79: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'contract_end_ge_order_date');
80:
75: D_contract_start_le_order_date CONSTANT VARCHAR2(100) :=
76: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'contract_start_le_order_date');
77:
78: D_contract_end_ge_order_date CONSTANT VARCHAR2(100) :=
79: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'contract_end_ge_order_date');
80:
81: D_doc_num_chars_valid CONSTANT VARCHAR2(100) :=
82: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'doc_num_chars_valid');
83:
78: D_contract_end_ge_order_date CONSTANT VARCHAR2(100) :=
79: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'contract_end_ge_order_date');
80:
81: D_doc_num_chars_valid CONSTANT VARCHAR2(100) :=
82: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'doc_num_chars_valid');
83:
84: D_doc_num_unique CONSTANT VARCHAR2(100) :=
85: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'doc_num_unique');
86:
81: D_doc_num_chars_valid CONSTANT VARCHAR2(100) :=
82: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'doc_num_chars_valid');
83:
84: D_doc_num_unique CONSTANT VARCHAR2(100) :=
85: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'doc_num_unique');
86:
87: D_check_agreement_dates CONSTANT VARCHAR2(100) :=
88: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'check_agreement_dates');
89:
84: D_doc_num_unique CONSTANT VARCHAR2(100) :=
85: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'doc_num_unique');
86:
87: D_check_agreement_dates CONSTANT VARCHAR2(100) :=
88: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'check_agreement_dates');
89:
90: D_agent_id_not_null CONSTANT VARCHAR2(100) :=
91: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'agent_id_not_null');
92: D_ship_to_loc_not_null CONSTANT VARCHAR2(100) :=
87: D_check_agreement_dates CONSTANT VARCHAR2(100) :=
88: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'check_agreement_dates');
89:
90: D_agent_id_not_null CONSTANT VARCHAR2(100) :=
91: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'agent_id_not_null');
92: D_ship_to_loc_not_null CONSTANT VARCHAR2(100) :=
93: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'ship_to_loc_not_null');
94: D_vendor_id_not_null CONSTANT VARCHAR2(100) :=
95: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'vendor_id_not_null');
89:
90: D_agent_id_not_null CONSTANT VARCHAR2(100) :=
91: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'agent_id_not_null');
92: D_ship_to_loc_not_null CONSTANT VARCHAR2(100) :=
93: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'ship_to_loc_not_null');
94: D_vendor_id_not_null CONSTANT VARCHAR2(100) :=
95: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'vendor_id_not_null');
96: D_vendor_site_id_not_null CONSTANT VARCHAR2(100) :=
97: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'vendor_site_id_not_null');
91: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'agent_id_not_null');
92: D_ship_to_loc_not_null CONSTANT VARCHAR2(100) :=
93: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'ship_to_loc_not_null');
94: D_vendor_id_not_null CONSTANT VARCHAR2(100) :=
95: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'vendor_id_not_null');
96: D_vendor_site_id_not_null CONSTANT VARCHAR2(100) :=
97: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'vendor_site_id_not_null');
98: D_segment1_not_null CONSTANT VARCHAR2(100) :=
99: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'segment1_not_null');
93: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'ship_to_loc_not_null');
94: D_vendor_id_not_null CONSTANT VARCHAR2(100) :=
95: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'vendor_id_not_null');
96: D_vendor_site_id_not_null CONSTANT VARCHAR2(100) :=
97: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'vendor_site_id_not_null');
98: D_segment1_not_null CONSTANT VARCHAR2(100) :=
99: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'segment1_not_null');
100:
101: ---------------------------------------------------------------------------
95: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'vendor_id_not_null');
96: D_vendor_site_id_not_null CONSTANT VARCHAR2(100) :=
97: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'vendor_site_id_not_null');
98: D_segment1_not_null CONSTANT VARCHAR2(100) :=
99: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'segment1_not_null');
100:
101: ---------------------------------------------------------------------------
102: -- Checks that the Price Update Tolerance is greater than or equal to zero.
103: -- Agreements only.
226: d_mod CONSTANT VARCHAR2(100) := D_amount_agreed_not_null;
227: l_results_count NUMBER;
228: BEGIN
229:
230: IF PO_LOG.d_proc THEN
231: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
232: PO_LOG.proc_begin(d_mod,'p_blanket_total_amount_tbl',p_blanket_total_amount_tbl);
233: PO_LOG.proc_begin(d_mod,'p_amount_limit_tbl',p_amount_limit_tbl);
234: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
227: l_results_count NUMBER;
228: BEGIN
229:
230: IF PO_LOG.d_proc THEN
231: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
232: PO_LOG.proc_begin(d_mod,'p_blanket_total_amount_tbl',p_blanket_total_amount_tbl);
233: PO_LOG.proc_begin(d_mod,'p_amount_limit_tbl',p_amount_limit_tbl);
234: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
235: END IF;
228: BEGIN
229:
230: IF PO_LOG.d_proc THEN
231: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
232: PO_LOG.proc_begin(d_mod,'p_blanket_total_amount_tbl',p_blanket_total_amount_tbl);
233: PO_LOG.proc_begin(d_mod,'p_amount_limit_tbl',p_amount_limit_tbl);
234: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
235: END IF;
236:
229:
230: IF PO_LOG.d_proc THEN
231: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
232: PO_LOG.proc_begin(d_mod,'p_blanket_total_amount_tbl',p_blanket_total_amount_tbl);
233: PO_LOG.proc_begin(d_mod,'p_amount_limit_tbl',p_amount_limit_tbl);
234: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
235: END IF;
236:
237: IF (x_results IS NULL) THEN
230: IF PO_LOG.d_proc THEN
231: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
232: PO_LOG.proc_begin(d_mod,'p_blanket_total_amount_tbl',p_blanket_total_amount_tbl);
233: PO_LOG.proc_begin(d_mod,'p_amount_limit_tbl',p_amount_limit_tbl);
234: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
235: END IF;
236:
237: IF (x_results IS NULL) THEN
238: x_results := PO_VALIDATION_RESULTS_TYPE.new_instance();
259: ELSE
260: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
261: END IF;
262:
263: IF PO_LOG.d_proc THEN
264: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
265: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
266: END IF;
267:
260: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
261: END IF;
262:
263: IF PO_LOG.d_proc THEN
264: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
265: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
266: END IF;
267:
268: EXCEPTION
261: END IF;
262:
263: IF PO_LOG.d_proc THEN
264: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
265: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
266: END IF;
267:
268: EXCEPTION
269: WHEN OTHERS THEN
266: END IF;
267:
268: EXCEPTION
269: WHEN OTHERS THEN
270: IF PO_LOG.d_exc THEN
271: PO_LOG.exc(d_mod,0,NULL);
272: END IF;
273: RAISE;
274:
267:
268: EXCEPTION
269: WHEN OTHERS THEN
270: IF PO_LOG.d_exc THEN
271: PO_LOG.exc(d_mod,0,NULL);
272: END IF;
273: RAISE;
274:
275: END amount_agreed_not_null;
287: IS
288: d_mod CONSTANT VARCHAR2(100) := D_warn_supplier_on_hold;
289: BEGIN
290:
291: IF PO_LOG.d_proc THEN
292: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
293: PO_LOG.proc_begin(d_mod,'p_vendor_id_tbl',p_vendor_id_tbl);
294: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
295: END IF;
288: d_mod CONSTANT VARCHAR2(100) := D_warn_supplier_on_hold;
289: BEGIN
290:
291: IF PO_LOG.d_proc THEN
292: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
293: PO_LOG.proc_begin(d_mod,'p_vendor_id_tbl',p_vendor_id_tbl);
294: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
295: END IF;
296:
289: BEGIN
290:
291: IF PO_LOG.d_proc THEN
292: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
293: PO_LOG.proc_begin(d_mod,'p_vendor_id_tbl',p_vendor_id_tbl);
294: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
295: END IF;
296:
297: IF (x_result_set_id IS NULL) THEN
290:
291: IF PO_LOG.d_proc THEN
292: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
293: PO_LOG.proc_begin(d_mod,'p_vendor_id_tbl',p_vendor_id_tbl);
294: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
295: END IF;
296:
297: IF (x_result_set_id IS NULL) THEN
298: x_result_set_id := PO_VALIDATIONS.next_result_set_id();
328: ELSE
329: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
330: END IF;
331:
332: IF PO_LOG.d_proc THEN
333: PO_VALIDATIONS.log_validation_results_gt(d_mod,9,x_result_set_id);
334: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
335: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
336: END IF;
330: END IF;
331:
332: IF PO_LOG.d_proc THEN
333: PO_VALIDATIONS.log_validation_results_gt(d_mod,9,x_result_set_id);
334: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
335: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
336: END IF;
337:
338: EXCEPTION
331:
332: IF PO_LOG.d_proc THEN
333: PO_VALIDATIONS.log_validation_results_gt(d_mod,9,x_result_set_id);
334: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
335: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
336: END IF;
337:
338: EXCEPTION
339: WHEN OTHERS THEN
336: END IF;
337:
338: EXCEPTION
339: WHEN OTHERS THEN
340: IF PO_LOG.d_exc THEN
341: PO_LOG.exc(d_mod,0,NULL);
342: END IF;
343: RAISE;
344:
337:
338: EXCEPTION
339: WHEN OTHERS THEN
340: IF PO_LOG.d_exc THEN
341: PO_LOG.exc(d_mod,0,NULL);
342: END IF;
343: RAISE;
344:
345: END warn_supplier_on_hold;
396: l_results_count NUMBER;
397: l_func_currency_code GL_SETS_OF_BOOKS.currency_code%TYPE;
398: BEGIN
399:
400: IF PO_LOG.d_proc THEN
401: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
402: PO_LOG.proc_begin(d_mod,'p_org_id_tbl',p_org_id_tbl);
403: PO_LOG.proc_begin(d_mod,'p_currency_code_tbl',p_currency_code_tbl);
404: PO_LOG.proc_begin(d_mod,'p_rate_type_tbl',p_rate_type_tbl);
397: l_func_currency_code GL_SETS_OF_BOOKS.currency_code%TYPE;
398: BEGIN
399:
400: IF PO_LOG.d_proc THEN
401: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
402: PO_LOG.proc_begin(d_mod,'p_org_id_tbl',p_org_id_tbl);
403: PO_LOG.proc_begin(d_mod,'p_currency_code_tbl',p_currency_code_tbl);
404: PO_LOG.proc_begin(d_mod,'p_rate_type_tbl',p_rate_type_tbl);
405: PO_LOG.proc_begin(d_mod,'p_rate_date_tbl',p_rate_date_tbl);
398: BEGIN
399:
400: IF PO_LOG.d_proc THEN
401: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
402: PO_LOG.proc_begin(d_mod,'p_org_id_tbl',p_org_id_tbl);
403: PO_LOG.proc_begin(d_mod,'p_currency_code_tbl',p_currency_code_tbl);
404: PO_LOG.proc_begin(d_mod,'p_rate_type_tbl',p_rate_type_tbl);
405: PO_LOG.proc_begin(d_mod,'p_rate_date_tbl',p_rate_date_tbl);
406: PO_LOG.proc_begin(d_mod,'p_rate_tbl',p_rate_tbl);
399:
400: IF PO_LOG.d_proc THEN
401: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
402: PO_LOG.proc_begin(d_mod,'p_org_id_tbl',p_org_id_tbl);
403: PO_LOG.proc_begin(d_mod,'p_currency_code_tbl',p_currency_code_tbl);
404: PO_LOG.proc_begin(d_mod,'p_rate_type_tbl',p_rate_type_tbl);
405: PO_LOG.proc_begin(d_mod,'p_rate_date_tbl',p_rate_date_tbl);
406: PO_LOG.proc_begin(d_mod,'p_rate_tbl',p_rate_tbl);
407: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
400: IF PO_LOG.d_proc THEN
401: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
402: PO_LOG.proc_begin(d_mod,'p_org_id_tbl',p_org_id_tbl);
403: PO_LOG.proc_begin(d_mod,'p_currency_code_tbl',p_currency_code_tbl);
404: PO_LOG.proc_begin(d_mod,'p_rate_type_tbl',p_rate_type_tbl);
405: PO_LOG.proc_begin(d_mod,'p_rate_date_tbl',p_rate_date_tbl);
406: PO_LOG.proc_begin(d_mod,'p_rate_tbl',p_rate_tbl);
407: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
408: END IF;
401: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
402: PO_LOG.proc_begin(d_mod,'p_org_id_tbl',p_org_id_tbl);
403: PO_LOG.proc_begin(d_mod,'p_currency_code_tbl',p_currency_code_tbl);
404: PO_LOG.proc_begin(d_mod,'p_rate_type_tbl',p_rate_type_tbl);
405: PO_LOG.proc_begin(d_mod,'p_rate_date_tbl',p_rate_date_tbl);
406: PO_LOG.proc_begin(d_mod,'p_rate_tbl',p_rate_tbl);
407: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
408: END IF;
409:
402: PO_LOG.proc_begin(d_mod,'p_org_id_tbl',p_org_id_tbl);
403: PO_LOG.proc_begin(d_mod,'p_currency_code_tbl',p_currency_code_tbl);
404: PO_LOG.proc_begin(d_mod,'p_rate_type_tbl',p_rate_type_tbl);
405: PO_LOG.proc_begin(d_mod,'p_rate_date_tbl',p_rate_date_tbl);
406: PO_LOG.proc_begin(d_mod,'p_rate_tbl',p_rate_tbl);
407: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
408: END IF;
409:
410: IF (x_results IS NULL) THEN
403: PO_LOG.proc_begin(d_mod,'p_currency_code_tbl',p_currency_code_tbl);
404: PO_LOG.proc_begin(d_mod,'p_rate_type_tbl',p_rate_type_tbl);
405: PO_LOG.proc_begin(d_mod,'p_rate_date_tbl',p_rate_date_tbl);
406: PO_LOG.proc_begin(d_mod,'p_rate_tbl',p_rate_tbl);
407: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
408: END IF;
409:
410: IF (x_results IS NULL) THEN
411: x_results := PO_VALIDATION_RESULTS_TYPE.new_instance();
472: ELSE
473: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
474: END IF;
475:
476: IF PO_LOG.d_proc THEN
477: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
478: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
479: END IF;
480:
473: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
474: END IF;
475:
476: IF PO_LOG.d_proc THEN
477: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
478: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
479: END IF;
480:
481: EXCEPTION
474: END IF;
475:
476: IF PO_LOG.d_proc THEN
477: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
478: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
479: END IF;
480:
481: EXCEPTION
482: WHEN OTHERS THEN
479: END IF;
480:
481: EXCEPTION
482: WHEN OTHERS THEN
483: IF PO_LOG.d_exc THEN
484: PO_LOG.exc(d_mod,0,NULL);
485: END IF;
486: RAISE;
487:
480:
481: EXCEPTION
482: WHEN OTHERS THEN
483: IF PO_LOG.d_exc THEN
484: PO_LOG.exc(d_mod,0,NULL);
485: END IF;
486: RAISE;
487:
488: END rate_combination_valid;
505: d_mod CONSTANT VARCHAR2(100) := D_fax_email_address_valid;
506: l_results_count NUMBER;
507: BEGIN
508:
509: IF PO_LOG.d_proc THEN
510: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
511: PO_LOG.proc_begin(d_mod,'p_supplier_notif_method_tbl',p_supplier_notif_method_tbl);
512: PO_LOG.proc_begin(d_mod,'p_email_address_tbl',p_email_address_tbl);
513: PO_LOG.proc_begin(d_mod,'p_fax_tbl',p_fax_tbl);
506: l_results_count NUMBER;
507: BEGIN
508:
509: IF PO_LOG.d_proc THEN
510: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
511: PO_LOG.proc_begin(d_mod,'p_supplier_notif_method_tbl',p_supplier_notif_method_tbl);
512: PO_LOG.proc_begin(d_mod,'p_email_address_tbl',p_email_address_tbl);
513: PO_LOG.proc_begin(d_mod,'p_fax_tbl',p_fax_tbl);
514: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
507: BEGIN
508:
509: IF PO_LOG.d_proc THEN
510: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
511: PO_LOG.proc_begin(d_mod,'p_supplier_notif_method_tbl',p_supplier_notif_method_tbl);
512: PO_LOG.proc_begin(d_mod,'p_email_address_tbl',p_email_address_tbl);
513: PO_LOG.proc_begin(d_mod,'p_fax_tbl',p_fax_tbl);
514: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
515: END IF;
508:
509: IF PO_LOG.d_proc THEN
510: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
511: PO_LOG.proc_begin(d_mod,'p_supplier_notif_method_tbl',p_supplier_notif_method_tbl);
512: PO_LOG.proc_begin(d_mod,'p_email_address_tbl',p_email_address_tbl);
513: PO_LOG.proc_begin(d_mod,'p_fax_tbl',p_fax_tbl);
514: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
515: END IF;
516:
509: IF PO_LOG.d_proc THEN
510: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
511: PO_LOG.proc_begin(d_mod,'p_supplier_notif_method_tbl',p_supplier_notif_method_tbl);
512: PO_LOG.proc_begin(d_mod,'p_email_address_tbl',p_email_address_tbl);
513: PO_LOG.proc_begin(d_mod,'p_fax_tbl',p_fax_tbl);
514: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
515: END IF;
516:
517: IF (x_results IS NULL) THEN
510: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
511: PO_LOG.proc_begin(d_mod,'p_supplier_notif_method_tbl',p_supplier_notif_method_tbl);
512: PO_LOG.proc_begin(d_mod,'p_email_address_tbl',p_email_address_tbl);
513: PO_LOG.proc_begin(d_mod,'p_fax_tbl',p_fax_tbl);
514: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
515: END IF;
516:
517: IF (x_results IS NULL) THEN
518: x_results := PO_VALIDATION_RESULTS_TYPE.new_instance();
547: ELSE
548: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
549: END IF;
550:
551: IF PO_LOG.d_proc THEN
552: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
553: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
554: END IF;
555:
548: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
549: END IF;
550:
551: IF PO_LOG.d_proc THEN
552: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
553: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
554: END IF;
555:
556: EXCEPTION
549: END IF;
550:
551: IF PO_LOG.d_proc THEN
552: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
553: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
554: END IF;
555:
556: EXCEPTION
557: WHEN OTHERS THEN
554: END IF;
555:
556: EXCEPTION
557: WHEN OTHERS THEN
558: IF PO_LOG.d_exc THEN
559: PO_LOG.exc(d_mod,0,NULL);
560: END IF;
561: RAISE;
562:
555:
556: EXCEPTION
557: WHEN OTHERS THEN
558: IF PO_LOG.d_exc THEN
559: PO_LOG.exc(d_mod,0,NULL);
560: END IF;
561: RAISE;
562:
563: END fax_email_address_valid;
609: IS
610: d_mod CONSTANT VARCHAR2(100) := D_effective_from_le_order_date;
611: BEGIN
612:
613: IF PO_LOG.d_proc THEN
614: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
615: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
616: PO_LOG.proc_begin(d_mod,'p_start_date_tbl',p_start_date_tbl);
617: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
610: d_mod CONSTANT VARCHAR2(100) := D_effective_from_le_order_date;
611: BEGIN
612:
613: IF PO_LOG.d_proc THEN
614: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
615: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
616: PO_LOG.proc_begin(d_mod,'p_start_date_tbl',p_start_date_tbl);
617: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
618: END IF;
611: BEGIN
612:
613: IF PO_LOG.d_proc THEN
614: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
615: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
616: PO_LOG.proc_begin(d_mod,'p_start_date_tbl',p_start_date_tbl);
617: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
618: END IF;
619:
612:
613: IF PO_LOG.d_proc THEN
614: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
615: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
616: PO_LOG.proc_begin(d_mod,'p_start_date_tbl',p_start_date_tbl);
617: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
618: END IF;
619:
620: IF (x_result_set_id IS NULL) THEN
613: IF PO_LOG.d_proc THEN
614: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
615: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
616: PO_LOG.proc_begin(d_mod,'p_start_date_tbl',p_start_date_tbl);
617: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
618: END IF;
619:
620: IF (x_result_set_id IS NULL) THEN
621: x_result_set_id := PO_VALIDATIONS.next_result_set_id();
655: ELSE
656: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
657: END IF;
658:
659: IF PO_LOG.d_proc THEN
660: PO_VALIDATIONS.log_validation_results_gt(d_mod,9,x_result_set_id);
661: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
662: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
663: END IF;
657: END IF;
658:
659: IF PO_LOG.d_proc THEN
660: PO_VALIDATIONS.log_validation_results_gt(d_mod,9,x_result_set_id);
661: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
662: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
663: END IF;
664:
665: EXCEPTION
658:
659: IF PO_LOG.d_proc THEN
660: PO_VALIDATIONS.log_validation_results_gt(d_mod,9,x_result_set_id);
661: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
662: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
663: END IF;
664:
665: EXCEPTION
666: WHEN OTHERS THEN
663: END IF;
664:
665: EXCEPTION
666: WHEN OTHERS THEN
667: IF PO_LOG.d_exc THEN
668: PO_LOG.exc(d_mod,0,NULL);
669: END IF;
670: RAISE;
671:
664:
665: EXCEPTION
666: WHEN OTHERS THEN
667: IF PO_LOG.d_exc THEN
668: PO_LOG.exc(d_mod,0,NULL);
669: END IF;
670: RAISE;
671:
672: END effective_from_le_order_date;
687: IS
688: d_mod CONSTANT VARCHAR2(100) := D_effective_to_ge_order_date;
689: BEGIN
690:
691: IF PO_LOG.d_proc THEN
692: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
693: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
694: PO_LOG.proc_begin(d_mod,'p_end_date_tbl',p_end_date_tbl);
695: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
688: d_mod CONSTANT VARCHAR2(100) := D_effective_to_ge_order_date;
689: BEGIN
690:
691: IF PO_LOG.d_proc THEN
692: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
693: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
694: PO_LOG.proc_begin(d_mod,'p_end_date_tbl',p_end_date_tbl);
695: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
696: END IF;
689: BEGIN
690:
691: IF PO_LOG.d_proc THEN
692: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
693: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
694: PO_LOG.proc_begin(d_mod,'p_end_date_tbl',p_end_date_tbl);
695: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
696: END IF;
697:
690:
691: IF PO_LOG.d_proc THEN
692: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
693: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
694: PO_LOG.proc_begin(d_mod,'p_end_date_tbl',p_end_date_tbl);
695: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
696: END IF;
697:
698: IF (x_result_set_id IS NULL) THEN
691: IF PO_LOG.d_proc THEN
692: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
693: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
694: PO_LOG.proc_begin(d_mod,'p_end_date_tbl',p_end_date_tbl);
695: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
696: END IF;
697:
698: IF (x_result_set_id IS NULL) THEN
699: x_result_set_id := PO_VALIDATIONS.next_result_set_id();
733: ELSE
734: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
735: END IF;
736:
737: IF PO_LOG.d_proc THEN
738: PO_VALIDATIONS.log_validation_results_gt(d_mod,9,x_result_set_id);
739: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
740: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
741: END IF;
735: END IF;
736:
737: IF PO_LOG.d_proc THEN
738: PO_VALIDATIONS.log_validation_results_gt(d_mod,9,x_result_set_id);
739: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
740: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
741: END IF;
742:
743: EXCEPTION
736:
737: IF PO_LOG.d_proc THEN
738: PO_VALIDATIONS.log_validation_results_gt(d_mod,9,x_result_set_id);
739: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
740: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
741: END IF;
742:
743: EXCEPTION
744: WHEN OTHERS THEN
741: END IF;
742:
743: EXCEPTION
744: WHEN OTHERS THEN
745: IF PO_LOG.d_exc THEN
746: PO_LOG.exc(d_mod,0,NULL);
747: END IF;
748: RAISE;
749:
742:
743: EXCEPTION
744: WHEN OTHERS THEN
745: IF PO_LOG.d_exc THEN
746: PO_LOG.exc(d_mod,0,NULL);
747: END IF;
748: RAISE;
749:
750: END effective_to_ge_order_date;
764: IS
765: d_mod CONSTANT VARCHAR2(100) := D_contract_start_le_order_date;
766: BEGIN
767:
768: IF PO_LOG.d_proc THEN
769: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
770: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
771: PO_LOG.proc_begin(d_mod,'p_start_date_tbl',p_start_date_tbl);
772: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
765: d_mod CONSTANT VARCHAR2(100) := D_contract_start_le_order_date;
766: BEGIN
767:
768: IF PO_LOG.d_proc THEN
769: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
770: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
771: PO_LOG.proc_begin(d_mod,'p_start_date_tbl',p_start_date_tbl);
772: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
773: END IF;
766: BEGIN
767:
768: IF PO_LOG.d_proc THEN
769: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
770: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
771: PO_LOG.proc_begin(d_mod,'p_start_date_tbl',p_start_date_tbl);
772: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
773: END IF;
774:
767:
768: IF PO_LOG.d_proc THEN
769: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
770: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
771: PO_LOG.proc_begin(d_mod,'p_start_date_tbl',p_start_date_tbl);
772: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
773: END IF;
774:
775: IF (x_result_set_id IS NULL) THEN
768: IF PO_LOG.d_proc THEN
769: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
770: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
771: PO_LOG.proc_begin(d_mod,'p_start_date_tbl',p_start_date_tbl);
772: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
773: END IF;
774:
775: IF (x_result_set_id IS NULL) THEN
776: x_result_set_id := PO_VALIDATIONS.next_result_set_id();
817: ELSE
818: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
819: END IF;
820:
821: IF PO_LOG.d_proc THEN
822: PO_VALIDATIONS.log_validation_results_gt(d_mod,9,x_result_set_id);
823: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
824: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
825: END IF;
819: END IF;
820:
821: IF PO_LOG.d_proc THEN
822: PO_VALIDATIONS.log_validation_results_gt(d_mod,9,x_result_set_id);
823: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
824: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
825: END IF;
826:
827: EXCEPTION
820:
821: IF PO_LOG.d_proc THEN
822: PO_VALIDATIONS.log_validation_results_gt(d_mod,9,x_result_set_id);
823: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
824: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
825: END IF;
826:
827: EXCEPTION
828: WHEN OTHERS THEN
825: END IF;
826:
827: EXCEPTION
828: WHEN OTHERS THEN
829: IF PO_LOG.d_exc THEN
830: PO_LOG.exc(d_mod,0,NULL);
831: END IF;
832: RAISE;
833:
826:
827: EXCEPTION
828: WHEN OTHERS THEN
829: IF PO_LOG.d_exc THEN
830: PO_LOG.exc(d_mod,0,NULL);
831: END IF;
832: RAISE;
833:
834: END contract_start_le_order_date;
848: IS
849: d_mod CONSTANT VARCHAR2(100) := D_contract_end_ge_order_date;
850: BEGIN
851:
852: IF PO_LOG.d_proc THEN
853: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
854: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
855: PO_LOG.proc_begin(d_mod,'p_end_date_tbl',p_end_date_tbl);
856: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
849: d_mod CONSTANT VARCHAR2(100) := D_contract_end_ge_order_date;
850: BEGIN
851:
852: IF PO_LOG.d_proc THEN
853: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
854: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
855: PO_LOG.proc_begin(d_mod,'p_end_date_tbl',p_end_date_tbl);
856: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
857: END IF;
850: BEGIN
851:
852: IF PO_LOG.d_proc THEN
853: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
854: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
855: PO_LOG.proc_begin(d_mod,'p_end_date_tbl',p_end_date_tbl);
856: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
857: END IF;
858:
851:
852: IF PO_LOG.d_proc THEN
853: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
854: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
855: PO_LOG.proc_begin(d_mod,'p_end_date_tbl',p_end_date_tbl);
856: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
857: END IF;
858:
859: IF (x_result_set_id IS NULL) THEN
852: IF PO_LOG.d_proc THEN
853: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
854: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
855: PO_LOG.proc_begin(d_mod,'p_end_date_tbl',p_end_date_tbl);
856: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
857: END IF;
858:
859: IF (x_result_set_id IS NULL) THEN
860: x_result_set_id := PO_VALIDATIONS.next_result_set_id();
899: ELSE
900: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
901: END IF;
902:
903: IF PO_LOG.d_proc THEN
904: PO_VALIDATIONS.log_validation_results_gt(d_mod,9,x_result_set_id);
905: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
906: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
907: END IF;
901: END IF;
902:
903: IF PO_LOG.d_proc THEN
904: PO_VALIDATIONS.log_validation_results_gt(d_mod,9,x_result_set_id);
905: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
906: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
907: END IF;
908:
909: EXCEPTION
902:
903: IF PO_LOG.d_proc THEN
904: PO_VALIDATIONS.log_validation_results_gt(d_mod,9,x_result_set_id);
905: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
906: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
907: END IF;
908:
909: EXCEPTION
910: WHEN OTHERS THEN
907: END IF;
908:
909: EXCEPTION
910: WHEN OTHERS THEN
911: IF PO_LOG.d_exc THEN
912: PO_LOG.exc(d_mod,0,NULL);
913: END IF;
914: RAISE;
915:
908:
909: EXCEPTION
910: WHEN OTHERS THEN
911: IF PO_LOG.d_exc THEN
912: PO_LOG.exc(d_mod,0,NULL);
913: END IF;
914: RAISE;
915:
916: END contract_end_ge_order_date;
935: l_segment1_tbl PO_TBL_VARCHAR30;
936: l_num_test NUMBER;
937: BEGIN
938:
939: IF PO_LOG.d_proc THEN
940: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
941: PO_LOG.proc_begin(d_mod,'p_org_id_tbl',p_org_id_tbl);
942: PO_LOG.proc_begin(d_mod,'p_segment1_tbl',p_segment1_tbl);
943: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
936: l_num_test NUMBER;
937: BEGIN
938:
939: IF PO_LOG.d_proc THEN
940: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
941: PO_LOG.proc_begin(d_mod,'p_org_id_tbl',p_org_id_tbl);
942: PO_LOG.proc_begin(d_mod,'p_segment1_tbl',p_segment1_tbl);
943: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
944: END IF;
937: BEGIN
938:
939: IF PO_LOG.d_proc THEN
940: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
941: PO_LOG.proc_begin(d_mod,'p_org_id_tbl',p_org_id_tbl);
942: PO_LOG.proc_begin(d_mod,'p_segment1_tbl',p_segment1_tbl);
943: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
944: END IF;
945:
938:
939: IF PO_LOG.d_proc THEN
940: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
941: PO_LOG.proc_begin(d_mod,'p_org_id_tbl',p_org_id_tbl);
942: PO_LOG.proc_begin(d_mod,'p_segment1_tbl',p_segment1_tbl);
943: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
944: END IF;
945:
946: IF (x_results IS NULL) THEN
939: IF PO_LOG.d_proc THEN
940: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
941: PO_LOG.proc_begin(d_mod,'p_org_id_tbl',p_org_id_tbl);
942: PO_LOG.proc_begin(d_mod,'p_segment1_tbl',p_segment1_tbl);
943: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
944: END IF;
945:
946: IF (x_results IS NULL) THEN
947: x_results := PO_VALIDATION_RESULTS_TYPE.new_instance();
1003: ELSE
1004: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
1005: END IF;
1006:
1007: IF PO_LOG.d_proc THEN
1008: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
1009: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
1010: END IF;
1011:
1004: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
1005: END IF;
1006:
1007: IF PO_LOG.d_proc THEN
1008: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
1009: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
1010: END IF;
1011:
1012: EXCEPTION
1005: END IF;
1006:
1007: IF PO_LOG.d_proc THEN
1008: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
1009: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
1010: END IF;
1011:
1012: EXCEPTION
1013: WHEN OTHERS THEN
1010: END IF;
1011:
1012: EXCEPTION
1013: WHEN OTHERS THEN
1014: IF PO_LOG.d_exc THEN
1015: PO_LOG.exc(d_mod,0,NULL);
1016: END IF;
1017: RAISE;
1018:
1011:
1012: EXCEPTION
1013: WHEN OTHERS THEN
1014: IF PO_LOG.d_exc THEN
1015: PO_LOG.exc(d_mod,0,NULL);
1016: END IF;
1017: RAISE;
1018:
1019: END doc_num_chars_valid;
1046: l_pon_unique_status VARCHAR2(2000);
1047:
1048: BEGIN
1049:
1050: IF PO_LOG.d_proc THEN
1051: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
1052: PO_LOG.proc_begin(d_mod,'p_org_id_tbl',p_org_id_tbl);
1053: PO_LOG.proc_begin(d_mod,'p_segment1_tbl',p_segment1_tbl);
1054: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
1047:
1048: BEGIN
1049:
1050: IF PO_LOG.d_proc THEN
1051: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
1052: PO_LOG.proc_begin(d_mod,'p_org_id_tbl',p_org_id_tbl);
1053: PO_LOG.proc_begin(d_mod,'p_segment1_tbl',p_segment1_tbl);
1054: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
1055: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
1048: BEGIN
1049:
1050: IF PO_LOG.d_proc THEN
1051: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
1052: PO_LOG.proc_begin(d_mod,'p_org_id_tbl',p_org_id_tbl);
1053: PO_LOG.proc_begin(d_mod,'p_segment1_tbl',p_segment1_tbl);
1054: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
1055: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
1056: END IF;
1049:
1050: IF PO_LOG.d_proc THEN
1051: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
1052: PO_LOG.proc_begin(d_mod,'p_org_id_tbl',p_org_id_tbl);
1053: PO_LOG.proc_begin(d_mod,'p_segment1_tbl',p_segment1_tbl);
1054: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
1055: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
1056: END IF;
1057:
1050: IF PO_LOG.d_proc THEN
1051: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
1052: PO_LOG.proc_begin(d_mod,'p_org_id_tbl',p_org_id_tbl);
1053: PO_LOG.proc_begin(d_mod,'p_segment1_tbl',p_segment1_tbl);
1054: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
1055: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
1056: END IF;
1057:
1058: d_position := 1;
1051: PO_LOG.proc_begin(d_mod,'p_header_id_tbl',p_header_id_tbl);
1052: PO_LOG.proc_begin(d_mod,'p_org_id_tbl',p_org_id_tbl);
1053: PO_LOG.proc_begin(d_mod,'p_segment1_tbl',p_segment1_tbl);
1054: PO_LOG.proc_begin(d_mod,'p_type_lookup_code_tbl',p_type_lookup_code_tbl);
1055: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
1056: END IF;
1057:
1058: d_position := 1;
1059:
1161: PO_SETUP_S1.get_sourcing_startup(l_check_sourcing_flag);
1162:
1163: d_position := 210;
1164:
1165: IF PO_LOG.d_stmt THEN
1166: PO_LOG.stmt(d_mod,d_position,'l_check_sourcing_flag',l_check_sourcing_flag);
1167: END IF;
1168:
1169: SELECT
1162:
1163: d_position := 210;
1164:
1165: IF PO_LOG.d_stmt THEN
1166: PO_LOG.stmt(d_mod,d_position,'l_check_sourcing_flag',l_check_sourcing_flag);
1167: END IF;
1168:
1169: SELECT
1170: SES.num1
1190: )
1191: ;
1192:
1193: d_position := 300;
1194: IF PO_LOG.d_stmt THEN
1195: PO_LOG.stmt(d_mod,d_position,'l_header_id_tbl',l_header_id_tbl);
1196: PO_LOG.stmt(d_mod,d_position,'l_org_id_tbl',l_org_id_tbl);
1197: PO_LOG.stmt(d_mod,d_position,'l_segment1_tbl',l_segment1_tbl);
1198: PO_LOG.stmt(d_mod,d_position,'l_nonunique_tbl',l_nonunique_tbl);
1191: ;
1192:
1193: d_position := 300;
1194: IF PO_LOG.d_stmt THEN
1195: PO_LOG.stmt(d_mod,d_position,'l_header_id_tbl',l_header_id_tbl);
1196: PO_LOG.stmt(d_mod,d_position,'l_org_id_tbl',l_org_id_tbl);
1197: PO_LOG.stmt(d_mod,d_position,'l_segment1_tbl',l_segment1_tbl);
1198: PO_LOG.stmt(d_mod,d_position,'l_nonunique_tbl',l_nonunique_tbl);
1199: END IF;
1192:
1193: d_position := 300;
1194: IF PO_LOG.d_stmt THEN
1195: PO_LOG.stmt(d_mod,d_position,'l_header_id_tbl',l_header_id_tbl);
1196: PO_LOG.stmt(d_mod,d_position,'l_org_id_tbl',l_org_id_tbl);
1197: PO_LOG.stmt(d_mod,d_position,'l_segment1_tbl',l_segment1_tbl);
1198: PO_LOG.stmt(d_mod,d_position,'l_nonunique_tbl',l_nonunique_tbl);
1199: END IF;
1200:
1193: d_position := 300;
1194: IF PO_LOG.d_stmt THEN
1195: PO_LOG.stmt(d_mod,d_position,'l_header_id_tbl',l_header_id_tbl);
1196: PO_LOG.stmt(d_mod,d_position,'l_org_id_tbl',l_org_id_tbl);
1197: PO_LOG.stmt(d_mod,d_position,'l_segment1_tbl',l_segment1_tbl);
1198: PO_LOG.stmt(d_mod,d_position,'l_nonunique_tbl',l_nonunique_tbl);
1199: END IF;
1200:
1201: IF (l_check_sourcing_flag = 'I') THEN
1194: IF PO_LOG.d_stmt THEN
1195: PO_LOG.stmt(d_mod,d_position,'l_header_id_tbl',l_header_id_tbl);
1196: PO_LOG.stmt(d_mod,d_position,'l_org_id_tbl',l_org_id_tbl);
1197: PO_LOG.stmt(d_mod,d_position,'l_segment1_tbl',l_segment1_tbl);
1198: PO_LOG.stmt(d_mod,d_position,'l_nonunique_tbl',l_nonunique_tbl);
1199: END IF;
1200:
1201: IF (l_check_sourcing_flag = 'I') THEN
1202: FOR i IN 1 .. l_header_id_tbl.COUNT LOOP
1236: ELSE
1237: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
1238: END IF;
1239:
1240: IF PO_LOG.d_proc THEN
1241: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
1242: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
1243: END IF;
1244:
1237: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
1238: END IF;
1239:
1240: IF PO_LOG.d_proc THEN
1241: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
1242: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
1243: END IF;
1244:
1245: EXCEPTION
1238: END IF;
1239:
1240: IF PO_LOG.d_proc THEN
1241: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
1242: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
1243: END IF;
1244:
1245: EXCEPTION
1246: WHEN OTHERS THEN
1243: END IF;
1244:
1245: EXCEPTION
1246: WHEN OTHERS THEN
1247: IF PO_LOG.d_exc THEN
1248: PO_LOG.exc(d_mod,d_position,NULL);
1249: END IF;
1250: RAISE;
1251:
1244:
1245: EXCEPTION
1246: WHEN OTHERS THEN
1247: IF PO_LOG.d_exc THEN
1248: PO_LOG.exc(d_mod,d_position,NULL);
1249: END IF;
1250: RAISE;
1251:
1252: END doc_num_unique;
1278: l_message_name VARCHAR2(30);
1279: l_text VARCHAR2(4000);
1280: BEGIN
1281:
1282: IF PO_LOG.d_proc THEN
1283: PO_LOG.proc_begin(d_mod,'p_online_report_id',p_online_report_id);
1284: PO_LOG.proc_begin(d_mod,'p_login_id',p_login_id);
1285: PO_LOG.proc_begin(d_mod,'p_user_id',p_user_id);
1286: PO_LOG.proc_begin(d_mod,'x_sequence',x_sequence);
1279: l_text VARCHAR2(4000);
1280: BEGIN
1281:
1282: IF PO_LOG.d_proc THEN
1283: PO_LOG.proc_begin(d_mod,'p_online_report_id',p_online_report_id);
1284: PO_LOG.proc_begin(d_mod,'p_login_id',p_login_id);
1285: PO_LOG.proc_begin(d_mod,'p_user_id',p_user_id);
1286: PO_LOG.proc_begin(d_mod,'x_sequence',x_sequence);
1287: END IF;
1280: BEGIN
1281:
1282: IF PO_LOG.d_proc THEN
1283: PO_LOG.proc_begin(d_mod,'p_online_report_id',p_online_report_id);
1284: PO_LOG.proc_begin(d_mod,'p_login_id',p_login_id);
1285: PO_LOG.proc_begin(d_mod,'p_user_id',p_user_id);
1286: PO_LOG.proc_begin(d_mod,'x_sequence',x_sequence);
1287: END IF;
1288:
1281:
1282: IF PO_LOG.d_proc THEN
1283: PO_LOG.proc_begin(d_mod,'p_online_report_id',p_online_report_id);
1284: PO_LOG.proc_begin(d_mod,'p_login_id',p_login_id);
1285: PO_LOG.proc_begin(d_mod,'p_user_id',p_user_id);
1286: PO_LOG.proc_begin(d_mod,'x_sequence',x_sequence);
1287: END IF;
1288:
1289:
1282: IF PO_LOG.d_proc THEN
1283: PO_LOG.proc_begin(d_mod,'p_online_report_id',p_online_report_id);
1284: PO_LOG.proc_begin(d_mod,'p_login_id',p_login_id);
1285: PO_LOG.proc_begin(d_mod,'p_user_id',p_user_id);
1286: PO_LOG.proc_begin(d_mod,'x_sequence',x_sequence);
1287: END IF;
1288:
1289:
1290: -- Check that the line's Expiration date is within the
1523: ;
1524:
1525: x_sequence := x_sequence + SQL%ROWCOUNT;
1526:
1527: IF PO_LOG.d_proc THEN
1528: PO_LOG.proc_end(d_mod,'x_sequence',x_sequence);
1529: END IF;
1530:
1531: EXCEPTION
1524:
1525: x_sequence := x_sequence + SQL%ROWCOUNT;
1526:
1527: IF PO_LOG.d_proc THEN
1528: PO_LOG.proc_end(d_mod,'x_sequence',x_sequence);
1529: END IF;
1530:
1531: EXCEPTION
1532: WHEN OTHERS THEN
1529: END IF;
1530:
1531: EXCEPTION
1532: WHEN OTHERS THEN
1533: IF PO_LOG.d_exc THEN
1534: PO_LOG.exc(d_mod,0,NULL);
1535: END IF;
1536: RAISE;
1537:
1530:
1531: EXCEPTION
1532: WHEN OTHERS THEN
1533: IF PO_LOG.d_exc THEN
1534: PO_LOG.exc(d_mod,0,NULL);
1535: END IF;
1536: RAISE;
1537:
1538: END check_agreement_dates;