6: ---------------------------------------------------------------------------
7:
8: -- The module base for this package.
9: D_PACKAGE_BASE CONSTANT VARCHAR2(50) :=
10: PO_LOG.get_package_base('PO_VALIDATIONS');
11:
12: -- The module base for the subprogram.
13: D_next_result_set_id CONSTANT VARCHAR2(100) :=
14: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'next_result_set_id');
10: PO_LOG.get_package_base('PO_VALIDATIONS');
11:
12: -- The module base for the subprogram.
13: D_next_result_set_id CONSTANT VARCHAR2(100) :=
14: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'next_result_set_id');
15:
16: -- The module base for the subprogram.
17: D_commit_validation_results_au CONSTANT VARCHAR2(100) :=
18: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'commit_validation_results_auto');
14: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'next_result_set_id');
15:
16: -- The module base for the subprogram.
17: D_commit_validation_results_au CONSTANT VARCHAR2(100) :=
18: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'commit_validation_results_auto');
19:
20: -- The module base for the subprogram.
21: D_update_result_set CONSTANT VARCHAR2(100) :=
22: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'update_result_set');
18: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'commit_validation_results_auto');
19:
20: -- The module base for the subprogram.
21: D_update_result_set CONSTANT VARCHAR2(100) :=
22: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'update_result_set');
23:
24: -- The module base for the subprogram.
25: D_commit_result_set CONSTANT VARCHAR2(100) :=
26: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'commit_result_set');
22: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'update_result_set');
23:
24: -- The module base for the subprogram.
25: D_commit_result_set CONSTANT VARCHAR2(100) :=
26: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'commit_result_set');
27:
28: -- The module base for the subprogram.
29: D_validate_set CONSTANT VARCHAR2(100) :=
30: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'validate_set');
26: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'commit_result_set');
27:
28: -- The module base for the subprogram.
29: D_validate_set CONSTANT VARCHAR2(100) :=
30: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'validate_set');
31:
32: -- The module base for the subprogram.
33: D_result_type_rank CONSTANT VARCHAR2(100) :=
34: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'result_type_rank');
30: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'validate_set');
31:
32: -- The module base for the subprogram.
33: D_result_type_rank CONSTANT VARCHAR2(100) :=
34: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'result_type_rank');
35:
36: -- The module base for the subprogram.
37: D_delete_result_set_auto CONSTANT VARCHAR2(100) :=
38: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'delete_result_set_auto');
34: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'result_type_rank');
35:
36: -- The module base for the subprogram.
37: D_delete_result_set_auto CONSTANT VARCHAR2(100) :=
38: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'delete_result_set_auto');
39:
40: -- The module base for the subprogram.
41: D_delete_result_set CONSTANT VARCHAR2(100) :=
42: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'delete_result_set');
38: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'delete_result_set_auto');
39:
40: -- The module base for the subprogram.
41: D_delete_result_set CONSTANT VARCHAR2(100) :=
42: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'delete_result_set');
43:
44: -- The module base for the subprogram.
45: D_replace_result_set_id CONSTANT VARCHAR2(100) :=
46: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'replace_result_set_id');
42: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'delete_result_set');
43:
44: -- The module base for the subprogram.
45: D_replace_result_set_id CONSTANT VARCHAR2(100) :=
46: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'replace_result_set_id');
47:
48: -- The module base for the subprogram.
49: D_insert_result CONSTANT VARCHAR2(100) :=
50: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'insert_result');
46: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'replace_result_set_id');
47:
48: -- The module base for the subprogram.
49: D_insert_result CONSTANT VARCHAR2(100) :=
50: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'insert_result');
51:
52: -- The module base for the subprogram.
53: D_validate_unit_price_change CONSTANT VARCHAR2(100) :=
54: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'validate_unit_price_change');
50: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'insert_result');
51:
52: -- The module base for the subprogram.
53: D_validate_unit_price_change CONSTANT VARCHAR2(100) :=
54: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'validate_unit_price_change');
55:
56: -- The module base for the subprogram.
57: D_validate_html_order CONSTANT VARCHAR2(100) :=
58: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'validate_html_order');
54: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'validate_unit_price_change');
55:
56: -- The module base for the subprogram.
57: D_validate_html_order CONSTANT VARCHAR2(100) :=
58: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'validate_html_order');
59: D_validate_html_agreement CONSTANT VARCHAR2(100) :=
60: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'validate_html_agreement');
61: D_validate_pdoi CONSTANT VARCHAR2(100) :=
62: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'validate_pdoi');
56: -- The module base for the subprogram.
57: D_validate_html_order CONSTANT VARCHAR2(100) :=
58: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'validate_html_order');
59: D_validate_html_agreement CONSTANT VARCHAR2(100) :=
60: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'validate_html_agreement');
61: D_validate_pdoi CONSTANT VARCHAR2(100) :=
62: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'validate_pdoi');
63: D_validate_modification_sync CONSTANT VARCHAR2(100) := --CLM Modifications
64: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'validate_modification_sync');
58: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'validate_html_order');
59: D_validate_html_agreement CONSTANT VARCHAR2(100) :=
60: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'validate_html_agreement');
61: D_validate_pdoi CONSTANT VARCHAR2(100) :=
62: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'validate_pdoi');
63: D_validate_modification_sync CONSTANT VARCHAR2(100) := --CLM Modifications
64: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'validate_modification_sync');
65:
66: -- Bug#13503748
60: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'validate_html_agreement');
61: D_validate_pdoi CONSTANT VARCHAR2(100) :=
62: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'validate_pdoi');
63: D_validate_modification_sync CONSTANT VARCHAR2(100) := --CLM Modifications
64: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'validate_modification_sync');
65:
66: -- Bug#13503748
67: D_check_encumbered_amount CONSTANT VARCHAR2(100) :=
68: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'check_encumbered_amount');
64: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'validate_modification_sync');
65:
66: -- Bug#13503748
67: D_check_encumbered_amount CONSTANT VARCHAR2(100) :=
68: PO_LOG.get_subprogram_base(D_PACKAGE_BASE,'check_encumbered_amount');
69:
70: -- Indicates that the calling program is the OA HTML UI.
71: c_program_OA CONSTANT VARCHAR2(10) := 'OA';
72:
1267: d_mod CONSTANT VARCHAR2(100) := D_next_result_set_id;
1268: l_nextval NUMBER;
1269: BEGIN
1270:
1271: IF PO_LOG.d_proc THEN
1272: PO_LOG.proc_begin(d_mod);
1273: END IF;
1274:
1275: SELECT PO_VALIDATION_RESULT_SET_ID_S.NEXTVAL
1268: l_nextval NUMBER;
1269: BEGIN
1270:
1271: IF PO_LOG.d_proc THEN
1272: PO_LOG.proc_begin(d_mod);
1273: END IF;
1274:
1275: SELECT PO_VALIDATION_RESULT_SET_ID_S.NEXTVAL
1276: INTO l_nextval
1276: INTO l_nextval
1277: FROM DUAL
1278: ;
1279:
1280: IF PO_LOG.d_proc THEN
1281: PO_LOG.proc_return(d_mod,l_nextval);
1282: END IF;
1283:
1284: RETURN l_nextval;
1277: FROM DUAL
1278: ;
1279:
1280: IF PO_LOG.d_proc THEN
1281: PO_LOG.proc_return(d_mod,l_nextval);
1282: END IF;
1283:
1284: RETURN l_nextval;
1285:
1284: RETURN l_nextval;
1285:
1286: EXCEPTION
1287: WHEN OTHERS THEN
1288: IF PO_LOG.d_exc THEN
1289: PO_LOG.exc(d_mod,0,NULL);
1290: END IF;
1291: RAISE;
1292:
1285:
1286: EXCEPTION
1287: WHEN OTHERS THEN
1288: IF PO_LOG.d_exc THEN
1289: PO_LOG.exc(d_mod,0,NULL);
1290: END IF;
1291: RAISE;
1292:
1293: END next_result_set_id;
1313: IS
1314: d_mod CONSTANT VARCHAR2(100) := D_delete_result_set;
1315: BEGIN
1316:
1317: IF PO_LOG.d_proc THEN
1318: PO_LOG.proc_begin(d_mod,'p_result_set_id',p_result_set_id);
1319: END IF;
1320:
1321: DELETE FROM PO_VALIDATION_RESULTS_GT
1314: d_mod CONSTANT VARCHAR2(100) := D_delete_result_set;
1315: BEGIN
1316:
1317: IF PO_LOG.d_proc THEN
1318: PO_LOG.proc_begin(d_mod,'p_result_set_id',p_result_set_id);
1319: END IF;
1320:
1321: DELETE FROM PO_VALIDATION_RESULTS_GT
1322: WHERE result_set_id = p_result_set_id
1321: DELETE FROM PO_VALIDATION_RESULTS_GT
1322: WHERE result_set_id = p_result_set_id
1323: ;
1324:
1325: IF PO_LOG.d_proc THEN
1326: PO_LOG.stmt(d_mod,100,'Deleted result set. SQL%ROWCOUNT',SQL%ROWCOUNT);
1327: PO_LOG.proc_end(d_mod);
1328: END IF;
1329:
1322: WHERE result_set_id = p_result_set_id
1323: ;
1324:
1325: IF PO_LOG.d_proc THEN
1326: PO_LOG.stmt(d_mod,100,'Deleted result set. SQL%ROWCOUNT',SQL%ROWCOUNT);
1327: PO_LOG.proc_end(d_mod);
1328: END IF;
1329:
1330: EXCEPTION
1323: ;
1324:
1325: IF PO_LOG.d_proc THEN
1326: PO_LOG.stmt(d_mod,100,'Deleted result set. SQL%ROWCOUNT',SQL%ROWCOUNT);
1327: PO_LOG.proc_end(d_mod);
1328: END IF;
1329:
1330: EXCEPTION
1331: WHEN OTHERS THEN
1328: END IF;
1329:
1330: EXCEPTION
1331: WHEN OTHERS THEN
1332: IF PO_LOG.d_exc THEN
1333: PO_LOG.exc(d_mod,0,NULL);
1334: END IF;
1335: RAISE;
1336:
1329:
1330: EXCEPTION
1331: WHEN OTHERS THEN
1332: IF PO_LOG.d_exc THEN
1333: PO_LOG.exc(d_mod,0,NULL);
1334: END IF;
1335: RAISE;
1336:
1337: END delete_result_set;
1359: d_mod CONSTANT VARCHAR2(100) := D_delete_result_set_auto;
1360: d_position NUMBER := 0;
1361: BEGIN
1362:
1363: IF PO_LOG.d_proc THEN
1364: PO_LOG.proc_begin(d_mod,'p_result_set_id',p_result_set_id);
1365: END IF;
1366:
1367: d_position := 1;
1360: d_position NUMBER := 0;
1361: BEGIN
1362:
1363: IF PO_LOG.d_proc THEN
1364: PO_LOG.proc_begin(d_mod,'p_result_set_id',p_result_set_id);
1365: END IF;
1366:
1367: d_position := 1;
1368:
1373: COMMIT;
1374:
1375: d_position := 200;
1376:
1377: IF PO_LOG.d_proc THEN
1378: PO_LOG.proc_end(d_mod);
1379: END IF;
1380:
1381: EXCEPTION
1374:
1375: d_position := 200;
1376:
1377: IF PO_LOG.d_proc THEN
1378: PO_LOG.proc_end(d_mod);
1379: END IF;
1380:
1381: EXCEPTION
1382: WHEN OTHERS THEN
1379: END IF;
1380:
1381: EXCEPTION
1382: WHEN OTHERS THEN
1383: IF PO_LOG.d_exc THEN
1384: PO_LOG.exc(d_mod,d_position,NULL);
1385: END IF;
1386: RAISE;
1387:
1380:
1381: EXCEPTION
1382: WHEN OTHERS THEN
1383: IF PO_LOG.d_exc THEN
1384: PO_LOG.exc(d_mod,d_position,NULL);
1385: END IF;
1386: RAISE;
1387:
1388: END delete_result_set_auto;
1428: d_mod CONSTANT VARCHAR2(100) := D_commit_validation_results_au;
1429: d_position NUMBER := 0;
1430: BEGIN
1431:
1432: IF PO_LOG.d_proc THEN
1433: PO_LOG.proc_begin(d_mod,'p_result_id_tbl',p_result_id_tbl);
1434: PO_LOG.proc_begin(d_mod,'p_result_set_id_tbl',p_result_set_id_tbl);
1435: PO_LOG.proc_begin(d_mod,'p_result_type_tbl',p_result_type_tbl);
1436: PO_LOG.proc_begin(d_mod,'p_table_name_tbl',p_table_name_tbl);
1429: d_position NUMBER := 0;
1430: BEGIN
1431:
1432: IF PO_LOG.d_proc THEN
1433: PO_LOG.proc_begin(d_mod,'p_result_id_tbl',p_result_id_tbl);
1434: PO_LOG.proc_begin(d_mod,'p_result_set_id_tbl',p_result_set_id_tbl);
1435: PO_LOG.proc_begin(d_mod,'p_result_type_tbl',p_result_type_tbl);
1436: PO_LOG.proc_begin(d_mod,'p_table_name_tbl',p_table_name_tbl);
1437: PO_LOG.proc_begin(d_mod,'p_table_id_tbl',p_table_id_tbl);
1430: BEGIN
1431:
1432: IF PO_LOG.d_proc THEN
1433: PO_LOG.proc_begin(d_mod,'p_result_id_tbl',p_result_id_tbl);
1434: PO_LOG.proc_begin(d_mod,'p_result_set_id_tbl',p_result_set_id_tbl);
1435: PO_LOG.proc_begin(d_mod,'p_result_type_tbl',p_result_type_tbl);
1436: PO_LOG.proc_begin(d_mod,'p_table_name_tbl',p_table_name_tbl);
1437: PO_LOG.proc_begin(d_mod,'p_table_id_tbl',p_table_id_tbl);
1438: PO_LOG.proc_begin(d_mod,'p_message_application_tbl',p_message_application_tbl);
1431:
1432: IF PO_LOG.d_proc THEN
1433: PO_LOG.proc_begin(d_mod,'p_result_id_tbl',p_result_id_tbl);
1434: PO_LOG.proc_begin(d_mod,'p_result_set_id_tbl',p_result_set_id_tbl);
1435: PO_LOG.proc_begin(d_mod,'p_result_type_tbl',p_result_type_tbl);
1436: PO_LOG.proc_begin(d_mod,'p_table_name_tbl',p_table_name_tbl);
1437: PO_LOG.proc_begin(d_mod,'p_table_id_tbl',p_table_id_tbl);
1438: PO_LOG.proc_begin(d_mod,'p_message_application_tbl',p_message_application_tbl);
1439: PO_LOG.proc_begin(d_mod,'p_message_name_tbl',p_message_name_tbl);
1432: IF PO_LOG.d_proc THEN
1433: PO_LOG.proc_begin(d_mod,'p_result_id_tbl',p_result_id_tbl);
1434: PO_LOG.proc_begin(d_mod,'p_result_set_id_tbl',p_result_set_id_tbl);
1435: PO_LOG.proc_begin(d_mod,'p_result_type_tbl',p_result_type_tbl);
1436: PO_LOG.proc_begin(d_mod,'p_table_name_tbl',p_table_name_tbl);
1437: PO_LOG.proc_begin(d_mod,'p_table_id_tbl',p_table_id_tbl);
1438: PO_LOG.proc_begin(d_mod,'p_message_application_tbl',p_message_application_tbl);
1439: PO_LOG.proc_begin(d_mod,'p_message_name_tbl',p_message_name_tbl);
1440: PO_LOG.proc_begin(d_mod,'p_column_name_tbl',p_column_name_tbl);
1433: PO_LOG.proc_begin(d_mod,'p_result_id_tbl',p_result_id_tbl);
1434: PO_LOG.proc_begin(d_mod,'p_result_set_id_tbl',p_result_set_id_tbl);
1435: PO_LOG.proc_begin(d_mod,'p_result_type_tbl',p_result_type_tbl);
1436: PO_LOG.proc_begin(d_mod,'p_table_name_tbl',p_table_name_tbl);
1437: PO_LOG.proc_begin(d_mod,'p_table_id_tbl',p_table_id_tbl);
1438: PO_LOG.proc_begin(d_mod,'p_message_application_tbl',p_message_application_tbl);
1439: PO_LOG.proc_begin(d_mod,'p_message_name_tbl',p_message_name_tbl);
1440: PO_LOG.proc_begin(d_mod,'p_column_name_tbl',p_column_name_tbl);
1441: PO_LOG.proc_begin(d_mod,'p_token1_name_tbl',p_token1_name_tbl);
1434: PO_LOG.proc_begin(d_mod,'p_result_set_id_tbl',p_result_set_id_tbl);
1435: PO_LOG.proc_begin(d_mod,'p_result_type_tbl',p_result_type_tbl);
1436: PO_LOG.proc_begin(d_mod,'p_table_name_tbl',p_table_name_tbl);
1437: PO_LOG.proc_begin(d_mod,'p_table_id_tbl',p_table_id_tbl);
1438: PO_LOG.proc_begin(d_mod,'p_message_application_tbl',p_message_application_tbl);
1439: PO_LOG.proc_begin(d_mod,'p_message_name_tbl',p_message_name_tbl);
1440: PO_LOG.proc_begin(d_mod,'p_column_name_tbl',p_column_name_tbl);
1441: PO_LOG.proc_begin(d_mod,'p_token1_name_tbl',p_token1_name_tbl);
1442: PO_LOG.proc_begin(d_mod,'p_token1_value_tbl',p_token1_value_tbl);
1435: PO_LOG.proc_begin(d_mod,'p_result_type_tbl',p_result_type_tbl);
1436: PO_LOG.proc_begin(d_mod,'p_table_name_tbl',p_table_name_tbl);
1437: PO_LOG.proc_begin(d_mod,'p_table_id_tbl',p_table_id_tbl);
1438: PO_LOG.proc_begin(d_mod,'p_message_application_tbl',p_message_application_tbl);
1439: PO_LOG.proc_begin(d_mod,'p_message_name_tbl',p_message_name_tbl);
1440: PO_LOG.proc_begin(d_mod,'p_column_name_tbl',p_column_name_tbl);
1441: PO_LOG.proc_begin(d_mod,'p_token1_name_tbl',p_token1_name_tbl);
1442: PO_LOG.proc_begin(d_mod,'p_token1_value_tbl',p_token1_value_tbl);
1443: PO_LOG.proc_begin(d_mod,'p_token2_name_tbl',p_token2_name_tbl);
1436: PO_LOG.proc_begin(d_mod,'p_table_name_tbl',p_table_name_tbl);
1437: PO_LOG.proc_begin(d_mod,'p_table_id_tbl',p_table_id_tbl);
1438: PO_LOG.proc_begin(d_mod,'p_message_application_tbl',p_message_application_tbl);
1439: PO_LOG.proc_begin(d_mod,'p_message_name_tbl',p_message_name_tbl);
1440: PO_LOG.proc_begin(d_mod,'p_column_name_tbl',p_column_name_tbl);
1441: PO_LOG.proc_begin(d_mod,'p_token1_name_tbl',p_token1_name_tbl);
1442: PO_LOG.proc_begin(d_mod,'p_token1_value_tbl',p_token1_value_tbl);
1443: PO_LOG.proc_begin(d_mod,'p_token2_name_tbl',p_token2_name_tbl);
1444: PO_LOG.proc_begin(d_mod,'p_token2_value_tbl',p_token2_value_tbl);
1437: PO_LOG.proc_begin(d_mod,'p_table_id_tbl',p_table_id_tbl);
1438: PO_LOG.proc_begin(d_mod,'p_message_application_tbl',p_message_application_tbl);
1439: PO_LOG.proc_begin(d_mod,'p_message_name_tbl',p_message_name_tbl);
1440: PO_LOG.proc_begin(d_mod,'p_column_name_tbl',p_column_name_tbl);
1441: PO_LOG.proc_begin(d_mod,'p_token1_name_tbl',p_token1_name_tbl);
1442: PO_LOG.proc_begin(d_mod,'p_token1_value_tbl',p_token1_value_tbl);
1443: PO_LOG.proc_begin(d_mod,'p_token2_name_tbl',p_token2_name_tbl);
1444: PO_LOG.proc_begin(d_mod,'p_token2_value_tbl',p_token2_value_tbl);
1445: PO_LOG.proc_begin(d_mod,'p_token3_name_tbl',p_token3_name_tbl);
1438: PO_LOG.proc_begin(d_mod,'p_message_application_tbl',p_message_application_tbl);
1439: PO_LOG.proc_begin(d_mod,'p_message_name_tbl',p_message_name_tbl);
1440: PO_LOG.proc_begin(d_mod,'p_column_name_tbl',p_column_name_tbl);
1441: PO_LOG.proc_begin(d_mod,'p_token1_name_tbl',p_token1_name_tbl);
1442: PO_LOG.proc_begin(d_mod,'p_token1_value_tbl',p_token1_value_tbl);
1443: PO_LOG.proc_begin(d_mod,'p_token2_name_tbl',p_token2_name_tbl);
1444: PO_LOG.proc_begin(d_mod,'p_token2_value_tbl',p_token2_value_tbl);
1445: PO_LOG.proc_begin(d_mod,'p_token3_name_tbl',p_token3_name_tbl);
1446: PO_LOG.proc_begin(d_mod,'p_token3_value_tbl',p_token3_value_tbl);
1439: PO_LOG.proc_begin(d_mod,'p_message_name_tbl',p_message_name_tbl);
1440: PO_LOG.proc_begin(d_mod,'p_column_name_tbl',p_column_name_tbl);
1441: PO_LOG.proc_begin(d_mod,'p_token1_name_tbl',p_token1_name_tbl);
1442: PO_LOG.proc_begin(d_mod,'p_token1_value_tbl',p_token1_value_tbl);
1443: PO_LOG.proc_begin(d_mod,'p_token2_name_tbl',p_token2_name_tbl);
1444: PO_LOG.proc_begin(d_mod,'p_token2_value_tbl',p_token2_value_tbl);
1445: PO_LOG.proc_begin(d_mod,'p_token3_name_tbl',p_token3_name_tbl);
1446: PO_LOG.proc_begin(d_mod,'p_token3_value_tbl',p_token3_value_tbl);
1447: PO_LOG.proc_begin(d_mod,'p_token4_name_tbl',p_token4_name_tbl);
1440: PO_LOG.proc_begin(d_mod,'p_column_name_tbl',p_column_name_tbl);
1441: PO_LOG.proc_begin(d_mod,'p_token1_name_tbl',p_token1_name_tbl);
1442: PO_LOG.proc_begin(d_mod,'p_token1_value_tbl',p_token1_value_tbl);
1443: PO_LOG.proc_begin(d_mod,'p_token2_name_tbl',p_token2_name_tbl);
1444: PO_LOG.proc_begin(d_mod,'p_token2_value_tbl',p_token2_value_tbl);
1445: PO_LOG.proc_begin(d_mod,'p_token3_name_tbl',p_token3_name_tbl);
1446: PO_LOG.proc_begin(d_mod,'p_token3_value_tbl',p_token3_value_tbl);
1447: PO_LOG.proc_begin(d_mod,'p_token4_name_tbl',p_token4_name_tbl);
1448: PO_LOG.proc_begin(d_mod,'p_token4_value_tbl',p_token4_value_tbl);
1441: PO_LOG.proc_begin(d_mod,'p_token1_name_tbl',p_token1_name_tbl);
1442: PO_LOG.proc_begin(d_mod,'p_token1_value_tbl',p_token1_value_tbl);
1443: PO_LOG.proc_begin(d_mod,'p_token2_name_tbl',p_token2_name_tbl);
1444: PO_LOG.proc_begin(d_mod,'p_token2_value_tbl',p_token2_value_tbl);
1445: PO_LOG.proc_begin(d_mod,'p_token3_name_tbl',p_token3_name_tbl);
1446: PO_LOG.proc_begin(d_mod,'p_token3_value_tbl',p_token3_value_tbl);
1447: PO_LOG.proc_begin(d_mod,'p_token4_name_tbl',p_token4_name_tbl);
1448: PO_LOG.proc_begin(d_mod,'p_token4_value_tbl',p_token4_value_tbl);
1449: PO_LOG.proc_begin(d_mod,'p_token5_name_tbl',p_token5_name_tbl);
1442: PO_LOG.proc_begin(d_mod,'p_token1_value_tbl',p_token1_value_tbl);
1443: PO_LOG.proc_begin(d_mod,'p_token2_name_tbl',p_token2_name_tbl);
1444: PO_LOG.proc_begin(d_mod,'p_token2_value_tbl',p_token2_value_tbl);
1445: PO_LOG.proc_begin(d_mod,'p_token3_name_tbl',p_token3_name_tbl);
1446: PO_LOG.proc_begin(d_mod,'p_token3_value_tbl',p_token3_value_tbl);
1447: PO_LOG.proc_begin(d_mod,'p_token4_name_tbl',p_token4_name_tbl);
1448: PO_LOG.proc_begin(d_mod,'p_token4_value_tbl',p_token4_value_tbl);
1449: PO_LOG.proc_begin(d_mod,'p_token5_name_tbl',p_token5_name_tbl);
1450: PO_LOG.proc_begin(d_mod,'p_token5_value_tbl',p_token5_value_tbl);
1443: PO_LOG.proc_begin(d_mod,'p_token2_name_tbl',p_token2_name_tbl);
1444: PO_LOG.proc_begin(d_mod,'p_token2_value_tbl',p_token2_value_tbl);
1445: PO_LOG.proc_begin(d_mod,'p_token3_name_tbl',p_token3_name_tbl);
1446: PO_LOG.proc_begin(d_mod,'p_token3_value_tbl',p_token3_value_tbl);
1447: PO_LOG.proc_begin(d_mod,'p_token4_name_tbl',p_token4_name_tbl);
1448: PO_LOG.proc_begin(d_mod,'p_token4_value_tbl',p_token4_value_tbl);
1449: PO_LOG.proc_begin(d_mod,'p_token5_name_tbl',p_token5_name_tbl);
1450: PO_LOG.proc_begin(d_mod,'p_token5_value_tbl',p_token5_value_tbl);
1451: PO_LOG.proc_begin(d_mod,'p_token6_name_tbl',p_token6_name_tbl);
1444: PO_LOG.proc_begin(d_mod,'p_token2_value_tbl',p_token2_value_tbl);
1445: PO_LOG.proc_begin(d_mod,'p_token3_name_tbl',p_token3_name_tbl);
1446: PO_LOG.proc_begin(d_mod,'p_token3_value_tbl',p_token3_value_tbl);
1447: PO_LOG.proc_begin(d_mod,'p_token4_name_tbl',p_token4_name_tbl);
1448: PO_LOG.proc_begin(d_mod,'p_token4_value_tbl',p_token4_value_tbl);
1449: PO_LOG.proc_begin(d_mod,'p_token5_name_tbl',p_token5_name_tbl);
1450: PO_LOG.proc_begin(d_mod,'p_token5_value_tbl',p_token5_value_tbl);
1451: PO_LOG.proc_begin(d_mod,'p_token6_name_tbl',p_token6_name_tbl);
1452: PO_LOG.proc_begin(d_mod,'p_token6_value_tbl',p_token6_value_tbl);
1445: PO_LOG.proc_begin(d_mod,'p_token3_name_tbl',p_token3_name_tbl);
1446: PO_LOG.proc_begin(d_mod,'p_token3_value_tbl',p_token3_value_tbl);
1447: PO_LOG.proc_begin(d_mod,'p_token4_name_tbl',p_token4_name_tbl);
1448: PO_LOG.proc_begin(d_mod,'p_token4_value_tbl',p_token4_value_tbl);
1449: PO_LOG.proc_begin(d_mod,'p_token5_name_tbl',p_token5_name_tbl);
1450: PO_LOG.proc_begin(d_mod,'p_token5_value_tbl',p_token5_value_tbl);
1451: PO_LOG.proc_begin(d_mod,'p_token6_name_tbl',p_token6_name_tbl);
1452: PO_LOG.proc_begin(d_mod,'p_token6_value_tbl',p_token6_value_tbl);
1453: END IF;
1446: PO_LOG.proc_begin(d_mod,'p_token3_value_tbl',p_token3_value_tbl);
1447: PO_LOG.proc_begin(d_mod,'p_token4_name_tbl',p_token4_name_tbl);
1448: PO_LOG.proc_begin(d_mod,'p_token4_value_tbl',p_token4_value_tbl);
1449: PO_LOG.proc_begin(d_mod,'p_token5_name_tbl',p_token5_name_tbl);
1450: PO_LOG.proc_begin(d_mod,'p_token5_value_tbl',p_token5_value_tbl);
1451: PO_LOG.proc_begin(d_mod,'p_token6_name_tbl',p_token6_name_tbl);
1452: PO_LOG.proc_begin(d_mod,'p_token6_value_tbl',p_token6_value_tbl);
1453: END IF;
1454:
1447: PO_LOG.proc_begin(d_mod,'p_token4_name_tbl',p_token4_name_tbl);
1448: PO_LOG.proc_begin(d_mod,'p_token4_value_tbl',p_token4_value_tbl);
1449: PO_LOG.proc_begin(d_mod,'p_token5_name_tbl',p_token5_name_tbl);
1450: PO_LOG.proc_begin(d_mod,'p_token5_value_tbl',p_token5_value_tbl);
1451: PO_LOG.proc_begin(d_mod,'p_token6_name_tbl',p_token6_name_tbl);
1452: PO_LOG.proc_begin(d_mod,'p_token6_value_tbl',p_token6_value_tbl);
1453: END IF;
1454:
1455: d_position := 1;
1448: PO_LOG.proc_begin(d_mod,'p_token4_value_tbl',p_token4_value_tbl);
1449: PO_LOG.proc_begin(d_mod,'p_token5_name_tbl',p_token5_name_tbl);
1450: PO_LOG.proc_begin(d_mod,'p_token5_value_tbl',p_token5_value_tbl);
1451: PO_LOG.proc_begin(d_mod,'p_token6_name_tbl',p_token6_name_tbl);
1452: PO_LOG.proc_begin(d_mod,'p_token6_value_tbl',p_token6_value_tbl);
1453: END IF;
1454:
1455: d_position := 1;
1456:
1499: );
1500:
1501: d_position := 100;
1502:
1503: IF PO_LOG.d_stmt THEN
1504: PO_LOG.stmt(d_mod,d_position,'Inserted data. SQL%ROWCOUNT',SQL%ROWCOUNT);
1505: END IF;
1506:
1507: COMMIT WORK;
1500:
1501: d_position := 100;
1502:
1503: IF PO_LOG.d_stmt THEN
1504: PO_LOG.stmt(d_mod,d_position,'Inserted data. SQL%ROWCOUNT',SQL%ROWCOUNT);
1505: END IF;
1506:
1507: COMMIT WORK;
1508:
1505: END IF;
1506:
1507: COMMIT WORK;
1508:
1509: IF PO_LOG.d_proc THEN
1510: PO_LOG.proc_end(d_mod);
1511: END IF;
1512:
1513: EXCEPTION
1506:
1507: COMMIT WORK;
1508:
1509: IF PO_LOG.d_proc THEN
1510: PO_LOG.proc_end(d_mod);
1511: END IF;
1512:
1513: EXCEPTION
1514: WHEN OTHERS THEN
1511: END IF;
1512:
1513: EXCEPTION
1514: WHEN OTHERS THEN
1515: IF PO_LOG.d_exc THEN
1516: PO_LOG.exc(d_mod,d_position,NULL);
1517: END IF;
1518: RAISE;
1519:
1512:
1513: EXCEPTION
1514: WHEN OTHERS THEN
1515: IF PO_LOG.d_exc THEN
1516: PO_LOG.exc(d_mod,d_position,NULL);
1517: END IF;
1518: RAISE;
1519:
1520: END commit_validation_results_auto;
1542: IS
1543: d_mod CONSTANT VARCHAR2(100) := D_replace_result_set_id;
1544: BEGIN
1545:
1546: IF PO_LOG.d_proc THEN
1547: PO_LOG.proc_begin(d_mod,'p_old_result_set_id',p_old_result_set_id);
1548: PO_LOG.proc_begin(d_mod,'p_new_result_set_id',p_new_result_set_id);
1549: END IF;
1550:
1543: d_mod CONSTANT VARCHAR2(100) := D_replace_result_set_id;
1544: BEGIN
1545:
1546: IF PO_LOG.d_proc THEN
1547: PO_LOG.proc_begin(d_mod,'p_old_result_set_id',p_old_result_set_id);
1548: PO_LOG.proc_begin(d_mod,'p_new_result_set_id',p_new_result_set_id);
1549: END IF;
1550:
1551: -- Fix the result_set_id, message_application, and message_name.
1544: BEGIN
1545:
1546: IF PO_LOG.d_proc THEN
1547: PO_LOG.proc_begin(d_mod,'p_old_result_set_id',p_old_result_set_id);
1548: PO_LOG.proc_begin(d_mod,'p_new_result_set_id',p_new_result_set_id);
1549: END IF;
1550:
1551: -- Fix the result_set_id, message_application, and message_name.
1552:
1556: WHERE
1557: result_set_id = p_old_result_set_id
1558: ;
1559:
1560: IF PO_LOG.d_proc THEN
1561: PO_LOG.proc_end(d_mod);
1562: END IF;
1563:
1564: EXCEPTION
1557: result_set_id = p_old_result_set_id
1558: ;
1559:
1560: IF PO_LOG.d_proc THEN
1561: PO_LOG.proc_end(d_mod);
1562: END IF;
1563:
1564: EXCEPTION
1565: WHEN OTHERS THEN
1562: END IF;
1563:
1564: EXCEPTION
1565: WHEN OTHERS THEN
1566: IF PO_LOG.d_exc THEN
1567: PO_LOG.exc(d_mod,0,NULL);
1568: END IF;
1569: RAISE;
1570:
1563:
1564: EXCEPTION
1565: WHEN OTHERS THEN
1566: IF PO_LOG.d_exc THEN
1567: PO_LOG.exc(d_mod,0,NULL);
1568: END IF;
1569: RAISE;
1570:
1571: END replace_result_set_id;
1615: l_token6_value_tbl PO_TBL_VARCHAR2000;
1616:
1617: BEGIN
1618:
1619: IF PO_LOG.d_proc THEN
1620: PO_LOG.proc_begin(d_mod,'p_result_set_id',p_result_set_id);
1621: END IF;
1622:
1623: d_position := 1;
1616:
1617: BEGIN
1618:
1619: IF PO_LOG.d_proc THEN
1620: PO_LOG.proc_begin(d_mod,'p_result_set_id',p_result_set_id);
1621: END IF;
1622:
1623: d_position := 1;
1624:
1671: result_set_id = p_result_set_id
1672: ;
1673:
1674: d_position := 100;
1675: IF PO_LOG.d_stmt THEN
1676: PO_LOG.stmt(d_mod,d_position,'Retrieved data.');
1677: END IF;
1678:
1679: delete_result_set(p_result_set_id => p_result_set_id);
1672: ;
1673:
1674: d_position := 100;
1675: IF PO_LOG.d_stmt THEN
1676: PO_LOG.stmt(d_mod,d_position,'Retrieved data.');
1677: END IF;
1678:
1679: delete_result_set(p_result_set_id => p_result_set_id);
1680:
1702: , p_token6_name_tbl => l_token6_name_tbl
1703: , p_token6_value_tbl => l_token6_value_tbl
1704: );
1705:
1706: IF PO_LOG.d_proc THEN
1707: PO_LOG.proc_end(d_mod);
1708: END IF;
1709:
1710: EXCEPTION
1703: , p_token6_value_tbl => l_token6_value_tbl
1704: );
1705:
1706: IF PO_LOG.d_proc THEN
1707: PO_LOG.proc_end(d_mod);
1708: END IF;
1709:
1710: EXCEPTION
1711: WHEN OTHERS THEN
1708: END IF;
1709:
1710: EXCEPTION
1711: WHEN OTHERS THEN
1712: IF PO_LOG.d_exc THEN
1713: PO_LOG.exc(d_mod,d_position,NULL);
1714: END IF;
1715: RAISE;
1716:
1709:
1710: EXCEPTION
1711: WHEN OTHERS THEN
1712: IF PO_LOG.d_exc THEN
1713: PO_LOG.exc(d_mod,d_position,NULL);
1714: END IF;
1715: RAISE;
1716:
1717: END commit_result_set;
1920: )
1921: IS
1922: d_mod CONSTANT VARCHAR2(100) := D_validate_set;
1923: d_position NUMBER := 0;
1924: d_stmt CONSTANT BOOLEAN := PO_LOG.d_stmt;
1925:
1926: l_result_set_id NUMBER;
1927: l_result_type VARCHAR2(30);
1928: l_val VARCHAR2(2000);
1947: l_manual_quote_num_type PO_SYSTEM_PARAMETERS.manual_quote_num_type%TYPE;
1948:
1949: BEGIN
1950:
1951: IF PO_LOG.d_proc THEN
1952: PO_LOG.proc_begin(d_mod,'p_validation_set',p_validation_set);
1953: PO_LOG.proc_begin(d_mod,'p_autocommit_results_flag',p_autocommit_results_flag);
1954: PO_LOG.proc_begin(d_mod,'p_calling_program',p_calling_program);
1955: PO_LOG.proc_begin(d_mod,'p_stopping_result_type',p_stopping_result_type);
1948:
1949: BEGIN
1950:
1951: IF PO_LOG.d_proc THEN
1952: PO_LOG.proc_begin(d_mod,'p_validation_set',p_validation_set);
1953: PO_LOG.proc_begin(d_mod,'p_autocommit_results_flag',p_autocommit_results_flag);
1954: PO_LOG.proc_begin(d_mod,'p_calling_program',p_calling_program);
1955: PO_LOG.proc_begin(d_mod,'p_stopping_result_type',p_stopping_result_type);
1956: PO_LOG.proc_begin(d_mod,'p_parameter_name_tbl',p_parameter_name_tbl);
1949: BEGIN
1950:
1951: IF PO_LOG.d_proc THEN
1952: PO_LOG.proc_begin(d_mod,'p_validation_set',p_validation_set);
1953: PO_LOG.proc_begin(d_mod,'p_autocommit_results_flag',p_autocommit_results_flag);
1954: PO_LOG.proc_begin(d_mod,'p_calling_program',p_calling_program);
1955: PO_LOG.proc_begin(d_mod,'p_stopping_result_type',p_stopping_result_type);
1956: PO_LOG.proc_begin(d_mod,'p_parameter_name_tbl',p_parameter_name_tbl);
1957: PO_LOG.proc_begin(d_mod,'p_parameter_value_tbl',p_parameter_value_tbl);
1950:
1951: IF PO_LOG.d_proc THEN
1952: PO_LOG.proc_begin(d_mod,'p_validation_set',p_validation_set);
1953: PO_LOG.proc_begin(d_mod,'p_autocommit_results_flag',p_autocommit_results_flag);
1954: PO_LOG.proc_begin(d_mod,'p_calling_program',p_calling_program);
1955: PO_LOG.proc_begin(d_mod,'p_stopping_result_type',p_stopping_result_type);
1956: PO_LOG.proc_begin(d_mod,'p_parameter_name_tbl',p_parameter_name_tbl);
1957: PO_LOG.proc_begin(d_mod,'p_parameter_value_tbl',p_parameter_value_tbl);
1958: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
1951: IF PO_LOG.d_proc THEN
1952: PO_LOG.proc_begin(d_mod,'p_validation_set',p_validation_set);
1953: PO_LOG.proc_begin(d_mod,'p_autocommit_results_flag',p_autocommit_results_flag);
1954: PO_LOG.proc_begin(d_mod,'p_calling_program',p_calling_program);
1955: PO_LOG.proc_begin(d_mod,'p_stopping_result_type',p_stopping_result_type);
1956: PO_LOG.proc_begin(d_mod,'p_parameter_name_tbl',p_parameter_name_tbl);
1957: PO_LOG.proc_begin(d_mod,'p_parameter_value_tbl',p_parameter_value_tbl);
1958: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
1959: PO_LOG.proc_begin(d_mod,'x_result_type',x_result_type);
1952: PO_LOG.proc_begin(d_mod,'p_validation_set',p_validation_set);
1953: PO_LOG.proc_begin(d_mod,'p_autocommit_results_flag',p_autocommit_results_flag);
1954: PO_LOG.proc_begin(d_mod,'p_calling_program',p_calling_program);
1955: PO_LOG.proc_begin(d_mod,'p_stopping_result_type',p_stopping_result_type);
1956: PO_LOG.proc_begin(d_mod,'p_parameter_name_tbl',p_parameter_name_tbl);
1957: PO_LOG.proc_begin(d_mod,'p_parameter_value_tbl',p_parameter_value_tbl);
1958: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
1959: PO_LOG.proc_begin(d_mod,'x_result_type',x_result_type);
1960: END IF;
1953: PO_LOG.proc_begin(d_mod,'p_autocommit_results_flag',p_autocommit_results_flag);
1954: PO_LOG.proc_begin(d_mod,'p_calling_program',p_calling_program);
1955: PO_LOG.proc_begin(d_mod,'p_stopping_result_type',p_stopping_result_type);
1956: PO_LOG.proc_begin(d_mod,'p_parameter_name_tbl',p_parameter_name_tbl);
1957: PO_LOG.proc_begin(d_mod,'p_parameter_value_tbl',p_parameter_value_tbl);
1958: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
1959: PO_LOG.proc_begin(d_mod,'x_result_type',x_result_type);
1960: END IF;
1961: d_position := 1;
1954: PO_LOG.proc_begin(d_mod,'p_calling_program',p_calling_program);
1955: PO_LOG.proc_begin(d_mod,'p_stopping_result_type',p_stopping_result_type);
1956: PO_LOG.proc_begin(d_mod,'p_parameter_name_tbl',p_parameter_name_tbl);
1957: PO_LOG.proc_begin(d_mod,'p_parameter_value_tbl',p_parameter_value_tbl);
1958: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
1959: PO_LOG.proc_begin(d_mod,'x_result_type',x_result_type);
1960: END IF;
1961: d_position := 1;
1962:
1955: PO_LOG.proc_begin(d_mod,'p_stopping_result_type',p_stopping_result_type);
1956: PO_LOG.proc_begin(d_mod,'p_parameter_name_tbl',p_parameter_name_tbl);
1957: PO_LOG.proc_begin(d_mod,'p_parameter_value_tbl',p_parameter_value_tbl);
1958: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
1959: PO_LOG.proc_begin(d_mod,'x_result_type',x_result_type);
1960: END IF;
1961: d_position := 1;
1962:
1963: IF (p_parameter_name_tbl IS NOT NULL) THEN
2028: l_stop_rank := result_type_rank(p_stopping_result_type);
2029:
2030: d_position := 40;
2031: IF d_stmt THEN
2032: PO_LOG.stmt(d_mod,d_position,'x_result_set_id',x_result_set_id);
2033: PO_LOG.stmt(d_mod,d_position,'x_result_type',x_result_type);
2034: PO_LOG.stmt(d_mod,d_position,'l_result_rank',l_result_rank);
2035: PO_LOG.stmt(d_mod,d_position,'l_stop_rank',l_stop_rank);
2036: END IF;
2029:
2030: d_position := 40;
2031: IF d_stmt THEN
2032: PO_LOG.stmt(d_mod,d_position,'x_result_set_id',x_result_set_id);
2033: PO_LOG.stmt(d_mod,d_position,'x_result_type',x_result_type);
2034: PO_LOG.stmt(d_mod,d_position,'l_result_rank',l_result_rank);
2035: PO_LOG.stmt(d_mod,d_position,'l_stop_rank',l_stop_rank);
2036: END IF;
2037:
2030: d_position := 40;
2031: IF d_stmt THEN
2032: PO_LOG.stmt(d_mod,d_position,'x_result_set_id',x_result_set_id);
2033: PO_LOG.stmt(d_mod,d_position,'x_result_type',x_result_type);
2034: PO_LOG.stmt(d_mod,d_position,'l_result_rank',l_result_rank);
2035: PO_LOG.stmt(d_mod,d_position,'l_stop_rank',l_stop_rank);
2036: END IF;
2037:
2038: -- Loop through the validation set, executing each validation in turn.
2031: IF d_stmt THEN
2032: PO_LOG.stmt(d_mod,d_position,'x_result_set_id',x_result_set_id);
2033: PO_LOG.stmt(d_mod,d_position,'x_result_type',x_result_type);
2034: PO_LOG.stmt(d_mod,d_position,'l_result_rank',l_result_rank);
2035: PO_LOG.stmt(d_mod,d_position,'l_stop_rank',l_stop_rank);
2036: END IF;
2037:
2038: -- Loop through the validation set, executing each validation in turn.
2039: FOR i IN 1 .. p_validation_set.COUNT LOOP
2040: d_position := 100;
2041:
2042: l_val := p_validation_set(i);
2043: IF d_stmt THEN
2044: PO_LOG.stmt(d_mod,d_position,'p_validation_set('||i||')',l_val);
2045: END IF;
2046:
2047: d_position := 110;
2048:
6050: x_result_type => l_result_type
6051: );
6052:
6053: ELSE
6054: IF PO_LOG.d_exc THEN
6055: PO_LOG.exc(d_mod,d_position,'Invalid identifier in validation set: '||l_val);
6056: END IF;
6057: RAISE CASE_NOT_FOUND;
6058:
6051: );
6052:
6053: ELSE
6054: IF PO_LOG.d_exc THEN
6055: PO_LOG.exc(d_mod,d_position,'Invalid identifier in validation set: '||l_val);
6056: END IF;
6057: RAISE CASE_NOT_FOUND;
6058:
6059: END CASE;
6059: END CASE;
6060:
6061: EXCEPTION
6062: WHEN OTHERS THEN
6063: IF PO_LOG.d_exc THEN
6064: PO_LOG.exc(d_mod,d_position,
6065: 'Validation subroutine '||l_val||' threw exception');
6066: END IF;
6067:
6060:
6061: EXCEPTION
6062: WHEN OTHERS THEN
6063: IF PO_LOG.d_exc THEN
6064: PO_LOG.exc(d_mod,d_position,
6065: 'Validation subroutine '||l_val||' threw exception');
6066: END IF;
6067:
6068: l_result_type := c_result_type_FATAL;
6086: END;
6087:
6088: d_position := 200;
6089: IF d_stmt THEN
6090: PO_LOG.stmt(d_mod,d_position,'l_result_type',l_result_type);
6091: PO_LOG.stmt(d_mod,d_position,'l_result_set_id',l_result_set_id);
6092: END IF;
6093:
6094: -- Fix the result set id.
6087:
6088: d_position := 200;
6089: IF d_stmt THEN
6090: PO_LOG.stmt(d_mod,d_position,'l_result_type',l_result_type);
6091: PO_LOG.stmt(d_mod,d_position,'l_result_set_id',l_result_set_id);
6092: END IF;
6093:
6094: -- Fix the result set id.
6095: IF (l_result_set_id <> x_result_set_id) THEN
6113: x_result_type := l_result_type;
6114: l_result_rank := l_new_rank;
6115:
6116: IF d_stmt THEN
6117: PO_LOG.stmt(d_mod,d_position,'x_result_type',x_result_type);
6118: PO_LOG.stmt(d_mod,d_position,'l_result_rank',l_result_rank);
6119: END IF;
6120:
6121: -- If the validation has encountered a serious problem
6114: l_result_rank := l_new_rank;
6115:
6116: IF d_stmt THEN
6117: PO_LOG.stmt(d_mod,d_position,'x_result_type',x_result_type);
6118: PO_LOG.stmt(d_mod,d_position,'l_result_rank',l_result_rank);
6119: END IF;
6120:
6121: -- If the validation has encountered a serious problem
6122: -- or the stopping result, stop processing.
6125: )
6126: THEN
6127: d_position := 400;
6128: IF d_stmt THEN
6129: PO_LOG.stmt(d_mod,d_position,'Stopping loop. x_result_type',x_result_type);
6130: END IF;
6131:
6132: EXIT;
6133: END IF;
6144: d_position := 600;
6145: commit_result_set(p_result_set_id => x_result_set_id);
6146: END IF;
6147:
6148: IF PO_LOG.d_proc THEN
6149: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
6150: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6151: END IF;
6152:
6145: commit_result_set(p_result_set_id => x_result_set_id);
6146: END IF;
6147:
6148: IF PO_LOG.d_proc THEN
6149: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
6150: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6151: END IF;
6152:
6153: EXCEPTION
6146: END IF;
6147:
6148: IF PO_LOG.d_proc THEN
6149: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
6150: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6151: END IF;
6152:
6153: EXCEPTION
6154: WHEN OTHERS THEN
6151: END IF;
6152:
6153: EXCEPTION
6154: WHEN OTHERS THEN
6155: IF PO_LOG.d_exc THEN
6156: PO_LOG.exc(d_mod,d_position,NULL);
6157: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
6158: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6159: END IF;
6152:
6153: EXCEPTION
6154: WHEN OTHERS THEN
6155: IF PO_LOG.d_exc THEN
6156: PO_LOG.exc(d_mod,d_position,NULL);
6157: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
6158: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6159: END IF;
6160: RAISE;
6153: EXCEPTION
6154: WHEN OTHERS THEN
6155: IF PO_LOG.d_exc THEN
6156: PO_LOG.exc(d_mod,d_position,NULL);
6157: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
6158: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6159: END IF;
6160: RAISE;
6161:
6154: WHEN OTHERS THEN
6155: IF PO_LOG.d_exc THEN
6156: PO_LOG.exc(d_mod,d_position,NULL);
6157: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
6158: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6159: END IF;
6160: RAISE;
6161:
6162: END validate_set;
6201: l_result_set_id NUMBER;
6202: l_table_results PO_VALIDATION_RESULTS_TYPE;
6203: BEGIN
6204:
6205: IF PO_LOG.d_proc THEN
6206: PO_LOG.proc_begin(d_mod);
6207: END IF;
6208:
6209: d_position := 100;
6202: l_table_results PO_VALIDATION_RESULTS_TYPE;
6203: BEGIN
6204:
6205: IF PO_LOG.d_proc THEN
6206: PO_LOG.proc_begin(d_mod);
6207: END IF;
6208:
6209: d_position := 100;
6210:
6247: x_results.append( p_results => l_table_results );
6248:
6249: d_position := 500;
6250:
6251: IF PO_LOG.d_proc THEN
6252: PO_LOG.proc_end(d_mod,'l_result_set_id',l_result_set_id);
6253: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
6254: END IF;
6255:
6248:
6249: d_position := 500;
6250:
6251: IF PO_LOG.d_proc THEN
6252: PO_LOG.proc_end(d_mod,'l_result_set_id',l_result_set_id);
6253: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
6254: END IF;
6255:
6256: EXCEPTION
6249: d_position := 500;
6250:
6251: IF PO_LOG.d_proc THEN
6252: PO_LOG.proc_end(d_mod,'l_result_set_id',l_result_set_id);
6253: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
6254: END IF;
6255:
6256: EXCEPTION
6257: WHEN OTHERS THEN
6254: END IF;
6255:
6256: EXCEPTION
6257: WHEN OTHERS THEN
6258: IF PO_LOG.d_exc THEN
6259: PO_LOG.exc(d_mod,d_position,NULL);
6260: PO_LOG.proc_end(d_mod,'l_result_set_id',l_result_set_id);
6261: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6262: END IF;
6255:
6256: EXCEPTION
6257: WHEN OTHERS THEN
6258: IF PO_LOG.d_exc THEN
6259: PO_LOG.exc(d_mod,d_position,NULL);
6260: PO_LOG.proc_end(d_mod,'l_result_set_id',l_result_set_id);
6261: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6262: END IF;
6263: RAISE;
6256: EXCEPTION
6257: WHEN OTHERS THEN
6258: IF PO_LOG.d_exc THEN
6259: PO_LOG.exc(d_mod,d_position,NULL);
6260: PO_LOG.proc_end(d_mod,'l_result_set_id',l_result_set_id);
6261: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6262: END IF;
6263: RAISE;
6264:
6257: WHEN OTHERS THEN
6258: IF PO_LOG.d_exc THEN
6259: PO_LOG.exc(d_mod,d_position,NULL);
6260: PO_LOG.proc_end(d_mod,'l_result_set_id',l_result_set_id);
6261: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6262: END IF;
6263: RAISE;
6264:
6265: END validate_set;
6289: d_mod CONSTANT VARCHAR2(100) := D_result_type_rank;
6290: l_rank NUMBER;
6291: BEGIN
6292:
6293: IF PO_LOG.d_proc THEN
6294: PO_LOG.proc_begin(d_mod,'p_result_type',p_result_type);
6295: END IF;
6296:
6297: FOR i IN 1 .. c_result_type_rank_tbl.COUNT LOOP
6290: l_rank NUMBER;
6291: BEGIN
6292:
6293: IF PO_LOG.d_proc THEN
6294: PO_LOG.proc_begin(d_mod,'p_result_type',p_result_type);
6295: END IF;
6296:
6297: FOR i IN 1 .. c_result_type_rank_tbl.COUNT LOOP
6298: IF (c_result_type_rank_tbl(i) = p_result_type) THEN
6304: IF (l_rank IS NULL) THEN
6305: l_rank := -1;
6306: END IF;
6307:
6308: IF PO_LOG.d_proc THEN
6309: PO_LOG.proc_return(d_mod,l_rank);
6310: END IF;
6311:
6312: RETURN l_rank;
6305: l_rank := -1;
6306: END IF;
6307:
6308: IF PO_LOG.d_proc THEN
6309: PO_LOG.proc_return(d_mod,l_rank);
6310: END IF;
6311:
6312: RETURN l_rank;
6313:
6356: d_mod CONSTANT VARCHAR2(100) := D_validate_unit_price_change;
6357: l_lines PO_LINES_VAL_TYPE;
6358: BEGIN
6359:
6360: IF PO_LOG.d_proc THEN
6361: PO_LOG.proc_begin(d_mod,'p_line_id_tbl',p_line_id_tbl);
6362: PO_LOG.proc_begin(d_mod,'p_amount_changed_flag_tbl',p_amount_changed_flag_tbl);--
6363: PO_LOG.proc_begin(d_mod,'p_stopping_result_type',p_stopping_result_type);
6364: END IF;
6357: l_lines PO_LINES_VAL_TYPE;
6358: BEGIN
6359:
6360: IF PO_LOG.d_proc THEN
6361: PO_LOG.proc_begin(d_mod,'p_line_id_tbl',p_line_id_tbl);
6362: PO_LOG.proc_begin(d_mod,'p_amount_changed_flag_tbl',p_amount_changed_flag_tbl);--
6363: PO_LOG.proc_begin(d_mod,'p_stopping_result_type',p_stopping_result_type);
6364: END IF;
6365:
6358: BEGIN
6359:
6360: IF PO_LOG.d_proc THEN
6361: PO_LOG.proc_begin(d_mod,'p_line_id_tbl',p_line_id_tbl);
6362: PO_LOG.proc_begin(d_mod,'p_amount_changed_flag_tbl',p_amount_changed_flag_tbl);--
6364: END IF;
6365:
6366: l_lines := PO_LINES_VAL_TYPE();
6359:
6360: IF PO_LOG.d_proc THEN
6361: PO_LOG.proc_begin(d_mod,'p_line_id_tbl',p_line_id_tbl);
6362: PO_LOG.proc_begin(d_mod,'p_amount_changed_flag_tbl',p_amount_changed_flag_tbl);--
6363: PO_LOG.proc_begin(d_mod,'p_stopping_result_type',p_stopping_result_type);
6364: END IF;
6365:
6366: l_lines := PO_LINES_VAL_TYPE();
6367: l_lines.po_line_id := p_line_id_tbl;
6377: , x_result_set_id => x_result_set_id
6378: , x_results => x_results
6379: );
6380:
6381: IF PO_LOG.d_proc THEN
6382: PO_LOG.stmt(d_mod,0,'x_result_set_id',x_result_set_id);
6383: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6384: END IF;
6385:
6378: , x_results => x_results
6379: );
6380:
6381: IF PO_LOG.d_proc THEN
6382: PO_LOG.stmt(d_mod,0,'x_result_set_id',x_result_set_id);
6383: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6384: END IF;
6385:
6386: EXCEPTION
6379: );
6380:
6381: IF PO_LOG.d_proc THEN
6382: PO_LOG.stmt(d_mod,0,'x_result_set_id',x_result_set_id);
6383: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6384: END IF;
6385:
6386: EXCEPTION
6387: WHEN OTHERS THEN
6384: END IF;
6385:
6386: EXCEPTION
6387: WHEN OTHERS THEN
6388: IF PO_LOG.d_exc THEN
6389: PO_LOG.exc(d_mod,0,NULL);
6390: END IF;
6391: RAISE;
6392:
6385:
6386: EXCEPTION
6387: WHEN OTHERS THEN
6388: IF PO_LOG.d_exc THEN
6389: PO_LOG.exc(d_mod,0,NULL);
6390: END IF;
6391: RAISE;
6392:
6393: END validate_unit_price_change;
6437: d_position NUMBER := 0;
6438: l_validation_set PO_TBL_VARCHAR2000;
6439: BEGIN
6440:
6441: IF PO_LOG.d_proc THEN
6442: PO_LOG.proc_begin(d_mod);
6443: END IF;
6444:
6445: d_position := 1;
6438: l_validation_set PO_TBL_VARCHAR2000;
6439: BEGIN
6440:
6441: IF PO_LOG.d_proc THEN
6442: PO_LOG.proc_begin(d_mod);
6443: END IF;
6444:
6445: d_position := 1;
6446:
6490: l_validation_set MULTISET UNION DISTINCT c_html_order_line_ucas_vs;
6491: END IF;
6492: --UCA Project - CLMR4 Changes End
6493:
6494: IF PO_LOG.d_stmt THEN
6495: PO_LOG.stmt(d_mod,d_position,'l_validation_set',l_validation_set);
6496: END IF;
6497:
6498: d_position := 100;
6491: END IF;
6492: --UCA Project - CLMR4 Changes End
6493:
6494: IF PO_LOG.d_stmt THEN
6495: PO_LOG.stmt(d_mod,d_position,'l_validation_set',l_validation_set);
6496: END IF;
6497:
6498: d_position := 100;
6499:
6510: , x_result_type => x_result_type
6511: , x_results => x_results
6512: );
6513:
6514: IF PO_LOG.d_proc THEN
6515: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6516: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
6517: END IF;
6518:
6511: , x_results => x_results
6512: );
6513:
6514: IF PO_LOG.d_proc THEN
6515: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6516: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
6517: END IF;
6518:
6519: EXCEPTION
6512: );
6513:
6514: IF PO_LOG.d_proc THEN
6515: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6516: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
6517: END IF;
6518:
6519: EXCEPTION
6520: WHEN OTHERS THEN
6517: END IF;
6518:
6519: EXCEPTION
6520: WHEN OTHERS THEN
6521: IF PO_LOG.d_exc THEN
6522: PO_LOG.exc(d_mod,d_position,NULL);
6523: END IF;
6524: RAISE;
6525:
6518:
6519: EXCEPTION
6520: WHEN OTHERS THEN
6521: IF PO_LOG.d_exc THEN
6522: PO_LOG.exc(d_mod,d_position,NULL);
6523: END IF;
6524: RAISE;
6525:
6526: END validate_html_order;
6543: d_position NUMBER := 0;
6544: l_validation_set PO_TBL_VARCHAR2000;
6545: BEGIN
6546:
6547: IF PO_LOG.d_proc THEN
6548: PO_LOG.proc_begin(d_mod);
6549: END IF;
6550:
6551: d_position := 1;
6544: l_validation_set PO_TBL_VARCHAR2000;
6545: BEGIN
6546:
6547: IF PO_LOG.d_proc THEN
6548: PO_LOG.proc_begin(d_mod);
6549: END IF;
6550:
6551: d_position := 1;
6552:
6601: l_validation_set MULTISET UNION DISTINCT c_html_price_adjustments_vs;
6602: END IF;
6603: --Enhanced Pricing End:
6604:
6605: IF PO_LOG.d_stmt THEN
6606: PO_LOG.stmt(d_mod,d_position,'l_validation_set',l_validation_set);
6607: END IF;
6608:
6609: d_position := 100;
6602: END IF;
6603: --Enhanced Pricing End:
6604:
6605: IF PO_LOG.d_stmt THEN
6606: PO_LOG.stmt(d_mod,d_position,'l_validation_set',l_validation_set);
6607: END IF;
6608:
6609: d_position := 100;
6610:
6622: , x_result_type => x_result_type
6623: , x_results => x_results
6624: );
6625:
6626: IF PO_LOG.d_proc THEN
6627: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6628: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
6629: END IF;
6630:
6623: , x_results => x_results
6624: );
6625:
6626: IF PO_LOG.d_proc THEN
6627: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6628: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
6629: END IF;
6630:
6631: EXCEPTION
6624: );
6625:
6626: IF PO_LOG.d_proc THEN
6627: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6628: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
6629: END IF;
6630:
6631: EXCEPTION
6632: WHEN OTHERS THEN
6629: END IF;
6630:
6631: EXCEPTION
6632: WHEN OTHERS THEN
6633: IF PO_LOG.d_exc THEN
6634: PO_LOG.exc(d_mod,d_position,NULL);
6635: END IF;
6636: RAISE;
6637:
6630:
6631: EXCEPTION
6632: WHEN OTHERS THEN
6633: IF PO_LOG.d_exc THEN
6634: PO_LOG.exc(d_mod,d_position,NULL);
6635: END IF;
6636: RAISE;
6637:
6638: END validate_html_agreement;
6684: l_validation_set PO_TBL_VARCHAR2000;
6685:
6686: BEGIN
6687:
6688: IF PO_LOG.d_proc THEN
6689: po_log.proc_begin(d_mod, 'p_doc_type', p_doc_type);
6690: po_log.proc_begin(d_mod, 'p_action', p_action);
6691: END IF;
6692:
6685:
6686: BEGIN
6687:
6688: IF PO_LOG.d_proc THEN
6689: po_log.proc_begin(d_mod, 'p_doc_type', p_doc_type);
6690: po_log.proc_begin(d_mod, 'p_action', p_action);
6691: END IF;
6692:
6693: d_position := 1;
6686: BEGIN
6687:
6688: IF PO_LOG.d_proc THEN
6689: po_log.proc_begin(d_mod, 'p_doc_type', p_doc_type);
6690: po_log.proc_begin(d_mod, 'p_action', p_action);
6691: END IF;
6692:
6693: d_position := 1;
6694:
6710: WHEN c_doc_type_quotation THEN
6711: l_validation_set :=
6712: l_validation_set MULTISET UNION DISTINCT c_pdoi_header_quotation_vs;
6713: ELSE
6714: IF PO_LOG.d_exc THEN
6715: PO_LOG.exc(d_mod,d_position,'Invalid doc_type in validation_pdoi: '||p_doc_type);
6716: END IF;
6717: END CASE;
6718: IF Nvl(PO_PDOI_PARAMS.g_request.clm_flag,'N') ='Y'
6711: l_validation_set :=
6712: l_validation_set MULTISET UNION DISTINCT c_pdoi_header_quotation_vs;
6713: ELSE
6714: IF PO_LOG.d_exc THEN
6715: PO_LOG.exc(d_mod,d_position,'Invalid doc_type in validation_pdoi: '||p_doc_type);
6716: END IF;
6717: END CASE;
6718: IF Nvl(PO_PDOI_PARAMS.g_request.clm_flag,'N') ='Y'
6719: THEN
6737: WHEN c_doc_type_quotation THEN
6738: l_validation_set :=
6739: l_validation_set MULTISET UNION DISTINCT c_pdoi_line_quotation_vs;
6740: ELSE
6741: IF PO_LOG.d_exc THEN
6742: PO_LOG.exc(d_mod,d_position,'Invalid doc_type in validation_pdoi: '||p_doc_type);
6743: END IF;
6744: END CASE;
6745: IF Nvl(PO_PDOI_PARAMS.g_request.clm_flag,'N') ='Y'
6738: l_validation_set :=
6739: l_validation_set MULTISET UNION DISTINCT c_pdoi_line_quotation_vs;
6740: ELSE
6741: IF PO_LOG.d_exc THEN
6742: PO_LOG.exc(d_mod,d_position,'Invalid doc_type in validation_pdoi: '||p_doc_type);
6743: END IF;
6744: END CASE;
6745: IF Nvl(PO_PDOI_PARAMS.g_request.clm_flag,'N') ='Y'
6746: THEN
6759: WHEN c_doc_type_blanket THEN
6760: l_validation_set :=
6761: l_validation_set MULTISET UNION DISTINCT c_pdoi_line_blanket_update_vs;
6762: ELSE
6763: IF PO_LOG.d_exc THEN
6764: PO_LOG.exc(d_mod,d_position,'Invalid doc_type in validation_pdoi: '||p_doc_type);
6765: END IF;
6766: END CASE;
6767:
6760: l_validation_set :=
6761: l_validation_set MULTISET UNION DISTINCT c_pdoi_line_blanket_update_vs;
6762: ELSE
6763: IF PO_LOG.d_exc THEN
6764: PO_LOG.exc(d_mod,d_position,'Invalid doc_type in validation_pdoi: '||p_doc_type);
6765: END IF;
6766: END CASE;
6767:
6768: ELSIF (p_line_locations IS NOT NULL AND p_headers IS NULL AND p_lines IS NULL AND
6782: WHEN c_doc_type_quotation THEN
6783: l_validation_set :=
6784: l_validation_set MULTISET UNION DISTINCT c_pdoi_line_loc_quotation_vs;
6785: ELSE
6786: IF PO_LOG.d_exc THEN
6787: PO_LOG.exc(d_mod,d_position,'Invalid doc_type in validation_pdoi: '||p_doc_type);
6788: END IF;
6789: END CASE;
6790:
6783: l_validation_set :=
6784: l_validation_set MULTISET UNION DISTINCT c_pdoi_line_loc_quotation_vs;
6785: ELSE
6786: IF PO_LOG.d_exc THEN
6787: PO_LOG.exc(d_mod,d_position,'Invalid doc_type in validation_pdoi: '||p_doc_type);
6788: END IF;
6789: END CASE;
6790:
6791: ELSIF (p_distributions IS NOT NULL AND p_headers IS NULL AND p_lines IS NULL AND
6808: l_validation_set MULTISET UNION DISTINCT c_pdoi_price_diff_common_vs;
6809:
6810: ELSE
6811:
6812: IF PO_LOG.d_exc THEN
6813: PO_LOG.exc(d_mod,d_position,'Call to validate_pdoi was incorrectly called.');
6814: END IF;
6815:
6816: END IF;
6809:
6810: ELSE
6811:
6812: IF PO_LOG.d_exc THEN
6813: PO_LOG.exc(d_mod,d_position,'Call to validate_pdoi was incorrectly called.');
6814: END IF;
6815:
6816: END IF;
6817:
6814: END IF;
6815:
6816: END IF;
6817:
6818: IF PO_LOG.d_stmt THEN
6819: PO_LOG.stmt(d_mod,d_position,'l_validation_set',l_validation_set);
6820: END IF;
6821:
6822: d_position := 100;
6815:
6816: END IF;
6817:
6818: IF PO_LOG.d_stmt THEN
6819: PO_LOG.stmt(d_mod,d_position,'l_validation_set',l_validation_set);
6820: END IF;
6821:
6822: d_position := 100;
6823:
6833: x_result_type => x_result_type,
6834: x_results => x_results
6835: );
6836:
6837: IF PO_LOG.d_proc THEN
6838: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6839: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
6840: END IF;
6841:
6834: x_results => x_results
6835: );
6836:
6837: IF PO_LOG.d_proc THEN
6838: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6839: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
6840: END IF;
6841:
6842: EXCEPTION
6835: );
6836:
6837: IF PO_LOG.d_proc THEN
6838: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6839: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
6840: END IF;
6841:
6842: EXCEPTION
6843: WHEN OTHERS THEN
6840: END IF;
6841:
6842: EXCEPTION
6843: WHEN OTHERS THEN
6844: IF PO_LOG.d_exc THEN
6845: PO_LOG.exc(d_mod,d_position,NULL);
6846: END IF;
6847: RAISE;
6848:
6841:
6842: EXCEPTION
6843: WHEN OTHERS THEN
6844: IF PO_LOG.d_exc THEN
6845: PO_LOG.exc(d_mod,d_position,NULL);
6846: END IF;
6847: RAISE;
6848:
6849: END validate_pdoi;
6890: d_position NUMBER := 0;
6891: l_validation_set PO_TBL_VARCHAR2000;
6892: BEGIN
6893:
6894: IF PO_LOG.d_proc THEN
6895: PO_LOG.proc_begin(d_mod);
6896: END IF;
6897:
6898: d_position := 1;
6891: l_validation_set PO_TBL_VARCHAR2000;
6892: BEGIN
6893:
6894: IF PO_LOG.d_proc THEN
6895: PO_LOG.proc_begin(d_mod);
6896: END IF;
6897:
6898: d_position := 1;
6899:
6910: l_validation_set :=
6911: l_validation_set MULTISET UNION DISTINCT c_mod_sync_distribution_vs;
6912: END IF;
6913:
6914: IF PO_LOG.d_stmt THEN
6915: PO_LOG.stmt(d_mod,d_position,'l_validation_set',l_validation_set);
6916: END IF;
6917:
6918: d_position := 100;
6911: l_validation_set MULTISET UNION DISTINCT c_mod_sync_distribution_vs;
6912: END IF;
6913:
6914: IF PO_LOG.d_stmt THEN
6915: PO_LOG.stmt(d_mod,d_position,'l_validation_set',l_validation_set);
6916: END IF;
6917:
6918: d_position := 100;
6919:
6929: , x_result_type => x_result_type
6930: , x_results => x_results
6931: );
6932:
6933: IF PO_LOG.d_proc THEN
6934: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6935: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
6936: END IF;
6937:
6930: , x_results => x_results
6931: );
6932:
6933: IF PO_LOG.d_proc THEN
6934: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6935: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
6936: END IF;
6937:
6938: EXCEPTION
6931: );
6932:
6933: IF PO_LOG.d_proc THEN
6934: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
6935: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
6936: END IF;
6937:
6938: EXCEPTION
6939: WHEN OTHERS THEN
6936: END IF;
6937:
6938: EXCEPTION
6939: WHEN OTHERS THEN
6940: IF PO_LOG.d_exc THEN
6941: PO_LOG.exc(d_mod,d_position,NULL);
6942: END IF;
6943: RAISE;
6944:
6937:
6938: EXCEPTION
6939: WHEN OTHERS THEN
6940: IF PO_LOG.d_exc THEN
6941: PO_LOG.exc(d_mod,d_position,NULL);
6942: END IF;
6943: RAISE;
6944:
6945: END validate_modification_sync;
6954: )
6955: IS
6956: l_rowid_tbl PO_TBL_VARCHAR2000;
6957: BEGIN
6958: IF PO_LOG.d_stmt THEN
6959: SELECT VR.rowid
6960: BULK COLLECT INTO l_rowid_tbl
6961: FROM PO_VALIDATION_RESULTS_GT VR
6962: WHERE VR.result_set_id = p_result_set_id
6960: BULK COLLECT INTO l_rowid_tbl
6961: FROM PO_VALIDATION_RESULTS_GT VR
6962: WHERE VR.result_set_id = p_result_set_id
6963: ;
6964: PO_LOG.stmt_table(p_module_base,p_position,'PO_VALIDATION_RESULTS_GT',l_rowid_tbl);
6965: END IF;
6966: END log_validation_results_gt;
6967:
6968: --
7005: BEGIN
7006:
7007: d_position := 100;
7008:
7009: IF PO_LOG.d_proc THEN
7010: po_log.proc_begin(d_mod, 'p_po_header_id', p_po_header_id);
7011: END IF;
7012:
7013: SELECT 'N','PO_INVALID_ENC_AMT' INTO x_return_status,x_return_message from dual
7006:
7007: d_position := 100;
7008:
7009: IF PO_LOG.d_proc THEN
7010: po_log.proc_begin(d_mod, 'p_po_header_id', p_po_header_id);
7011: END IF;
7012:
7013: SELECT 'N','PO_INVALID_ENC_AMT' INTO x_return_status,x_return_message from dual
7014: WHERE EXISTS
7026: AND pod.prevent_encumbrance_flag ='N'
7027: AND pod.distribution_type = 'STANDARD'
7028: AND pod.po_header_id= p_po_header_id);
7029:
7030: IF PO_LOG.d_stmt THEN
7031: PO_LOG.proc_end(d_mod,'x_return_status',x_return_status);
7032: END IF;
7033:
7034: EXCEPTION
7027: AND pod.distribution_type = 'STANDARD'
7028: AND pod.po_header_id= p_po_header_id);
7029:
7030: IF PO_LOG.d_stmt THEN
7031: PO_LOG.proc_end(d_mod,'x_return_status',x_return_status);
7032: END IF;
7033:
7034: EXCEPTION
7035:
7036: WHEN No_Data_Found THEN
7037:
7038: x_return_status := 'Y';
7039: x_return_message := 'PO_VALID_ENC_AMT';
7040: IF PO_LOG.d_exc THEN
7041: PO_LOG.exc(d_mod,d_position,NULL);
7042: END IF;
7043: END check_encumbered_amount;
7044:
7037:
7038: x_return_status := 'Y';
7039: x_return_message := 'PO_VALID_ENC_AMT';
7040: IF PO_LOG.d_exc THEN
7041: PO_LOG.exc(d_mod,d_position,NULL);
7042: END IF;
7043: END check_encumbered_amount;
7044:
7045: