1: PACKAGE BODY po_val_distributions2 AS
2: -- $Header: PO_VAL_DISTRIBUTIONS2.plb 120.20.12020000.2 2013/02/10 14:17:09 vegajula ship $
3: c_entity_type_distribution CONSTANT VARCHAR2(30) := PO_VALIDATIONS.c_entity_type_DISTRIBUTION;
4: -- The module base for this package.
5: d_package_base CONSTANT VARCHAR2(50) := po_log.get_package_base('PO_VAL_DISTRIBUTIONS2');
6:
7: -- The module base for the subprogram.
8: d_amount_ordered CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'AMOUNT_ORDERED');
9: d_quantity_ordered CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'QUANTITY_ORDERED');
4: -- The module base for this package.
5: d_package_base CONSTANT VARCHAR2(50) := po_log.get_package_base('PO_VAL_DISTRIBUTIONS2');
6:
7: -- The module base for the subprogram.
8: d_amount_ordered CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'AMOUNT_ORDERED');
9: d_quantity_ordered CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'QUANTITY_ORDERED');
10: d_destination_org_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_ORG_ID');
11: d_deliver_to_location_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DELIVER_TO_LOCATION_ID');
12: d_deliver_to_person_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DELIVER_TO_PERSON_ID');
5: d_package_base CONSTANT VARCHAR2(50) := po_log.get_package_base('PO_VAL_DISTRIBUTIONS2');
6:
7: -- The module base for the subprogram.
8: d_amount_ordered CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'AMOUNT_ORDERED');
9: d_quantity_ordered CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'QUANTITY_ORDERED');
10: d_destination_org_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_ORG_ID');
11: d_deliver_to_location_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DELIVER_TO_LOCATION_ID');
12: d_deliver_to_person_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DELIVER_TO_PERSON_ID');
13: d_destination_type_code CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_TYPE_CODE');
6:
7: -- The module base for the subprogram.
8: d_amount_ordered CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'AMOUNT_ORDERED');
9: d_quantity_ordered CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'QUANTITY_ORDERED');
10: d_destination_org_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_ORG_ID');
11: d_deliver_to_location_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DELIVER_TO_LOCATION_ID');
12: d_deliver_to_person_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DELIVER_TO_PERSON_ID');
13: d_destination_type_code CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_TYPE_CODE');
14: d_destination_subinv CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_SUBINV');
7: -- The module base for the subprogram.
8: d_amount_ordered CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'AMOUNT_ORDERED');
9: d_quantity_ordered CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'QUANTITY_ORDERED');
10: d_destination_org_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_ORG_ID');
11: d_deliver_to_location_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DELIVER_TO_LOCATION_ID');
12: d_deliver_to_person_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DELIVER_TO_PERSON_ID');
13: d_destination_type_code CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_TYPE_CODE');
14: d_destination_subinv CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_SUBINV');
15: d_wip_entity_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'WIP_ENTITY_ID');
8: d_amount_ordered CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'AMOUNT_ORDERED');
9: d_quantity_ordered CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'QUANTITY_ORDERED');
10: d_destination_org_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_ORG_ID');
11: d_deliver_to_location_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DELIVER_TO_LOCATION_ID');
12: d_deliver_to_person_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DELIVER_TO_PERSON_ID');
13: d_destination_type_code CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_TYPE_CODE');
14: d_destination_subinv CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_SUBINV');
15: d_wip_entity_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'WIP_ENTITY_ID');
16: d_prevent_encumberance_flag CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PREVENT_ENCUMBERANCE_FLAG');
9: d_quantity_ordered CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'QUANTITY_ORDERED');
10: d_destination_org_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_ORG_ID');
11: d_deliver_to_location_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DELIVER_TO_LOCATION_ID');
12: d_deliver_to_person_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DELIVER_TO_PERSON_ID');
13: d_destination_type_code CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_TYPE_CODE');
14: d_destination_subinv CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_SUBINV');
15: d_wip_entity_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'WIP_ENTITY_ID');
16: d_prevent_encumberance_flag CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PREVENT_ENCUMBERANCE_FLAG');
17: d_charge_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'CHARGE_ACCOUNT_ID');
10: d_destination_org_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_ORG_ID');
11: d_deliver_to_location_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DELIVER_TO_LOCATION_ID');
12: d_deliver_to_person_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DELIVER_TO_PERSON_ID');
13: d_destination_type_code CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_TYPE_CODE');
14: d_destination_subinv CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_SUBINV');
15: d_wip_entity_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'WIP_ENTITY_ID');
16: d_prevent_encumberance_flag CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PREVENT_ENCUMBERANCE_FLAG');
17: d_charge_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'CHARGE_ACCOUNT_ID');
18: d_budget_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'BUDGET_ACCOUNT_ID');
11: d_deliver_to_location_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DELIVER_TO_LOCATION_ID');
12: d_deliver_to_person_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DELIVER_TO_PERSON_ID');
13: d_destination_type_code CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_TYPE_CODE');
14: d_destination_subinv CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_SUBINV');
15: d_wip_entity_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'WIP_ENTITY_ID');
16: d_prevent_encumberance_flag CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PREVENT_ENCUMBERANCE_FLAG');
17: d_charge_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'CHARGE_ACCOUNT_ID');
18: d_budget_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'BUDGET_ACCOUNT_ID');
19: d_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'ACCOUNT_ID');
12: d_deliver_to_person_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DELIVER_TO_PERSON_ID');
13: d_destination_type_code CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_TYPE_CODE');
14: d_destination_subinv CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_SUBINV');
15: d_wip_entity_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'WIP_ENTITY_ID');
16: d_prevent_encumberance_flag CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PREVENT_ENCUMBERANCE_FLAG');
17: d_charge_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'CHARGE_ACCOUNT_ID');
18: d_budget_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'BUDGET_ACCOUNT_ID');
19: d_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'ACCOUNT_ID');
20: d_project_acct_context CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PROJECT_ACCT_CONTEXT');
13: d_destination_type_code CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_TYPE_CODE');
14: d_destination_subinv CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_SUBINV');
15: d_wip_entity_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'WIP_ENTITY_ID');
16: d_prevent_encumberance_flag CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PREVENT_ENCUMBERANCE_FLAG');
17: d_charge_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'CHARGE_ACCOUNT_ID');
18: d_budget_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'BUDGET_ACCOUNT_ID');
19: d_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'ACCOUNT_ID');
20: d_project_acct_context CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PROJECT_ACCT_CONTEXT');
21: d_project_info CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PROJECT_INFO');
14: d_destination_subinv CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'DESTINATION_SUBINV');
15: d_wip_entity_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'WIP_ENTITY_ID');
16: d_prevent_encumberance_flag CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PREVENT_ENCUMBERANCE_FLAG');
17: d_charge_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'CHARGE_ACCOUNT_ID');
18: d_budget_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'BUDGET_ACCOUNT_ID');
19: d_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'ACCOUNT_ID');
20: d_project_acct_context CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PROJECT_ACCT_CONTEXT');
21: d_project_info CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PROJECT_INFO');
22: d_tax_recovery_override_flag CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'TAX_RECOVERY_OVERRIDE_FLAG');
15: d_wip_entity_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'WIP_ENTITY_ID');
16: d_prevent_encumberance_flag CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PREVENT_ENCUMBERANCE_FLAG');
17: d_charge_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'CHARGE_ACCOUNT_ID');
18: d_budget_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'BUDGET_ACCOUNT_ID');
19: d_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'ACCOUNT_ID');
20: d_project_acct_context CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PROJECT_ACCT_CONTEXT');
21: d_project_info CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PROJECT_INFO');
22: d_tax_recovery_override_flag CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'TAX_RECOVERY_OVERRIDE_FLAG');
23: -- ACRN proj
16: d_prevent_encumberance_flag CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PREVENT_ENCUMBERANCE_FLAG');
17: d_charge_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'CHARGE_ACCOUNT_ID');
18: d_budget_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'BUDGET_ACCOUNT_ID');
19: d_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'ACCOUNT_ID');
20: d_project_acct_context CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PROJECT_ACCT_CONTEXT');
21: d_project_info CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PROJECT_INFO');
22: d_tax_recovery_override_flag CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'TAX_RECOVERY_OVERRIDE_FLAG');
23: -- ACRN proj
24: d_ACRN_value_valid CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'ACRN_VALUE_VALID');
17: d_charge_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'CHARGE_ACCOUNT_ID');
18: d_budget_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'BUDGET_ACCOUNT_ID');
19: d_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'ACCOUNT_ID');
20: d_project_acct_context CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PROJECT_ACCT_CONTEXT');
21: d_project_info CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PROJECT_INFO');
22: d_tax_recovery_override_flag CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'TAX_RECOVERY_OVERRIDE_FLAG');
23: -- ACRN proj
24: d_ACRN_value_valid CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'ACRN_VALUE_VALID');
25: -- CLM Partial Funding Changes
18: d_budget_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'BUDGET_ACCOUNT_ID');
19: d_account_id CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'ACCOUNT_ID');
20: d_project_acct_context CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PROJECT_ACCT_CONTEXT');
21: d_project_info CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PROJECT_INFO');
22: d_tax_recovery_override_flag CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'TAX_RECOVERY_OVERRIDE_FLAG');
23: -- ACRN proj
24: d_ACRN_value_valid CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'ACRN_VALUE_VALID');
25: -- CLM Partial Funding Changes
26: d_partial_funded_flag CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PARTIAL_FUNDED_FLAG');
20: d_project_acct_context CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PROJECT_ACCT_CONTEXT');
21: d_project_info CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PROJECT_INFO');
22: d_tax_recovery_override_flag CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'TAX_RECOVERY_OVERRIDE_FLAG');
23: -- ACRN proj
24: d_ACRN_value_valid CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'ACRN_VALUE_VALID');
25: -- CLM Partial Funding Changes
26: d_partial_funded_flag CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PARTIAL_FUNDED_FLAG');
27: -- Indicates that the calling program is PDOI.
28: c_program_pdoi CONSTANT VARCHAR2(10) := 'PDOI';
22: d_tax_recovery_override_flag CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'TAX_RECOVERY_OVERRIDE_FLAG');
23: -- ACRN proj
24: d_ACRN_value_valid CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'ACRN_VALUE_VALID');
25: -- CLM Partial Funding Changes
26: d_partial_funded_flag CONSTANT VARCHAR2(100) := po_log.get_subprogram_base(d_package_base, 'PARTIAL_FUNDED_FLAG');
27: -- Indicates that the calling program is PDOI.
28: c_program_pdoi CONSTANT VARCHAR2(10) := 'PDOI';
29: -- The application name of PO.
30: c_po CONSTANT VARCHAR2(2) := 'PO';
51: END IF;
52:
53: x_result_type := po_validations.c_result_type_success;
54:
55: IF po_log.d_proc THEN
56: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
57: po_log.proc_begin(d_mod, 'p_amount_ordered_tbl', p_amount_ordered_tbl);
58: po_log.proc_begin(d_mod, 'p_order_type_code_tbl', p_order_type_code_tbl);
59: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
52:
53: x_result_type := po_validations.c_result_type_success;
54:
55: IF po_log.d_proc THEN
56: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
57: po_log.proc_begin(d_mod, 'p_amount_ordered_tbl', p_amount_ordered_tbl);
58: po_log.proc_begin(d_mod, 'p_order_type_code_tbl', p_order_type_code_tbl);
59: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
60: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
53: x_result_type := po_validations.c_result_type_success;
54:
55: IF po_log.d_proc THEN
56: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
57: po_log.proc_begin(d_mod, 'p_amount_ordered_tbl', p_amount_ordered_tbl);
58: po_log.proc_begin(d_mod, 'p_order_type_code_tbl', p_order_type_code_tbl);
59: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
60: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
61: END IF;
54:
55: IF po_log.d_proc THEN
56: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
57: po_log.proc_begin(d_mod, 'p_amount_ordered_tbl', p_amount_ordered_tbl);
58: po_log.proc_begin(d_mod, 'p_order_type_code_tbl', p_order_type_code_tbl);
59: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
60: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
61: END IF;
62:
55: IF po_log.d_proc THEN
56: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
57: po_log.proc_begin(d_mod, 'p_amount_ordered_tbl', p_amount_ordered_tbl);
58: po_log.proc_begin(d_mod, 'p_order_type_code_tbl', p_order_type_code_tbl);
59: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
60: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
61: END IF;
62:
63: FOR i IN 1 .. p_id_tbl.COUNT LOOP
56: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
57: po_log.proc_begin(d_mod, 'p_amount_ordered_tbl', p_amount_ordered_tbl);
58: po_log.proc_begin(d_mod, 'p_order_type_code_tbl', p_order_type_code_tbl);
59: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
60: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
61: END IF;
62:
63: FOR i IN 1 .. p_id_tbl.COUNT LOOP
64: IF Nvl(p_distribution_type_tbl(i),'STANDARD') <> 'PREPAYMENT' THEN -- PDOI for Complex PO Project
83: END IF;
84: END IF;
85: END LOOP;
86:
87: IF po_log.d_proc THEN
88: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
89: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
90: END IF;
91: EXCEPTION
84: END IF;
85: END LOOP;
86:
87: IF po_log.d_proc THEN
88: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
89: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
90: END IF;
91: EXCEPTION
92: WHEN OTHERS THEN
85: END LOOP;
86:
87: IF po_log.d_proc THEN
88: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
89: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
90: END IF;
91: EXCEPTION
92: WHEN OTHERS THEN
93: IF po_log.d_exc THEN
89: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
90: END IF;
91: EXCEPTION
92: WHEN OTHERS THEN
93: IF po_log.d_exc THEN
94: po_log.exc(d_mod, 0, NULL);
95: END IF;
96:
97: RAISE;
90: END IF;
91: EXCEPTION
92: WHEN OTHERS THEN
93: IF po_log.d_exc THEN
94: po_log.exc(d_mod, 0, NULL);
95: END IF;
96:
97: RAISE;
98: END amount_ordered;
119: END IF;
120:
121: x_result_type := po_validations.c_result_type_success;
122:
123: IF po_log.d_proc THEN
124: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
125: po_log.proc_begin(d_mod, 'p_quantity_ordered_tbl', p_quantity_ordered_tbl);
126: po_log.proc_begin(d_mod, 'p_order_type_code_tbl', p_order_type_code_tbl);
127: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
120:
121: x_result_type := po_validations.c_result_type_success;
122:
123: IF po_log.d_proc THEN
124: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
125: po_log.proc_begin(d_mod, 'p_quantity_ordered_tbl', p_quantity_ordered_tbl);
126: po_log.proc_begin(d_mod, 'p_order_type_code_tbl', p_order_type_code_tbl);
127: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
128: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
121: x_result_type := po_validations.c_result_type_success;
122:
123: IF po_log.d_proc THEN
124: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
125: po_log.proc_begin(d_mod, 'p_quantity_ordered_tbl', p_quantity_ordered_tbl);
126: po_log.proc_begin(d_mod, 'p_order_type_code_tbl', p_order_type_code_tbl);
127: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
128: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
129: END IF;
122:
123: IF po_log.d_proc THEN
124: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
125: po_log.proc_begin(d_mod, 'p_quantity_ordered_tbl', p_quantity_ordered_tbl);
126: po_log.proc_begin(d_mod, 'p_order_type_code_tbl', p_order_type_code_tbl);
127: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
128: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
129: END IF;
130:
123: IF po_log.d_proc THEN
124: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
125: po_log.proc_begin(d_mod, 'p_quantity_ordered_tbl', p_quantity_ordered_tbl);
126: po_log.proc_begin(d_mod, 'p_order_type_code_tbl', p_order_type_code_tbl);
127: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
128: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
129: END IF;
130:
131: FOR i IN 1 .. p_id_tbl.COUNT LOOP
124: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
125: po_log.proc_begin(d_mod, 'p_quantity_ordered_tbl', p_quantity_ordered_tbl);
126: po_log.proc_begin(d_mod, 'p_order_type_code_tbl', p_order_type_code_tbl);
127: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
128: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
129: END IF;
130:
131: FOR i IN 1 .. p_id_tbl.COUNT LOOP
132: IF Nvl(p_distribution_type_tbl(i),'STANDARD') <> 'PREPAYMENT' THEN -- PDOI for Complex PO Project
151: END IF;
152: END IF;
153: END LOOP;
154:
155: IF po_log.d_proc THEN
156: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
157: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
158: END IF;
159: EXCEPTION
152: END IF;
153: END LOOP;
154:
155: IF po_log.d_proc THEN
156: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
157: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
158: END IF;
159: EXCEPTION
160: WHEN OTHERS THEN
153: END LOOP;
154:
155: IF po_log.d_proc THEN
156: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
157: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
158: END IF;
159: EXCEPTION
160: WHEN OTHERS THEN
161: IF po_log.d_exc THEN
157: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
158: END IF;
159: EXCEPTION
160: WHEN OTHERS THEN
161: IF po_log.d_exc THEN
162: po_log.exc(d_mod, 0, NULL);
163: END IF;
164:
165: RAISE;
158: END IF;
159: EXCEPTION
160: WHEN OTHERS THEN
161: IF po_log.d_exc THEN
162: po_log.exc(d_mod, 0, NULL);
163: END IF;
164:
165: RAISE;
166: END quantity_ordered;
183: END IF;
184:
185: x_result_type := po_validations.c_result_type_success;
186:
187: IF po_log.d_proc THEN
188: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
189: po_log.proc_begin(d_mod, 'p_dest_org_id_tbl', p_dest_org_id_tbl);
190: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
191: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
184:
185: x_result_type := po_validations.c_result_type_success;
186:
187: IF po_log.d_proc THEN
188: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
189: po_log.proc_begin(d_mod, 'p_dest_org_id_tbl', p_dest_org_id_tbl);
190: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
191: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
192: END IF;
185: x_result_type := po_validations.c_result_type_success;
186:
187: IF po_log.d_proc THEN
188: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
189: po_log.proc_begin(d_mod, 'p_dest_org_id_tbl', p_dest_org_id_tbl);
190: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
191: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
192: END IF;
193:
186:
187: IF po_log.d_proc THEN
188: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
189: po_log.proc_begin(d_mod, 'p_dest_org_id_tbl', p_dest_org_id_tbl);
190: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
191: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
192: END IF;
193:
194: FOR i IN 1 .. p_id_tbl.COUNT LOOP
187: IF po_log.d_proc THEN
188: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
189: po_log.proc_begin(d_mod, 'p_dest_org_id_tbl', p_dest_org_id_tbl);
190: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
191: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
192: END IF;
193:
194: FOR i IN 1 .. p_id_tbl.COUNT LOOP
195: IF (NVL(p_dest_org_id_tbl(i), -11) <> NVL(p_ship_to_org_id_tbl(i), -99)) THEN
203: x_result_type := po_validations.c_result_type_failure;
204: END IF;
205: END LOOP;
206:
207: IF po_log.d_proc THEN
208: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
209: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
210: END IF;
211: EXCEPTION
204: END IF;
205: END LOOP;
206:
207: IF po_log.d_proc THEN
208: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
209: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
210: END IF;
211: EXCEPTION
212: WHEN OTHERS THEN
205: END LOOP;
206:
207: IF po_log.d_proc THEN
208: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
209: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
210: END IF;
211: EXCEPTION
212: WHEN OTHERS THEN
213: IF po_log.d_exc THEN
209: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
210: END IF;
211: EXCEPTION
212: WHEN OTHERS THEN
213: IF po_log.d_exc THEN
214: po_log.exc(d_mod, 0, NULL);
215: END IF;
216:
217: RAISE;
210: END IF;
211: EXCEPTION
212: WHEN OTHERS THEN
213: IF po_log.d_exc THEN
214: po_log.exc(d_mod, 0, NULL);
215: END IF;
216:
217: RAISE;
218: END destination_org_id;
236: END IF;
237:
238: x_result_type := po_validations.c_result_type_success;
239:
240: IF po_log.d_proc THEN
241: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
242: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
243: po_log.proc_begin(d_mod, 'p_deliver_to_location_id_tbl', p_deliver_to_location_id_tbl);
244: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
237:
238: x_result_type := po_validations.c_result_type_success;
239:
240: IF po_log.d_proc THEN
241: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
242: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
243: po_log.proc_begin(d_mod, 'p_deliver_to_location_id_tbl', p_deliver_to_location_id_tbl);
244: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
245: END IF;
238: x_result_type := po_validations.c_result_type_success;
239:
240: IF po_log.d_proc THEN
241: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
242: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
243: po_log.proc_begin(d_mod, 'p_deliver_to_location_id_tbl', p_deliver_to_location_id_tbl);
244: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
245: END IF;
246:
239:
240: IF po_log.d_proc THEN
241: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
242: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
243: po_log.proc_begin(d_mod, 'p_deliver_to_location_id_tbl', p_deliver_to_location_id_tbl);
244: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
245: END IF;
246:
247: FORALL i IN 1 .. p_id_tbl.COUNT
240: IF po_log.d_proc THEN
241: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
242: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
243: po_log.proc_begin(d_mod, 'p_deliver_to_location_id_tbl', p_deliver_to_location_id_tbl);
244: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
245: END IF;
246:
247: FORALL i IN 1 .. p_id_tbl.COUNT
248: INSERT INTO po_validation_results_gt
281: IF (SQL%ROWCOUNT > 0) THEN
282: x_result_type := po_validations.c_result_type_failure;
283: END IF;
284:
285: IF po_log.d_proc THEN
286: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
287: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
288: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
289: END IF;
283: END IF;
284:
285: IF po_log.d_proc THEN
286: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
287: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
288: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
289: END IF;
290: EXCEPTION
291: WHEN OTHERS THEN
284:
285: IF po_log.d_proc THEN
286: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
287: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
288: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
289: END IF;
290: EXCEPTION
291: WHEN OTHERS THEN
292: IF po_log.d_exc THEN
288: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
289: END IF;
290: EXCEPTION
291: WHEN OTHERS THEN
292: IF po_log.d_exc THEN
293: po_log.exc(d_mod, 0, NULL);
294: END IF;
295:
296: RAISE;
289: END IF;
290: EXCEPTION
291: WHEN OTHERS THEN
292: IF po_log.d_exc THEN
293: po_log.exc(d_mod, 0, NULL);
294: END IF;
295:
296: RAISE;
297: END deliver_to_location_id;
322: END IF;
323:
324: x_result_type := po_validations.c_result_type_success;
325:
326: IF po_log.d_proc THEN
327: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
328: po_log.proc_begin(d_mod, 'p_deliver_to_person_id_tbl', p_deliver_to_person_id_tbl);
329: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
330: END IF;
323:
324: x_result_type := po_validations.c_result_type_success;
325:
326: IF po_log.d_proc THEN
327: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
328: po_log.proc_begin(d_mod, 'p_deliver_to_person_id_tbl', p_deliver_to_person_id_tbl);
329: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
330: END IF;
331:
324: x_result_type := po_validations.c_result_type_success;
325:
326: IF po_log.d_proc THEN
327: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
328: po_log.proc_begin(d_mod, 'p_deliver_to_person_id_tbl', p_deliver_to_person_id_tbl);
329: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
330: END IF;
331:
332: d_position := 10;
325:
326: IF po_log.d_proc THEN
327: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
328: po_log.proc_begin(d_mod, 'p_deliver_to_person_id_tbl', p_deliver_to_person_id_tbl);
329: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
330: END IF;
331:
332: d_position := 10;
333:
349: ELSE
350: l_assignment_type := 'E';
351: END IF;
352:
353: IF (PO_LOG.d_stmt) THEN
354: PO_LOG.stmt(d_mod, d_position, 'l_fsp_business_group_id', l_fsp_business_group_id);
355: PO_LOG.stmt(d_mod, d_position, 'l_assignment_type', l_assignment_type);
356: END IF;
357:
350: l_assignment_type := 'E';
351: END IF;
352:
353: IF (PO_LOG.d_stmt) THEN
354: PO_LOG.stmt(d_mod, d_position, 'l_fsp_business_group_id', l_fsp_business_group_id);
355: PO_LOG.stmt(d_mod, d_position, 'l_assignment_type', l_assignment_type);
356: END IF;
357:
358: d_position := 20;
351: END IF;
352:
353: IF (PO_LOG.d_stmt) THEN
354: PO_LOG.stmt(d_mod, d_position, 'l_fsp_business_group_id', l_fsp_business_group_id);
355: PO_LOG.stmt(d_mod, d_position, 'l_assignment_type', l_assignment_type);
356: END IF;
357:
358: d_position := 20;
359:
399: IF (SQL%ROWCOUNT > 0) THEN
400: x_result_type := po_validations.c_result_type_failure;
401: END IF;
402:
403: IF po_log.d_proc THEN
404: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
405: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
406: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
407: END IF;
401: END IF;
402:
403: IF po_log.d_proc THEN
404: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
405: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
406: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
407: END IF;
408: EXCEPTION
409: WHEN OTHERS THEN
402:
403: IF po_log.d_proc THEN
404: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
405: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
406: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
407: END IF;
408: EXCEPTION
409: WHEN OTHERS THEN
410: IF po_log.d_exc THEN
406: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
407: END IF;
408: EXCEPTION
409: WHEN OTHERS THEN
410: IF po_log.d_exc THEN
411: po_log.exc(d_mod, 0, NULL);
412: END IF;
413:
414: RAISE;
407: END IF;
408: EXCEPTION
409: WHEN OTHERS THEN
410: IF po_log.d_exc THEN
411: po_log.exc(d_mod, 0, NULL);
412: END IF;
413:
414: RAISE;
415: END deliver_to_person_id;
479: x_result_type := po_validations.c_result_type_success;
480:
481: d_position := 10;
482:
483: IF po_log.d_proc THEN
484: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
485: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
486: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
487: po_log.proc_begin(d_mod, 'p_item_id_tbl', p_item_id_tbl);
480:
481: d_position := 10;
482:
483: IF po_log.d_proc THEN
484: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
485: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
486: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
487: po_log.proc_begin(d_mod, 'p_item_id_tbl', p_item_id_tbl);
488: po_log.proc_begin(d_mod, 'p_txn_flow_header_id_tbl', p_txn_flow_header_id_tbl);
481: d_position := 10;
482:
483: IF po_log.d_proc THEN
484: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
485: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
486: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
487: po_log.proc_begin(d_mod, 'p_item_id_tbl', p_item_id_tbl);
488: po_log.proc_begin(d_mod, 'p_txn_flow_header_id_tbl', p_txn_flow_header_id_tbl);
489: po_log.proc_begin(d_mod, 'p_accrue_on_receipt_flag_tbl', p_accrue_on_receipt_flag_tbl);
482:
483: IF po_log.d_proc THEN
484: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
485: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
486: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
487: po_log.proc_begin(d_mod, 'p_item_id_tbl', p_item_id_tbl);
488: po_log.proc_begin(d_mod, 'p_txn_flow_header_id_tbl', p_txn_flow_header_id_tbl);
489: po_log.proc_begin(d_mod, 'p_accrue_on_receipt_flag_tbl', p_accrue_on_receipt_flag_tbl);
490: po_log.proc_begin(d_mod, 'p_expense_accrual_code', p_expense_accrual_code);
483: IF po_log.d_proc THEN
484: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
485: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
486: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
487: po_log.proc_begin(d_mod, 'p_item_id_tbl', p_item_id_tbl);
488: po_log.proc_begin(d_mod, 'p_txn_flow_header_id_tbl', p_txn_flow_header_id_tbl);
489: po_log.proc_begin(d_mod, 'p_accrue_on_receipt_flag_tbl', p_accrue_on_receipt_flag_tbl);
490: po_log.proc_begin(d_mod, 'p_expense_accrual_code', p_expense_accrual_code);
491: po_log.proc_begin(d_mod, 'p_loc_outsourced_assembly_tbl', p_loc_outsourced_assembly_tbl);
484: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
485: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
486: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
487: po_log.proc_begin(d_mod, 'p_item_id_tbl', p_item_id_tbl);
488: po_log.proc_begin(d_mod, 'p_txn_flow_header_id_tbl', p_txn_flow_header_id_tbl);
489: po_log.proc_begin(d_mod, 'p_accrue_on_receipt_flag_tbl', p_accrue_on_receipt_flag_tbl);
490: po_log.proc_begin(d_mod, 'p_expense_accrual_code', p_expense_accrual_code);
491: po_log.proc_begin(d_mod, 'p_loc_outsourced_assembly_tbl', p_loc_outsourced_assembly_tbl);
492: po_log.proc_begin(d_mod, 'p_value_basis_tbl', p_value_basis_tbl);
485: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
486: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
487: po_log.proc_begin(d_mod, 'p_item_id_tbl', p_item_id_tbl);
488: po_log.proc_begin(d_mod, 'p_txn_flow_header_id_tbl', p_txn_flow_header_id_tbl);
489: po_log.proc_begin(d_mod, 'p_accrue_on_receipt_flag_tbl', p_accrue_on_receipt_flag_tbl);
490: po_log.proc_begin(d_mod, 'p_expense_accrual_code', p_expense_accrual_code);
491: po_log.proc_begin(d_mod, 'p_loc_outsourced_assembly_tbl', p_loc_outsourced_assembly_tbl);
492: po_log.proc_begin(d_mod, 'p_value_basis_tbl', p_value_basis_tbl);
493: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
486: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
487: po_log.proc_begin(d_mod, 'p_item_id_tbl', p_item_id_tbl);
488: po_log.proc_begin(d_mod, 'p_txn_flow_header_id_tbl', p_txn_flow_header_id_tbl);
489: po_log.proc_begin(d_mod, 'p_accrue_on_receipt_flag_tbl', p_accrue_on_receipt_flag_tbl);
490: po_log.proc_begin(d_mod, 'p_expense_accrual_code', p_expense_accrual_code);
491: po_log.proc_begin(d_mod, 'p_loc_outsourced_assembly_tbl', p_loc_outsourced_assembly_tbl);
492: po_log.proc_begin(d_mod, 'p_value_basis_tbl', p_value_basis_tbl);
493: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
494: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
487: po_log.proc_begin(d_mod, 'p_item_id_tbl', p_item_id_tbl);
488: po_log.proc_begin(d_mod, 'p_txn_flow_header_id_tbl', p_txn_flow_header_id_tbl);
489: po_log.proc_begin(d_mod, 'p_accrue_on_receipt_flag_tbl', p_accrue_on_receipt_flag_tbl);
490: po_log.proc_begin(d_mod, 'p_expense_accrual_code', p_expense_accrual_code);
491: po_log.proc_begin(d_mod, 'p_loc_outsourced_assembly_tbl', p_loc_outsourced_assembly_tbl);
492: po_log.proc_begin(d_mod, 'p_value_basis_tbl', p_value_basis_tbl);
493: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
494: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
495: END IF;
488: po_log.proc_begin(d_mod, 'p_txn_flow_header_id_tbl', p_txn_flow_header_id_tbl);
489: po_log.proc_begin(d_mod, 'p_accrue_on_receipt_flag_tbl', p_accrue_on_receipt_flag_tbl);
490: po_log.proc_begin(d_mod, 'p_expense_accrual_code', p_expense_accrual_code);
491: po_log.proc_begin(d_mod, 'p_loc_outsourced_assembly_tbl', p_loc_outsourced_assembly_tbl);
492: po_log.proc_begin(d_mod, 'p_value_basis_tbl', p_value_basis_tbl);
493: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
494: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
495: END IF;
496:
489: po_log.proc_begin(d_mod, 'p_accrue_on_receipt_flag_tbl', p_accrue_on_receipt_flag_tbl);
490: po_log.proc_begin(d_mod, 'p_expense_accrual_code', p_expense_accrual_code);
491: po_log.proc_begin(d_mod, 'p_loc_outsourced_assembly_tbl', p_loc_outsourced_assembly_tbl);
492: po_log.proc_begin(d_mod, 'p_value_basis_tbl', p_value_basis_tbl);
493: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
494: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
495: END IF;
496:
497: d_position := 20;
490: po_log.proc_begin(d_mod, 'p_expense_accrual_code', p_expense_accrual_code);
491: po_log.proc_begin(d_mod, 'p_loc_outsourced_assembly_tbl', p_loc_outsourced_assembly_tbl);
492: po_log.proc_begin(d_mod, 'p_value_basis_tbl', p_value_basis_tbl);
493: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
494: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
495: END IF;
496:
497: d_position := 20;
498:
555: l_item_status_tbl.extend(p_id_tbl.COUNT);
556:
557: FOR i IN 1..l_index_tbl.COUNT
558: LOOP
559: IF (PO_LOG.d_stmt) THEN
560: PO_LOG.stmt(d_mod, d_position, 'index', l_index_tbl(i));
561: PO_LOG.stmt(d_mod, d_position, 'new item_status', l_result_tbl(i));
562: END IF;
563:
556:
557: FOR i IN 1..l_index_tbl.COUNT
558: LOOP
559: IF (PO_LOG.d_stmt) THEN
560: PO_LOG.stmt(d_mod, d_position, 'index', l_index_tbl(i));
561: PO_LOG.stmt(d_mod, d_position, 'new item_status', l_result_tbl(i));
562: END IF;
563:
564: l_item_status_tbl(l_index_tbl(i)) := l_result_tbl(i);
557: FOR i IN 1..l_index_tbl.COUNT
558: LOOP
559: IF (PO_LOG.d_stmt) THEN
560: PO_LOG.stmt(d_mod, d_position, 'index', l_index_tbl(i));
561: PO_LOG.stmt(d_mod, d_position, 'new item_status', l_result_tbl(i));
562: END IF;
563:
564: l_item_status_tbl(l_index_tbl(i)) := l_result_tbl(i);
565: END LOOP;
570: l_item_status_tbl(i) := 'D';
571: END IF;
572: END LOOP;
573:
574: IF po_log.d_proc THEN
575: po_log.proc_begin(d_mod, 'l_item_status_tbl', l_item_status_tbl);
576: END IF;
577:
578: d_position := 70;
571: END IF;
572: END LOOP;
573:
574: IF po_log.d_proc THEN
575: po_log.proc_begin(d_mod, 'l_item_status_tbl', l_item_status_tbl);
576: END IF;
577:
578: d_position := 70;
579:
630: END IF;
631:
632: d_position := 80;
633:
634: IF po_log.d_proc THEN
635: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
636: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
637: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
638: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
632: d_position := 80;
633:
634: IF po_log.d_proc THEN
635: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
636: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
637: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
638: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
639: END IF;
640: EXCEPTION
633:
634: IF po_log.d_proc THEN
635: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
636: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
637: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
638: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
639: END IF;
640: EXCEPTION
641: WHEN OTHERS THEN
634: IF po_log.d_proc THEN
635: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
636: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
637: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
638: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
639: END IF;
640: EXCEPTION
641: WHEN OTHERS THEN
642: IF po_log.d_exc THEN
638: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
639: END IF;
640: EXCEPTION
641: WHEN OTHERS THEN
642: IF po_log.d_exc THEN
643: po_log.exc(d_mod, d_position, NULL);
644: END IF;
645:
646: RAISE;
639: END IF;
640: EXCEPTION
641: WHEN OTHERS THEN
642: IF po_log.d_exc THEN
643: po_log.exc(d_mod, d_position, NULL);
644: END IF;
645:
646: RAISE;
647: END destination_type_code;
676: END IF;
677:
678: x_result_type := po_validations.c_result_type_success;
679:
680: IF po_log.d_proc THEN
681: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
682: po_log.proc_begin(d_mod, 'p_destination_subinv_tbl', p_destination_subinv_tbl);
683: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
684: po_log.proc_begin(d_mod, 'p_item_id_tbl', p_item_id_tbl);
677:
678: x_result_type := po_validations.c_result_type_success;
679:
680: IF po_log.d_proc THEN
681: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
682: po_log.proc_begin(d_mod, 'p_destination_subinv_tbl', p_destination_subinv_tbl);
683: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
684: po_log.proc_begin(d_mod, 'p_item_id_tbl', p_item_id_tbl);
685: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
678: x_result_type := po_validations.c_result_type_success;
679:
680: IF po_log.d_proc THEN
681: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
682: po_log.proc_begin(d_mod, 'p_destination_subinv_tbl', p_destination_subinv_tbl);
683: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
684: po_log.proc_begin(d_mod, 'p_item_id_tbl', p_item_id_tbl);
685: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
686: po_log.proc_begin(d_mod, 'p_loc_outsourced_assembly', p_loc_outsourced_assembly_tbl);
679:
680: IF po_log.d_proc THEN
681: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
682: po_log.proc_begin(d_mod, 'p_destination_subinv_tbl', p_destination_subinv_tbl);
683: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
684: po_log.proc_begin(d_mod, 'p_item_id_tbl', p_item_id_tbl);
685: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
686: po_log.proc_begin(d_mod, 'p_loc_outsourced_assembly', p_loc_outsourced_assembly_tbl);
687: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
680: IF po_log.d_proc THEN
681: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
682: po_log.proc_begin(d_mod, 'p_destination_subinv_tbl', p_destination_subinv_tbl);
683: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
684: po_log.proc_begin(d_mod, 'p_item_id_tbl', p_item_id_tbl);
685: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
686: po_log.proc_begin(d_mod, 'p_loc_outsourced_assembly', p_loc_outsourced_assembly_tbl);
687: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
688: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
681: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
682: po_log.proc_begin(d_mod, 'p_destination_subinv_tbl', p_destination_subinv_tbl);
683: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
684: po_log.proc_begin(d_mod, 'p_item_id_tbl', p_item_id_tbl);
685: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
686: po_log.proc_begin(d_mod, 'p_loc_outsourced_assembly', p_loc_outsourced_assembly_tbl);
687: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
688: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
689: END IF;
682: po_log.proc_begin(d_mod, 'p_destination_subinv_tbl', p_destination_subinv_tbl);
683: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
684: po_log.proc_begin(d_mod, 'p_item_id_tbl', p_item_id_tbl);
685: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
686: po_log.proc_begin(d_mod, 'p_loc_outsourced_assembly', p_loc_outsourced_assembly_tbl);
687: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
688: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
689: END IF;
690:
683: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
684: po_log.proc_begin(d_mod, 'p_item_id_tbl', p_item_id_tbl);
685: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
686: po_log.proc_begin(d_mod, 'p_loc_outsourced_assembly', p_loc_outsourced_assembly_tbl);
687: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
688: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
689: END IF;
690:
691: FOR i IN 1 .. p_id_tbl.COUNT LOOP
684: po_log.proc_begin(d_mod, 'p_item_id_tbl', p_item_id_tbl);
685: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
686: po_log.proc_begin(d_mod, 'p_loc_outsourced_assembly', p_loc_outsourced_assembly_tbl);
687: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
688: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
689: END IF;
690:
691: FOR i IN 1 .. p_id_tbl.COUNT LOOP
692: IF (p_dest_type_code_tbl(i) IN('SHOP FLOOR', 'EXPENSE') AND p_destination_subinv_tbl(i) IS NOT NULL) THEN
785: IF (SQL%ROWCOUNT > 0) THEN
786: x_result_type := po_validations.c_result_type_failure;
787: END IF;
788:
789: IF po_log.d_proc THEN
790: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
791: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
792: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
793: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
787: END IF;
788:
789: IF po_log.d_proc THEN
790: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
791: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
792: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
793: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
794: END IF;
795: EXCEPTION
788:
789: IF po_log.d_proc THEN
790: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
791: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
792: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
793: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
794: END IF;
795: EXCEPTION
796: WHEN OTHERS THEN
789: IF po_log.d_proc THEN
790: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
791: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
792: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
793: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
794: END IF;
795: EXCEPTION
796: WHEN OTHERS THEN
797: IF po_log.d_exc THEN
793: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
794: END IF;
795: EXCEPTION
796: WHEN OTHERS THEN
797: IF po_log.d_exc THEN
798: po_log.exc(d_mod, 0, NULL);
799: END IF;
800:
801: RAISE;
794: END IF;
795: EXCEPTION
796: WHEN OTHERS THEN
797: IF po_log.d_exc THEN
798: po_log.exc(d_mod, 0, NULL);
799: END IF;
800:
801: RAISE;
802: END destination_subinv;
837: END IF;
838:
839: x_result_type := po_validations.c_result_type_success;
840:
841: IF po_log.d_proc THEN
842: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
843: po_log.proc_begin(d_mod, 'p_wip_entity_id_tbl', p_wip_entity_id_tbl);
844: po_log.proc_begin(d_mod, 'p_wip_rep_schedule_id_tbl', p_wip_rep_schedule_id_tbl);
845: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
838:
839: x_result_type := po_validations.c_result_type_success;
840:
841: IF po_log.d_proc THEN
842: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
843: po_log.proc_begin(d_mod, 'p_wip_entity_id_tbl', p_wip_entity_id_tbl);
844: po_log.proc_begin(d_mod, 'p_wip_rep_schedule_id_tbl', p_wip_rep_schedule_id_tbl);
845: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
846: po_log.proc_begin(d_mod, 'p_destination_org_id_tbl', p_destination_org_id_tbl);
839: x_result_type := po_validations.c_result_type_success;
840:
841: IF po_log.d_proc THEN
842: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
843: po_log.proc_begin(d_mod, 'p_wip_entity_id_tbl', p_wip_entity_id_tbl);
844: po_log.proc_begin(d_mod, 'p_wip_rep_schedule_id_tbl', p_wip_rep_schedule_id_tbl);
845: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
846: po_log.proc_begin(d_mod, 'p_destination_org_id_tbl', p_destination_org_id_tbl);
847: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
840:
841: IF po_log.d_proc THEN
842: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
843: po_log.proc_begin(d_mod, 'p_wip_entity_id_tbl', p_wip_entity_id_tbl);
844: po_log.proc_begin(d_mod, 'p_wip_rep_schedule_id_tbl', p_wip_rep_schedule_id_tbl);
845: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
846: po_log.proc_begin(d_mod, 'p_destination_org_id_tbl', p_destination_org_id_tbl);
847: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
848: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
841: IF po_log.d_proc THEN
842: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
843: po_log.proc_begin(d_mod, 'p_wip_entity_id_tbl', p_wip_entity_id_tbl);
844: po_log.proc_begin(d_mod, 'p_wip_rep_schedule_id_tbl', p_wip_rep_schedule_id_tbl);
845: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
846: po_log.proc_begin(d_mod, 'p_destination_org_id_tbl', p_destination_org_id_tbl);
847: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
848: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
849: END IF;
842: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
843: po_log.proc_begin(d_mod, 'p_wip_entity_id_tbl', p_wip_entity_id_tbl);
844: po_log.proc_begin(d_mod, 'p_wip_rep_schedule_id_tbl', p_wip_rep_schedule_id_tbl);
845: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
846: po_log.proc_begin(d_mod, 'p_destination_org_id_tbl', p_destination_org_id_tbl);
847: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
848: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
849: END IF;
850:
843: po_log.proc_begin(d_mod, 'p_wip_entity_id_tbl', p_wip_entity_id_tbl);
844: po_log.proc_begin(d_mod, 'p_wip_rep_schedule_id_tbl', p_wip_rep_schedule_id_tbl);
845: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
846: po_log.proc_begin(d_mod, 'p_destination_org_id_tbl', p_destination_org_id_tbl);
847: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
848: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
849: END IF;
850:
851: FOR i IN 1 .. p_id_tbl.COUNT LOOP
844: po_log.proc_begin(d_mod, 'p_wip_rep_schedule_id_tbl', p_wip_rep_schedule_id_tbl);
845: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
846: po_log.proc_begin(d_mod, 'p_destination_org_id_tbl', p_destination_org_id_tbl);
847: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
848: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
849: END IF;
850:
851: FOR i IN 1 .. p_id_tbl.COUNT LOOP
852: IF (p_dest_type_code_tbl(i) = 'SHOP FLOOR' AND p_wip_entity_id_tbl(i) IS NULL) THEN
931: IF (SQL%ROWCOUNT > 0) THEN
932: x_result_type := po_validations.c_result_type_failure;
933: END IF;
934:
935: IF po_log.d_proc THEN
936: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
937: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
938: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
939: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
933: END IF;
934:
935: IF po_log.d_proc THEN
936: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
937: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
938: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
939: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
940: END IF;
941: EXCEPTION
934:
935: IF po_log.d_proc THEN
936: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
937: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
938: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
939: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
940: END IF;
941: EXCEPTION
942: WHEN OTHERS THEN
935: IF po_log.d_proc THEN
936: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
937: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
938: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
939: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
940: END IF;
941: EXCEPTION
942: WHEN OTHERS THEN
943: IF po_log.d_exc THEN
939: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
940: END IF;
941: EXCEPTION
942: WHEN OTHERS THEN
943: IF po_log.d_exc THEN
944: po_log.exc(d_mod, 0, NULL);
945: END IF;
946:
947: RAISE;
940: END IF;
941: EXCEPTION
942: WHEN OTHERS THEN
943: IF po_log.d_exc THEN
944: po_log.exc(d_mod, 0, NULL);
945: END IF;
946:
947: RAISE;
948: END wip_entity_id;
969: END IF;
970:
971: x_result_type := po_validations.c_result_type_success;
972:
973: IF po_log.d_proc THEN
974: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
975: po_log.proc_begin(d_mod, 'p_prevent_encum_flag_tbl', p_prevent_encum_flag_tbl);
976: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
977: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
970:
971: x_result_type := po_validations.c_result_type_success;
972:
973: IF po_log.d_proc THEN
974: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
975: po_log.proc_begin(d_mod, 'p_prevent_encum_flag_tbl', p_prevent_encum_flag_tbl);
976: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
977: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
978: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
971: x_result_type := po_validations.c_result_type_success;
972:
973: IF po_log.d_proc THEN
974: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
975: po_log.proc_begin(d_mod, 'p_prevent_encum_flag_tbl', p_prevent_encum_flag_tbl);
976: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
977: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
978: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
979: END IF;
972:
973: IF po_log.d_proc THEN
974: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
975: po_log.proc_begin(d_mod, 'p_prevent_encum_flag_tbl', p_prevent_encum_flag_tbl);
976: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
977: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
978: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
979: END IF;
980:
973: IF po_log.d_proc THEN
974: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
975: po_log.proc_begin(d_mod, 'p_prevent_encum_flag_tbl', p_prevent_encum_flag_tbl);
976: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
977: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
978: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
979: END IF;
980:
981: /* For Encumbrance Project - To enable Encumbrance for Destination type - Shop Floor and WIP entity type - EAM
974: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
975: po_log.proc_begin(d_mod, 'p_prevent_encum_flag_tbl', p_prevent_encum_flag_tbl);
976: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
977: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
978: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
979: END IF;
980:
981: /* For Encumbrance Project - To enable Encumbrance for Destination type - Shop Floor and WIP entity type - EAM
982: Retriving entity_type and Setting the prevent_encumbrance_flag to 'Y' if destination type = shop floor
1007: x_result_type := po_validations.c_result_type_failure;
1008: END IF;
1009: END LOOP;
1010:
1011: IF po_log.d_proc THEN
1012: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1013: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
1014: END IF;
1015: EXCEPTION
1008: END IF;
1009: END LOOP;
1010:
1011: IF po_log.d_proc THEN
1012: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1013: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
1014: END IF;
1015: EXCEPTION
1016: WHEN OTHERS THEN
1009: END LOOP;
1010:
1011: IF po_log.d_proc THEN
1012: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1013: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
1014: END IF;
1015: EXCEPTION
1016: WHEN OTHERS THEN
1017: IF po_log.d_exc THEN
1013: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
1014: END IF;
1015: EXCEPTION
1016: WHEN OTHERS THEN
1017: IF po_log.d_exc THEN
1018: po_log.exc(d_mod, 0, NULL);
1019: END IF;
1020:
1021: RAISE;
1014: END IF;
1015: EXCEPTION
1016: WHEN OTHERS THEN
1017: IF po_log.d_exc THEN
1018: po_log.exc(d_mod, 0, NULL);
1019: END IF;
1020:
1021: RAISE;
1022: END prevent_encumbrance_flag;
1041: END IF;
1042:
1043: x_result_type := po_validations.c_result_type_success;
1044:
1045: IF po_log.d_proc THEN
1046: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1047: po_log.proc_begin(d_mod, 'p_charge_account_id_tbl', p_charge_account_id_tbl);
1048: po_log.proc_begin(d_mod, 'p_gl_date_tbl', p_gl_date_tbl);
1049: po_log.proc_begin(d_mod, 'p_chart_of_account_id', p_chart_of_account_id);
1042:
1043: x_result_type := po_validations.c_result_type_success;
1044:
1045: IF po_log.d_proc THEN
1046: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1047: po_log.proc_begin(d_mod, 'p_charge_account_id_tbl', p_charge_account_id_tbl);
1048: po_log.proc_begin(d_mod, 'p_gl_date_tbl', p_gl_date_tbl);
1049: po_log.proc_begin(d_mod, 'p_chart_of_account_id', p_chart_of_account_id);
1050: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
1043: x_result_type := po_validations.c_result_type_success;
1044:
1045: IF po_log.d_proc THEN
1046: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1047: po_log.proc_begin(d_mod, 'p_charge_account_id_tbl', p_charge_account_id_tbl);
1048: po_log.proc_begin(d_mod, 'p_gl_date_tbl', p_gl_date_tbl);
1049: po_log.proc_begin(d_mod, 'p_chart_of_account_id', p_chart_of_account_id);
1050: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
1051: END IF;
1044:
1045: IF po_log.d_proc THEN
1046: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1047: po_log.proc_begin(d_mod, 'p_charge_account_id_tbl', p_charge_account_id_tbl);
1048: po_log.proc_begin(d_mod, 'p_gl_date_tbl', p_gl_date_tbl);
1049: po_log.proc_begin(d_mod, 'p_chart_of_account_id', p_chart_of_account_id);
1050: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
1051: END IF;
1052:
1045: IF po_log.d_proc THEN
1046: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1047: po_log.proc_begin(d_mod, 'p_charge_account_id_tbl', p_charge_account_id_tbl);
1048: po_log.proc_begin(d_mod, 'p_gl_date_tbl', p_gl_date_tbl);
1049: po_log.proc_begin(d_mod, 'p_chart_of_account_id', p_chart_of_account_id);
1050: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
1051: END IF;
1052:
1053: FORALL i IN 1 .. p_id_tbl.COUNT
1046: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1047: po_log.proc_begin(d_mod, 'p_charge_account_id_tbl', p_charge_account_id_tbl);
1048: po_log.proc_begin(d_mod, 'p_gl_date_tbl', p_gl_date_tbl);
1049: po_log.proc_begin(d_mod, 'p_chart_of_account_id', p_chart_of_account_id);
1050: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
1051: END IF;
1052:
1053: FORALL i IN 1 .. p_id_tbl.COUNT
1054: INSERT INTO po_validation_results_gt
1089: IF (SQL%ROWCOUNT > 0) THEN
1090: x_result_type := po_validations.c_result_type_failure;
1091: END IF;
1092:
1093: IF po_log.d_proc THEN
1094: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
1095: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1096: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
1097: END IF;
1091: END IF;
1092:
1093: IF po_log.d_proc THEN
1094: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
1095: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1096: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
1097: END IF;
1098: EXCEPTION
1099: WHEN OTHERS THEN
1092:
1093: IF po_log.d_proc THEN
1094: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
1095: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1096: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
1097: END IF;
1098: EXCEPTION
1099: WHEN OTHERS THEN
1100: IF po_log.d_exc THEN
1096: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
1097: END IF;
1098: EXCEPTION
1099: WHEN OTHERS THEN
1100: IF po_log.d_exc THEN
1101: po_log.exc(d_mod, 0, NULL);
1102: END IF;
1103:
1104: RAISE;
1097: END IF;
1098: EXCEPTION
1099: WHEN OTHERS THEN
1100: IF po_log.d_exc THEN
1101: po_log.exc(d_mod, 0, NULL);
1102: END IF;
1103:
1104: RAISE;
1105: END charge_account_id;
1130: END IF;
1131:
1132: x_result_type := po_validations.c_result_type_success;
1133:
1134: IF po_log.d_proc THEN
1135: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1136: po_log.proc_begin(d_mod, 'p_budget_account_id_tbl', p_budget_account_id_tbl);
1137: po_log.proc_begin(d_mod, 'p_gl_date_tbl', p_gl_date_tbl);
1138: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
1131:
1132: x_result_type := po_validations.c_result_type_success;
1133:
1134: IF po_log.d_proc THEN
1135: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1136: po_log.proc_begin(d_mod, 'p_budget_account_id_tbl', p_budget_account_id_tbl);
1137: po_log.proc_begin(d_mod, 'p_gl_date_tbl', p_gl_date_tbl);
1138: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
1139: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
1132: x_result_type := po_validations.c_result_type_success;
1133:
1134: IF po_log.d_proc THEN
1135: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1136: po_log.proc_begin(d_mod, 'p_budget_account_id_tbl', p_budget_account_id_tbl);
1137: po_log.proc_begin(d_mod, 'p_gl_date_tbl', p_gl_date_tbl);
1138: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
1139: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
1140: po_log.proc_begin(d_mod, 'p_chart_of_account_id', p_chart_of_account_id);
1133:
1134: IF po_log.d_proc THEN
1135: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1136: po_log.proc_begin(d_mod, 'p_budget_account_id_tbl', p_budget_account_id_tbl);
1137: po_log.proc_begin(d_mod, 'p_gl_date_tbl', p_gl_date_tbl);
1138: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
1139: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
1140: po_log.proc_begin(d_mod, 'p_chart_of_account_id', p_chart_of_account_id);
1141: po_log.proc_begin(d_mod, 'p_po_encumberance_flag', p_po_encumberance_flag);
1134: IF po_log.d_proc THEN
1135: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1136: po_log.proc_begin(d_mod, 'p_budget_account_id_tbl', p_budget_account_id_tbl);
1137: po_log.proc_begin(d_mod, 'p_gl_date_tbl', p_gl_date_tbl);
1138: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
1139: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
1140: po_log.proc_begin(d_mod, 'p_chart_of_account_id', p_chart_of_account_id);
1141: po_log.proc_begin(d_mod, 'p_po_encumberance_flag', p_po_encumberance_flag);
1142: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
1135: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1136: po_log.proc_begin(d_mod, 'p_budget_account_id_tbl', p_budget_account_id_tbl);
1137: po_log.proc_begin(d_mod, 'p_gl_date_tbl', p_gl_date_tbl);
1138: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
1139: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
1140: po_log.proc_begin(d_mod, 'p_chart_of_account_id', p_chart_of_account_id);
1141: po_log.proc_begin(d_mod, 'p_po_encumberance_flag', p_po_encumberance_flag);
1142: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
1143: END IF;
1136: po_log.proc_begin(d_mod, 'p_budget_account_id_tbl', p_budget_account_id_tbl);
1137: po_log.proc_begin(d_mod, 'p_gl_date_tbl', p_gl_date_tbl);
1138: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
1139: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
1140: po_log.proc_begin(d_mod, 'p_chart_of_account_id', p_chart_of_account_id);
1141: po_log.proc_begin(d_mod, 'p_po_encumberance_flag', p_po_encumberance_flag);
1142: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
1143: END IF;
1144:
1137: po_log.proc_begin(d_mod, 'p_gl_date_tbl', p_gl_date_tbl);
1138: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
1139: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
1140: po_log.proc_begin(d_mod, 'p_chart_of_account_id', p_chart_of_account_id);
1141: po_log.proc_begin(d_mod, 'p_po_encumberance_flag', p_po_encumberance_flag);
1142: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
1143: END IF;
1144:
1145: -- bug 4899825: add checking on destination_type_code when
1138: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
1139: po_log.proc_begin(d_mod, 'p_distribution_type_tbl', p_distribution_type_tbl); -- PDOI for Complex PO Project
1140: po_log.proc_begin(d_mod, 'p_chart_of_account_id', p_chart_of_account_id);
1141: po_log.proc_begin(d_mod, 'p_po_encumberance_flag', p_po_encumberance_flag);
1142: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
1143: END IF;
1144:
1145: -- bug 4899825: add checking on destination_type_code when
1146: -- budget_account_id is empty; If destination_
1190: IF (SQL%ROWCOUNT > 0) THEN
1191: x_result_type := po_validations.c_result_type_failure;
1192: END IF;
1193:
1194: IF po_log.d_proc THEN
1195: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
1196: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1197: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
1198: END IF;
1192: END IF;
1193:
1194: IF po_log.d_proc THEN
1195: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
1196: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1197: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
1198: END IF;
1199: EXCEPTION
1200: WHEN OTHERS THEN
1193:
1194: IF po_log.d_proc THEN
1195: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
1196: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1197: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
1198: END IF;
1199: EXCEPTION
1200: WHEN OTHERS THEN
1201: IF po_log.d_exc THEN
1197: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
1198: END IF;
1199: EXCEPTION
1200: WHEN OTHERS THEN
1201: IF po_log.d_exc THEN
1202: po_log.exc(d_mod, 0, NULL);
1203: END IF;
1204:
1205: RAISE;
1198: END IF;
1199: EXCEPTION
1200: WHEN OTHERS THEN
1201: IF po_log.d_exc THEN
1202: po_log.exc(d_mod, 0, NULL);
1203: END IF;
1204:
1205: RAISE;
1206: END budget_account_id;
1228: END IF;
1229:
1230: x_result_type := po_validations.c_result_type_success;
1231:
1232: IF po_log.d_proc THEN
1233: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1234: po_log.proc_begin(d_mod, 'p_account_id_tbl', p_account_id_tbl);
1235: po_log.proc_begin(d_mod, 'p_gl_date_tbl', p_gl_date_tbl);
1236: po_log.proc_begin(d_mod, 'p_chart_of_account_id', p_chart_of_account_id);
1229:
1230: x_result_type := po_validations.c_result_type_success;
1231:
1232: IF po_log.d_proc THEN
1233: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1234: po_log.proc_begin(d_mod, 'p_account_id_tbl', p_account_id_tbl);
1235: po_log.proc_begin(d_mod, 'p_gl_date_tbl', p_gl_date_tbl);
1236: po_log.proc_begin(d_mod, 'p_chart_of_account_id', p_chart_of_account_id);
1237: po_log.proc_begin(d_mod, 'p_message_name', p_message_name);
1230: x_result_type := po_validations.c_result_type_success;
1231:
1232: IF po_log.d_proc THEN
1233: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1234: po_log.proc_begin(d_mod, 'p_account_id_tbl', p_account_id_tbl);
1235: po_log.proc_begin(d_mod, 'p_gl_date_tbl', p_gl_date_tbl);
1236: po_log.proc_begin(d_mod, 'p_chart_of_account_id', p_chart_of_account_id);
1237: po_log.proc_begin(d_mod, 'p_message_name', p_message_name);
1238: po_log.proc_begin(d_mod, 'p_column_name', p_column_name);
1231:
1232: IF po_log.d_proc THEN
1233: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1234: po_log.proc_begin(d_mod, 'p_account_id_tbl', p_account_id_tbl);
1235: po_log.proc_begin(d_mod, 'p_gl_date_tbl', p_gl_date_tbl);
1236: po_log.proc_begin(d_mod, 'p_chart_of_account_id', p_chart_of_account_id);
1237: po_log.proc_begin(d_mod, 'p_message_name', p_message_name);
1238: po_log.proc_begin(d_mod, 'p_column_name', p_column_name);
1239: po_log.proc_begin(d_mod, 'p_token_name', p_token_name);
1232: IF po_log.d_proc THEN
1233: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1234: po_log.proc_begin(d_mod, 'p_account_id_tbl', p_account_id_tbl);
1235: po_log.proc_begin(d_mod, 'p_gl_date_tbl', p_gl_date_tbl);
1236: po_log.proc_begin(d_mod, 'p_chart_of_account_id', p_chart_of_account_id);
1237: po_log.proc_begin(d_mod, 'p_message_name', p_message_name);
1238: po_log.proc_begin(d_mod, 'p_column_name', p_column_name);
1239: po_log.proc_begin(d_mod, 'p_token_name', p_token_name);
1240: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
1233: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1234: po_log.proc_begin(d_mod, 'p_account_id_tbl', p_account_id_tbl);
1235: po_log.proc_begin(d_mod, 'p_gl_date_tbl', p_gl_date_tbl);
1236: po_log.proc_begin(d_mod, 'p_chart_of_account_id', p_chart_of_account_id);
1237: po_log.proc_begin(d_mod, 'p_message_name', p_message_name);
1238: po_log.proc_begin(d_mod, 'p_column_name', p_column_name);
1239: po_log.proc_begin(d_mod, 'p_token_name', p_token_name);
1240: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
1241: END IF;
1234: po_log.proc_begin(d_mod, 'p_account_id_tbl', p_account_id_tbl);
1235: po_log.proc_begin(d_mod, 'p_gl_date_tbl', p_gl_date_tbl);
1236: po_log.proc_begin(d_mod, 'p_chart_of_account_id', p_chart_of_account_id);
1237: po_log.proc_begin(d_mod, 'p_message_name', p_message_name);
1238: po_log.proc_begin(d_mod, 'p_column_name', p_column_name);
1239: po_log.proc_begin(d_mod, 'p_token_name', p_token_name);
1240: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
1241: END IF;
1242:
1235: po_log.proc_begin(d_mod, 'p_gl_date_tbl', p_gl_date_tbl);
1236: po_log.proc_begin(d_mod, 'p_chart_of_account_id', p_chart_of_account_id);
1237: po_log.proc_begin(d_mod, 'p_message_name', p_message_name);
1238: po_log.proc_begin(d_mod, 'p_column_name', p_column_name);
1239: po_log.proc_begin(d_mod, 'p_token_name', p_token_name);
1240: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
1241: END IF;
1242:
1243: FORALL i IN 1 .. p_id_tbl.COUNT
1236: po_log.proc_begin(d_mod, 'p_chart_of_account_id', p_chart_of_account_id);
1237: po_log.proc_begin(d_mod, 'p_message_name', p_message_name);
1238: po_log.proc_begin(d_mod, 'p_column_name', p_column_name);
1239: po_log.proc_begin(d_mod, 'p_token_name', p_token_name);
1240: po_log.proc_begin(d_mod, 'x_result_set_id', x_result_set_id);
1241: END IF;
1242:
1243: FORALL i IN 1 .. p_id_tbl.COUNT
1244: INSERT INTO po_validation_results_gt
1278: IF (SQL%ROWCOUNT > 0) THEN
1279: x_result_type := po_validations.c_result_type_failure;
1280: END IF;
1281:
1282: IF po_log.d_proc THEN
1283: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
1284: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1285: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
1286: END IF;
1280: END IF;
1281:
1282: IF po_log.d_proc THEN
1283: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
1284: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1285: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
1286: END IF;
1287: EXCEPTION
1288: WHEN OTHERS THEN
1281:
1282: IF po_log.d_proc THEN
1283: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
1284: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1285: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
1286: END IF;
1287: EXCEPTION
1288: WHEN OTHERS THEN
1289: IF po_log.d_exc THEN
1285: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
1286: END IF;
1287: EXCEPTION
1288: WHEN OTHERS THEN
1289: IF po_log.d_exc THEN
1290: po_log.exc(d_mod, 0, NULL);
1291: END IF;
1292:
1293: RAISE;
1286: END IF;
1287: EXCEPTION
1288: WHEN OTHERS THEN
1289: IF po_log.d_exc THEN
1290: po_log.exc(d_mod, 0, NULL);
1291: END IF;
1292:
1293: RAISE;
1294: END account_id;
1315: END IF;
1316:
1317: x_result_type := po_validations.c_result_type_success;
1318:
1319: IF po_log.d_proc THEN
1320: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1321: po_log.proc_begin(d_mod, 'p_project_acct_ctx_tbl', p_project_acct_ctx_tbl);
1322: po_log.proc_begin(d_mod, 'p_project_id_tbl', p_project_id_tbl);
1323: po_log.proc_begin(d_mod, 'p_task_id_tbl', p_task_id_tbl);
1316:
1317: x_result_type := po_validations.c_result_type_success;
1318:
1319: IF po_log.d_proc THEN
1320: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1321: po_log.proc_begin(d_mod, 'p_project_acct_ctx_tbl', p_project_acct_ctx_tbl);
1322: po_log.proc_begin(d_mod, 'p_project_id_tbl', p_project_id_tbl);
1323: po_log.proc_begin(d_mod, 'p_task_id_tbl', p_task_id_tbl);
1324: po_log.proc_begin(d_mod, 'p_exp_type_tbl', p_exp_type_tbl);
1317: x_result_type := po_validations.c_result_type_success;
1318:
1319: IF po_log.d_proc THEN
1320: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1321: po_log.proc_begin(d_mod, 'p_project_acct_ctx_tbl', p_project_acct_ctx_tbl);
1322: po_log.proc_begin(d_mod, 'p_project_id_tbl', p_project_id_tbl);
1323: po_log.proc_begin(d_mod, 'p_task_id_tbl', p_task_id_tbl);
1324: po_log.proc_begin(d_mod, 'p_exp_type_tbl', p_exp_type_tbl);
1325: po_log.proc_begin(d_mod, 'p_exp_org_id_tbl', p_exp_org_id_tbl);
1318:
1319: IF po_log.d_proc THEN
1320: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1321: po_log.proc_begin(d_mod, 'p_project_acct_ctx_tbl', p_project_acct_ctx_tbl);
1322: po_log.proc_begin(d_mod, 'p_project_id_tbl', p_project_id_tbl);
1323: po_log.proc_begin(d_mod, 'p_task_id_tbl', p_task_id_tbl);
1324: po_log.proc_begin(d_mod, 'p_exp_type_tbl', p_exp_type_tbl);
1325: po_log.proc_begin(d_mod, 'p_exp_org_id_tbl', p_exp_org_id_tbl);
1326: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
1319: IF po_log.d_proc THEN
1320: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1321: po_log.proc_begin(d_mod, 'p_project_acct_ctx_tbl', p_project_acct_ctx_tbl);
1322: po_log.proc_begin(d_mod, 'p_project_id_tbl', p_project_id_tbl);
1323: po_log.proc_begin(d_mod, 'p_task_id_tbl', p_task_id_tbl);
1324: po_log.proc_begin(d_mod, 'p_exp_type_tbl', p_exp_type_tbl);
1325: po_log.proc_begin(d_mod, 'p_exp_org_id_tbl', p_exp_org_id_tbl);
1326: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
1327: END IF;
1320: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1321: po_log.proc_begin(d_mod, 'p_project_acct_ctx_tbl', p_project_acct_ctx_tbl);
1322: po_log.proc_begin(d_mod, 'p_project_id_tbl', p_project_id_tbl);
1323: po_log.proc_begin(d_mod, 'p_task_id_tbl', p_task_id_tbl);
1324: po_log.proc_begin(d_mod, 'p_exp_type_tbl', p_exp_type_tbl);
1325: po_log.proc_begin(d_mod, 'p_exp_org_id_tbl', p_exp_org_id_tbl);
1326: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
1327: END IF;
1328:
1321: po_log.proc_begin(d_mod, 'p_project_acct_ctx_tbl', p_project_acct_ctx_tbl);
1322: po_log.proc_begin(d_mod, 'p_project_id_tbl', p_project_id_tbl);
1323: po_log.proc_begin(d_mod, 'p_task_id_tbl', p_task_id_tbl);
1324: po_log.proc_begin(d_mod, 'p_exp_type_tbl', p_exp_type_tbl);
1325: po_log.proc_begin(d_mod, 'p_exp_org_id_tbl', p_exp_org_id_tbl);
1326: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
1327: END IF;
1328:
1329: FOR i IN 1 .. p_id_tbl.COUNT LOOP
1322: po_log.proc_begin(d_mod, 'p_project_id_tbl', p_project_id_tbl);
1323: po_log.proc_begin(d_mod, 'p_task_id_tbl', p_task_id_tbl);
1324: po_log.proc_begin(d_mod, 'p_exp_type_tbl', p_exp_type_tbl);
1325: po_log.proc_begin(d_mod, 'p_exp_org_id_tbl', p_exp_org_id_tbl);
1326: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
1327: END IF;
1328:
1329: FOR i IN 1 .. p_id_tbl.COUNT LOOP
1330: IF ( (p_project_acct_ctx_tbl(i) IS NULL OR p_project_acct_ctx_tbl(i) = 'N')
1340: x_result_type := po_validations.c_result_type_failure;
1341: END IF;
1342: END LOOP;
1343:
1344: IF po_log.d_proc THEN
1345: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1346: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
1347: END IF;
1348: EXCEPTION
1341: END IF;
1342: END LOOP;
1343:
1344: IF po_log.d_proc THEN
1345: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1346: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
1347: END IF;
1348: EXCEPTION
1349: WHEN OTHERS THEN
1342: END LOOP;
1343:
1344: IF po_log.d_proc THEN
1345: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1346: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
1347: END IF;
1348: EXCEPTION
1349: WHEN OTHERS THEN
1350: IF po_log.d_exc THEN
1346: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
1347: END IF;
1348: EXCEPTION
1349: WHEN OTHERS THEN
1350: IF po_log.d_exc THEN
1351: po_log.exc(d_mod, 0, NULL);
1352: END IF;
1353:
1354: RAISE;
1347: END IF;
1348: EXCEPTION
1349: WHEN OTHERS THEN
1350: IF po_log.d_exc THEN
1351: po_log.exc(d_mod, 0, NULL);
1352: END IF;
1353:
1354: RAISE;
1355: END project_acct_context;
1397: END IF;
1398:
1399: x_result_type := po_validations.c_result_type_success;
1400:
1401: IF po_log.d_proc THEN
1402: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1403: po_log.proc_begin(d_mod, 'p_project_acct_ctx_tbl', p_project_acct_ctx_tbl);
1404: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
1405: po_log.proc_begin(d_mod, 'p_project_id_tbl', p_project_id_tbl);
1398:
1399: x_result_type := po_validations.c_result_type_success;
1400:
1401: IF po_log.d_proc THEN
1402: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1403: po_log.proc_begin(d_mod, 'p_project_acct_ctx_tbl', p_project_acct_ctx_tbl);
1404: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
1405: po_log.proc_begin(d_mod, 'p_project_id_tbl', p_project_id_tbl);
1406: po_log.proc_begin(d_mod, 'p_task_id_tbl', p_task_id_tbl);
1399: x_result_type := po_validations.c_result_type_success;
1400:
1401: IF po_log.d_proc THEN
1402: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1403: po_log.proc_begin(d_mod, 'p_project_acct_ctx_tbl', p_project_acct_ctx_tbl);
1404: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
1405: po_log.proc_begin(d_mod, 'p_project_id_tbl', p_project_id_tbl);
1406: po_log.proc_begin(d_mod, 'p_task_id_tbl', p_task_id_tbl);
1407: po_log.proc_begin(d_mod, 'p_expenditure_type_tbl', p_expenditure_type_tbl);
1400:
1401: IF po_log.d_proc THEN
1402: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1403: po_log.proc_begin(d_mod, 'p_project_acct_ctx_tbl', p_project_acct_ctx_tbl);
1404: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
1405: po_log.proc_begin(d_mod, 'p_project_id_tbl', p_project_id_tbl);
1406: po_log.proc_begin(d_mod, 'p_task_id_tbl', p_task_id_tbl);
1407: po_log.proc_begin(d_mod, 'p_expenditure_type_tbl', p_expenditure_type_tbl);
1408: po_log.proc_begin(d_mod, 'p_expenditure_org_id_tbl', p_expenditure_org_id_tbl);
1401: IF po_log.d_proc THEN
1402: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1403: po_log.proc_begin(d_mod, 'p_project_acct_ctx_tbl', p_project_acct_ctx_tbl);
1404: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
1405: po_log.proc_begin(d_mod, 'p_project_id_tbl', p_project_id_tbl);
1406: po_log.proc_begin(d_mod, 'p_task_id_tbl', p_task_id_tbl);
1407: po_log.proc_begin(d_mod, 'p_expenditure_type_tbl', p_expenditure_type_tbl);
1408: po_log.proc_begin(d_mod, 'p_expenditure_org_id_tbl', p_expenditure_org_id_tbl);
1409: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
1402: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1403: po_log.proc_begin(d_mod, 'p_project_acct_ctx_tbl', p_project_acct_ctx_tbl);
1404: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
1405: po_log.proc_begin(d_mod, 'p_project_id_tbl', p_project_id_tbl);
1406: po_log.proc_begin(d_mod, 'p_task_id_tbl', p_task_id_tbl);
1407: po_log.proc_begin(d_mod, 'p_expenditure_type_tbl', p_expenditure_type_tbl);
1408: po_log.proc_begin(d_mod, 'p_expenditure_org_id_tbl', p_expenditure_org_id_tbl);
1409: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
1410: po_log.proc_begin(d_mod, 'p_need_by_date_tbl', p_need_by_date_tbl);
1403: po_log.proc_begin(d_mod, 'p_project_acct_ctx_tbl', p_project_acct_ctx_tbl);
1404: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
1405: po_log.proc_begin(d_mod, 'p_project_id_tbl', p_project_id_tbl);
1406: po_log.proc_begin(d_mod, 'p_task_id_tbl', p_task_id_tbl);
1407: po_log.proc_begin(d_mod, 'p_expenditure_type_tbl', p_expenditure_type_tbl);
1408: po_log.proc_begin(d_mod, 'p_expenditure_org_id_tbl', p_expenditure_org_id_tbl);
1409: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
1410: po_log.proc_begin(d_mod, 'p_need_by_date_tbl', p_need_by_date_tbl);
1411: po_log.proc_begin(d_mod, 'p_promised_date_tbl', p_promised_date_tbl);
1404: po_log.proc_begin(d_mod, 'p_dest_type_code_tbl', p_dest_type_code_tbl);
1405: po_log.proc_begin(d_mod, 'p_project_id_tbl', p_project_id_tbl);
1406: po_log.proc_begin(d_mod, 'p_task_id_tbl', p_task_id_tbl);
1407: po_log.proc_begin(d_mod, 'p_expenditure_type_tbl', p_expenditure_type_tbl);
1408: po_log.proc_begin(d_mod, 'p_expenditure_org_id_tbl', p_expenditure_org_id_tbl);
1409: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
1410: po_log.proc_begin(d_mod, 'p_need_by_date_tbl', p_need_by_date_tbl);
1411: po_log.proc_begin(d_mod, 'p_promised_date_tbl', p_promised_date_tbl);
1412: po_log.proc_begin(d_mod, 'p_expenditure_item_date_tbl', p_expenditure_item_date_tbl);
1405: po_log.proc_begin(d_mod, 'p_project_id_tbl', p_project_id_tbl);
1406: po_log.proc_begin(d_mod, 'p_task_id_tbl', p_task_id_tbl);
1407: po_log.proc_begin(d_mod, 'p_expenditure_type_tbl', p_expenditure_type_tbl);
1408: po_log.proc_begin(d_mod, 'p_expenditure_org_id_tbl', p_expenditure_org_id_tbl);
1409: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
1410: po_log.proc_begin(d_mod, 'p_need_by_date_tbl', p_need_by_date_tbl);
1411: po_log.proc_begin(d_mod, 'p_promised_date_tbl', p_promised_date_tbl);
1412: po_log.proc_begin(d_mod, 'p_expenditure_item_date_tbl', p_expenditure_item_date_tbl);
1413: po_log.proc_begin(d_mod, 'p_ship_to_ou_id', p_ship_to_ou_id);
1406: po_log.proc_begin(d_mod, 'p_task_id_tbl', p_task_id_tbl);
1407: po_log.proc_begin(d_mod, 'p_expenditure_type_tbl', p_expenditure_type_tbl);
1408: po_log.proc_begin(d_mod, 'p_expenditure_org_id_tbl', p_expenditure_org_id_tbl);
1409: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
1410: po_log.proc_begin(d_mod, 'p_need_by_date_tbl', p_need_by_date_tbl);
1411: po_log.proc_begin(d_mod, 'p_promised_date_tbl', p_promised_date_tbl);
1412: po_log.proc_begin(d_mod, 'p_expenditure_item_date_tbl', p_expenditure_item_date_tbl);
1413: po_log.proc_begin(d_mod, 'p_ship_to_ou_id', p_ship_to_ou_id);
1414: po_log.proc_begin(d_mod, 'p_deliver_to_person_id_tbl', p_deliver_to_person_id_tbl);
1407: po_log.proc_begin(d_mod, 'p_expenditure_type_tbl', p_expenditure_type_tbl);
1408: po_log.proc_begin(d_mod, 'p_expenditure_org_id_tbl', p_expenditure_org_id_tbl);
1409: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
1410: po_log.proc_begin(d_mod, 'p_need_by_date_tbl', p_need_by_date_tbl);
1411: po_log.proc_begin(d_mod, 'p_promised_date_tbl', p_promised_date_tbl);
1412: po_log.proc_begin(d_mod, 'p_expenditure_item_date_tbl', p_expenditure_item_date_tbl);
1413: po_log.proc_begin(d_mod, 'p_ship_to_ou_id', p_ship_to_ou_id);
1414: po_log.proc_begin(d_mod, 'p_deliver_to_person_id_tbl', p_deliver_to_person_id_tbl);
1415: po_log.proc_begin(d_mod, 'p_agent_id_tbl', p_agent_id_tbl);
1408: po_log.proc_begin(d_mod, 'p_expenditure_org_id_tbl', p_expenditure_org_id_tbl);
1409: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
1410: po_log.proc_begin(d_mod, 'p_need_by_date_tbl', p_need_by_date_tbl);
1411: po_log.proc_begin(d_mod, 'p_promised_date_tbl', p_promised_date_tbl);
1412: po_log.proc_begin(d_mod, 'p_expenditure_item_date_tbl', p_expenditure_item_date_tbl);
1413: po_log.proc_begin(d_mod, 'p_ship_to_ou_id', p_ship_to_ou_id);
1414: po_log.proc_begin(d_mod, 'p_deliver_to_person_id_tbl', p_deliver_to_person_id_tbl);
1415: po_log.proc_begin(d_mod, 'p_agent_id_tbl', p_agent_id_tbl);
1416: po_log.proc_begin(d_mod, 'p_txn_flow_header_id_tbl', p_txn_flow_header_id_tbl);
1409: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
1410: po_log.proc_begin(d_mod, 'p_need_by_date_tbl', p_need_by_date_tbl);
1411: po_log.proc_begin(d_mod, 'p_promised_date_tbl', p_promised_date_tbl);
1412: po_log.proc_begin(d_mod, 'p_expenditure_item_date_tbl', p_expenditure_item_date_tbl);
1413: po_log.proc_begin(d_mod, 'p_ship_to_ou_id', p_ship_to_ou_id);
1414: po_log.proc_begin(d_mod, 'p_deliver_to_person_id_tbl', p_deliver_to_person_id_tbl);
1415: po_log.proc_begin(d_mod, 'p_agent_id_tbl', p_agent_id_tbl);
1416: po_log.proc_begin(d_mod, 'p_txn_flow_header_id_tbl', p_txn_flow_header_id_tbl);
1417: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
1410: po_log.proc_begin(d_mod, 'p_need_by_date_tbl', p_need_by_date_tbl);
1411: po_log.proc_begin(d_mod, 'p_promised_date_tbl', p_promised_date_tbl);
1412: po_log.proc_begin(d_mod, 'p_expenditure_item_date_tbl', p_expenditure_item_date_tbl);
1413: po_log.proc_begin(d_mod, 'p_ship_to_ou_id', p_ship_to_ou_id);
1414: po_log.proc_begin(d_mod, 'p_deliver_to_person_id_tbl', p_deliver_to_person_id_tbl);
1415: po_log.proc_begin(d_mod, 'p_agent_id_tbl', p_agent_id_tbl);
1416: po_log.proc_begin(d_mod, 'p_txn_flow_header_id_tbl', p_txn_flow_header_id_tbl);
1417: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
1418: END IF;
1411: po_log.proc_begin(d_mod, 'p_promised_date_tbl', p_promised_date_tbl);
1412: po_log.proc_begin(d_mod, 'p_expenditure_item_date_tbl', p_expenditure_item_date_tbl);
1413: po_log.proc_begin(d_mod, 'p_ship_to_ou_id', p_ship_to_ou_id);
1414: po_log.proc_begin(d_mod, 'p_deliver_to_person_id_tbl', p_deliver_to_person_id_tbl);
1415: po_log.proc_begin(d_mod, 'p_agent_id_tbl', p_agent_id_tbl);
1416: po_log.proc_begin(d_mod, 'p_txn_flow_header_id_tbl', p_txn_flow_header_id_tbl);
1417: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
1418: END IF;
1419:
1412: po_log.proc_begin(d_mod, 'p_expenditure_item_date_tbl', p_expenditure_item_date_tbl);
1413: po_log.proc_begin(d_mod, 'p_ship_to_ou_id', p_ship_to_ou_id);
1414: po_log.proc_begin(d_mod, 'p_deliver_to_person_id_tbl', p_deliver_to_person_id_tbl);
1415: po_log.proc_begin(d_mod, 'p_agent_id_tbl', p_agent_id_tbl);
1416: po_log.proc_begin(d_mod, 'p_txn_flow_header_id_tbl', p_txn_flow_header_id_tbl);
1417: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
1418: END IF;
1419:
1420: FOR i IN 1 .. p_id_tbl.COUNT LOOP
1413: po_log.proc_begin(d_mod, 'p_ship_to_ou_id', p_ship_to_ou_id);
1414: po_log.proc_begin(d_mod, 'p_deliver_to_person_id_tbl', p_deliver_to_person_id_tbl);
1415: po_log.proc_begin(d_mod, 'p_agent_id_tbl', p_agent_id_tbl);
1416: po_log.proc_begin(d_mod, 'p_txn_flow_header_id_tbl', p_txn_flow_header_id_tbl);
1417: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
1418: END IF;
1419:
1420: FOR i IN 1 .. p_id_tbl.COUNT LOOP
1421: IF (p_project_acct_ctx_tbl(i) = 'Y') THEN
1468: x_result_type := po_validations.c_result_type_failure;
1469: END IF;
1470: END LOOP;
1471:
1472: IF po_log.d_proc THEN
1473: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1474: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
1475: END IF;
1476: EXCEPTION
1469: END IF;
1470: END LOOP;
1471:
1472: IF po_log.d_proc THEN
1473: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1474: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
1475: END IF;
1476: EXCEPTION
1477: WHEN OTHERS THEN
1470: END LOOP;
1471:
1472: IF po_log.d_proc THEN
1473: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1474: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
1475: END IF;
1476: EXCEPTION
1477: WHEN OTHERS THEN
1478: IF po_log.d_exc THEN
1474: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
1475: END IF;
1476: EXCEPTION
1477: WHEN OTHERS THEN
1478: IF po_log.d_exc THEN
1479: po_log.exc(d_mod, 0, NULL);
1480: END IF;
1481:
1482: RAISE;
1475: END IF;
1476: EXCEPTION
1477: WHEN OTHERS THEN
1478: IF po_log.d_exc THEN
1479: po_log.exc(d_mod, 0, NULL);
1480: END IF;
1481:
1482: RAISE;
1483: END project_info;
1500: END IF;
1501:
1502: x_result_type := po_validations.c_result_type_success;
1503:
1504: IF po_log.d_proc THEN
1505: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1506: po_log.proc_begin(d_mod, 'p_recovery_override_flag_tbl', p_recovery_override_flag_tbl);
1507: po_log.proc_begin(d_mod, 'p_allow_tax_rate_override', p_allow_tax_rate_override);
1508: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
1501:
1502: x_result_type := po_validations.c_result_type_success;
1503:
1504: IF po_log.d_proc THEN
1505: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1506: po_log.proc_begin(d_mod, 'p_recovery_override_flag_tbl', p_recovery_override_flag_tbl);
1507: po_log.proc_begin(d_mod, 'p_allow_tax_rate_override', p_allow_tax_rate_override);
1508: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
1509: END IF;
1502: x_result_type := po_validations.c_result_type_success;
1503:
1504: IF po_log.d_proc THEN
1505: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1506: po_log.proc_begin(d_mod, 'p_recovery_override_flag_tbl', p_recovery_override_flag_tbl);
1507: po_log.proc_begin(d_mod, 'p_allow_tax_rate_override', p_allow_tax_rate_override);
1508: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
1509: END IF;
1510:
1503:
1504: IF po_log.d_proc THEN
1505: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1506: po_log.proc_begin(d_mod, 'p_recovery_override_flag_tbl', p_recovery_override_flag_tbl);
1507: po_log.proc_begin(d_mod, 'p_allow_tax_rate_override', p_allow_tax_rate_override);
1508: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
1509: END IF;
1510:
1511: IF (p_allow_tax_rate_override <> 'Y') THEN
1504: IF po_log.d_proc THEN
1505: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1506: po_log.proc_begin(d_mod, 'p_recovery_override_flag_tbl', p_recovery_override_flag_tbl);
1507: po_log.proc_begin(d_mod, 'p_allow_tax_rate_override', p_allow_tax_rate_override);
1508: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
1509: END IF;
1510:
1511: IF (p_allow_tax_rate_override <> 'Y') THEN
1512: FOR i IN 1 .. p_id_tbl.COUNT LOOP
1520: END IF;
1521: END LOOP;
1522: END IF;
1523:
1524: IF po_log.d_proc THEN
1525: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1526: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
1527: END IF;
1528: EXCEPTION
1521: END LOOP;
1522: END IF;
1523:
1524: IF po_log.d_proc THEN
1525: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1526: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
1527: END IF;
1528: EXCEPTION
1529: WHEN OTHERS THEN
1522: END IF;
1523:
1524: IF po_log.d_proc THEN
1525: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1526: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
1527: END IF;
1528: EXCEPTION
1529: WHEN OTHERS THEN
1530: IF po_log.d_exc THEN
1526: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
1527: END IF;
1528: EXCEPTION
1529: WHEN OTHERS THEN
1530: IF po_log.d_exc THEN
1531: po_log.exc(d_mod, 0, NULL);
1532: END IF;
1533:
1534: RAISE;
1527: END IF;
1528: EXCEPTION
1529: WHEN OTHERS THEN
1530: IF po_log.d_exc THEN
1531: po_log.exc(d_mod, 0, NULL);
1532: END IF;
1533:
1534: RAISE;
1535: END tax_recovery_override_flag;
1552: d_mod CONSTANT VARCHAR2(100) := d_ACRN_value_valid;
1553: l_is_ACRN_enabled VARCHAR2(1);
1554: l_org_id NUMBER;
1555: BEGIN
1556: IF PO_LOG.d_proc THEN
1557: PO_LOG.proc_begin(d_mod,'p_dist_id_tbl',p_dist_id_tbl);
1558: PO_LOG.proc_begin(d_mod,'p_style_id_tbl',p_style_id_tbl);
1559: PO_LOG.proc_begin(d_mod,'p_ACRN_tbl',p_ACRN_tbl);
1560: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
1553: l_is_ACRN_enabled VARCHAR2(1);
1554: l_org_id NUMBER;
1555: BEGIN
1556: IF PO_LOG.d_proc THEN
1557: PO_LOG.proc_begin(d_mod,'p_dist_id_tbl',p_dist_id_tbl);
1558: PO_LOG.proc_begin(d_mod,'p_style_id_tbl',p_style_id_tbl);
1559: PO_LOG.proc_begin(d_mod,'p_ACRN_tbl',p_ACRN_tbl);
1560: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
1561: END IF;
1554: l_org_id NUMBER;
1555: BEGIN
1556: IF PO_LOG.d_proc THEN
1557: PO_LOG.proc_begin(d_mod,'p_dist_id_tbl',p_dist_id_tbl);
1558: PO_LOG.proc_begin(d_mod,'p_style_id_tbl',p_style_id_tbl);
1559: PO_LOG.proc_begin(d_mod,'p_ACRN_tbl',p_ACRN_tbl);
1560: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
1561: END IF;
1562:
1555: BEGIN
1556: IF PO_LOG.d_proc THEN
1557: PO_LOG.proc_begin(d_mod,'p_dist_id_tbl',p_dist_id_tbl);
1558: PO_LOG.proc_begin(d_mod,'p_style_id_tbl',p_style_id_tbl);
1559: PO_LOG.proc_begin(d_mod,'p_ACRN_tbl',p_ACRN_tbl);
1560: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
1561: END IF;
1562:
1563: IF (x_results IS NULL) THEN
1556: IF PO_LOG.d_proc THEN
1557: PO_LOG.proc_begin(d_mod,'p_dist_id_tbl',p_dist_id_tbl);
1558: PO_LOG.proc_begin(d_mod,'p_style_id_tbl',p_style_id_tbl);
1559: PO_LOG.proc_begin(d_mod,'p_ACRN_tbl',p_ACRN_tbl);
1560: PO_LOG.log(PO_LOG.c_PROC_BEGIN,d_mod,NULL,'x_results',x_results);
1561: END IF;
1562:
1563: IF (x_results IS NULL) THEN
1564: x_results := PO_VALIDATION_RESULTS_TYPE.new_instance();
1606:
1607: END LOOP;
1608:
1609:
1610: IF PO_LOG.d_proc THEN
1611: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
1612: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
1613: END IF;
1614:
1607: END LOOP;
1608:
1609:
1610: IF PO_LOG.d_proc THEN
1611: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
1612: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
1613: END IF;
1614:
1615: EXCEPTION
1608:
1609:
1610: IF PO_LOG.d_proc THEN
1611: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
1612: PO_LOG.log(PO_LOG.c_PROC_END,d_mod,NULL,'x_results',x_results);
1613: END IF;
1614:
1615: EXCEPTION
1616: WHEN OTHERS THEN
1613: END IF;
1614:
1615: EXCEPTION
1616: WHEN OTHERS THEN
1617: IF PO_LOG.d_exc THEN
1618: PO_LOG.exc(d_mod,0,NULL);
1619: END IF;
1620: RAISE;
1621:
1614:
1615: EXCEPTION
1616: WHEN OTHERS THEN
1617: IF PO_LOG.d_exc THEN
1618: PO_LOG.exc(d_mod,0,NULL);
1619: END IF;
1620: RAISE;
1621:
1622: END ACRN_value_valid;
1653: END IF;
1654:
1655: x_result_type := po_validations.c_result_type_success;
1656:
1657: IF po_log.d_proc THEN
1658: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1659: po_log.proc_begin(d_mod, 'p_partial_funded_flag_tbl', p_partial_funded_flag_tbl);
1660: po_log.proc_begin(d_mod, 'p_funded_value_tbl', p_funded_value_tbl);
1661: po_log.proc_begin(d_mod, 'p_style_id_tbl', p_style_id_tbl);
1654:
1655: x_result_type := po_validations.c_result_type_success;
1656:
1657: IF po_log.d_proc THEN
1658: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1659: po_log.proc_begin(d_mod, 'p_partial_funded_flag_tbl', p_partial_funded_flag_tbl);
1660: po_log.proc_begin(d_mod, 'p_funded_value_tbl', p_funded_value_tbl);
1661: po_log.proc_begin(d_mod, 'p_style_id_tbl', p_style_id_tbl);
1662: po_log.proc_begin(d_mod, 'p_po_encumberance_flag', p_po_encumberance_flag);
1655: x_result_type := po_validations.c_result_type_success;
1656:
1657: IF po_log.d_proc THEN
1658: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1659: po_log.proc_begin(d_mod, 'p_partial_funded_flag_tbl', p_partial_funded_flag_tbl);
1660: po_log.proc_begin(d_mod, 'p_funded_value_tbl', p_funded_value_tbl);
1661: po_log.proc_begin(d_mod, 'p_style_id_tbl', p_style_id_tbl);
1662: po_log.proc_begin(d_mod, 'p_po_encumberance_flag', p_po_encumberance_flag);
1663: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
1656:
1657: IF po_log.d_proc THEN
1658: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1659: po_log.proc_begin(d_mod, 'p_partial_funded_flag_tbl', p_partial_funded_flag_tbl);
1660: po_log.proc_begin(d_mod, 'p_funded_value_tbl', p_funded_value_tbl);
1661: po_log.proc_begin(d_mod, 'p_style_id_tbl', p_style_id_tbl);
1662: po_log.proc_begin(d_mod, 'p_po_encumberance_flag', p_po_encumberance_flag);
1663: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
1664: END IF;
1657: IF po_log.d_proc THEN
1658: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1659: po_log.proc_begin(d_mod, 'p_partial_funded_flag_tbl', p_partial_funded_flag_tbl);
1660: po_log.proc_begin(d_mod, 'p_funded_value_tbl', p_funded_value_tbl);
1661: po_log.proc_begin(d_mod, 'p_style_id_tbl', p_style_id_tbl);
1662: po_log.proc_begin(d_mod, 'p_po_encumberance_flag', p_po_encumberance_flag);
1663: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
1664: END IF;
1665:
1658: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1659: po_log.proc_begin(d_mod, 'p_partial_funded_flag_tbl', p_partial_funded_flag_tbl);
1660: po_log.proc_begin(d_mod, 'p_funded_value_tbl', p_funded_value_tbl);
1661: po_log.proc_begin(d_mod, 'p_style_id_tbl', p_style_id_tbl);
1662: po_log.proc_begin(d_mod, 'p_po_encumberance_flag', p_po_encumberance_flag);
1663: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
1664: END IF;
1665:
1666: d_position := 10;
1659: po_log.proc_begin(d_mod, 'p_partial_funded_flag_tbl', p_partial_funded_flag_tbl);
1660: po_log.proc_begin(d_mod, 'p_funded_value_tbl', p_funded_value_tbl);
1661: po_log.proc_begin(d_mod, 'p_style_id_tbl', p_style_id_tbl);
1662: po_log.proc_begin(d_mod, 'p_po_encumberance_flag', p_po_encumberance_flag);
1663: po_log.LOG(po_log.c_proc_begin, d_mod, NULL, 'x_results', x_results);
1664: END IF;
1665:
1666: d_position := 10;
1667:
1669: IF (p_partial_funded_flag_tbl(i) = 'Y' AND p_po_encumberance_flag = 'N') THEN
1670:
1671: d_position := 20;
1672:
1673: IF (PO_LOG.d_stmt) THEN
1674: PO_LOG.stmt(d_mod, d_position, 'Purchase order Encumbrance for this Organization is not enabled');
1675: END IF;
1676: x_results.add_result(p_entity_type => c_entity_type_distribution,
1677: p_entity_id => p_id_tbl(i),
1670:
1671: d_position := 20;
1672:
1673: IF (PO_LOG.d_stmt) THEN
1674: PO_LOG.stmt(d_mod, d_position, 'Purchase order Encumbrance for this Organization is not enabled');
1675: END IF;
1676: x_results.add_result(p_entity_type => c_entity_type_distribution,
1677: p_entity_id => p_id_tbl(i),
1678: p_column_name => 'PARTIAL_FUNDED_FLAG',
1682: ELSIF (p_partial_funded_flag_tbl(i) = 'Y' AND p_po_encumberance_flag = 'Y') THEN
1683:
1684: d_position := 30;
1685:
1686: IF (PO_LOG.d_stmt) THEN
1687: PO_LOG.stmt(d_mod, d_position, 'Check for CLM enabled Flag of Style Id');
1688: END IF;
1689:
1690: BEGIN
1683:
1684: d_position := 30;
1685:
1686: IF (PO_LOG.d_stmt) THEN
1687: PO_LOG.stmt(d_mod, d_position, 'Check for CLM enabled Flag of Style Id');
1688: END IF;
1689:
1690: BEGIN
1691: SELECT Count(1) INTO style_id_exists
1693: WHERE style_id = Nvl(p_style_id_tbl(i),-1)
1694: AND Nvl(clm_flag,'N') = 'Y';
1695: EXCEPTION
1696: WHEN NO_DATA_FOUND THEN
1697: IF po_log.d_proc THEN
1698: po_log.proc_begin(d_mod, 'CLM Flag is not enabled for the Style ID ', p_style_id_tbl(i));
1699: END IF;
1700: END;
1701:
1694: AND Nvl(clm_flag,'N') = 'Y';
1695: EXCEPTION
1696: WHEN NO_DATA_FOUND THEN
1697: IF po_log.d_proc THEN
1698: po_log.proc_begin(d_mod, 'CLM Flag is not enabled for the Style ID ', p_style_id_tbl(i));
1699: END IF;
1700: END;
1701:
1702: IF (style_id_exists = 0) THEN
1708: p_message_name => 'PO_PDOI_PF_FLAG_CLM');
1709: x_result_type := po_validations.c_result_type_failure;
1710: ELSIF (p_funded_value_tbl(i) < 0) THEN
1711: d_position := 50;
1712: IF po_log.d_proc THEN
1713: po_log.proc_begin(d_mod, 'Negative Funded Value ', p_funded_value_tbl(i));
1714: END IF;
1715: x_results.add_result(p_entity_type => c_entity_type_distribution,
1716: p_entity_id => p_id_tbl(i),
1709: x_result_type := po_validations.c_result_type_failure;
1710: ELSIF (p_funded_value_tbl(i) < 0) THEN
1711: d_position := 50;
1712: IF po_log.d_proc THEN
1713: po_log.proc_begin(d_mod, 'Negative Funded Value ', p_funded_value_tbl(i));
1714: END IF;
1715: x_results.add_result(p_entity_type => c_entity_type_distribution,
1716: p_entity_id => p_id_tbl(i),
1717: p_column_name => 'PARTIAL_FUNDED_FLAG',
1720: x_result_type := po_validations.c_result_type_failure;
1721: END IF;
1722: END IF;
1723: END LOOP;
1724: IF po_log.d_proc THEN
1725: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1726: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
1727: END IF;
1728: EXCEPTION
1721: END IF;
1722: END IF;
1723: END LOOP;
1724: IF po_log.d_proc THEN
1725: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1726: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
1727: END IF;
1728: EXCEPTION
1729: WHEN OTHERS THEN
1722: END IF;
1723: END LOOP;
1724: IF po_log.d_proc THEN
1725: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1726: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
1727: END IF;
1728: EXCEPTION
1729: WHEN OTHERS THEN
1730: IF po_log.d_exc THEN
1726: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
1727: END IF;
1728: EXCEPTION
1729: WHEN OTHERS THEN
1730: IF po_log.d_exc THEN
1731: po_log.exc(d_mod, 0, NULL);
1732: END IF;
1733:
1734: RAISE;
1727: END IF;
1728: EXCEPTION
1729: WHEN OTHERS THEN
1730: IF po_log.d_exc THEN
1731: po_log.exc(d_mod, 0, NULL);
1732: END IF;
1733:
1734: RAISE;
1735: END partial_funded_flag;