84:
85: IF (l_debug = 1) THEN
86: debug_print('Invalid Logical Transaction Type Code', 9);
87: END IF;
88: fnd_message.set_name('INV', 'INV_INT_LOGTRXCODE');
89: fnd_msg_pub.ADD;
90: RAISE fnd_api.g_exc_error;
91:
92: END IF;
101: IF (p_mtl_trx_tbl(i).transaction_type_id) IS NULL THEN
102: IF (l_debug = 1) THEN
103: debug_print('Transaction Type is null ', 9);
104: END IF;
105: fnd_message.set_name('INV', 'INV_INT_TRXTYPCODE');
106: fnd_msg_pub.ADD;
107: RAISE fnd_api.g_exc_error;
108:
109: END IF;
120: WHEN no_data_found THEN
121: IF (l_debug = 1) THEN
122: debug_print('Transaction Type not found ', 9);
123: END IF;
124: fnd_message.set_name('INV', 'INV_INT_TRXTYPCODE');
125: fnd_msg_pub.ADD;
126: RAISE fnd_api.g_exc_error;
127: END;
128:
129: IF l_count <> 1 THEN
130: IF (l_debug = 1) THEN
131: debug_print('Transaction Type not found ', 9);
132: END IF;
133: fnd_message.set_name('INV', 'INV_INT_TRXTYPCODE');
134: fnd_msg_pub.ADD;
135: RAISE fnd_api.g_exc_error;
136:
137: END IF;
153: l_transaction_source_type_id, 9);
154: debug_print('Transaction Action ID : ' ||
155: l_transaction_action_id, 9);
156: END IF;
157: fnd_message.set_name('INV', 'INV_INT_TRXTYPCODE');
158: fnd_msg_pub.ADD;
159: RAISE fnd_api.g_exc_error;
160:
161: END IF;
172: INV_GLOBALS.G_ACTION_LOGICALRECEIPT)) THEN
173: IF (l_debug = 1) THEN
174: debug_print('Transaction Action is invalid', 9);
175: END IF;
176: fnd_message.set_name('INV', 'INV_INT_TRXACTCODE');
177: fnd_msg_pub.ADD;
178: RAISE fnd_api.g_exc_error;
179:
180: END IF;
195: IF (l_debug = 1) THEN
196: debug_print('Org. not found :' ||
197: p_mtl_trx_tbl(i).organization_id, 9);
198: END IF;
199: fnd_message.set_name('INV', 'INV_INT_ORGCODE');
200: fnd_msg_pub.ADD;
201: RAISE fnd_api.g_exc_error;
202: END;
203:
205: IF (l_debug = 1) THEN
206: debug_print('Invalid Organization :' ||
207: p_mtl_trx_tbl(i).organization_id, 9);
208: END IF;
209: fnd_message.set_name('INV', 'INV_INT_XORGCODE');
210: fnd_msg_pub.ADD;
211: RAISE fnd_api.g_exc_error;
212:
213: END IF;
227: IF (p_mtl_trx_tbl(i).transfer_organization_id IS NULL) THEN
228: IF (l_debug = 1) THEN
229: debug_print('Transfer Org. is null', 9);
230: END IF;
231: fnd_message.set_name('INV', 'INV_INT_XORGCODE');
232: fnd_msg_pub.ADD;
233: RAISE fnd_api.g_exc_error;
234: END IF;
235:
245: IF (l_debug = 1) THEN
246: debug_print('Transfer Org. not found :' ||
247: p_mtl_trx_tbl(i).transfer_organization_id, 9);
248: END IF;
249: fnd_message.set_name('INV', 'INV_INT_XORGCODE');
250: fnd_msg_pub.ADD;
251: RAISE fnd_api.g_exc_error;
252: END;
253:
256: debug_print('Invalid Transfer Organization :' ||
257: p_mtl_trx_tbl(i).transfer_organization_id,
258: 9);
259: END IF;
260: fnd_message.set_name('INV', 'INV_INT_XORGCODE');
261: fnd_msg_pub.ADD;
262: RAISE fnd_api.g_exc_error;
263:
264: END IF;
276: WHEN no_data_found THEN
277: IF (l_debug = 1) THEN
278: debug_print('Item not found', 9);
279: END IF;
280: fnd_message.set_name('INV', 'INV_INT_ITMCODE');
281: fnd_msg_pub.ADD;
282: RAISE fnd_api.g_exc_error;
283: END;
284:
286: IF (l_debug = 1) THEN
287: debug_print('Invalid item in the current Org. :' ||
288: p_mtl_trx_tbl(i).inventory_item_id, 9);
289: END IF;
290: fnd_message.set_name('INV', 'INV_INT_ITMCODE');
291: fnd_msg_pub.ADD;
292: RAISE fnd_api.g_exc_error;
293:
294: END IF;
312: IF (l_debug = 1) THEN
313: debug_print('Item not found in the transfer Org. :'
314: || p_mtl_trx_tbl(i).inventory_item_id, 9);
315: END IF;
316: fnd_message.set_name('INV', 'INV_INT_ITMCODE');
317: fnd_msg_pub.ADD;
318: RAISE fnd_api.g_exc_error;
319: END;
320:
322: IF (l_debug = 1) THEN
323: debug_print('Invalid item in the transfer Org. :' ||
324: p_mtl_trx_tbl(i).inventory_item_id, 9);
325: END IF;
326: fnd_message.set_name('INV', 'INV_INT_ITMCODE');
327: fnd_msg_pub.ADD;
328: RAISE fnd_api.g_exc_error;
329:
330: END IF;
341:
342: IF (l_debug = 1) THEN
343: debug_print('Both release id and po header id are null. One of them should have a valid value', 9);
344: END IF;
345: fnd_message.set_name('INV', 'INV_INT_RETCODE');
346: fnd_msg_pub.ADD;
347: RAISE fnd_api.g_exc_error;
348:
349: END IF;
353:
354: IF (l_debug = 1) THEN
355: debug_print('The old PO price and the new PO price shouldnt be null', 9);
356: END IF;
357: fnd_message.set_name('INV', 'INV_INT_RETQTYCODE');
358: fnd_msg_pub.ADD;
359: RAISE fnd_api.g_exc_error;
360:
361: END IF;
367:
368: IF (l_debug = 1) THEN
369: debug_print('Transaction Source ID is null', 9);
370: END IF;
371: fnd_message.set_name('INV', 'INV_INT_PO');
372: fnd_msg_pub.ADD;
373: RAISE fnd_api.g_exc_error;
374:
375: END IF;
385: WHEN no_data_found THEN
386: IF (l_debug = 1) THEN
387: debug_print('Cannot find the purchase order information or the po is invalid', 9);
388: END IF;
389: fnd_message.set_name('INV', 'INV_INT_PO');
390: fnd_msg_pub.ADD;
391: RAISE fnd_api.g_exc_error;
392: END;
393:
395:
396: IF (l_debug = 1) THEN
397: debug_print('Invalid puchase order header ID :' || p_mtl_trx_tbl(i).transaction_source_id, 9);
398: END IF;
399: fnd_message.set_name('INV', 'INV_INT_PO');
400: fnd_msg_pub.ADD;
401: RAISE fnd_api.g_exc_error;
402:
403: END IF;
419: IF (l_debug = 1) THEN
420: debug_print('Cannot find the specified subinventory :'
421: || p_mtl_trx_tbl(i).locator_id, 9);
422: END IF;
423: fnd_message.set_name('INV', 'INV_INT_SUBCODE');
424: fnd_msg_pub.ADD;
425: RAISE fnd_api.g_exc_error;
426: END;
427:
429: IF (l_debug = 1) THEN
430: debug_print('Invalid subinventory :' ||
431: p_mtl_trx_tbl(i).subinventory_code, 9);
432: END IF;
433: fnd_message.set_name('INV', 'INV_INT_SUBCODE');
434: fnd_msg_pub.ADD;
435: RAISE fnd_api.g_exc_error;
436:
437: END IF;
460: WHEN no_data_found THEN
461: IF (l_debug = 1) THEN
462: debug_print('Restricted Subinevntory', 9);
463: END IF;
464: fnd_message.set_name('INV', 'INV_INT_SUBCODE');
465: fnd_msg_pub.ADD;
466: RAISE fnd_api.g_exc_error;
467: END;
468:
469: IF (l_count <> 1) THEN
470: IF (l_debug = 1) THEN
471: debug_print('Invalid subinventory', 9);
472: END IF;
473: fnd_message.set_name('INV', 'INV_INT_SUBCODE');
474: fnd_msg_pub.ADD;
475: RAISE fnd_api.g_exc_error;
476:
477: END IF;
494: IF (l_debug = 1) THEN
495: debug_print('Cannot find the specified locator :'
496: || p_mtl_trx_tbl(i).locator_id, 9);
497: END IF;
498: fnd_message.set_name('INV', 'INV_INT_LOCCODE');
499: fnd_msg_pub.ADD;
500: RAISE fnd_api.g_exc_error;
501: END;
502:
504: IF (l_debug = 1) THEN
505: debug_print('Invalid locator :' ||
506: p_mtl_trx_tbl(i).locator_id, 9);
507: END IF;
508: fnd_message.set_name('INV', 'INV_INT_LOCCODE');
509: fnd_msg_pub.ADD;
510: RAISE fnd_api.g_exc_error;
511:
512: END IF;
536: WHEN no_data_found THEN
537: IF (l_debug = 1) THEN
538: debug_print('Restricted Sub/loc', 9);
539: END IF;
540: fnd_message.set_name('INV', 'INV_INT_LOCCODE');
541: fnd_msg_pub.ADD;
542: RAISE fnd_api.g_exc_error;
543: END;
544:
545: IF (l_count <> 1) THEN
546: IF (l_debug = 1) THEN
547: debug_print('Invalid locator', 9);
548: END IF;
549: fnd_message.set_name('INV', 'INV_INT_LOCCODE');
550: fnd_msg_pub.ADD;
551: RAISE fnd_api.g_exc_error;
552:
553: END IF;
574: WHEN no_data_found THEN
575: IF (l_debug = 1) THEN
576: debug_print('Drop Ship Source not found', 9);
577: END IF;
578: fnd_message.set_name('INV', 'INV_INT_SRCCODE');
579: fnd_msg_pub.ADD;
580: RAISE fnd_api.g_exc_error;
581: END;
582:
593: WHEN no_data_found THEN
594: IF (l_debug = 1) THEN
595: debug_print('Sales Order is not valid for the current date', 9);
596: END IF;
597: fnd_message.set_name('INV', 'INV_INT_SALEXP');
598: fnd_msg_pub.ADD;
599: RAISE fnd_api.g_exc_error;
600: END;
601:
602: IF (l_count <> 1) THEN
603: IF (l_debug = 1) THEN
604: debug_print('Cannot find the sales order or sales order IS NOT active', 9);
605: END IF;
606: fnd_message.set_name('INV', 'INV_INT_SALEXP');
607: fnd_msg_pub.ADD;
608: RAISE fnd_api.g_exc_error;
609:
610: END IF;
621: (INV_GLOBALS.G_ACTION_LOGICALISSUE, INV_GLOBALS.G_ACTION_LOGICALICSALES, INV_GLOBALS.G_ACTION_LOGICALICRCPTRETURN)) THEN
622: IF (l_debug = 1) THEN
623: debug_print('Invalid transaction quantity : quantity should be negative', 9);
624: END IF;
625: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY');
626: fnd_msg_pub.ADD;
627: RAISE fnd_api.g_exc_error;
628: END IF;
629:
633: INV_GLOBALS.G_ACTION_LOGICALEXPREQRECEIPT, INV_GLOBALS.G_ACTION_LOGICALRECEIPT)) THEN
634: IF (l_debug = 1) THEN
635: debug_print('Invalid transaction quantity : quantity should be positive', 9);
636: END IF;
637: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY');
638: fnd_msg_pub.ADD;
639: RAISE fnd_api.g_exc_error;
640: END IF;
641: ******/
648: IF (p_mtl_trx_tbl(i).distribution_account_id IS NULL) THEN
649: IF (l_debug = 1) THEN
650: debug_print('Distribution account is null', 9);
651: END IF;
652: fnd_message.set_name('INV', 'INV_INT_DISTCODE');
653: fnd_msg_pub.ADD;
654: RAISE fnd_api.g_exc_error;
655: END IF;
656:
672: IF (l_debug = 1) THEN
673: debug_print('Distribution account not found :' ||
674: p_mtl_trx_tbl(i).distribution_account_id, 9);
675: END IF;
676: fnd_message.set_name('INV', 'INV_INT_DISTCODE');
677: fnd_msg_pub.ADD;
678: RAISE fnd_api.g_exc_error;
679: END;
680:
683: IF (l_debug = 1) THEN
684: debug_print('Invalid distribution account :' ||
685: p_mtl_trx_tbl(i).distribution_account_id, 9);
686: END IF;
687: fnd_message.set_name('INV', 'INV_INT_DISTCODE');
688: fnd_msg_pub.ADD;
689: RAISE fnd_api.g_exc_error;
690:
691: END IF;
742: IF (l_acct_period_id = -1 OR l_acct_period_id = 0) THEN
743: IF (l_debug = 1) THEN
744: debug_print('Period not open', 9);
745: END IF;
746: -- FND_MESSAGE.set_name('INV', 'INV_INT_PRDCODE');
747: FND_MESSAGE.set_name('INV', 'INV_NO_OPEN_PERIOD');
748: fnd_msg_pub.ADD;
749: RAISE fnd_api.g_exc_error;
750:
743: IF (l_debug = 1) THEN
744: debug_print('Period not open', 9);
745: END IF;
746: -- FND_MESSAGE.set_name('INV', 'INV_INT_PRDCODE');
747: FND_MESSAGE.set_name('INV', 'INV_NO_OPEN_PERIOD');
748: fnd_msg_pub.ADD;
749: RAISE fnd_api.g_exc_error;
750:
751: END IF;
756: IF (l_debug = 1) THEN
757: debug_print('Invalid Account Period ID passed : ' ||
758: p_mtl_trx_tbl(i).acct_period_id || ' is not the same as ' || l_acct_period_id, 9);
759: END IF;
760: FND_MESSAGE.set_name('INV', 'INV_NO_OPEN_PERIOD');
761: fnd_msg_pub.ADD;
762: RAISE fnd_api.g_exc_error;
763:
764: END IF;
778: IF (l_debug = 1) THEN
779: debug_print('Invalid Transaction UOM : ' ||
780: p_mtl_trx_tbl(i).transaction_uom, 9);
781: END IF;
782: fnd_message.set_name('INV', 'INV_INT_UOMCODE');
783: fnd_msg_pub.ADD;
784: RAISE fnd_api.g_exc_error;
785: END;
786:
788: IF (l_debug = 1) THEN
789: debug_print('Transaction UOM : ' ||
790: p_mtl_trx_tbl(i).transaction_uom || ' not found', 9);
791: END IF;
792: fnd_message.set_name('INV', 'INV_INT_UOMCODE');
793: fnd_msg_pub.ADD;
794: RAISE fnd_api.g_exc_error;
795:
796: END IF;
801: IF (p_mtl_trx_tbl(i).cost_group_id IS NULL) THEN
802: IF (l_debug = 1) THEN
803: debug_print('Invalid Cost Group', 9);
804: END IF;
805: fnd_message.set_name('INV', 'INV_INT_CSTGRP');
806: fnd_msg_pub.ADD;
807: RAISE fnd_api.g_exc_error;
808:
809: END IF;
820: WHEN no_data_found THEN
821: IF (l_debug = 1) THEN
822: debug_print('Cost Group not found', 9);
823: END IF;
824: fnd_message.set_name('INV', 'INV_INT_CSTGRP');
825: fnd_msg_pub.ADD;
826: RAISE fnd_api.g_exc_error;
827: END;
828:
829: IF (l_count = 0) THEN
830: IF (l_debug = 1) THEN
831: debug_print('Cost Group not found : ' || p_mtl_trx_tbl(i).cost_group_id, 9);
832: END IF;
833: fnd_message.set_name('INV', 'INV_INT_CSTGRP');
834: fnd_msg_pub.ADD;
835: RAISE fnd_api.g_exc_error;
836:
837: END IF;
847: IF (p_mtl_trx_tbl(i).transfer_cost_group_id IS NULL) THEN
848: IF (l_debug = 1) THEN
849: debug_print('Invalid Cost Group in the Transfer Org.', 9);
850: END IF;
851: fnd_message.set_name('INV', 'INV_INT_CSTGRP');
852: fnd_msg_pub.ADD;
853: RAISE fnd_api.g_exc_error;
854:
855: END IF;
866: WHEN no_data_found THEN
867: IF (l_debug = 1) THEN
868: debug_print('Cost Group not found', 9);
869: END IF;
870: fnd_message.set_name('INV', 'INV_INT_CSTGRP');
871: fnd_msg_pub.ADD;
872: RAISE fnd_api.g_exc_error;
873: END;
874:
875: IF (l_count = 0) THEN
876: IF (l_debug = 1) THEN
877: debug_print('Transfer Cost Group not found : ' || p_mtl_trx_tbl(i).transfer_cost_group_id , 9);
878: END IF;
879: fnd_message.set_name('INV', 'INV_INT_CSTGRP');
880: fnd_msg_pub.ADD;
881: RAISE fnd_api.g_exc_error;
882:
883: END IF;
891: (p_mtl_trx_tbl(i).transaction_batch_seq IS NULL )THEN
892: IF (l_debug = 1) THEN
893: debug_print('Transaction batch and sequence are not populated', 9);
894: END IF;
895: fnd_message.set_name('INV', 'INV_INVALID_BATCH');
896: fnd_msg_pub.ADD;
897: RAISE fnd_api.g_exc_error;
898:
899: END IF;
918: WHEN others THEN
919: IF (l_debug = 1) THEN
920: debug_print('Invalid Locator ID', 9);
921: END IF;
922: fnd_message.set_name('INV', 'INV_INT_LOCCODE');
923: fnd_msg_pub.ADD;
924: RAISE fnd_api.g_exc_error;
925: END;
926:
930: IF (p_mtl_trx_tbl(i).project_id IS NULL) THEN
931: IF (l_debug = 1) THEN
932: debug_print('Invalid Project', 9);
933: END IF;
934: fnd_message.set_name('INV', 'INV_NO_PROJECT');
935: fnd_msg_pub.ADD;
936: RAISE fnd_api.g_exc_error;
937:
938: END IF;
944: IF (p_mtl_trx_tbl(i).task_id IS NULL) then
945: IF (l_debug = 1) THEN
946: debug_print('Invalid Task', 9);
947: END IF;
948: fnd_message.set_name('INV', 'INV_NO_PROJECT');
949: fnd_msg_pub.ADD;
950: RAISE fnd_api.g_exc_error;
951:
952: END IF;
971:
972: IF (l_debug = 1) THEN
973: debug_print('Transaction Source ID is null', 9);
974: END IF;
975: fnd_message.set_name('INV', 'INV_COULD_NOT_GET_MSO_HEADER');
976: fnd_msg_pub.ADD;
977: RAISE fnd_api.g_exc_error;
978:
979: END IF;
988: WHEN no_data_found THEN
989: IF (l_debug = 1) THEN
990: debug_print('Cannot find the sales order information', 9);
991: END IF;
992: fnd_message.set_name('INV', 'INV_COULD_NOT_GET_MSO_HEADER');
993: fnd_msg_pub.ADD;
994: RAISE fnd_api.g_exc_error;
995: END;
996:
998:
999: IF (l_debug = 1) THEN
1000: debug_print('Invalid sales order ID :' || p_mtl_trx_tbl(i).transaction_source_id, 9);
1001: END IF;
1002: fnd_message.set_name('INV', 'INV_COULD_NOT_GET_MSO_HEADER');
1003: fnd_msg_pub.ADD;
1004: RAISE fnd_api.g_exc_error;
1005:
1006: END IF;
1023:
1024: IF (l_debug = 1) THEN
1025: debug_print('Transaction Source ID/rcv_transaction_id is null', 9);
1026: END IF;
1027: fnd_message.set_name('INV', 'INV_INT_PO');
1028: fnd_msg_pub.ADD;
1029: RAISE fnd_api.g_exc_error;
1030:
1031: END IF;
1043: WHEN no_data_found THEN
1044: IF (l_debug = 1) THEN
1045: debug_print('Cannot find the purchase order information', 9);
1046: END IF;
1047: fnd_message.set_name('INV', 'INV_INT_PO');
1048: fnd_msg_pub.ADD;
1049: RAISE fnd_api.g_exc_error;
1050: END;
1051:
1053:
1054: IF (l_debug = 1) THEN
1055: debug_print('Invalid puchase order header ID :' || p_mtl_trx_tbl(i).transaction_source_id, 9);
1056: END IF;
1057: fnd_message.set_name('INV', 'INV_INT_PO');
1058: fnd_msg_pub.ADD;
1059: RAISE fnd_api.g_exc_error;
1060:
1061: END IF;
1075:
1076: IF (l_debug = 1) THEN
1077: debug_print('Trx source line ID is null', 9);
1078: END IF;
1079: fnd_message.set_name('INV', 'INV_COULD_NOT_GET_MSO_HEADER');
1080: fnd_msg_pub.ADD;
1081: RAISE fnd_api.g_exc_error;
1082:
1083: END IF;
1091: WHEN no_data_found THEN
1092: IF (l_debug = 1) THEN
1093: debug_print('Cannot find the sales order line information', 9);
1094: END IF;
1095: fnd_message.set_name('INV', 'INV_COULD_NOT_GET_MSO_HEADER');
1096: fnd_msg_pub.ADD;
1097: RAISE fnd_api.g_exc_error;
1098: END;
1099:
1101:
1102: IF (l_debug = 1) THEN
1103: debug_print('Invalid sales order line :' || p_mtl_trx_tbl(i).transaction_source_id, 9);
1104: END IF;
1105: fnd_message.set_name('INV', 'INV_COULD_NOT_GET_MSO_HEADER');
1106: fnd_msg_pub.ADD;
1107: RAISE fnd_api.g_exc_error;
1108:
1109: END IF;
1121:
1122: IF (l_debug = 1) THEN
1123: debug_print('Invoiced flag is not set to N ', 9);
1124: END IF;
1125: fnd_message.set_name('INV', 'INV_INT_INVOICE_FLAG');
1126: fnd_msg_pub.ADD;
1127: RAISE fnd_api.g_exc_error;
1128:
1129: END IF;
1133:
1134: IF (l_debug = 1) THEN
1135: debug_print('I/C cost cannot be null ', 9);
1136: END IF;
1137: fnd_message.set_name('INV', 'INV_INT_IC_COST');
1138: fnd_msg_pub.ADD;
1139: RAISE fnd_api.g_exc_error;
1140:
1141: END IF;
1146:
1147: IF (l_debug = 1) THEN
1148: debug_print('Costed flag is not set to N ', 9);
1149: END IF;
1150: fnd_message.set_name('INV', 'INV_INT_COSTED_FLAG');
1151: fnd_msg_pub.ADD;
1152: RAISE fnd_api.g_exc_error;
1153:
1154: END IF;
2228: debug_print('MTL_SERIAL_CHECK.INV_SERIAL_INFO returns error', 9);
2229: debug_print('error code: ' || l_errorcode, 9);
2230: END IF;
2231:
2232: FND_MESSAGE.SET_NAME('INV', 'INV_GET_SER_INFO_ERR');
2233: FND_MSG_PUB.ADD;
2234: RAISE FND_API.G_EXC_ERROR;
2235: END IF;
2236: