[Home] [Help]
1: PACKAGE BODY po_val_distributions2 AS
2: -- $Header: PO_VAL_DISTRIBUTIONS2.plb 120.14.12010000.2 2008/12/18 13:27:38 ggandhi 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.
44: IF (x_results IS NULL) THEN
45: x_results := po_validation_results_type.new_instance();
46: END IF;
47:
48: x_result_type := po_validations.c_result_type_success;
49:
50: IF po_log.d_proc THEN
51: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
52: po_log.proc_begin(d_mod, 'p_amount_ordered_tbl', p_amount_ordered_tbl);
61: p_entity_id => p_id_tbl(i),
62: p_column_name => 'AMOUNT_ORDERED',
63: p_column_val => p_amount_ordered_tbl(i),
64: p_message_name => 'PO_PDOI_SVC_MUST_AMT');
65: x_result_type := po_validations.c_result_type_failure;
66: END IF;
67: ELSE
68: IF (NVL(p_amount_ordered_tbl(i), 0) <> 0) THEN
69: x_results.add_result(p_entity_type => c_entity_type_distribution,
70: p_entity_id => p_id_tbl(i),
71: p_column_name => 'AMOUNT_ORDERED',
72: p_column_val => p_amount_ordered_tbl(i),
73: p_message_name => 'PO_SVC_NO_AMT');
74: x_result_type := po_validations.c_result_type_failure;
75: END IF;
76: END IF;
77: END LOOP;
78:
108: IF (x_results IS NULL) THEN
109: x_results := po_validation_results_type.new_instance();
110: END IF;
111:
112: x_result_type := po_validations.c_result_type_success;
113:
114: IF po_log.d_proc THEN
115: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
116: po_log.proc_begin(d_mod, 'p_quantity_ordered_tbl', p_quantity_ordered_tbl);
125: p_entity_id => p_id_tbl(i),
126: p_column_name => 'QUANTITY_ORDERED',
127: p_column_val => p_quantity_ordered_tbl(i),
128: p_message_name => 'PO_SVC_NO_QTY');
129: x_result_type := po_validations.c_result_type_failure;
130: END IF;
131: ELSE
132: IF (NVL(p_quantity_ordered_tbl(i), 0) <= 0) THEN
133: x_results.add_result(p_entity_type => c_entity_type_distribution,
134: p_entity_id => p_id_tbl(i),
135: p_column_name => 'QUANTITY_ORDERED',
136: p_column_val => p_quantity_ordered_tbl(i),
137: p_message_name => 'PO_PDOI_INVALID_QTY');
138: x_result_type := po_validations.c_result_type_failure;
139: END IF;
140: END IF;
141: END LOOP;
142:
169: IF (x_results IS NULL) THEN
170: x_results := po_validation_results_type.new_instance();
171: END IF;
172:
173: x_result_type := po_validations.c_result_type_success;
174:
175: IF po_log.d_proc THEN
176: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
177: po_log.proc_begin(d_mod, 'p_dest_org_id_tbl', p_dest_org_id_tbl);
187: p_column_val => p_dest_org_id_tbl(i),
188: p_message_name => 'PO_PDOI_INVALID_DEST_ORG',
189: p_token1_name => 'DESTINATION_ORGANIZATION',
190: p_token1_value => p_dest_org_id_tbl(i));
191: x_result_type := po_validations.c_result_type_failure;
192: END IF;
193: END LOOP;
194:
195: IF po_log.d_proc THEN
219: IS
220: d_mod CONSTANT VARCHAR2(100) := d_deliver_to_location_id;
221: BEGIN
222: IF x_result_set_id IS NULL THEN
223: x_result_set_id := po_validations.next_result_set_id();
224: END IF;
225:
226: x_result_type := po_validations.c_result_type_success;
227:
222: IF x_result_set_id IS NULL THEN
223: x_result_set_id := po_validations.next_result_set_id();
224: END IF;
225:
226: x_result_type := po_validations.c_result_type_success;
227:
228: IF po_log.d_proc THEN
229: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
230: po_log.proc_begin(d_mod, 'p_ship_to_org_id_tbl', p_ship_to_org_id_tbl);
243: column_val,
244: token1_name,
245: token1_value)
246: SELECT x_result_set_id,
247: po_validations.c_result_type_failure,
248: c_entity_type_distribution,
249: p_id_tbl(i),
250: 'PO_PDOI_INVALID_DEL_LOCATION',
251: 'DELIVER_TO_LOCATION_ID',
266: WHERE NVL(address_expiration_date, TRUNC(SYSDATE + 1)) > TRUNC(SYSDATE)
267: AND location_id = p_deliver_to_location_id_tbl(i));
268:
269: IF (SQL%ROWCOUNT > 0) THEN
270: x_result_type := po_validations.c_result_type_failure;
271: END IF;
272:
273: IF po_log.d_proc THEN
274: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
270: x_result_type := po_validations.c_result_type_failure;
271: END IF;
272:
273: IF po_log.d_proc THEN
274: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
275: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
276: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
277: END IF;
278: EXCEPTION
305: BEGIN
306: d_position := 0;
307:
308: IF x_result_set_id IS NULL THEN
309: x_result_set_id := po_validations.next_result_set_id();
310: END IF;
311:
312: x_result_type := po_validations.c_result_type_success;
313:
308: IF x_result_set_id IS NULL THEN
309: x_result_set_id := po_validations.next_result_set_id();
310: END IF;
311:
312: x_result_type := po_validations.c_result_type_success;
313:
314: IF po_log.d_proc THEN
315: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
316: po_log.proc_begin(d_mod, 'p_deliver_to_person_id_tbl', p_deliver_to_person_id_tbl);
358: column_val,
359: token1_name,
360: token1_value)
361: SELECT x_result_set_id,
362: po_validations.c_result_type_failure,
363: c_entity_type_distribution,
364: p_id_tbl(i),
365: 'PO_PDOI_INVALID_DEL_PERSON',
366: 'DELIVER_TO_PERSON_ID',
384: AND P.business_group_id = l_fsp_business_group_id
385: AND A.assignment_type IN ('E',l_assignment_type));
386:
387: IF (SQL%ROWCOUNT > 0) THEN
388: x_result_type := po_validations.c_result_type_failure;
389: END IF;
390:
391: IF po_log.d_proc THEN
392: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
388: x_result_type := po_validations.c_result_type_failure;
389: END IF;
390:
391: IF po_log.d_proc THEN
392: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
393: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
394: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
395: END IF;
396: EXCEPTION
456:
457: d_position := 0;
458:
459: IF x_result_set_id IS NULL THEN
460: x_result_set_id := po_validations.next_result_set_id();
461: END IF;
462:
463: IF (x_results IS NULL) THEN
464: x_results := po_validation_results_type.new_instance();
463: IF (x_results IS NULL) THEN
464: x_results := po_validation_results_type.new_instance();
465: END IF;
466:
467: x_result_type := po_validations.c_result_type_success;
468:
469: d_position := 10;
470:
471: IF po_log.d_proc THEN
493: p_column_val => p_dest_type_code_tbl(i),
494: p_message_name => 'PO_PDOI_INVALID_DEST_TYPE',
495: p_token1_name => 'DESTINATION_TYPE',
496: p_token1_value => p_dest_type_code_tbl(i));
497: x_result_type := po_validations.c_result_type_failure;
498: END IF;
499: -- If SHIKYU item, destination type must be INVENTORY.
500: IF (p_dest_type_code_tbl(i) <> 'INVENTORY' AND p_loc_outsourced_assembly_tbl(i) = 1) THEN
501: x_results.add_result(p_entity_type => c_entity_type_distribution,
502: p_entity_id => p_id_tbl(i),
503: p_column_name => 'DESTINATION_TYPE_CODE',
504: p_column_val => p_dest_type_code_tbl(i),
505: p_message_name => 'PO_PDOI_SHIKYU_DEST_TYPE');
506: x_result_type := po_validations.c_result_type_failure;
507: END IF;
508: END LOOP;
509:
510: d_position := 30;
576: column_val,
577: token1_name,
578: token1_value)
579: SELECT x_result_set_id,
580: po_validations.c_result_type_failure,
581: c_entity_type_distribution,
582: p_id_tbl(i),
583: 'PO_PDOI_INVALID_DEST_TYPE',
584: 'DESTINATION_TYPE_CODE',
613: )
614: AND lookup_code= p_dest_type_code_tbl(i));
615:
616: IF (SQL%ROWCOUNT > 0) THEN
617: x_result_type := po_validations.c_result_type_failure;
618: END IF;
619:
620: d_position := 80;
621:
619:
620: d_position := 80;
621:
622: IF po_log.d_proc THEN
623: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
624: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
625: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
626: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
627: END IF;
655: IS
656: d_mod CONSTANT VARCHAR2(100) := d_destination_subinv;
657: BEGIN
658: IF x_result_set_id IS NULL THEN
659: x_result_set_id := po_validations.next_result_set_id();
660: END IF;
661:
662: IF (x_results IS NULL) THEN
663: x_results := po_validation_results_type.new_instance();
662: IF (x_results IS NULL) THEN
663: x_results := po_validation_results_type.new_instance();
664: END IF;
665:
666: x_result_type := po_validations.c_result_type_success;
667:
668: IF po_log.d_proc THEN
669: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
670: po_log.proc_begin(d_mod, 'p_destination_subinv_tbl', p_destination_subinv_tbl);
682: p_entity_id => p_id_tbl(i),
683: p_column_name => 'DESTINATION_SUBINVENTORY',
684: p_column_val => p_destination_subinv_tbl(i),
685: p_message_name => 'PO_PDOI_INVALID_DEST_SUBINV');
686: x_result_type := po_validations.c_result_type_failure;
687: END IF;
688: END LOOP;
689:
690: FORALL i IN 1 .. p_id_tbl.COUNT
698: column_val,
699: token1_name,
700: token1_value)
701: SELECT x_result_set_id,
702: po_validations.c_result_type_failure,
703: c_entity_type_distribution,
704: p_id_tbl(i),
705: 'PO_PDOI_INVALID_DEST_SUBINV',
706: 'DESTINATION_SUBINVENTORY',
733: AND mis.secondary_inventory = msub.secondary_inventory_name))))))
734: AND msub.secondary_inventory_name = p_destination_subinv_tbl(i));
735:
736: IF (SQL%ROWCOUNT > 0) THEN
737: x_result_type := po_validations.c_result_type_failure;
738: END IF;
739:
740: -- Need to validate that SHIKYU item can only have asset subinventory (inventory_asset = 1).
741: FORALL i IN 1 .. p_id_tbl.COUNT
749: column_val,
750: token1_name,
751: token1_value)
752: SELECT x_result_set_id,
753: po_validations.c_result_type_failure,
754: c_entity_type_distribution,
755: p_id_tbl(i),
756: 'PO_PDOI_SHIKYU_DEST_SUBINV',
757: 'DESTINATION_SUBINVENTORY',
770: AND msub.asset_inventory = 2 /* Not asset subinventory */
771: AND msub.secondary_inventory_name = p_destination_subinv_tbl(i));
772:
773: IF (SQL%ROWCOUNT > 0) THEN
774: x_result_type := po_validations.c_result_type_failure;
775: END IF;
776:
777: IF po_log.d_proc THEN
778: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
774: x_result_type := po_validations.c_result_type_failure;
775: END IF;
776:
777: IF po_log.d_proc THEN
778: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
779: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
780: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
781: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
782: END IF;
816: IS
817: d_mod CONSTANT VARCHAR2(100) := d_wip_entity_id;
818: BEGIN
819: IF x_result_set_id IS NULL THEN
820: x_result_set_id := po_validations.next_result_set_id();
821: END IF;
822:
823: IF (x_results IS NULL) THEN
824: x_results := po_validation_results_type.new_instance();
823: IF (x_results IS NULL) THEN
824: x_results := po_validation_results_type.new_instance();
825: END IF;
826:
827: x_result_type := po_validations.c_result_type_success;
828:
829: IF po_log.d_proc THEN
830: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
831: po_log.proc_begin(d_mod, 'p_wip_entity_id_tbl', p_wip_entity_id_tbl);
844: p_column_val => p_wip_entity_id_tbl(i),
845: p_message_name => 'PO_PDOI_COLUMN_NOT_NULL',
846: p_token1_name => 'COLUMN_NAME',
847: p_token1_value => 'WIP_ENTITY_ID');
848: x_result_type := po_validations.c_result_type_failure;
849: END IF;
850: END LOOP;
851:
852: FORALL i IN 1 .. p_id_tbl.COUNT
860: column_val,
861: token1_name,
862: token1_value)
863: SELECT x_result_set_id,
864: po_validations.c_result_type_failure,
865: c_entity_type_distribution,
866: p_id_tbl(i),
867: 'PO_PDOI_INVALID_WIP_SCHED',
868: 'WIP_REPETITIVE_SCHEDULE_ID',
881: AND wrs.repetitive_schedule_id = p_wip_rep_schedule_id_tbl(i)
882: AND wrs.status_type IN(3, 4, 6));
883:
884: IF (SQL%ROWCOUNT > 0) THEN
885: x_result_type := po_validations.c_result_type_failure;
886: END IF;
887:
888: FORALL i IN 1 .. p_id_tbl.COUNT
889: INSERT INTO po_validation_results_gt
896: column_val,
897: token1_name,
898: token1_value)
899: SELECT x_result_set_id,
900: po_validations.c_result_type_failure,
901: c_entity_type_distribution,
902: p_id_tbl(i),
903: 'PO_PDOI_INVALID_WIP_ENTITY',
904: 'WIP_ENTITY_ID',
916: AND wdj.wip_entity_id = p_wip_entity_id_tbl(i)
917: AND wdj.status_type IN(3, 4, 6));
918:
919: IF (SQL%ROWCOUNT > 0) THEN
920: x_result_type := po_validations.c_result_type_failure;
921: END IF;
922:
923: IF po_log.d_proc THEN
924: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
920: x_result_type := po_validations.c_result_type_failure;
921: END IF;
922:
923: IF po_log.d_proc THEN
924: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
925: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
926: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
927: po_log.LOG(po_log.c_proc_end, d_mod, NULL, 'x_results', x_results);
928: END IF;
952: IF (x_results IS NULL) THEN
953: x_results := po_validation_results_type.new_instance();
954: END IF;
955:
956: x_result_type := po_validations.c_result_type_success;
957:
958: IF po_log.d_proc THEN
959: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
960: po_log.proc_begin(d_mod, 'p_prevent_encum_flag_tbl', p_prevent_encum_flag_tbl);
969: p_entity_id => p_id_tbl(i),
970: p_column_name => 'PREVENT_ENCUMBERANCE_FLAG',
971: p_column_val => p_prevent_encum_flag_tbl(i),
972: p_message_name => 'PO_PDOI_INV_PREV_ENCUM_FLAG');
973: x_result_type := po_validations.c_result_type_failure;
974: END IF;
975: END LOOP;
976:
977: IF po_log.d_proc THEN
1002: IS
1003: d_mod CONSTANT VARCHAR2(100) := d_charge_account_id;
1004: BEGIN
1005: IF x_result_set_id IS NULL THEN
1006: x_result_set_id := po_validations.next_result_set_id();
1007: END IF;
1008:
1009: x_result_type := po_validations.c_result_type_success;
1010:
1005: IF x_result_set_id IS NULL THEN
1006: x_result_set_id := po_validations.next_result_set_id();
1007: END IF;
1008:
1009: x_result_type := po_validations.c_result_type_success;
1010:
1011: IF po_log.d_proc THEN
1012: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1013: po_log.proc_begin(d_mod, 'p_charge_account_id_tbl', p_charge_account_id_tbl);
1027: column_val,
1028: token1_name,
1029: token1_value)
1030: SELECT x_result_set_id,
1031: po_validations.c_result_type_failure,
1032: c_entity_type_distribution,
1033: p_id_tbl(i),
1034: decode(p_charge_account_id_tbl(i), NULL, 'PO_PDOI_NO_CHG_ACCT', 'PO_PDOI_INVALID_CHG_ACCOUNT'),
1035: 'CHARGE_ACCOUNT_ID',
1052: AND gcc.chart_of_accounts_id = p_chart_of_account_id
1053: AND gcc.summary_flag = 'N')));
1054:
1055: IF (SQL%ROWCOUNT > 0) THEN
1056: x_result_type := po_validations.c_result_type_failure;
1057: END IF;
1058:
1059: IF po_log.d_proc THEN
1060: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
1056: x_result_type := po_validations.c_result_type_failure;
1057: END IF;
1058:
1059: IF po_log.d_proc THEN
1060: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
1061: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1062: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
1063: END IF;
1064: EXCEPTION
1088: IS
1089: d_mod CONSTANT VARCHAR2(100) := d_budget_account_id;
1090: BEGIN
1091: IF x_result_set_id IS NULL THEN
1092: x_result_set_id := po_validations.next_result_set_id();
1093: END IF;
1094:
1095: x_result_type := po_validations.c_result_type_success;
1096:
1091: IF x_result_set_id IS NULL THEN
1092: x_result_set_id := po_validations.next_result_set_id();
1093: END IF;
1094:
1095: x_result_type := po_validations.c_result_type_success;
1096:
1097: IF po_log.d_proc THEN
1098: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1099: po_log.proc_begin(d_mod, 'p_budget_account_id_tbl', p_budget_account_id_tbl);
1119: column_val,
1120: token1_name,
1121: token1_value)
1122: SELECT x_result_set_id,
1123: po_validations.c_result_type_failure,
1124: c_entity_type_distribution,
1125: p_id_tbl(i),
1126: 'PO_PDOI_INVALID_BUDGET_ACCT',
1127: 'BUDGET_ACCOUNT_ID',
1146: AND gcc.chart_of_accounts_id = p_chart_of_account_id
1147: AND gcc.summary_flag = 'N'));
1148:
1149: IF (SQL%ROWCOUNT > 0) THEN
1150: x_result_type := po_validations.c_result_type_failure;
1151: END IF;
1152:
1153: IF po_log.d_proc THEN
1154: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
1150: x_result_type := po_validations.c_result_type_failure;
1151: END IF;
1152:
1153: IF po_log.d_proc THEN
1154: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
1155: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1156: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
1157: END IF;
1158: EXCEPTION
1182: IS
1183: d_mod CONSTANT VARCHAR2(100) := d_account_id;
1184: BEGIN
1185: IF x_result_set_id IS NULL THEN
1186: x_result_set_id := po_validations.next_result_set_id();
1187: END IF;
1188:
1189: x_result_type := po_validations.c_result_type_success;
1190:
1185: IF x_result_set_id IS NULL THEN
1186: x_result_set_id := po_validations.next_result_set_id();
1187: END IF;
1188:
1189: x_result_type := po_validations.c_result_type_success;
1190:
1191: IF po_log.d_proc THEN
1192: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1193: po_log.proc_begin(d_mod, 'p_account_id_tbl', p_account_id_tbl);
1210: column_val,
1211: token1_name,
1212: token1_value)
1213: SELECT x_result_set_id,
1214: po_validations.c_result_type_failure,
1215: c_entity_type_distribution,
1216: p_id_tbl(i),
1217: p_message_name,
1218: p_column_name,
1234: AND gcc.chart_of_accounts_id = p_chart_of_account_id
1235: AND gcc.summary_flag = 'N');
1236:
1237: IF (SQL%ROWCOUNT > 0) THEN
1238: x_result_type := po_validations.c_result_type_failure;
1239: END IF;
1240:
1241: IF po_log.d_proc THEN
1242: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
1238: x_result_type := po_validations.c_result_type_failure;
1239: END IF;
1240:
1241: IF po_log.d_proc THEN
1242: po_validations.log_validation_results_gt(d_mod, 9, x_result_set_id);
1243: po_log.proc_end(d_mod, 'x_result_type', x_result_type);
1244: po_log.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
1245: END IF;
1246: EXCEPTION
1272: IF (x_results IS NULL) THEN
1273: x_results := po_validation_results_type.new_instance();
1274: END IF;
1275:
1276: x_result_type := po_validations.c_result_type_success;
1277:
1278: IF po_log.d_proc THEN
1279: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1280: po_log.proc_begin(d_mod, 'p_project_acct_ctx_tbl', p_project_acct_ctx_tbl);
1295: p_entity_id => p_id_tbl(i),
1296: p_column_name => 'PROJECT_ACCOUNT_CONTEXT',
1297: p_column_val => p_project_acct_ctx_tbl(i),
1298: p_message_name => 'PO_PDOI_PROJECT_ACCT_CONTEXT');
1299: x_result_type := po_validations.c_result_type_failure;
1300: END IF;
1301: END LOOP;
1302:
1303: IF po_log.d_proc THEN
1353: IF (x_results IS NULL) THEN
1354: x_results := po_validation_results_type.new_instance();
1355: END IF;
1356:
1357: x_result_type := po_validations.c_result_type_success;
1358:
1359: IF po_log.d_proc THEN
1360: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1361: po_log.proc_begin(d_mod, 'p_project_acct_ctx_tbl', p_project_acct_ctx_tbl);
1396: p_column_name => 'PROJECT_ID',
1397: p_column_val => p_project_id_tbl(i),
1398: --Bug# 5117923: corrected the msg name
1399: p_message_name => 'PO_PDOI_INVALID_PROJ_INFO');
1400: x_result_type := po_validations.c_result_type_failure;
1401: END IF;
1402: END IF;
1403:
1404: IF (p_dest_type_code_tbl(i) = 'EXPENSE' AND p_project_id_tbl(i) IS NOT NULL
1407: p_entity_id => p_id_tbl(i),
1408: p_column_name => 'PROJECT_ID',
1409: p_column_val => p_project_id_tbl(i),
1410: p_message_name => 'PO_CROSS_OU_PA_PROJECT_CHECK');
1411: x_result_type := po_validations.c_result_type_failure;
1412: END IF;
1413: END LOOP;
1414:
1415: IF po_log.d_proc THEN
1441: IF (x_results IS NULL) THEN
1442: x_results := po_validation_results_type.new_instance();
1443: END IF;
1444:
1445: x_result_type := po_validations.c_result_type_success;
1446:
1447: IF po_log.d_proc THEN
1448: po_log.proc_begin(d_mod, 'p_id_tbl', p_id_tbl);
1449: po_log.proc_begin(d_mod, 'p_recovery_override_flag_tbl', p_recovery_override_flag_tbl);
1458: p_entity_id => p_id_tbl(i),
1459: p_column_name => 'TAX_RECOVERY_OVERRIDE_FLAG',
1460: p_column_val => p_recovery_override_flag_tbl(i),
1461: p_message_name => 'PO_PDOI_NO_TAX_RATE_OVERRIDE');
1462: x_result_type := po_validations.c_result_type_failure;
1463: END IF;
1464: END LOOP;
1465: END IF;
1466: