6: ---------------------------------------------------------------------------
7:
8: -- The module base for this package.
9: D_PACKAGE_BASE CONSTANT VARCHAR2(50) :=
10: PO_LOG.get_package_base('PO_PRICE_HELPER');
11:
12: -- The module base for the subprogram.
13: D_no_dists_reserved CONSTANT VARCHAR2(100) :=
14: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'no_dists_reserved');
10: PO_LOG.get_package_base('PO_PRICE_HELPER');
11:
12: -- The module base for the subprogram.
13: D_no_dists_reserved CONSTANT VARCHAR2(100) :=
14: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'no_dists_reserved');
15:
16: -- The module base for the subprogram.
17: D_accruals_allow_update CONSTANT VARCHAR2(100) :=
18: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'accruals_allow_update');
14: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'no_dists_reserved');
15:
16: -- The module base for the subprogram.
17: D_accruals_allow_update CONSTANT VARCHAR2(100) :=
18: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'accruals_allow_update');
19:
20: -- The module base for the subprogram.
21: D_no_timecards_exist CONSTANT VARCHAR2(100) :=
22: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'no_timecards_exist');
18: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'accruals_allow_update');
19:
20: -- The module base for the subprogram.
21: D_no_timecards_exist CONSTANT VARCHAR2(100) :=
22: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'no_timecards_exist');
23:
24: -- The module base for the subprogram.
25: D_no_pending_receipts CONSTANT VARCHAR2(100) :=
26: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'no_pending_receipts');
22: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'no_timecards_exist');
23:
24: -- The module base for the subprogram.
25: D_no_pending_receipts CONSTANT VARCHAR2(100) :=
26: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'no_pending_receipts');
27:
28: -- The module base for the subprogram.
29: D_retro_account_allows_update CONSTANT VARCHAR2(100) :=
30: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'retro_account_allows_update');
26: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'no_pending_receipts');
27:
28: -- The module base for the subprogram.
29: D_retro_account_allows_update CONSTANT VARCHAR2(100) :=
30: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'retro_account_allows_update');
31:
32: -- The module base for the subprogram.
33: D_warn_amt_based_notif_ctrls CONSTANT VARCHAR2(100) :=
34: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'warn_amt_based_notif_ctrls');
30: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'retro_account_allows_update');
31:
32: -- The module base for the subprogram.
33: D_warn_amt_based_notif_ctrls CONSTANT VARCHAR2(100) :=
34: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'warn_amt_based_notif_ctrls');
35:
36: -- The module base for the subprogram.
37: D_attempt_line_price_update CONSTANT VARCHAR2(100) :=
38: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'attempt_line_price_update');
34: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'warn_amt_based_notif_ctrls');
35:
36: -- The module base for the subprogram.
37: D_attempt_line_price_update CONSTANT VARCHAR2(100) :=
38: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'attempt_line_price_update');
39:
40: -- The module base for the subprogram.
41: D_check_system_allows_update CONSTANT VARCHAR2(100) :=
42: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'check_system_allows_update');
38: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'attempt_line_price_update');
39:
40: -- The module base for the subprogram.
41: D_check_system_allows_update CONSTANT VARCHAR2(100) :=
42: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'check_system_allows_update');
43:
44: ---------------------------------------------------------------------------
45: -- Constants.
46: ---------------------------------------------------------------------------
107: l_results PO_VALIDATION_RESULTS_TYPE;
108:
109: BEGIN
110:
111: IF PO_LOG.d_proc THEN
112: PO_LOG.proc_begin(d_mod,'p_po_line_id',p_po_line_id);
113: PO_LOG.proc_begin(d_mod,'p_price_break_lookup_code',p_price_break_lookup_code);
114: END IF;
115:
108:
109: BEGIN
110:
111: IF PO_LOG.d_proc THEN
112: PO_LOG.proc_begin(d_mod,'p_po_line_id',p_po_line_id);
113: PO_LOG.proc_begin(d_mod,'p_price_break_lookup_code',p_price_break_lookup_code);
114: END IF;
115:
116: d_position := 1;
109: BEGIN
110:
111: IF PO_LOG.d_proc THEN
112: PO_LOG.proc_begin(d_mod,'p_po_line_id',p_po_line_id);
113: PO_LOG.proc_begin(d_mod,'p_price_break_lookup_code',p_price_break_lookup_code);
114: END IF;
115:
116: d_position := 1;
117:
119: l_price_break_lookup_code_tbl := PO_TBL_VARCHAR30(p_price_break_lookup_code);
120:
121: d_position := 100;
122:
123: IF PO_LOG.d_stmt THEN
124: PO_LOG.stmt(d_mod,d_position,'l_line_id_tbl',l_line_id_tbl);
125: END IF;
126:
127: PO_VALIDATIONS.validate_unit_price_change(
120:
121: d_position := 100;
122:
123: IF PO_LOG.d_stmt THEN
124: PO_LOG.stmt(d_mod,d_position,'l_line_id_tbl',l_line_id_tbl);
125: END IF;
126:
127: PO_VALIDATIONS.validate_unit_price_change(
128: p_line_id_tbl => l_line_id_tbl
133: , x_results => l_results
134: );
135:
136: d_position := 200;
137: IF PO_LOG.d_stmt THEN
138: PO_LOG.stmt(d_mod,d_position,'l_result_set_id',l_result_set_id);
139: PO_LOG.stmt(d_mod,d_position,'l_result_type',l_result_type);
140: END IF;
141:
134: );
135:
136: d_position := 200;
137: IF PO_LOG.d_stmt THEN
138: PO_LOG.stmt(d_mod,d_position,'l_result_set_id',l_result_set_id);
139: PO_LOG.stmt(d_mod,d_position,'l_result_type',l_result_type);
140: END IF;
141:
142: IF (PO_VALIDATIONS.result_type_rank(l_result_type) >=
135:
136: d_position := 200;
137: IF PO_LOG.d_stmt THEN
138: PO_LOG.stmt(d_mod,d_position,'l_result_set_id',l_result_set_id);
139: PO_LOG.stmt(d_mod,d_position,'l_result_type',l_result_type);
140: END IF;
141:
142: IF (PO_VALIDATIONS.result_type_rank(l_result_type) >=
143: c_result_type_rank_WARNING)
148: END IF;
149:
150: d_position := 300;
151:
152: IF PO_LOG.d_proc THEN
153: PO_LOG.proc_end(d_mod,'x_system_allows_update',x_system_allows_update);
154: END IF;
155:
156: EXCEPTION
149:
150: d_position := 300;
151:
152: IF PO_LOG.d_proc THEN
153: PO_LOG.proc_end(d_mod,'x_system_allows_update',x_system_allows_update);
154: END IF;
155:
156: EXCEPTION
157: WHEN OTHERS THEN
154: END IF;
155:
156: EXCEPTION
157: WHEN OTHERS THEN
158: IF PO_LOG.d_exc THEN
159: PO_LOG.exc(d_mod,d_position,NULL);
160: END IF;
161: RAISE;
162:
155:
156: EXCEPTION
157: WHEN OTHERS THEN
158: IF PO_LOG.d_exc THEN
159: PO_LOG.exc(d_mod,d_position,NULL);
160: END IF;
161: RAISE;
162:
163: END check_system_allows_update;
215: d_mod CONSTANT VARCHAR2(100) := D_attempt_line_price_update;
216: d_position NUMBER := 0;
217: BEGIN
218:
219: IF PO_LOG.d_proc THEN
220: PO_LOG.proc_begin(d_mod,'p_order_quantity',p_order_quantity);
221: PO_LOG.proc_begin(d_mod,'p_ship_to_org',p_ship_to_org);
222: PO_LOG.proc_begin(d_mod,'p_ship_to_loc',p_ship_to_loc);
223: PO_LOG.proc_begin(d_mod,'p_po_line_id',p_po_line_id);
216: d_position NUMBER := 0;
217: BEGIN
218:
219: IF PO_LOG.d_proc THEN
220: PO_LOG.proc_begin(d_mod,'p_order_quantity',p_order_quantity);
221: PO_LOG.proc_begin(d_mod,'p_ship_to_org',p_ship_to_org);
222: PO_LOG.proc_begin(d_mod,'p_ship_to_loc',p_ship_to_loc);
223: PO_LOG.proc_begin(d_mod,'p_po_line_id',p_po_line_id);
224: PO_LOG.proc_begin(d_mod,'p_need_by_date',p_need_by_date);
217: BEGIN
218:
219: IF PO_LOG.d_proc THEN
220: PO_LOG.proc_begin(d_mod,'p_order_quantity',p_order_quantity);
221: PO_LOG.proc_begin(d_mod,'p_ship_to_org',p_ship_to_org);
222: PO_LOG.proc_begin(d_mod,'p_ship_to_loc',p_ship_to_loc);
223: PO_LOG.proc_begin(d_mod,'p_po_line_id',p_po_line_id);
224: PO_LOG.proc_begin(d_mod,'p_need_by_date',p_need_by_date);
225: PO_LOG.proc_begin(d_mod,'p_line_location_id',p_line_location_id);
218:
219: IF PO_LOG.d_proc THEN
220: PO_LOG.proc_begin(d_mod,'p_order_quantity',p_order_quantity);
221: PO_LOG.proc_begin(d_mod,'p_ship_to_org',p_ship_to_org);
222: PO_LOG.proc_begin(d_mod,'p_ship_to_loc',p_ship_to_loc);
223: PO_LOG.proc_begin(d_mod,'p_po_line_id',p_po_line_id);
224: PO_LOG.proc_begin(d_mod,'p_need_by_date',p_need_by_date);
225: PO_LOG.proc_begin(d_mod,'p_line_location_id',p_line_location_id);
226: PO_LOG.proc_begin(d_mod,'p_contract_id',p_contract_id);
219: IF PO_LOG.d_proc THEN
220: PO_LOG.proc_begin(d_mod,'p_order_quantity',p_order_quantity);
221: PO_LOG.proc_begin(d_mod,'p_ship_to_org',p_ship_to_org);
222: PO_LOG.proc_begin(d_mod,'p_ship_to_loc',p_ship_to_loc);
223: PO_LOG.proc_begin(d_mod,'p_po_line_id',p_po_line_id);
224: PO_LOG.proc_begin(d_mod,'p_need_by_date',p_need_by_date);
225: PO_LOG.proc_begin(d_mod,'p_line_location_id',p_line_location_id);
226: PO_LOG.proc_begin(d_mod,'p_contract_id',p_contract_id);
227: PO_LOG.proc_begin(d_mod,'p_org_id',p_org_id);
220: PO_LOG.proc_begin(d_mod,'p_order_quantity',p_order_quantity);
221: PO_LOG.proc_begin(d_mod,'p_ship_to_org',p_ship_to_org);
222: PO_LOG.proc_begin(d_mod,'p_ship_to_loc',p_ship_to_loc);
223: PO_LOG.proc_begin(d_mod,'p_po_line_id',p_po_line_id);
224: PO_LOG.proc_begin(d_mod,'p_need_by_date',p_need_by_date);
225: PO_LOG.proc_begin(d_mod,'p_line_location_id',p_line_location_id);
226: PO_LOG.proc_begin(d_mod,'p_contract_id',p_contract_id);
227: PO_LOG.proc_begin(d_mod,'p_org_id',p_org_id);
228: PO_LOG.proc_begin(d_mod,'p_supplier_id',p_supplier_id);
221: PO_LOG.proc_begin(d_mod,'p_ship_to_org',p_ship_to_org);
222: PO_LOG.proc_begin(d_mod,'p_ship_to_loc',p_ship_to_loc);
223: PO_LOG.proc_begin(d_mod,'p_po_line_id',p_po_line_id);
224: PO_LOG.proc_begin(d_mod,'p_need_by_date',p_need_by_date);
225: PO_LOG.proc_begin(d_mod,'p_line_location_id',p_line_location_id);
226: PO_LOG.proc_begin(d_mod,'p_contract_id',p_contract_id);
227: PO_LOG.proc_begin(d_mod,'p_org_id',p_org_id);
228: PO_LOG.proc_begin(d_mod,'p_supplier_id',p_supplier_id);
229: PO_LOG.proc_begin(d_mod,'p_supplier_site_id',p_supplier_site_id);
222: PO_LOG.proc_begin(d_mod,'p_ship_to_loc',p_ship_to_loc);
223: PO_LOG.proc_begin(d_mod,'p_po_line_id',p_po_line_id);
224: PO_LOG.proc_begin(d_mod,'p_need_by_date',p_need_by_date);
225: PO_LOG.proc_begin(d_mod,'p_line_location_id',p_line_location_id);
226: PO_LOG.proc_begin(d_mod,'p_contract_id',p_contract_id);
227: PO_LOG.proc_begin(d_mod,'p_org_id',p_org_id);
228: PO_LOG.proc_begin(d_mod,'p_supplier_id',p_supplier_id);
229: PO_LOG.proc_begin(d_mod,'p_supplier_site_id',p_supplier_site_id);
230: PO_LOG.proc_begin(d_mod,'p_creation_date',p_creation_date);
223: PO_LOG.proc_begin(d_mod,'p_po_line_id',p_po_line_id);
224: PO_LOG.proc_begin(d_mod,'p_need_by_date',p_need_by_date);
225: PO_LOG.proc_begin(d_mod,'p_line_location_id',p_line_location_id);
226: PO_LOG.proc_begin(d_mod,'p_contract_id',p_contract_id);
227: PO_LOG.proc_begin(d_mod,'p_org_id',p_org_id);
228: PO_LOG.proc_begin(d_mod,'p_supplier_id',p_supplier_id);
229: PO_LOG.proc_begin(d_mod,'p_supplier_site_id',p_supplier_site_id);
230: PO_LOG.proc_begin(d_mod,'p_creation_date',p_creation_date);
231: PO_LOG.proc_begin(d_mod,'p_order_header_id',p_order_header_id);
224: PO_LOG.proc_begin(d_mod,'p_need_by_date',p_need_by_date);
225: PO_LOG.proc_begin(d_mod,'p_line_location_id',p_line_location_id);
226: PO_LOG.proc_begin(d_mod,'p_contract_id',p_contract_id);
227: PO_LOG.proc_begin(d_mod,'p_org_id',p_org_id);
228: PO_LOG.proc_begin(d_mod,'p_supplier_id',p_supplier_id);
229: PO_LOG.proc_begin(d_mod,'p_supplier_site_id',p_supplier_site_id);
230: PO_LOG.proc_begin(d_mod,'p_creation_date',p_creation_date);
231: PO_LOG.proc_begin(d_mod,'p_order_header_id',p_order_header_id);
232: PO_LOG.proc_begin(d_mod,'p_order_line_id',p_order_line_id);
225: PO_LOG.proc_begin(d_mod,'p_line_location_id',p_line_location_id);
226: PO_LOG.proc_begin(d_mod,'p_contract_id',p_contract_id);
227: PO_LOG.proc_begin(d_mod,'p_org_id',p_org_id);
228: PO_LOG.proc_begin(d_mod,'p_supplier_id',p_supplier_id);
229: PO_LOG.proc_begin(d_mod,'p_supplier_site_id',p_supplier_site_id);
230: PO_LOG.proc_begin(d_mod,'p_creation_date',p_creation_date);
231: PO_LOG.proc_begin(d_mod,'p_order_header_id',p_order_header_id);
232: PO_LOG.proc_begin(d_mod,'p_order_line_id',p_order_line_id);
233: PO_LOG.proc_begin(d_mod,'p_line_type_id',p_line_type_id);
226: PO_LOG.proc_begin(d_mod,'p_contract_id',p_contract_id);
227: PO_LOG.proc_begin(d_mod,'p_org_id',p_org_id);
228: PO_LOG.proc_begin(d_mod,'p_supplier_id',p_supplier_id);
229: PO_LOG.proc_begin(d_mod,'p_supplier_site_id',p_supplier_site_id);
230: PO_LOG.proc_begin(d_mod,'p_creation_date',p_creation_date);
231: PO_LOG.proc_begin(d_mod,'p_order_header_id',p_order_header_id);
232: PO_LOG.proc_begin(d_mod,'p_order_line_id',p_order_line_id);
233: PO_LOG.proc_begin(d_mod,'p_line_type_id',p_line_type_id);
234: PO_LOG.proc_begin(d_mod,'p_item_revision',p_item_revision);
227: PO_LOG.proc_begin(d_mod,'p_org_id',p_org_id);
228: PO_LOG.proc_begin(d_mod,'p_supplier_id',p_supplier_id);
229: PO_LOG.proc_begin(d_mod,'p_supplier_site_id',p_supplier_site_id);
230: PO_LOG.proc_begin(d_mod,'p_creation_date',p_creation_date);
231: PO_LOG.proc_begin(d_mod,'p_order_header_id',p_order_header_id);
232: PO_LOG.proc_begin(d_mod,'p_order_line_id',p_order_line_id);
233: PO_LOG.proc_begin(d_mod,'p_line_type_id',p_line_type_id);
234: PO_LOG.proc_begin(d_mod,'p_item_revision',p_item_revision);
235: PO_LOG.proc_begin(d_mod,'p_item_id',p_item_id);
228: PO_LOG.proc_begin(d_mod,'p_supplier_id',p_supplier_id);
229: PO_LOG.proc_begin(d_mod,'p_supplier_site_id',p_supplier_site_id);
230: PO_LOG.proc_begin(d_mod,'p_creation_date',p_creation_date);
231: PO_LOG.proc_begin(d_mod,'p_order_header_id',p_order_header_id);
232: PO_LOG.proc_begin(d_mod,'p_order_line_id',p_order_line_id);
233: PO_LOG.proc_begin(d_mod,'p_line_type_id',p_line_type_id);
234: PO_LOG.proc_begin(d_mod,'p_item_revision',p_item_revision);
235: PO_LOG.proc_begin(d_mod,'p_item_id',p_item_id);
236: PO_LOG.proc_begin(d_mod,'p_category_id',p_category_id);
229: PO_LOG.proc_begin(d_mod,'p_supplier_site_id',p_supplier_site_id);
230: PO_LOG.proc_begin(d_mod,'p_creation_date',p_creation_date);
231: PO_LOG.proc_begin(d_mod,'p_order_header_id',p_order_header_id);
232: PO_LOG.proc_begin(d_mod,'p_order_line_id',p_order_line_id);
233: PO_LOG.proc_begin(d_mod,'p_line_type_id',p_line_type_id);
234: PO_LOG.proc_begin(d_mod,'p_item_revision',p_item_revision);
235: PO_LOG.proc_begin(d_mod,'p_item_id',p_item_id);
236: PO_LOG.proc_begin(d_mod,'p_category_id',p_category_id);
237: PO_LOG.proc_begin(d_mod,'p_supplier_item_num',p_supplier_item_num);
230: PO_LOG.proc_begin(d_mod,'p_creation_date',p_creation_date);
231: PO_LOG.proc_begin(d_mod,'p_order_header_id',p_order_header_id);
232: PO_LOG.proc_begin(d_mod,'p_order_line_id',p_order_line_id);
233: PO_LOG.proc_begin(d_mod,'p_line_type_id',p_line_type_id);
234: PO_LOG.proc_begin(d_mod,'p_item_revision',p_item_revision);
235: PO_LOG.proc_begin(d_mod,'p_item_id',p_item_id);
236: PO_LOG.proc_begin(d_mod,'p_category_id',p_category_id);
237: PO_LOG.proc_begin(d_mod,'p_supplier_item_num',p_supplier_item_num);
238: PO_LOG.proc_begin(d_mod,'p_uom',p_uom);
231: PO_LOG.proc_begin(d_mod,'p_order_header_id',p_order_header_id);
232: PO_LOG.proc_begin(d_mod,'p_order_line_id',p_order_line_id);
233: PO_LOG.proc_begin(d_mod,'p_line_type_id',p_line_type_id);
234: PO_LOG.proc_begin(d_mod,'p_item_revision',p_item_revision);
235: PO_LOG.proc_begin(d_mod,'p_item_id',p_item_id);
236: PO_LOG.proc_begin(d_mod,'p_category_id',p_category_id);
237: PO_LOG.proc_begin(d_mod,'p_supplier_item_num',p_supplier_item_num);
238: PO_LOG.proc_begin(d_mod,'p_uom',p_uom);
239: PO_LOG.proc_begin(d_mod,'p_in_price',p_in_price);
232: PO_LOG.proc_begin(d_mod,'p_order_line_id',p_order_line_id);
233: PO_LOG.proc_begin(d_mod,'p_line_type_id',p_line_type_id);
234: PO_LOG.proc_begin(d_mod,'p_item_revision',p_item_revision);
235: PO_LOG.proc_begin(d_mod,'p_item_id',p_item_id);
236: PO_LOG.proc_begin(d_mod,'p_category_id',p_category_id);
237: PO_LOG.proc_begin(d_mod,'p_supplier_item_num',p_supplier_item_num);
238: PO_LOG.proc_begin(d_mod,'p_uom',p_uom);
239: PO_LOG.proc_begin(d_mod,'p_in_price',p_in_price);
240: PO_LOG.proc_begin(d_mod,'p_currency_code',p_currency_code);
233: PO_LOG.proc_begin(d_mod,'p_line_type_id',p_line_type_id);
234: PO_LOG.proc_begin(d_mod,'p_item_revision',p_item_revision);
235: PO_LOG.proc_begin(d_mod,'p_item_id',p_item_id);
236: PO_LOG.proc_begin(d_mod,'p_category_id',p_category_id);
237: PO_LOG.proc_begin(d_mod,'p_supplier_item_num',p_supplier_item_num);
238: PO_LOG.proc_begin(d_mod,'p_uom',p_uom);
239: PO_LOG.proc_begin(d_mod,'p_in_price',p_in_price);
240: PO_LOG.proc_begin(d_mod,'p_currency_code',p_currency_code);
241: END IF;
234: PO_LOG.proc_begin(d_mod,'p_item_revision',p_item_revision);
235: PO_LOG.proc_begin(d_mod,'p_item_id',p_item_id);
236: PO_LOG.proc_begin(d_mod,'p_category_id',p_category_id);
237: PO_LOG.proc_begin(d_mod,'p_supplier_item_num',p_supplier_item_num);
238: PO_LOG.proc_begin(d_mod,'p_uom',p_uom);
239: PO_LOG.proc_begin(d_mod,'p_in_price',p_in_price);
240: PO_LOG.proc_begin(d_mod,'p_currency_code',p_currency_code);
241: END IF;
242:
235: PO_LOG.proc_begin(d_mod,'p_item_id',p_item_id);
236: PO_LOG.proc_begin(d_mod,'p_category_id',p_category_id);
237: PO_LOG.proc_begin(d_mod,'p_supplier_item_num',p_supplier_item_num);
238: PO_LOG.proc_begin(d_mod,'p_uom',p_uom);
239: PO_LOG.proc_begin(d_mod,'p_in_price',p_in_price);
240: PO_LOG.proc_begin(d_mod,'p_currency_code',p_currency_code);
241: END IF;
242:
243: d_position := 1;
236: PO_LOG.proc_begin(d_mod,'p_category_id',p_category_id);
237: PO_LOG.proc_begin(d_mod,'p_supplier_item_num',p_supplier_item_num);
238: PO_LOG.proc_begin(d_mod,'p_uom',p_uom);
239: PO_LOG.proc_begin(d_mod,'p_in_price',p_in_price);
240: PO_LOG.proc_begin(d_mod,'p_currency_code',p_currency_code);
241: END IF;
242:
243: d_position := 1;
244:
248: , x_system_allows_update => x_system_allows_update
249: );
250:
251: d_position := 90;
252: IF PO_LOG.d_stmt THEN
253: PO_LOG.stmt(d_mod,d_position,'x_system_allows_update',x_system_allows_update);
254: END IF;
255:
256: IF (x_system_allows_update = 'Y') THEN
249: );
250:
251: d_position := 90;
252: IF PO_LOG.d_stmt THEN
253: PO_LOG.stmt(d_mod,d_position,'x_system_allows_update',x_system_allows_update);
254: END IF;
255:
256: IF (x_system_allows_update = 'Y') THEN
257: d_position := 100;
288: );
289:
290: END IF;
291:
292: IF PO_LOG.d_proc THEN
293: PO_LOG.proc_end(d_mod,'x_base_unit_price',x_base_unit_price);
294: PO_LOG.proc_end(d_mod,'x_price_break_id',x_price_break_id);
295: PO_LOG.proc_end(d_mod,'x_price',x_price);
296: PO_LOG.proc_end(d_mod,'x_return_status',x_return_status);
289:
290: END IF;
291:
292: IF PO_LOG.d_proc THEN
293: PO_LOG.proc_end(d_mod,'x_base_unit_price',x_base_unit_price);
294: PO_LOG.proc_end(d_mod,'x_price_break_id',x_price_break_id);
295: PO_LOG.proc_end(d_mod,'x_price',x_price);
296: PO_LOG.proc_end(d_mod,'x_return_status',x_return_status);
297: PO_LOG.proc_end(d_mod,'x_from_advanced_pricing',x_from_advanced_pricing);
290: END IF;
291:
292: IF PO_LOG.d_proc THEN
293: PO_LOG.proc_end(d_mod,'x_base_unit_price',x_base_unit_price);
294: PO_LOG.proc_end(d_mod,'x_price_break_id',x_price_break_id);
295: PO_LOG.proc_end(d_mod,'x_price',x_price);
296: PO_LOG.proc_end(d_mod,'x_return_status',x_return_status);
297: PO_LOG.proc_end(d_mod,'x_from_advanced_pricing',x_from_advanced_pricing);
298: PO_LOG.proc_end(d_mod,'x_system_allows_update',x_system_allows_update);
291:
292: IF PO_LOG.d_proc THEN
293: PO_LOG.proc_end(d_mod,'x_base_unit_price',x_base_unit_price);
294: PO_LOG.proc_end(d_mod,'x_price_break_id',x_price_break_id);
295: PO_LOG.proc_end(d_mod,'x_price',x_price);
296: PO_LOG.proc_end(d_mod,'x_return_status',x_return_status);
297: PO_LOG.proc_end(d_mod,'x_from_advanced_pricing',x_from_advanced_pricing);
298: PO_LOG.proc_end(d_mod,'x_system_allows_update',x_system_allows_update);
299: END IF;
292: IF PO_LOG.d_proc THEN
293: PO_LOG.proc_end(d_mod,'x_base_unit_price',x_base_unit_price);
294: PO_LOG.proc_end(d_mod,'x_price_break_id',x_price_break_id);
295: PO_LOG.proc_end(d_mod,'x_price',x_price);
296: PO_LOG.proc_end(d_mod,'x_return_status',x_return_status);
297: PO_LOG.proc_end(d_mod,'x_from_advanced_pricing',x_from_advanced_pricing);
298: PO_LOG.proc_end(d_mod,'x_system_allows_update',x_system_allows_update);
299: END IF;
300:
293: PO_LOG.proc_end(d_mod,'x_base_unit_price',x_base_unit_price);
294: PO_LOG.proc_end(d_mod,'x_price_break_id',x_price_break_id);
295: PO_LOG.proc_end(d_mod,'x_price',x_price);
296: PO_LOG.proc_end(d_mod,'x_return_status',x_return_status);
297: PO_LOG.proc_end(d_mod,'x_from_advanced_pricing',x_from_advanced_pricing);
298: PO_LOG.proc_end(d_mod,'x_system_allows_update',x_system_allows_update);
299: END IF;
300:
301: EXCEPTION
294: PO_LOG.proc_end(d_mod,'x_price_break_id',x_price_break_id);
295: PO_LOG.proc_end(d_mod,'x_price',x_price);
296: PO_LOG.proc_end(d_mod,'x_return_status',x_return_status);
297: PO_LOG.proc_end(d_mod,'x_from_advanced_pricing',x_from_advanced_pricing);
298: PO_LOG.proc_end(d_mod,'x_system_allows_update',x_system_allows_update);
299: END IF;
300:
301: EXCEPTION
302: WHEN OTHERS THEN
299: END IF;
300:
301: EXCEPTION
302: WHEN OTHERS THEN
303: IF PO_LOG.d_exc THEN
304: PO_LOG.exc(d_mod,d_position,NULL);
305: END IF;
306: RAISE;
307:
300:
301: EXCEPTION
302: WHEN OTHERS THEN
303: IF PO_LOG.d_exc THEN
304: PO_LOG.exc(d_mod,d_position,NULL);
305: END IF;
306: RAISE;
307:
308: END attempt_line_price_update;
343: d_mod CONSTANT VARCHAR2(100) := D_no_dists_reserved;
344: d_position NUMBER := 0;
345: BEGIN
346:
347: IF PO_LOG.d_proc THEN
348: PO_LOG.proc_begin(d_mod,'p_line_id_tbl',p_line_id_tbl);
349: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
350: END IF;
351:
344: d_position NUMBER := 0;
345: BEGIN
346:
347: IF PO_LOG.d_proc THEN
348: PO_LOG.proc_begin(d_mod,'p_line_id_tbl',p_line_id_tbl);
349: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
350: END IF;
351:
352: d_position := 1;
345: BEGIN
346:
347: IF PO_LOG.d_proc THEN
348: PO_LOG.proc_begin(d_mod,'p_line_id_tbl',p_line_id_tbl);
349: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
350: END IF;
351:
352: d_position := 1;
353:
395: ELSE
396: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
397: END IF;
398:
399: IF PO_LOG.d_proc THEN
400: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
401: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
402: END IF;
403:
396: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
397: END IF;
398:
399: IF PO_LOG.d_proc THEN
400: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
401: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
402: END IF;
403:
404: EXCEPTION
397: END IF;
398:
399: IF PO_LOG.d_proc THEN
400: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
401: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
402: END IF;
403:
404: EXCEPTION
405: WHEN OTHERS THEN
402: END IF;
403:
404: EXCEPTION
405: WHEN OTHERS THEN
406: IF PO_LOG.d_exc THEN
407: PO_LOG.exc(d_mod,d_position,NULL);
408: END IF;
409: RAISE;
410:
403:
404: EXCEPTION
405: WHEN OTHERS THEN
406: IF PO_LOG.d_exc THEN
407: PO_LOG.exc(d_mod,d_position,NULL);
408: END IF;
409: RAISE;
410:
411: END no_dists_reserved;
446: )
447: IS
448: d_mod CONSTANT VARCHAR2(100) := D_accruals_allow_update;
449: d_position NUMBER := 0;
450: d_stmt CONSTANT BOOLEAN := PO_LOG.d_stmt;
451:
452: l_results_count NUMBER;
453: l_data_key NUMBER;
454: l_line_id_tbl PO_TBL_NUMBER;
465: l_amount_released NUMBER;
466:
467: BEGIN
468:
469: IF PO_LOG.d_proc THEN
470: PO_LOG.proc_begin(d_mod,'p_line_id_tbl',p_line_id_tbl);
471: END IF;
472:
473: d_position := 1;
466:
467: BEGIN
468:
469: IF PO_LOG.d_proc THEN
470: PO_LOG.proc_begin(d_mod,'p_line_id_tbl',p_line_id_tbl);
471: END IF;
472:
473: d_position := 1;
474:
521: ;
522:
523: d_position := 100;
524:
525: IF PO_LOG.d_stmt THEN
526: PO_LOG.stmt_session_gt(d_mod,d_position,l_data_key);
527: PO_LOG.stmt(d_mod,d_position,'l_line_id_tbl',l_line_id_tbl);
528: PO_LOG.stmt(d_mod,d_position,'l_header_id_tbl',l_header_id_tbl);
529: PO_LOG.stmt(d_mod,d_position,'l_type_lookup_code_tbl',l_type_lookup_code_tbl);
522:
523: d_position := 100;
524:
525: IF PO_LOG.d_stmt THEN
526: PO_LOG.stmt_session_gt(d_mod,d_position,l_data_key);
527: PO_LOG.stmt(d_mod,d_position,'l_line_id_tbl',l_line_id_tbl);
528: PO_LOG.stmt(d_mod,d_position,'l_header_id_tbl',l_header_id_tbl);
529: PO_LOG.stmt(d_mod,d_position,'l_type_lookup_code_tbl',l_type_lookup_code_tbl);
530: PO_LOG.stmt(d_mod,d_position,'l_expense_accrual_code_tbl',l_expense_accrual_code_tbl);
523: d_position := 100;
524:
525: IF PO_LOG.d_stmt THEN
526: PO_LOG.stmt_session_gt(d_mod,d_position,l_data_key);
527: PO_LOG.stmt(d_mod,d_position,'l_line_id_tbl',l_line_id_tbl);
528: PO_LOG.stmt(d_mod,d_position,'l_header_id_tbl',l_header_id_tbl);
529: PO_LOG.stmt(d_mod,d_position,'l_type_lookup_code_tbl',l_type_lookup_code_tbl);
530: PO_LOG.stmt(d_mod,d_position,'l_expense_accrual_code_tbl',l_expense_accrual_code_tbl);
531: END IF;
524:
525: IF PO_LOG.d_stmt THEN
526: PO_LOG.stmt_session_gt(d_mod,d_position,l_data_key);
527: PO_LOG.stmt(d_mod,d_position,'l_line_id_tbl',l_line_id_tbl);
528: PO_LOG.stmt(d_mod,d_position,'l_header_id_tbl',l_header_id_tbl);
529: PO_LOG.stmt(d_mod,d_position,'l_type_lookup_code_tbl',l_type_lookup_code_tbl);
530: PO_LOG.stmt(d_mod,d_position,'l_expense_accrual_code_tbl',l_expense_accrual_code_tbl);
531: END IF;
532:
525: IF PO_LOG.d_stmt THEN
526: PO_LOG.stmt_session_gt(d_mod,d_position,l_data_key);
527: PO_LOG.stmt(d_mod,d_position,'l_line_id_tbl',l_line_id_tbl);
528: PO_LOG.stmt(d_mod,d_position,'l_header_id_tbl',l_header_id_tbl);
529: PO_LOG.stmt(d_mod,d_position,'l_type_lookup_code_tbl',l_type_lookup_code_tbl);
530: PO_LOG.stmt(d_mod,d_position,'l_expense_accrual_code_tbl',l_expense_accrual_code_tbl);
531: END IF;
532:
533: FOR i IN 1 .. l_line_id_tbl.COUNT LOOP
526: PO_LOG.stmt_session_gt(d_mod,d_position,l_data_key);
527: PO_LOG.stmt(d_mod,d_position,'l_line_id_tbl',l_line_id_tbl);
528: PO_LOG.stmt(d_mod,d_position,'l_header_id_tbl',l_header_id_tbl);
529: PO_LOG.stmt(d_mod,d_position,'l_type_lookup_code_tbl',l_type_lookup_code_tbl);
530: PO_LOG.stmt(d_mod,d_position,'l_expense_accrual_code_tbl',l_expense_accrual_code_tbl);
531: END IF;
532:
533: FOR i IN 1 .. l_line_id_tbl.COUNT LOOP
534:
553: );
554:
555: d_position := 300;
556: IF d_stmt THEN
557: PO_LOG.stmt(d_mod,d_position,'l_prevent_price_update_flag',l_prevent_price_update_flag);
558: END IF;
559:
560: IF (l_prevent_price_update_flag = 'Y') THEN
561: d_position := 400;
578: ELSE
579: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
580: END IF;
581:
582: IF PO_LOG.d_proc THEN
583: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
584: END IF;
585:
586: EXCEPTION
579: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
580: END IF;
581:
582: IF PO_LOG.d_proc THEN
583: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
584: END IF;
585:
586: EXCEPTION
587: WHEN OTHERS THEN
584: END IF;
585:
586: EXCEPTION
587: WHEN OTHERS THEN
588: IF PO_LOG.d_exc THEN
589: PO_LOG.exc(d_mod,d_position,NULL);
590: END IF;
591: RAISE;
592:
585:
586: EXCEPTION
587: WHEN OTHERS THEN
588: IF PO_LOG.d_exc THEN
589: PO_LOG.exc(d_mod,d_position,NULL);
590: END IF;
591: RAISE;
592:
593: END accruals_allow_update;
676: d_mod CONSTANT VARCHAR2(100) := D_no_pending_receipts;
677: d_position NUMBER := 0;
678: BEGIN
679:
680: IF PO_LOG.d_proc THEN
681: PO_LOG.proc_begin(d_mod,'p_line_id_tbl',p_line_id_tbl);
682: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
683: END IF;
684:
677: d_position NUMBER := 0;
678: BEGIN
679:
680: IF PO_LOG.d_proc THEN
681: PO_LOG.proc_begin(d_mod,'p_line_id_tbl',p_line_id_tbl);
682: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
683: END IF;
684:
685: d_position := 1;
678: BEGIN
679:
680: IF PO_LOG.d_proc THEN
681: PO_LOG.proc_begin(d_mod,'p_line_id_tbl',p_line_id_tbl);
682: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
683: END IF;
684:
685: d_position := 1;
686:
724: ELSE
725: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
726: END IF;
727:
728: IF PO_LOG.d_proc THEN
729: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
730: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
731: END IF;
732:
725: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
726: END IF;
727:
728: IF PO_LOG.d_proc THEN
729: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
730: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
731: END IF;
732:
733: EXCEPTION
726: END IF;
727:
728: IF PO_LOG.d_proc THEN
729: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
730: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
731: END IF;
732:
733: EXCEPTION
734: WHEN OTHERS THEN
731: END IF;
732:
733: EXCEPTION
734: WHEN OTHERS THEN
735: IF PO_LOG.d_exc THEN
736: PO_LOG.exc(d_mod,d_position,NULL);
737: END IF;
738: RAISE;
739:
732:
733: EXCEPTION
734: WHEN OTHERS THEN
735: IF PO_LOG.d_exc THEN
736: PO_LOG.exc(d_mod,d_position,NULL);
737: END IF;
738: RAISE;
739:
740: END no_pending_receipts;
774: )
775: IS
776: d_mod CONSTANT VARCHAR2(100) := D_retro_account_allows_update;
777: d_position NUMBER := 0;
778: d_stmt CONSTANT BOOLEAN := PO_LOG.d_stmt;
779:
780: l_results_count NUMBER;
781: l_data_key NUMBER;
782:
790: l_account_valid VARCHAR2(1);
791:
792: BEGIN
793:
794: IF PO_LOG.d_proc THEN
795: PO_LOG.proc_begin(d_mod,'p_line_id_tbl',p_line_id_tbl);
796: PO_LOG.proc_begin(d_mod,'p_price_break_lookup_code_tbl',p_price_break_lookup_code_tbl);
797: END IF;
798:
791:
792: BEGIN
793:
794: IF PO_LOG.d_proc THEN
795: PO_LOG.proc_begin(d_mod,'p_line_id_tbl',p_line_id_tbl);
796: PO_LOG.proc_begin(d_mod,'p_price_break_lookup_code_tbl',p_price_break_lookup_code_tbl);
797: END IF;
798:
799: d_position := 1;
792: BEGIN
793:
794: IF PO_LOG.d_proc THEN
795: PO_LOG.proc_begin(d_mod,'p_line_id_tbl',p_line_id_tbl);
796: PO_LOG.proc_begin(d_mod,'p_price_break_lookup_code_tbl',p_price_break_lookup_code_tbl);
797: END IF;
798:
799: d_position := 1;
800:
809: l_retroactive_update_mode := PO_RETROACTIVE_PRICING_PVT.get_retro_mode();
810:
811: d_position := 90;
812: IF d_stmt THEN
813: PO_LOG.stmt(d_mod,d_position,'l_retroactive_update_mode',l_retroactive_update_mode);
814: END IF;
815:
816: IF (l_retroactive_update_mode = c_ALL_RELEASES) THEN
817: d_position := 100;
853: ;
854:
855: d_position := 120;
856:
857: IF PO_LOG.d_stmt THEN
858: PO_LOG.stmt_session_gt(d_mod,d_position,l_data_key);
859: PO_LOG.stmt(d_mod,d_position,'l_line_id_tbl',l_line_id_tbl);
860: PO_LOG.stmt(d_mod,d_position,'l_price_break_lookup_code',l_price_break_lookup_code);
861: END IF;
854:
855: d_position := 120;
856:
857: IF PO_LOG.d_stmt THEN
858: PO_LOG.stmt_session_gt(d_mod,d_position,l_data_key);
859: PO_LOG.stmt(d_mod,d_position,'l_line_id_tbl',l_line_id_tbl);
860: PO_LOG.stmt(d_mod,d_position,'l_price_break_lookup_code',l_price_break_lookup_code);
861: END IF;
862:
855: d_position := 120;
856:
857: IF PO_LOG.d_stmt THEN
858: PO_LOG.stmt_session_gt(d_mod,d_position,l_data_key);
859: PO_LOG.stmt(d_mod,d_position,'l_line_id_tbl',l_line_id_tbl);
860: PO_LOG.stmt(d_mod,d_position,'l_price_break_lookup_code',l_price_break_lookup_code);
861: END IF;
862:
863: FOR i IN 1 .. l_line_id_tbl.COUNT LOOP
856:
857: IF PO_LOG.d_stmt THEN
858: PO_LOG.stmt_session_gt(d_mod,d_position,l_data_key);
859: PO_LOG.stmt(d_mod,d_position,'l_line_id_tbl',l_line_id_tbl);
860: PO_LOG.stmt(d_mod,d_position,'l_price_break_lookup_code',l_price_break_lookup_code);
861: END IF;
862:
863: FOR i IN 1 .. l_line_id_tbl.COUNT LOOP
864: d_position := 200;
866: l_line_id := l_line_id_tbl(i);
867: l_price_break_lookup_code := l_price_break_lookup_code_tbl(i);
868:
869: IF d_stmt THEN
870: PO_LOG.stmt(d_mod,d_position,'iteration '||i||' l_line_id',l_line_id);
871: END IF;
872:
873: l_account_valid :=
874: PO_RETROACTIVE_PRICING_PVT.is_adjustment_account_valid(
879:
880: d_position := 250;
881:
882: IF d_stmt THEN
883: PO_LOG.stmt(d_mod,d_position,'l_account_valid',l_account_valid);
884: END IF;
885:
886: IF (l_account_valid = 'N') THEN
887: d_position := 300;
906: ELSE
907: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
908: END IF;
909:
910: IF PO_LOG.d_proc THEN
911: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
912: END IF;
913:
914: EXCEPTION
907: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
908: END IF;
909:
910: IF PO_LOG.d_proc THEN
911: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
912: END IF;
913:
914: EXCEPTION
915: WHEN OTHERS THEN
912: END IF;
913:
914: EXCEPTION
915: WHEN OTHERS THEN
916: IF PO_LOG.d_exc THEN
917: PO_LOG.exc(d_mod,d_position,NULL);
918: END IF;
919: RAISE;
920:
913:
914: EXCEPTION
915: WHEN OTHERS THEN
916: IF PO_LOG.d_exc THEN
917: PO_LOG.exc(d_mod,d_position,NULL);
918: END IF;
919: RAISE;
920:
921: END retro_account_allows_update;