[Home] [Help]
166: oe_debug_pub.add( 'NOT VALID PROMOTION NAME =' ||P_MODIFIER_NAME ) ;
167: END IF;
168: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_LIST_NAME');
169: FND_MESSAGE.SET_TOKEN('LIST_NAME',p_modifier_name);
170: OE_MSG_PUB.Add;
171: p_return_status := FND_API.G_RET_STS_ERROR;
172: return;
173: END IF;
174:
199: oe_debug_pub.add( 'NOT VALID PROMOTION/COUPON LIST_NAME =' ||P_MODIFIER_NAME ) ;
200: END IF;
201: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_LIST_NAME');
202: FND_MESSAGE.SET_TOKEN('LIST_NAME',p_modifier_name);
203: OE_MSG_PUB.Add;
204: p_return_status := FND_API.G_RET_STS_ERROR;
205: END;
206: END IF;
207: END IF;
212:
213: IF l_debug_level > 0 THEN
214: oe_debug_pub.add( 'EXP NO_DATA LIST_LINE_ID OF ORDER IMPORT SPECIFIC' , 1 ) ;
215: END IF;
216: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
217: THEN
218:
219: IF l_debug_level > 0 THEN
220: oe_debug_pub.add( 'NOT VALID PROMOTION NAME =' ||P_MODIFIER_NAME ) ;
220: oe_debug_pub.add( 'NOT VALID PROMOTION NAME =' ||P_MODIFIER_NAME ) ;
221: END IF;
222: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_LIST_NAME');
223: FND_MESSAGE.SET_TOKEN('LIST_NAME',p_modifier_name);
224: OE_MSG_PUB.Add;
225: p_return_status := FND_API.G_RET_STS_ERROR;
226:
227: END IF;
228:
230:
231: IF l_debug_level > 0 THEN
232: oe_debug_pub.add( 'EXP OTHERS LIST_LINE_ID OF ORDER IMPORT SPECIFIC AND SQLERR = ' || SQLERRM , 1 ) ;
233: END IF;
234: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
235: THEN
236: OE_MSG_PUB.Add_Exc_Msg
237: ( G_PKG_NAME
238: , 'List_Line_Id'
232: oe_debug_pub.add( 'EXP OTHERS LIST_LINE_ID OF ORDER IMPORT SPECIFIC AND SQLERR = ' || SQLERRM , 1 ) ;
233: END IF;
234: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
235: THEN
236: OE_MSG_PUB.Add_Exc_Msg
237: ( G_PKG_NAME
238: , 'List_Line_Id'
239: , sqlerrm
240: );
313: x_return_status := l_return_status;
314: Else
315: p_x_header_rec.sold_to_org_id := l_customer_info_id;
316: OE_INLINE_CUSTOMER_PUB.G_SOLD_TO_CUST := l_customer_info_id;
317: OE_MSG_PUB.set_msg_context(
318: p_entity_code => 'OI_INL_CUSTSUCC'
319: ,p_entity_ref => null
320: ,p_entity_id => null
321: ,p_header_id => null
334: );
335: FND_MESSAGE.SET_NAME('ONT','ONT_OI_INL_REF_ADDED');
336: FND_MESSAGE.SET_TOKEN('TYPE', 'Customer');
337: FND_MESSAGE.SET_TOKEN('REF',p_customer_rec.orig_sys_customer_ref);
338: Oe_Msg_Pub.Add;
339: IF l_debug_level > 0 THEN
340: oe_debug_pub.add( 'NEW CUST ACC. ID => ' || L_CUSTOMER_INFO_ID ) ;
341: END IF;
342: IF l_debug_level > 0 THEN
348: oe_debug_pub.add( 'CUST DATA PASSED BUT PARAMETER NOT SET' ) ;
349: END IF;
350: fnd_message.set_name('ONT','ONT_OI_INL_SET_PARAMETER');
351: fnd_message.set_token('TYPE', 'Customers');
352: oe_msg_pub.add;
353: x_return_status := FND_API.G_RET_STS_ERROR;
354: Return;
355: End If;
356: -- End for Add customer privilege check}
387: End If;
388: IF l_debug_level > 0 THEN
389: oe_debug_pub.add( 'NEW SHIP ADDRESS ID => ' || L_CUSTOMER_INFO_ID ) ;
390: END IF;
391: OE_MSG_PUB.set_msg_context(
392: p_entity_code => 'OI_INL_CUSTSUCC'
393: ,p_entity_ref => null
394: ,p_entity_id => null
395: ,p_header_id => null
408: );
409: FND_MESSAGE.SET_NAME('ONT','ONT_OI_INL_REF_ADDED');
410: FND_MESSAGE.SET_TOKEN('TYPE', 'Address');
411: FND_MESSAGE.SET_TOKEN('REF',p_customer_rec.orig_ship_address_ref);
412: Oe_Msg_Pub.Add;
413: End if;
414: End If;
415: -- End }
416: -- { Start
443: End If;
444: IF l_debug_level > 0 THEN
445: oe_debug_pub.add( 'NEW INVOICE ADDRESS ID => ' || L_CUSTOMER_INFO_ID ) ;
446: END IF;
447: OE_MSG_PUB.set_msg_context(
448: p_entity_code => 'OI_INL_CUSTSUCC'
449: ,p_entity_ref => null
450: ,p_entity_id => null
451: ,p_header_id => null
464: );
465: FND_MESSAGE.SET_NAME('ONT','ONT_OI_INL_REF_ADDED');
466: FND_MESSAGE.SET_TOKEN('TYPE', 'Address');
467: FND_MESSAGE.SET_TOKEN('REF',p_customer_rec.orig_bill_address_ref);
468: Oe_Msg_Pub.Add;
469: End if;
470: End If;
471: -- End }
472: -- { Start
499: End If;
500: IF l_debug_level > 0 THEN
501: oe_debug_pub.add( 'NEW DELIVER ADDRESS ID => ' || L_CUSTOMER_INFO_ID ) ;
502: END IF;
503: OE_MSG_PUB.set_msg_context(
504: p_entity_code => 'OI_INL_CUSTSUCC'
505: ,p_entity_ref => null
506: ,p_entity_id => null
507: ,p_header_id => null
520: );
521: FND_MESSAGE.SET_NAME('ONT','ONT_OI_INL_REF_ADDED');
522: FND_MESSAGE.SET_TOKEN('TYPE', 'Address');
523: FND_MESSAGE.SET_TOKEN('REF',p_customer_rec.orig_deliver_address_ref);
524: Oe_Msg_Pub.Add;
525: End if;
526: End If;
527: -- End }
528: -- { Start
553: End If;
554: IF l_debug_level > 0 THEN
555: oe_debug_pub.add( 'NEW CONTACT ID => ' || L_CUSTOMER_INFO_ID ) ;
556: END IF;
557: OE_MSG_PUB.set_msg_context(
558: p_entity_code => 'OI_INL_CUSTSUCC'
559: ,p_entity_ref => null
560: ,p_entity_id => null
561: ,p_header_id => null
574: );
575: FND_MESSAGE.SET_NAME('ONT','ONT_OI_INL_REF_ADDED');
576: FND_MESSAGE.SET_TOKEN('TYPE', 'Contact');
577: FND_MESSAGE.SET_TOKEN('REF',p_customer_rec.sold_to_contact_ref);
578: Oe_Msg_Pub.Add;
579: End if;
580: End If;
581: -- End }
582: -- { Start
609: End If;
610: IF l_debug_level > 0 THEN
611: oe_debug_pub.add( 'NEW CONTACT ID => ' || L_CUSTOMER_INFO_ID ) ;
612: END IF;
613: OE_MSG_PUB.set_msg_context(
614: p_entity_code => 'OI_INL_CUSTSUCC'
615: ,p_entity_ref => null
616: ,p_entity_id => null
617: ,p_header_id => null
630: );
631: FND_MESSAGE.SET_NAME('ONT','ONT_OI_INL_REF_ADDED');
632: FND_MESSAGE.SET_TOKEN('TYPE', 'Contact');
633: FND_MESSAGE.SET_TOKEN('REF',p_customer_rec.ship_to_contact_ref);
634: Oe_Msg_Pub.Add;
635: End if;
636: End If;
637: -- End }
638: -- { Start
665: End If;
666: IF l_debug_level > 0 THEN
667: oe_debug_pub.add( 'NEW CONTACT ID => ' || L_CUSTOMER_INFO_ID ) ;
668: END IF;
669: OE_MSG_PUB.set_msg_context(
670: p_entity_code => 'OI_INL_CUSTSUCC'
671: ,p_entity_ref => null
672: ,p_entity_id => null
673: ,p_header_id => null
686: );
687: FND_MESSAGE.SET_NAME('ONT','ONT_OI_INL_REF_ADDED');
688: FND_MESSAGE.SET_TOKEN('TYPE', 'Contact');
689: FND_MESSAGE.SET_TOKEN('REF',p_customer_rec.bill_to_contact_ref);
690: Oe_Msg_Pub.Add;
691: End if;
692: End If;
693: -- End }
694: -- { Start
721: End If;
722: IF l_debug_level > 0 THEN
723: oe_debug_pub.add( 'NEW CONTACT ID => ' || L_CUSTOMER_INFO_ID ) ;
724: END IF;
725: OE_MSG_PUB.set_msg_context(
726: p_entity_code => 'OI_INL_CUSTSUCC'
727: ,p_entity_ref => null
728: ,p_entity_id => null
729: ,p_header_id => null
742: );
743: FND_MESSAGE.SET_NAME('ONT','ONT_OI_INL_REF_ADDED');
744: FND_MESSAGE.SET_TOKEN('TYPE', 'Contact');
745: FND_MESSAGE.SET_TOKEN('REF',p_customer_rec.deliver_to_contact_ref);
746: Oe_Msg_Pub.Add;
747: End if;
748: End If;
749: -- End }
750:
809:
810: IF l_debug_level > 0 THEN
811: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT' ) ;
812: END IF;
813: OE_MSG_PUB.set_msg_context(
814: p_entity_code => 'HEADER'
815: ,p_entity_ref => null
816: ,p_entity_id => null
817: ,p_header_id => p_x_header_rec.header_id
844: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN VERSION_NUMBER... ' ) ;
845: END IF;
846: FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
847: FND_MESSAGE.SET_TOKEN('DERIVED_COL','VERSION_NUMBER');
848: OE_MSG_PUB.Add;
849: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
850: -- p_x_header_rec.version_number := FND_API.G_MISS_NUM;
851: END IF;
852:
856: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN EARLIEST_SCHEDULE_LIMIT... ' ) ;
857: END IF;
858: FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
859: FND_MESSAGE.SET_TOKEN('DERIVED_COL','EARLIEST_SCHEDULE_LIMIT');
860: OE_MSG_PUB.Add;
861: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
862: -- p_x_header_rec.EARLIEST_SCHEDULE_LIMIT := FND_API.G_MISS_NUM;
863: END IF;
864:
868: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN FREIGHT_CARRIER_CODE... ' ) ;
869: END IF;
870: FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
871: FND_MESSAGE.SET_TOKEN('DERIVED_COL','FREIGHT_CARRIER_CODE');
872: OE_MSG_PUB.Add;
873: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
874: -- p_x_header_rec.FREIGHT_CARRIER_CODE := FND_API.G_MISS_CHAR;
875: END IF;
876:
881: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN ORG_ID... ' ) ;
882: END IF;
883: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
884: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','ORG_ID');
885: -- OE_MSG_PUB.Add;
886: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
887: -- p_x_header_rec.ORG_ID := FND_API.G_MISS_NUM;
888: END IF;
889:
893: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN PARTIAL_SHIPMENTS_ALLOWED... ' ) ;
894: END IF;
895: FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
896: FND_MESSAGE.SET_TOKEN('DERIVED_COL','PARTIAL_SHIPMENTS_ALLOWED');
897: OE_MSG_PUB.Add;
898: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
899: -- p_x_header_rec.ORG_ID := FND_API.G_MISS_CHAR;
900: END IF;
901:
905: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN CHANGE_REQUEST_CODE... ' ) ;
906: END IF;
907: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
908: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','CHANGE_REQUEST_CODE');
909: -- OE_MSG_PUB.Add;
910: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
911: -- p_x_header_rec.CHANGE_REQUEST_CODE := FND_API.G_MISS_CHAR;
912: END IF;
913:
917: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN DROP_SHIP_FLAG... ' ) ;
918: END IF;
919: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
920: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','DROP_SHIP_FLAG');
921: -- OE_MSG_PUB.Add;
922: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
923: -- p_x_header_rec.CHANGE_REQUEST_CODE := FND_API.G_MISS_CHAR;
924: END IF;
925:
929: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN CREDIT_CARD_APPROVAL_CODE... ' ) ;
930: END IF;
931: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
932: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','CREDIT_CARD_APPROVAL_CODE');
933: -- OE_MSG_PUB.Add;
934: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
935: -- p_x_header_rec.CHANGE_REQUEST_CODE := FND_API.G_MISS_CHAR;
936: END IF;
937:
941: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN CREDIT_CARD_APPROVAL_DATE... ' ) ;
942: END IF;
943: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
944: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','CREDIT_CARD_APPROVAL_DATE');
945: -- OE_MSG_PUB.Add;
946: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
947: -- p_x_header_rec.CHANGE_REQUEST_CODE := FND_API.G_MISS_DATE;
948: END IF;
949:
957: IF l_debug_level > 0 THEN
958: oe_debug_pub.add( 'CANCELLATION IS NOT ALLOWED WHILE CREATING AN ORDER... ' ) ;
959: END IF;
960: FND_MESSAGE.SET_NAME('ONT','OE_CANCEL_NO_CREATE');
961: OE_MSG_PUB.Add;
962: p_x_return_status := FND_API.G_RET_STS_ERROR;
963: p_x_header_rec.CANCELLED_FLAG := FND_API.G_MISS_CHAR;
964: END IF;
965:
981: IF l_debug_level > 0 THEN
982: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR THE LINE' ) ;
983: END IF;
984:
985: OE_MSG_PUB.set_msg_context(
986: p_entity_code => 'LINE'
987: ,p_entity_ref => null
988: ,p_entity_id => null
989: ,p_header_id => p_x_header_rec.header_id
1007: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN ACTUAL_ARRIVAL_DATE... ' ) ;
1008: END IF;
1009: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1010: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','ACTUAL_ARRIVAL_DATE');
1011: -- OE_MSG_PUB.Add;
1012: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1013: -- p_x_line_tbl(I).ACTUAL_ARRIVAL_DATE := FND_API.G_MISS_DATE;
1014: END IF;
1015:
1019: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN ATO_LINE_ID... ' ) ;
1020: END IF;
1021: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1022: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','ATO_LINE_ID');
1023: -- OE_MSG_PUB.Add;
1024: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1025: -- p_x_line_tbl(I).ATO_LINE_ID := FND_API.G_MISS_NUM;
1026: END IF;
1027: --for bug 3415653 uncommented the statements which set status to error for cancelled_flag and cancelled_quantity
1031: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN CANCELLED_FLAG... ' ) ;
1032: END IF;
1033: FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1034: FND_MESSAGE.SET_TOKEN('DERIVED_COL','CANCELLED_FLAG');
1035: OE_MSG_PUB.Add;
1036: p_x_return_status := FND_API.G_RET_STS_ERROR;
1037: p_x_line_tbl(I).CANCELLED_FLAG := FND_API.G_MISS_CHAR;
1038: END IF;
1039:
1043: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN CANCELLED_QUANTITY... ' ) ;
1044: END IF;
1045: FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1046: FND_MESSAGE.SET_TOKEN('DERIVED_COL','CANCELLED_QUANTITY');
1047: OE_MSG_PUB.Add;
1048: p_x_return_status := FND_API.G_RET_STS_ERROR;
1049: p_x_line_tbl(I).CANCELLED_QUANTITY := FND_API.G_MISS_NUM;
1050: END IF;
1051:
1055: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN COMPONENT_SEQUENCE_ID... ' ) ;
1056: END IF;
1057: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1058: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','COMPONENT_SEQUENCE_ID');
1059: -- OE_MSG_PUB.Add;
1060: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1061: -- p_x_line_tbl(I).COMPONENT_SEQUENCE_ID := FND_API.G_MISS_NUM;
1062: END IF;
1063:
1067: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN CREDIT_INVOICE_LINE_ID... ' ) ;
1068: END IF;
1069: FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1070: FND_MESSAGE.SET_TOKEN('DERIVED_COL','CREDIT_INVOICE_LINE_ID');
1071: OE_MSG_PUB.Add;
1072: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1073: -- p_x_line_tbl(I).CREDIT_INVOICE_LINE_ID := FND_API.G_MISS_NUM;
1074: END IF;
1075:
1079: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN EXPLOSION_DATE... ' ) ;
1080: END IF;
1081: FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1082: FND_MESSAGE.SET_TOKEN('DERIVED_COL','EXPLOSION_DATE');
1083: OE_MSG_PUB.Add;
1084: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1085: -- p_x_line_tbl(I).EXPLOSION_DATE := FND_API.G_MISS_DATE;
1086: END IF;
1087:
1091: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN FULFILLED_QUANTITY... ' ) ;
1092: END IF;
1093: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1094: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','FULFILLED_QUANTITY');
1095: -- OE_MSG_PUB.Add;
1096: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1097: -- p_x_line_tbl(I).FULFILLED_QUANTITY := FND_API.G_MISS_NUM;
1098: END IF;
1099: /*
1102: THEN
1103: oe_debug_pub.add('Cannot populate derived column ITEM_TYPE_CODE... ');
1104: FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1105: FND_MESSAGE.SET_TOKEN('DERIVED_COL','ITEM_TYPE_CODE');
1106: OE_MSG_PUB.Add;
1107: p_x_return_status := FND_API.G_RET_STS_ERROR;
1108: p_x_line_tbl(I).ITEM_TYPE_CODE := FND_API.G_MISS_CHAR;
1109: END IF;
1110: */
1115: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN MODEL_GROUP_NUMBER... ' ) ;
1116: END IF;
1117: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1118: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','MODEL_GROUP_NUMBER');
1119: -- OE_MSG_PUB.Add;
1120: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1121: -- p_x_line_tbl(I).MODEL_GROUP_NUMBER := FND_API.G_MISS_NUM;
1122: END IF;
1123:
1127: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN OPTION_NUMBER... ' ) ;
1128: END IF;
1129: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1130: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','OPTION_NUMBER');
1131: -- OE_MSG_PUB.Add;
1132: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1133: -- p_x_line_tbl(I).OPTION_NUMBER := FND_API.G_MISS_NUM;
1134: END IF;
1135:
1140: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN ORG_ID... ' ) ;
1141: END IF;
1142: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1143: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','ORG_ID');
1144: -- OE_MSG_PUB.Add;
1145: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1146: -- p_x_line_tbl(I).ORG_ID := FND_API.G_MISS_NUM;
1147: END IF;
1148:
1152: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN PRICING_CONTEXT... ' ) ;
1153: END IF;
1154: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1155: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','PRICING_CONTEXT');
1156: -- OE_MSG_PUB.Add;
1157: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1158: -- p_x_line_tbl(I).PRICING_CONTEXT := FND_API.G_MISS_CHAR;
1159: END IF;
1160:
1164: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN PRICING_QUANTITY... ' ) ;
1165: END IF;
1166: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1167: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','PRICING_QUANTITY');
1168: -- OE_MSG_PUB.Add;
1169: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1170: -- p_x_line_tbl(I).PRICING_QUANTITY := FND_API.G_MISS_NUM;
1171: END IF;
1172:
1176: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN PRICING_QUANTITY_UOM... ' ) ;
1177: END IF;
1178: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1179: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','PRICING_QUANTITY_UOM');
1180: -- OE_MSG_PUB.Add;
1181: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1182: -- p_x_line_tbl(I).PRICING_QUANTITY_UOM := FND_API.G_MISS_CHAR;
1183: END IF;
1184:
1188: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN REFERENCE_TYPE... ' ) ;
1189: END IF;
1190: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1191: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','REFERENCE_TYPE');
1192: -- OE_MSG_PUB.Add;
1193: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1194: -- p_x_line_tbl(I).REFERENCE_TYPE := FND_API.G_MISS_CHAR;
1195: END IF;
1196:
1200: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN REFERENCE_HEADER_ID... ' ) ;
1201: END IF;
1202: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1203: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','REFERENCE_HEADER_ID');
1204: -- OE_MSG_PUB.Add;
1205: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1206: -- p_x_line_tbl(I).REFERENCE_HEADER_ID := FND_API.G_MISS_NUM;
1207: END IF;
1208:
1212: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN REFERENCE_LINE_ID... ' ) ;
1213: END IF;
1214: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1215: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','REFERENCE_LINE_ID');
1216: -- OE_MSG_PUB.Add;
1217: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1218: -- p_x_line_tbl(I).REFERENCE_LINE_ID := FND_API.G_MISS_NUM;
1219: END IF;
1220:
1224: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN SCHEDULE_STATUS_CODE... ' ) ;
1225: END IF;
1226: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1227: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','SCHEDULE_STATUS_CODE');
1228: -- OE_MSG_PUB.Add;
1229: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1230: -- p_x_line_tbl(I).SCHEDULE_STATUS_CODE := FND_API.G_MISS_CHAR;
1231: END IF;
1232:
1236: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN SHIPMENT_NUMBER... ' ) ;
1237: END IF;
1238: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1239: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','SHIPMENT_NUMBER');
1240: -- OE_MSG_PUB.Add;
1241: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1242: -- p_x_line_tbl(I).SHIPMENT_NUMBER := FND_API.G_MISS_NUM;
1243: END IF;
1244:
1248: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN SHIPPED_QUANTITY... ' ) ;
1249: END IF;
1250: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1251: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','SHIPPED_QUANTITY');
1252: -- OE_MSG_PUB.Add;
1253: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1254: -- p_x_line_tbl(I).SHIPPED_QUANTITY := FND_API.G_MISS_NUM;
1255: END IF;
1256:
1260: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN SHIPPING_QUANTITY... ' ) ;
1261: END IF;
1262: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1263: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','SHIPPING_QUANTITY');
1264: -- OE_MSG_PUB.Add;
1265: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1266: -- p_x_line_tbl(I).SHIPPING_QUANTITY := FND_API.G_MISS_NUM;
1267: END IF;
1268:
1272: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN SHIPPING_QUANTITY_UOM... ' ) ;
1273: END IF;
1274: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1275: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','SHIPPING_QUANTITY_UOM');
1276: -- OE_MSG_PUB.Add;
1277: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1278: -- p_x_line_tbl(I).SHIPPING_QUANTITY_UOM := FND_API.G_MISS_CHAR;
1279: END IF;
1280:
1284: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN SHIP_MODEL_COMPLETE_FLAG... ' ) ;
1285: END IF;
1286: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1287: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','SHIP_MODEL_COMPLETE_FLAG');
1288: -- OE_MSG_PUB.Add;
1289: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1290: -- p_x_line_tbl(I).SHIP_MODEL_COMPLETE_FLAG := FND_API.G_MISS_CHAR;
1291: END IF;
1292:
1296: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN SORT_ORDER... ' ) ;
1297: END IF;
1298: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1299: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','SORT_ORDER');
1300: -- OE_MSG_PUB.Add;
1301: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1302: -- p_x_line_tbl(I).SORT_ORDER := FND_API.G_MISS_CHAR;
1303: END IF;
1304:
1308: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN TAX_VALUE... ' ) ;
1309: END IF;
1310: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1311: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','TAX_VALUE');
1312: -- OE_MSG_PUB.Add;
1313: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1314: -- p_x_line_tbl(I).TAX_VALUE := FND_API.G_MISS_NUM;
1315: END IF;
1316:
1320: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN CHANGE_REQUEST_CODE... ' ) ;
1321: END IF;
1322: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1323: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','CHANGE_REQUEST_CODE');
1324: -- OE_MSG_PUB.Add;
1325: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1326: -- p_x_line_tbl(I).CHANGE_REQUEST_CODE := FND_API.G_MISS_CHAR;
1327: END IF;
1328:
1332: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN STATUS_FLAG... ' ) ;
1333: END IF;
1334: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1335: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','STATUS_FLAG');
1336: -- OE_MSG_PUB.Add;
1337: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1338: -- p_x_line_tbl(I).STATUS_FLAG := FND_API.G_MISS_CHAR;
1339: END IF;
1340:
1344: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN DROP_SHIP_FLAG... ' ) ;
1345: END IF;
1346: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1347: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','DROP_SHIP_FLAG');
1348: -- OE_MSG_PUB.Add;
1349: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1350: -- p_x_line_tbl(I).DROP_SHIP_FLAG := FND_API.G_MISS_CHAR;
1351: END IF;
1352:
1356: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN UNIT_PERCENT_BASE_PRICE... ' ) ;
1357: END IF;
1358: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1359: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','UNIT_PERCENT_BASE_PRICE');
1360: -- OE_MSG_PUB.Add;
1361: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1362: -- p_x_line_tbl(I).UNIT_PERCENT_BASE_PRICE := FND_API.G_MISS_NUM;
1363: END IF;
1364:
1368: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN SERVICE_NUMBER... ' ) ;
1369: END IF;
1370: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1371: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','SERVICE_NUMBER');
1372: -- OE_MSG_PUB.Add;
1373: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1374: -- p_x_line_tbl(I).SERVICE_NUMBER := FND_API.G_MISS_NUM;
1375: END IF;
1376:
1391: IF l_debug_level > 0 THEN
1392: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR HEADER ADJUSTMENTS' ) ;
1393: END IF;
1394:
1395: OE_MSG_PUB.set_msg_context(
1396: p_entity_code => 'HEADER_ADJ'
1397: ,p_entity_ref => p_x_header_adj_tbl(I).orig_sys_discount_ref
1398: ,p_entity_id => null
1399: ,p_header_id => p_x_header_rec.header_id
1421: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN DISCOUNT_ID... ' ) ;
1422: END IF;
1423: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1424: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','DISCOUNT_ID');
1425: -- OE_MSG_PUB.Add;
1426: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1427: -- p_x_header_adj_tbl(I).discount_id := FND_API.G_MISS_NUM;
1428: END IF;
1429:
1433: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN DISCOUNT_LINE_ID... ' ) ;
1434: END IF;
1435: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1436: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','DISCOUNT_LINE_ID');
1437: -- OE_MSG_PUB.Add;
1438: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1439: -- p_x_header_adj_tbl(I).DISCOUNT_LINE_ID := FND_API.G_MISS_NUM;
1440: END IF;
1441:
1445: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN PERCENT... ' ) ;
1446: END IF;
1447: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1448: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','PERCENT');
1449: -- OE_MSG_PUB.Add;
1450: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1451: -- p_x_header_adj_tbl(I).PERCENT := FND_API.G_MISS_NUM;
1452: END IF;
1453:
1457: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN CHANGE_REQUEST_CODE... ' ) ;
1458: END IF;
1459: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1460: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','CHANGE_REQUEST_CODE');
1461: -- OE_MSG_PUB.Add;
1462: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1463: -- p_x_header_adj_tbl(I).CHANGE_REQUEST_CODE := FND_API.G_MISS_CHAR;
1464: END IF;
1465:
1469: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN STATUS_FLAG... ' ) ;
1470: END IF;
1471: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1472: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','STATUS_FLAG');
1473: -- OE_MSG_PUB.Add;
1474: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1475: -- p_x_header_adj_tbl(I).STATUS_FLAG := FND_API.G_MISS_CHAR;
1476: END IF;
1477:
1494: IF l_debug_level > 0 THEN
1495: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR HEADER ATTRIBUTE' ) ;
1496: END IF;
1497:
1498: OE_MSG_PUB.set_msg_context(
1499: p_entity_code => 'HEADER_PATTS'
1500: ,p_entity_ref => p_x_header_price_att_tbl(I).orig_sys_atts_ref
1501:
1502: ,p_entity_id => null
1566: IF l_debug_level > 0 THEN
1567: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR HEADER SALES CREDITS' ) ;
1568: END IF;
1569:
1570: OE_MSG_PUB.set_msg_context(
1571: p_entity_code => 'HEADER_SCREDIT'
1572: ,p_entity_ref => p_x_header_scredit_tbl(I).orig_sys_credit_ref
1573: ,p_entity_id => null
1574: ,p_header_id => p_x_header_rec.header_id
1596: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN CHANGE_REQUEST_CODE... ' ) ;
1597: END IF;
1598: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1599: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','CHANGE_REQUEST_CODE');
1600: -- OE_MSG_PUB.Add;
1601: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1602: -- p_x_header_scredit_tbl(I).CHANGE_REQUEST_CODE := FND_API.G_MISS_CHAR;
1603: END IF;
1604:
1608: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN STATUS_FLAG... ' ) ;
1609: END IF;
1610: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1611: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','STATUS_FLAG');
1612: -- OE_MSG_PUB.Add;
1613: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1614: -- p_x_header_scredit_tbl(I).STATUS_FLAG := FND_API.G_MISS_CHAR;
1615: END IF;
1616:
1633: IF l_debug_level > 0 THEN
1634: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR HEADER PAYMENTS' ) ;
1635: END IF;
1636:
1637: OE_MSG_PUB.set_msg_context(
1638: p_entity_code => 'HEADER_PAYMENT'
1639: ,p_entity_ref => p_x_header_payment_tbl(I).orig_sys_payment_ref
1640: ,p_entity_id => null
1641: ,p_header_id => p_x_header_rec.header_id
1686: Set message context for line price adjustments
1687: -----------------------------------------------------------
1688: */
1689:
1690: OE_MSG_PUB.set_msg_context(
1691: p_entity_code => 'LINE_ADJ'
1692: ,p_entity_ref => p_x_line_adj_tbl(I).orig_sys_discount_ref
1693: ,p_entity_id => null
1694: ,p_header_id => p_x_header_rec.header_id
1712: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN DISCOUNT_ID... ' ) ;
1713: END IF;
1714: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1715: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','DISCOUNT_ID');
1716: -- OE_MSG_PUB.Add;
1717: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1718: -- p_x_line_adj_tbl(I).DISCOUNT_ID := FND_API.G_MISS_NUM;
1719: END IF;
1720:
1724: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN DISCOUNT_LINE_ID... ' ) ;
1725: END IF;
1726: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1727: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','DISCOUNT_LINE_ID');
1728: -- OE_MSG_PUB.Add;
1729: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1730: -- p_x_line_adj_tbl(I).DISCOUNT_LINE_ID := FND_API.G_MISS_NUM;
1731: END IF;
1732:
1736: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN PERCENT... ' ) ;
1737: END IF;
1738: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1739: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','PERCENT');
1740: -- OE_MSG_PUB.Add;
1741: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1742: -- p_x_line_adj_tbl(I).PERCENT := FND_API.G_MISS_NUM;
1743: END IF;
1744:
1748: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN APPLIED_FLAG... ' ) ;
1749: END IF;
1750: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1751: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','APPLIED_FLAG');
1752: -- OE_MSG_PUB.Add;
1753: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1754: -- p_x_line_adj_tbl(I).APPLIED_FLAG := FND_API.G_MISS_CHAR;
1755: END IF;
1756:
1760: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN ARITHMETIC_OPERATOR... ' ) ;
1761: END IF;
1762: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1763: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','ARITHMETIC_OPERATOR');
1764: -- OE_MSG_PUB.Add;
1765: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1766: -- p_x_line_adj_tbl(I).ARITHMETIC_OPERATOR := FND_API.G_MISS_CHAR;
1767: END IF;
1768:
1784: IF l_debug_level > 0 THEN
1785: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR LINE ATTRIBUTE' ) ;
1786: END IF;
1787:
1788: OE_MSG_PUB.set_msg_context(
1789: p_entity_code => 'LINE_PATTS'
1790: -- ,p_entity_ref => p_x_line_price_att_tbl(I).orig_sys_atts_ref
1791:
1792: ,p_entity_id => p_x_line_price_att_tbl(I).order_price_attrib_id
1851: /* -----------------------------------------------------------
1852: Set message context for line sales credits
1853: -----------------------------------------------------------
1854: */
1855: OE_MSG_PUB.set_msg_context(
1856: p_entity_code => 'LINE_SCREDIT'
1857: ,p_entity_ref => p_x_line_scredit_tbl(I).orig_sys_credit_ref
1858: ,p_entity_id => null
1859: ,p_header_id => p_x_header_rec.header_id
1877: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN CHANGE_REQUEST_CODE... ' ) ;
1878: END IF;
1879: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1880: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','CHANGE_REQUEST_CODE');
1881: -- OE_MSG_PUB.Add;
1882: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1883: -- p_x_line_scredit_tbl(I).CHANGE_REQUEST_CODE := FND_API.G_MISS_CHAR;
1884: END IF;
1885:
1889: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN STATUS_FLAG... ' ) ;
1890: END IF;
1891: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1892: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','STATUS_FLAG');
1893: -- OE_MSG_PUB.Add;
1894: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1895: -- p_x_line_scredit_tbl(I).STATUS_FLAG := FND_API.G_MISS_CHAR;
1896: END IF;
1897:
1908: /* -----------------------------------------------------------
1909: Set message context for line payments
1910: -----------------------------------------------------------
1911: */
1912: OE_MSG_PUB.set_msg_context(
1913: p_entity_code => 'LINE_PAYMENT'
1914: ,p_entity_ref => p_x_line_payment_tbl(I).orig_sys_payment_ref
1915: ,p_entity_id => null
1916: ,p_header_id => p_x_header_rec.header_id
1956: /* -----------------------------------------------------------
1957: Set message context for line lot serials
1958: -----------------------------------------------------------
1959: */
1960: OE_MSG_PUB.set_msg_context(
1961: p_entity_code => 'LOT_SERIAL'
1962: ,p_entity_ref => p_x_lot_serial_tbl(I).orig_sys_lotserial_ref
1963: ,p_entity_id => null
1964: ,p_header_id => p_x_header_rec.header_id
1982: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN CHANGE_REQUEST_CODE... ' ) ;
1983: END IF;
1984: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1985: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','CHANGE_REQUEST_CODE');
1986: -- OE_MSG_PUB.Add;
1987: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
1988: -- p_x_lot_serial_tbl(I).CHANGE_REQUEST_CODE := FND_API.G_MISS_CHAR;
1989: END IF;
1990:
1994: oe_debug_pub.add( 'CANNOT POPULATE DERIVED COLUMN STATUS_FLAG... ' ) ;
1995: END IF;
1996: -- FND_MESSAGE.SET_NAME('ONT','OE_OIM_DERIVED_COLUMNS');
1997: -- FND_MESSAGE.SET_TOKEN('DERIVED_COL','STATUS_FLAG');
1998: -- OE_MSG_PUB.Add;
1999: -- p_x_return_status := FND_API.G_RET_STS_ERROR;
2000: -- p_x_lot_serial_tbl(I).STATUS_FLAG := FND_API.G_MISS_CHAR;
2001: END IF;
2002:
2006: WHEN OTHERS THEN
2007: IF l_debug_level > 0 THEN
2008: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
2009: END IF;
2010: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2011: p_x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2012: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Check_Derived_Flags');
2013: END IF;
2014:
2008: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
2009: END IF;
2010: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2011: p_x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2012: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Check_Derived_Flags');
2013: END IF;
2014:
2015: END CHECK_DERIVED_FLAGS;
2016:
2178: IF l_debug_level > 0 THEN
2179: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT' ) ;
2180: END IF;
2181:
2182: OE_MSG_PUB.set_msg_context(
2183: p_entity_code => 'HEADER'
2184: ,p_entity_ref => null
2185: ,p_entity_id => null
2186: ,p_header_id => p_x_header_rec.header_id
2212: IF l_debug_level > 0 THEN
2213: oe_debug_pub.add( 'ORDER SOURCE MISSING... ' ) ;
2214: END IF;
2215: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORDER_SOURCE');
2216: OE_MSG_PUB.Add;
2217: p_return_status := FND_API.G_RET_STS_ERROR;
2218: END IF;
2219:
2220: /* -----------------------------------------------------------
2230: IF l_debug_level > 0 THEN
2231: oe_debug_pub.add( 'INVALID ORIG_SYS_DOCUMENT_REF... ' ) ;
2232: END IF;
2233: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_DOCUMENT_REF');
2234: OE_MSG_PUB.Add;
2235: p_return_status := FND_API.G_RET_STS_ERROR;
2236: END IF;
2237:
2238:
2297: IF l_debug_level > 0 THEN
2298: oe_debug_pub.add( 'ERROR: NEW CHANGE SEQ LESS THAN OR EQUAL TO OLD') ;
2299: END IF;
2300: FND_MESSAGE.SET_NAME('ONT','OE_OI_CHANGE_OUT_OF_SEQUENCE');
2301: OE_MSG_PUB.Add;
2302: p_return_status := FND_API.G_RET_STS_ERROR;
2303: end if;
2304:
2305: end if;
2312: IF l_debug_level > 0 THEN
2313: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
2314: END IF;
2315:
2316: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2317: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2318: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.header_change_sequence_validation');
2319: END IF;
2320: END; -- header change sequence is not null
2314: END IF;
2315:
2316: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2317: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2318: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.header_change_sequence_validation');
2319: END IF;
2320: END; -- header change sequence is not null
2321: ELSE
2322: IF l_debug_level > 0 THEN
2435: oe_debug_pub.add( 'REF DATA PASSED BUT PARAMETER NOT SET' ) ;
2436: END IF;
2437: fnd_message.set_name('ONT','ONT_OI_INL_SET_PARAMETER');
2438: fnd_message.set_token('TYPE', 'Customers, Addresses or Contacts');
2439: oe_msg_pub.add;
2440: p_return_status := FND_API.G_RET_STS_ERROR;
2441: End If;
2442: -- End of If for checking add customers parameter}
2443: End If;
2513: IF l_debug_level > 0 THEN
2514: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
2515: END IF;
2516:
2517: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_Msg_Lvl_Unexp_Error) THEN
2518: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2519: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.Req_Header_Id_derivation');
2520: END IF;
2521: END;
2515: END IF;
2516:
2517: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_Msg_Lvl_Unexp_Error) THEN
2518: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2519: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.Req_Header_Id_derivation');
2520: END IF;
2521: END;
2522: END IF;
2523:
2581: IF l_debug_level > 0 THEN
2582: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO INSERT A NEW ORDER WITH THE SAME ORDER SOURCE ID AND ORIG_SYS_DOCUMENT_REF... ' ) ;
2583: END IF;
2584: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
2585: OE_MSG_PUB.Add;
2586: p_return_status := FND_API.G_RET_STS_ERROR;
2587: Exception
2588: When no_data_found then
2589: IF l_debug_level > 0 THEN
2593: IF l_debug_level > 0 THEN
2594: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO INSERT NEW ORDER... ' ) ;
2595: END IF;
2596: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
2597: OE_MSG_PUB.Add;
2598: p_return_status := FND_API.G_RET_STS_ERROR;
2599: End;
2600: --}{
2601: ELSIF p_x_header_rec.operation IN ('UPDATE','DELETE')
2630: IF l_debug_level > 0 THEN
2631: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING ORDER BUT THAT ORDER DOES NOT EXIST... ' ) ;
2632: END IF;
2633: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
2634: OE_MSG_PUB.Add;
2635: p_return_status := FND_API.G_RET_STS_ERROR;
2636: When others then
2637: IF l_debug_level > 0 THEN
2638: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING ORDER ... ' ) ;
2637: IF l_debug_level > 0 THEN
2638: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING ORDER ... ' ) ;
2639: END IF;
2640: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
2641: OE_MSG_PUB.Add;
2642: p_return_status := FND_API.G_RET_STS_ERROR;
2643: End;
2644: --}{
2645: ELSE --IF p_x_header_rec.operation NOT IN ('INSERT','CREATE','UPDATE','DELETE')
2646: IF l_debug_level > 0 THEN
2647: oe_debug_pub.add( 'INVALID OPERATION CODE. NOT ONE OF INSERT , CREATE , UPDATE OR DELETE... ' ) ;
2648: END IF;
2649: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
2650: OE_MSG_PUB.Add;
2651: p_return_status := FND_API.G_RET_STS_ERROR;
2652:
2653: END IF; --}
2654:
2657: IF l_debug_level > 0 THEN
2658: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
2659: END IF;
2660:
2661: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2662: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2663: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.header_operation_validation');
2664: END IF;
2665: END;
2659: END IF;
2660:
2661: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2662: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2663: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.header_operation_validation');
2664: END IF;
2665: END;
2666:
2667: /* bsadri fill in the IDs for actions if this is an update */
2701: IF l_debug_level > 0 THEN
2702: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR HEADER ADJUSTMENTS' ) ;
2703: END IF;
2704:
2705: OE_MSG_PUB.set_msg_context(
2706: p_entity_code => 'HEADER_ADJ'
2707: ,p_entity_ref => p_x_header_adj_tbl(I).orig_sys_discount_ref
2708: ,p_entity_id => null
2709: ,p_header_id => p_x_header_rec.header_id
2734: IF l_debug_level > 0 THEN
2735: oe_debug_pub.add( 'INVALID ORIG_SYS_DISCOUNT_REF... ' ) ;
2736: END IF;
2737: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_DISCOUNT_REF');
2738: OE_MSG_PUB.Add;
2739: p_return_status := FND_API.G_RET_STS_ERROR;
2740: END IF;
2741:
2742: /* -----------------------------------------------------------
2759: IF l_debug_level > 0 THEN
2760: oe_debug_pub.add( 'INVALID HEADER ADJUSTMENTS OPERATION CODE...' ) ;
2761: END IF;
2762: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
2763: OE_MSG_PUB.Add;
2764: p_return_status := FND_API.G_RET_STS_ERROR;
2765: END IF;
2766:
2767: -- aksingh(10/11/2000) this is in process of being coded
2788: IF l_debug_level > 0 THEN
2789: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO INSERT A NEW HDRADJ WITH THE SAME HEADER_ID AND ORIG_SYS_DISCOUNT_REF... ' ) ;
2790: END IF;
2791: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
2792: OE_MSG_PUB.Add;
2793: p_return_status := FND_API.G_RET_STS_ERROR;
2794: Exception
2795: When no_data_found then
2796: IF l_debug_level > 0 THEN
2800: IF l_debug_level > 0 THEN
2801: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN INSERTING NEW HDR PRICE ADJ... ' ) ;
2802: END IF;
2803: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
2804: OE_MSG_PUB.Add;
2805: p_return_status := FND_API.G_RET_STS_ERROR;
2806: End;
2807: End If; -- Insert, Create operation
2808:
2838: IF l_debug_level > 0 THEN
2839: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING HDR ADJ BUT THAT DOES NOT EXIST... ' ) ;
2840: END IF;
2841: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
2842: OE_MSG_PUB.Add;
2843: p_return_status := FND_API.G_RET_STS_ERROR;
2844: When others then
2845: IF l_debug_level > 0 THEN
2846: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING HDRADJ ... ' ) ;
2845: IF l_debug_level > 0 THEN
2846: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING HDRADJ ... ' ) ;
2847: END IF;
2848: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
2849: OE_MSG_PUB.Add;
2850: p_return_status := FND_API.G_RET_STS_ERROR;
2851: End;
2852: End IF; -- Update and Delete operation
2853:
2881: oe_debug_pub.add( 'NOT VALID PROMOTION NAME =' ||P_X_HEADER_ADJ_VAL_TBL ( I ) .LIST_NAME ) ;
2882: END IF;
2883: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_LIST_NAME');
2884: FND_MESSAGE.SET_TOKEN('LIST_NAME',p_x_header_adj_val_tbl(I).list_name);
2885: OE_MSG_PUB.Add;
2886: p_return_status := FND_API.G_RET_STS_ERROR;
2887: END IF;
2888:
2889: IF (p_return_status NOT IN (FND_API.G_RET_STS_ERROR)
2965: IF l_debug_level > 0 THEN
2966: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR HEADER ATTS' ) ;
2967: END IF;
2968:
2969: OE_MSG_PUB.set_msg_context(
2970: p_entity_code => 'HEADER_PATTS'
2971: ,p_entity_ref => p_x_header_price_att_tbl(I).orig_sys_atts_ref
2972: ,p_entity_id => null
2973: ,p_header_id => p_x_header_rec.header_id
2998: IF l_debug_level > 0 THEN
2999: oe_debug_pub.add( 'INVALID ORIG_SYS_ATTRIBUTE_REF... ' ) ;
3000: END IF;
3001: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_ATTS_REF');
3002: OE_MSG_PUB.Add;
3003: p_return_status := FND_API.G_RET_STS_ERROR;
3004: END IF;
3005:
3006: /* -----------------------------------------------------------
3023: IF l_debug_level > 0 THEN
3024: oe_debug_pub.add( 'INVALID HEADER ATTRIBUTE OPERATION CODE...' ) ;
3025: END IF;
3026: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3027: OE_MSG_PUB.Add;
3028: p_return_status := FND_API.G_RET_STS_ERROR;
3029: END IF;
3030:
3031: IF p_x_header_price_att_tbl(I).operation IN ('INSERT', 'CREATE')
3051: IF l_debug_level > 0 THEN
3052: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO INSERT A NEW HDRATT WITH THE SAME HEADER_ID AND ATTRIBUTE ID....' ) ;
3053: END IF;
3054: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3055: OE_MSG_PUB.Add;
3056: p_return_status := FND_API.G_RET_STS_ERROR;
3057: Exception
3058: When no_data_found then
3059: IF l_debug_level > 0 THEN
3063: IF l_debug_level > 0 THEN
3064: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN INSERTING NEW HDR PRICE ATT... ' ) ;
3065: END IF;
3066: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3067: OE_MSG_PUB.Add;
3068: p_return_status := FND_API.G_RET_STS_ERROR;
3069: End;
3070: End If; -- Insert, Create operation
3071:
3099: IF l_debug_level > 0 THEN
3100: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING HDR ATT BUT THAT DOES NOT EXIST... ' ) ;
3101: END IF;
3102: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3103: OE_MSG_PUB.Add;
3104: p_return_status := FND_API.G_RET_STS_ERROR;
3105: When others then
3106: IF l_debug_level > 0 THEN
3107: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING HDRATT ... ' ) ;
3106: IF l_debug_level > 0 THEN
3107: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING HDRATT ... ' ) ;
3108: END IF;
3109: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3110: OE_MSG_PUB.Add;
3111: p_return_status := FND_API.G_RET_STS_ERROR;
3112: End;
3113: End IF; -- Update and Delete operation
3114:
3156: IF l_debug_level > 0 THEN
3157: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR HEADER SALES CREDITS' ) ;
3158: END IF;
3159:
3160: OE_MSG_PUB.set_msg_context(
3161: p_entity_code => 'HEADER_SCREDIT'
3162: ,p_entity_ref => p_x_header_scredit_tbl(I).orig_sys_credit_ref
3163: ,p_entity_id => null
3164: ,p_header_id => p_x_header_rec.header_id
3189: IF l_debug_level > 0 THEN
3190: oe_debug_pub.add( 'INVALID ORIG_SYS_CREDIT_REF... ' ) ;
3191: END IF;
3192: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_CREDIT_REF');
3193: OE_MSG_PUB.Add;
3194: p_return_status := FND_API.G_RET_STS_ERROR;
3195: END IF;
3196:
3197: /* -----------------------------------------------------------
3215: IF l_debug_level > 0 THEN
3216: oe_debug_pub.add( 'INVALID HEADER SALES CREDITS OPERATION CODE...' ) ;
3217: END IF;
3218: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3219: OE_MSG_PUB.Add;
3220: p_return_status := FND_API.G_RET_STS_ERROR;
3221: END IF;
3222:
3223: -- aksingh(10/11/2000) this is in process of being coded
3241: IF l_debug_level > 0 THEN
3242: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO INSERT A NEW HDRCREDIT WITH THE SAME HEADER_ID AND ORIG_SYS_CREDIT_REF... ' ) ;
3243: END IF;
3244: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3245: OE_MSG_PUB.Add;
3246: p_return_status := FND_API.G_RET_STS_ERROR;
3247: Exception
3248: When no_data_found then
3249: IF l_debug_level > 0 THEN
3253: IF l_debug_level > 0 THEN
3254: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN INSERTING NEW HDR SALES CREDIT... ' ) ;
3255: END IF;
3256: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3257: OE_MSG_PUB.Add;
3258: p_return_status := FND_API.G_RET_STS_ERROR;
3259:
3260: End;
3261: END IF; -- Insert, Create Operation
3292: IF l_debug_level > 0 THEN
3293: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING ORDER BUT THAT ORDER DOES NOT EXIST... ' ) ;
3294: END IF;
3295: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3296: OE_MSG_PUB.Add;
3297: p_return_status := FND_API.G_RET_STS_ERROR;
3298: When others then
3299: IF l_debug_level > 0 THEN
3300: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING HEADER LEVEL SCREDIT ... ' ) ;
3299: IF l_debug_level > 0 THEN
3300: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING HEADER LEVEL SCREDIT ... ' ) ;
3301: END IF;
3302: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3303: OE_MSG_PUB.Add;
3304: p_return_status := FND_API.G_RET_STS_ERROR;
3305: End;
3306: End IF; -- Update and Delete operation
3307:
3319: IF l_debug_level > 0 THEN
3320: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR HEADER PAYMENTS' ) ;
3321: END IF;
3322:
3323: OE_MSG_PUB.set_msg_context(
3324: p_entity_code => 'HEADER_PAYMENT'
3325: ,p_entity_ref => p_x_header_payment_tbl(I).orig_sys_payment_ref
3326: ,p_entity_id => null
3327: ,p_header_id => p_x_header_rec.header_id
3353: oe_debug_pub.add( 'INVALID ORIG_SYS_PAYMENT_REF... ' ) ;
3354: END IF;
3355: /* multiple payment: new message */
3356: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_PAYMENT_REF');
3357: OE_MSG_PUB.Add;
3358: p_return_status := FND_API.G_RET_STS_ERROR;
3359: END IF;
3360:
3361: /* -----------------------------------------------------------
3379: IF l_debug_level > 0 THEN
3380: oe_debug_pub.add( 'INVALID HEADER PAYMENT OPERATION CODE...' ) ;
3381: END IF;
3382: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3383: OE_MSG_PUB.Add;
3384: p_return_status := FND_API.G_RET_STS_ERROR;
3385: END IF;
3386:
3387: IF p_x_header_payment_tbl(I).operation IN ('INSERT', 'CREATE')
3404: IF l_debug_level > 0 THEN
3405: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO INSERT A NEW HDR PAYMENT WITH THE SAME HEADER_ID AND ORIG_SYS_PAYMENT_REF... ' ) ;
3406: END IF;
3407: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3408: OE_MSG_PUB.Add;
3409: p_return_status := FND_API.G_RET_STS_ERROR;
3410: Exception
3411: When no_data_found then
3412: IF l_debug_level > 0 THEN
3416: IF l_debug_level > 0 THEN
3417: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN INSERTING NEW HDR PAYMENT... ' ) ;
3418: END IF;
3419: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3420: OE_MSG_PUB.Add;
3421: p_return_status := FND_API.G_RET_STS_ERROR;
3422:
3423: End;
3424: END IF; -- Insert, Create Operation
3458: IF l_debug_level > 0 THEN
3459: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING ORDER BUT THAT ORDER DOES NOT EXIST... ' ) ;
3460: END IF;
3461: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3462: OE_MSG_PUB.Add;
3463: p_return_status := FND_API.G_RET_STS_ERROR;
3464: When others then
3465: IF l_debug_level > 0 THEN
3466: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING HEADER LEVEL payment ... ' ) ;
3465: IF l_debug_level > 0 THEN
3466: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING HEADER LEVEL payment ... ' ) ;
3467: END IF;
3468: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3469: OE_MSG_PUB.Add;
3470: p_return_status := FND_API.G_RET_STS_ERROR;
3471: End;
3472: End IF; -- Update and Delete operation
3473: END LOOP; -- header payment
3509: IF l_debug_level > 0 THEN
3510: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR THE LINE' ) ;
3511: END IF;
3512:
3513: OE_MSG_PUB.set_msg_context(
3514: p_entity_code => 'LINE'
3515: ,p_entity_ref => null
3516: ,p_entity_id => null
3517: ,p_header_id => p_x_header_rec.header_id
3545: IF l_debug_level > 0 THEN
3546: oe_debug_pub.add( 'INVALID ORIG_SYS_LINE_REF... ' ) ;
3547: END IF;
3548: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_LINE_REF');
3549: OE_MSG_PUB.Add;
3550: p_return_status := FND_API.G_RET_STS_ERROR;
3551: END IF;
3552: ELSIF OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL >= '110508' AND
3553: G_IMPORT_SHIPMENTS = 'NO' THEN
3555: IF l_debug_level > 0 THEN
3556: oe_debug_pub.add( 'INVALID ORIG_SYS_LINE_REF... ' ) ;
3557: END IF;
3558: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_LINE_REF');
3559: OE_MSG_PUB.Add;
3560: p_return_status := FND_API.G_RET_STS_ERROR;
3561: END IF;
3562: ELSIF OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL < '110508' THEN
3563: IF p_x_line_tbl(I).orig_sys_line_ref = FND_API.G_MISS_CHAR THEN
3564: IF l_debug_level > 0 THEN
3565: oe_debug_pub.add( 'INVALID ORIG_SYS_LINE_REF... ' ) ;
3566: END IF;
3567: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_LINE_REF');
3568: OE_MSG_PUB.Add;
3569: p_return_status := FND_API.G_RET_STS_ERROR;
3570: END IF;
3571: END IF;
3572:
3618: IF ( p_x_line_tbl(I).ordered_quantity_uom2 IS NOT NULL
3619: AND p_x_line_tbl(I).ordered_quantity_uom2 <> FND_API.G_MISS_CHAR ) THEN
3620: --oe_debug_pub.add( 'OPM INVALID ordered_quantity_uom2 - should not be provided... ' ) ;
3621: FND_MESSAGE.SET_NAME('INV','INV_SECONDARY_UOM_NOT_REQUIRED'); -- INVCONV
3622: OE_MSG_PUB.Add;
3623: p_return_status := FND_API.G_RET_STS_ERROR;
3624: IF l_debug_level > 0 THEN
3625: oe_debug_pub.add( 'INVALID ORDERED_QUANTITY_UOM2... should not be provided' ) ;
3626: END IF;
3631: IF ( ( p_x_line_tbl(I).ordered_quantity_uom2 IS NOT NULL
3632: AND p_x_line_tbl(I).ordered_quantity_uom2 <> FND_API.G_MISS_CHAR )
3633: AND p_x_line_tbl(I).ordered_quantity_uom2 <> l_secondary_uom_code ) THEN -- INVCONV
3634: FND_MESSAGE.SET_NAME('PO','PO_INCORRECT_SECONDARY_UOM'); -- INVCONV
3635: OE_MSG_PUB.Add;
3636: p_return_status := FND_API.G_RET_STS_ERROR;
3637: IF l_debug_level > 0 THEN
3638: oe_debug_pub.add( 'INVALID ORDERED_QUANTITY_UOM2... does not match mtl_system_items' ) ;
3639: END IF;
3658: IF l_debug_level > 0 THEN
3659: oe_debug_pub.add( 'INVALID QUANTITY ON 3A9' ) ;
3660: END IF;
3661: FND_MESSAGE.SET_NAME('ONT','OE_OI_INVALID_QTY_3A9');
3662: OE_MSG_PUB.Add;
3663: p_return_status := FND_API.G_RET_STS_ERROR;
3664: Else
3665:
3666: Begin
3680: IF l_debug_level > 0 THEN
3681: oe_debug_pub.add( 'INVALID QUANTITY ON 3A9' ) ;
3682: END IF;
3683: FND_MESSAGE.SET_NAME('ONT','OE_OI_INVALID_QTY_3A9');
3684: OE_MSG_PUB.Add;
3685: p_return_status := FND_API.G_RET_STS_ERROR;
3686: End If;
3687: Exception
3688: When Others Then
3709: IF l_debug_level > 0 THEN
3710: oe_debug_pub.add( 'INVALID OPERATION CODE. YOU ARE TRYING TO INSERT THE ORDER HEADER BUT NOT THE LINES. IF THE OPERATION ON THE HEADER IS INSERT , IT SHOULD BE INSERT AT THE LINE LEVEL ALSO , NOT UPDATE OR DELETE...' ) ;
3711: END IF;
3712: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3713: OE_MSG_PUB.Add;
3714: p_return_status := FND_API.G_RET_STS_ERROR;
3715: END IF;
3716:
3717: /* -----------------------------------------------------------
3825: IF l_debug_level > 0 THEN
3826: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
3827: END IF;
3828:
3829: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3830: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3831: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.Req_Line_Id_derivation');
3832: END IF;
3833: END;
3827: END IF;
3828:
3829: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3830: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3831: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.Req_Line_Id_derivation');
3832: END IF;
3833: END;
3834: END IF;
3835:
3869: oe_debug_pub.add( 'REF DATA PASSED BUT PARAMETER NOT SET' ) ;
3870: END IF;
3871: fnd_message.set_name('ONT','ONT_OI_INL_SET_PARAMETER');
3872: fnd_message.set_token('TYPE', 'Customers, Addresses or Contacts');
3873: oe_msg_pub.add;
3874: p_return_status := FND_API.G_RET_STS_ERROR;
3875: End If;
3876: -- End of If for checking add customers parameter}
3877: End If;
3926: FND_MESSAGE.SET_TOKEN('OBJECT',
3927: p_x_line_tbl(I).split_from_line_ref);
3928: FND_MESSAGE.SET_TOKEN('REASON',
3929: 'Could not find the reference line');
3930: OE_MSG_PUB.Add;
3931: p_return_status := FND_API.G_RET_STS_ERROR;
3932: END IF;
3933: END IF;
3934: BEGIN
3949: IF l_debug_level > 0 THEN
3950: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO INSERT A NEW LINE WITH THE SAME ORDER SOURCE ID , ORIG_SYS_DOCUMENT_REF AND ORIG_SYS_LINE_REF... ' ) ;
3951: END IF;
3952: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3953: OE_MSG_PUB.Add;
3954: p_return_status := FND_API.G_RET_STS_ERROR;
3955: Exception
3956: When no_data_found then
3957: IF l_debug_level > 0 THEN
3961: IF l_debug_level > 0 THEN
3962: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO INSERT A NEW LINE... ' ) ;
3963: END IF;
3964: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3965: OE_MSG_PUB.Add;
3966: p_return_status := FND_API.G_RET_STS_ERROR;
3967: End;
3968: ELSIF OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL >= '110508' AND
3969: G_IMPORT_SHIPMENTS = 'NO' THEN
4000: FND_MESSAGE.SET_TOKEN('OBJECT',
4001: p_x_line_tbl(I).split_from_line_ref);
4002: FND_MESSAGE.SET_TOKEN('REASON',
4003: 'Could not find the reference line');
4004: OE_MSG_PUB.Add;
4005: p_return_status := FND_API.G_RET_STS_ERROR;
4006: END IF;
4007: END IF;
4008: BEGIN
4022: IF l_debug_level > 0 THEN
4023: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO INSERT A NEW LINE WITH THE SAME ORDER SOURCE ID , ORIG_SYS_DOCUMENT_REF AND ORIG_SYS_LINE_REF. .. ' ) ;
4024: END IF;
4025: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
4026: OE_MSG_PUB.Add;
4027: p_return_status := FND_API.G_RET_STS_ERROR;
4028: Exception
4029: When no_data_found then
4030: IF l_debug_level > 0 THEN
4034: IF l_debug_level > 0 THEN
4035: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO INSERT A NEW LINE... ' ) ;
4036: END IF;
4037: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
4038: OE_MSG_PUB.Add;
4039: p_return_status := FND_API.G_RET_STS_ERROR;
4040: End;
4041: ELSIF OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL < '110508' THEN
4042: IF (p_x_line_tbl(I).split_from_line_ref IS NOT NULL) AND
4072: FND_MESSAGE.SET_TOKEN('OBJECT',
4073: p_x_line_tbl(I).split_from_line_ref);
4074: FND_MESSAGE.SET_TOKEN('REASON',
4075: 'Could not find the reference line');
4076: OE_MSG_PUB.Add;
4077: p_return_status := FND_API.G_RET_STS_ERROR;
4078: END IF;
4079: END IF;
4080: BEGIN
4090: IF l_debug_level > 0 THEN
4091: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO INSERT A NEW LINE WITH THE SAME ORDER SOURCE ID , ORIG_SYS_DOCUMENT_REF AND ORIG_SYS_LINE_REF. .. ' ) ;
4092: END IF;
4093: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
4094: OE_MSG_PUB.Add;
4095: p_return_status := FND_API.G_RET_STS_ERROR;
4096: Exception
4097: When no_data_found then
4098: IF l_debug_level > 0 THEN
4102: IF l_debug_level > 0 THEN
4103: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO INSERT A NEW LINE... ' ) ;
4104: END IF;
4105: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
4106: OE_MSG_PUB.Add;
4107: p_return_status := FND_API.G_RET_STS_ERROR;
4108: End;
4109:
4110: END IF;
4158: IF l_debug_level > 0 THEN
4159: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING LINE BUT THAT LINE DOES NOT EXIST... ' ) ;
4160: END IF;
4161: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
4162: OE_MSG_PUB.Add;
4163: p_return_status := FND_API.G_RET_STS_ERROR;
4164: When others then
4165: IF l_debug_level > 0 THEN
4166: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING LINE ... ' ) ;
4165: IF l_debug_level > 0 THEN
4166: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING LINE ... ' ) ;
4167: END IF;
4168: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
4169: OE_MSG_PUB.Add;
4170: p_return_status := FND_API.G_RET_STS_ERROR;
4171: End;
4172: ELSE
4173: Begin
4191: IF l_debug_level > 0 THEN
4192: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING LINE BUT THAT LINE DOES NOT EXIST... ' ) ;
4193: END IF;
4194: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
4195: OE_MSG_PUB.Add;
4196: p_return_status := FND_API.G_RET_STS_ERROR;
4197: When others then
4198: IF l_debug_level > 0 THEN
4199: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING LINE ... ' ) ;
4198: IF l_debug_level > 0 THEN
4199: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING LINE ... ' ) ;
4200: END IF;
4201: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
4202: OE_MSG_PUB.Add;
4203: p_return_status := FND_API.G_RET_STS_ERROR;
4204: End;
4205: END IF;
4206:
4225: IF l_debug_level > 0 THEN
4226: oe_debug_pub.add( 'INVALID OPERATION CODE. NOT ONE OF INSERT , CREATE , UPDATE OR DELETE... ' ) ;
4227: END IF;
4228: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
4229: OE_MSG_PUB.Add;
4230: p_return_status := FND_API.G_RET_STS_ERROR;
4231:
4232: END IF;
4233:
4236: IF l_debug_level > 0 THEN
4237: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4238: END IF;
4239:
4240: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4241: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4242: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.header_operation_validation');
4243: END IF;
4244: END;
4238: END IF;
4239:
4240: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4241: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4242: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.header_operation_validation');
4243: END IF;
4244: END;
4245:
4246: /* -----------------------------------------------------------
4258: IF l_debug_level > 0 THEN
4259: oe_debug_pub.add( 'INVALID ITEM TYPE CODE... ' ) ;
4260: END IF;
4261: FND_MESSAGE.SET_NAME('ONT','OE_OI_ITEM_TYPE');
4262: OE_MSG_PUB.Add;
4263: p_return_status := FND_API.G_RET_STS_ERROR;
4264: END IF;
4265: -- { Start of derivation of the sold_to_org_id for Header/Line
4266: If p_x_header_rec.sold_to_org_id IS NOT NULL AND
4305: IF l_debug_level > 0 THEN
4306: oe_debug_pub.add( 'SOLD TO ORG ID IS MISSING , AFTER CALL TO VALUE TO ID' ) ;
4307: END IF;
4308: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_CUSTOMER_ID');
4309: OE_MSG_PUB.Add;
4310: p_return_status := FND_API.G_RET_STS_ERROR;
4311: END IF;
4312: END IF;
4313: Exception
4315: IF l_debug_level > 0 THEN
4316: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN GETTING SOLD TO ORG ID IN OEXVIMSB... ' ) ;
4317: END IF;
4318: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_CUSTOMER_ID');
4319: OE_MSG_PUB.Add;
4320: p_return_status := FND_API.G_RET_STS_ERROR;
4321: End;
4322: -- End Begin}
4323: End If;
4369: END IF;
4370: IF l_debug_level > 0 THEN
4371: oe_debug_pub.add( 'TOO MANY ROWS ERROR: '||SQLERRM ) ;
4372: END IF;
4373: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4374: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4375: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4376: END IF;
4377: When others then
4371: oe_debug_pub.add( 'TOO MANY ROWS ERROR: '||SQLERRM ) ;
4372: END IF;
4373: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4374: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4375: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4376: END IF;
4377: When others then
4378: IF l_debug_level > 0 THEN
4379: oe_debug_pub.add( 'IN OEXVIMSB ITEM IDENTIFIER IS INT - OTHERS' ) ;
4380: END IF;
4381: IF l_debug_level > 0 THEN
4382: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4383: END IF;
4384: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4385: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4386: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4387: END IF;
4388: END;
4382: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4383: END IF;
4384: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4385: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4386: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4387: END IF;
4388: END;
4389: END IF;
4390: -- Adding 11/14/2000 End }
4420: END IF;
4421: IF l_debug_level > 0 THEN
4422: oe_debug_pub.add( 'TOO MANY ROWS ERROR: '||SQLERRM ) ;
4423: END IF;
4424: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4425: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4426: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4427: END IF;
4428: When others then
4422: oe_debug_pub.add( 'TOO MANY ROWS ERROR: '||SQLERRM ) ;
4423: END IF;
4424: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4425: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4426: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4427: END IF;
4428: When others then
4429: IF l_debug_level > 0 THEN
4430: oe_debug_pub.add( 'IN OEXVIMSB ITEM IDENTIFIER IS INT - OTHERS' ) ;
4431: END IF;
4432: IF l_debug_level > 0 THEN
4433: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4434: END IF;
4435: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4436: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4437: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4438: END IF;
4439: END;
4433: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4434: END IF;
4435: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4436: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4437: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4438: END IF;
4439: END;
4440: ELSIF (p_x_line_tbl(I).ordered_item_id <> FND_API.G_MISS_NUM AND
4441: p_x_line_tbl(I).ordered_item_id IS NOT NULL)
4461: END IF;
4462: IF l_debug_level > 0 THEN
4463: oe_debug_pub.add( 'TOO MANY ROWS ERROR: '||SQLERRM ) ;
4464: END IF;
4465: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4466: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4467: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4468: END IF;
4469: When others then
4463: oe_debug_pub.add( 'TOO MANY ROWS ERROR: '||SQLERRM ) ;
4464: END IF;
4465: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4466: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4467: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4468: END IF;
4469: When others then
4470: IF l_debug_level > 0 THEN
4471: oe_debug_pub.add( 'IN OEXVIMSB ITEM IDENTIFIER IS INT - OTHERS' ) ;
4472: END IF;
4473: IF l_debug_level > 0 THEN
4474: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4475: END IF;
4476: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4477: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4478: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4479: END IF;
4480: END;
4474: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4475: END IF;
4476: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4477: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4478: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4479: END IF;
4480: END;
4481: END IF;
4482: END IF;
4618: END IF;
4619: FND_MESSAGE.SET_NAME('ONT','OE_INV_CUS_ITEM');
4620: FND_MESSAGE.SET_TOKEN('ERROR_CODE', l_error_code);
4621: FND_MESSAGE.SET_TOKEN('ERROR_MESSAGE', l_error_message);
4622: OE_MSG_PUB.Add;
4623: END IF;
4624:
4625: INV_CUSTOMER_ITEM_GRP.CI_Attribute_Value(
4626: Z_Customer_Item_Id => l_ordered_item_id
4647: END IF;
4648: FND_MESSAGE.SET_NAME('ONT','OE_INV_CUS_ITEM');
4649: FND_MESSAGE.SET_TOKEN('ERROR_CODE', l_error_code);
4650: FND_MESSAGE.SET_TOKEN('ERROR_MESSAGE', l_error_message);
4651: OE_MSG_PUB.Add;
4652: ELSE --moved assignment of item_identifier_type to ELSE clause to prevent incorrect
4653: --assignment when a customer item is not found by the inventory API...bug 3683667
4654: IF l_debug_level > 0 THEN
4655: oe_debug_pub.add( 'ASSIGNING ITEM_IDENTIFIER_TYPE AS CUST' ) ;
4667: END IF;
4668: FND_MESSAGE.SET_NAME('ONT','OE_INV_INT_CUS_ITEM_ID');
4669: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', l_inventory_item_id_ord);
4670: FND_MESSAGE.SET_TOKEN('CUST_ITEM_ID', l_inventory_item_id_cust);
4671: OE_MSG_PUB.Add;
4672: p_x_line_tbl(I).inventory_item_id := l_inventory_item_id_cust;
4673: ELSIF l_inventory_item_id_ord IS NOT NULL
4674: THEN
4675: p_x_line_tbl(I).inventory_item_id := l_inventory_item_id_ord;
4718: END IF;
4719: FND_MESSAGE.SET_NAME('ONT','OE_INV_INT_CUS_ITEM_ID');
4720: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', l_inventory_item_id_ord);
4721: FND_MESSAGE.SET_TOKEN('CUST_ITEM_ID', l_inventory_item_id_gen);
4722: OE_MSG_PUB.Add;
4723: p_x_line_tbl(I).inventory_item_id := l_inventory_item_id_gen;
4724: ELSIF l_inventory_item_id_ord IS NOT NULL
4725: THEN
4726: p_x_line_tbl(I).inventory_item_id := l_inventory_item_id_ord;
4739: oe_debug_pub.add( 'TOO MANY ROWS ERROR: '||SQLERRM ) ;
4740: END IF;
4741: FND_MESSAGE.SET_NAME('ONT','OE_NOT_UNIQUE_ITEM');
4742: FND_MESSAGE.SET_TOKEN('GENERIC_ITEM', p_x_line_tbl(I).ordered_item);
4743: OE_MSG_PUB.Add;
4744: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4745: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4746: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_GEN_ITEM');
4747: END IF;
4740: END IF;
4741: FND_MESSAGE.SET_NAME('ONT','OE_NOT_UNIQUE_ITEM');
4742: FND_MESSAGE.SET_TOKEN('GENERIC_ITEM', p_x_line_tbl(I).ordered_item);
4743: OE_MSG_PUB.Add;
4744: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4745: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4746: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_GEN_ITEM');
4747: END IF;
4748: IF l_debug_level > 0 THEN
4742: FND_MESSAGE.SET_TOKEN('GENERIC_ITEM', p_x_line_tbl(I).ordered_item);
4743: OE_MSG_PUB.Add;
4744: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4745: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4746: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_GEN_ITEM');
4747: END IF;
4748: IF l_debug_level > 0 THEN
4749: oe_debug_pub.add( 'IN OEXVIMSB ITEM IDENTIFIER IS GEN - TO_MANY' ) ;
4750: END IF;
4751: When others then
4752: IF l_debug_level > 0 THEN
4753: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4754: END IF;
4755: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4756: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4757: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_GEN_ITEM');
4758: END IF;
4759: IF l_debug_level > 0 THEN
4753: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4754: END IF;
4755: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4756: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4757: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_GEN_ITEM');
4758: END IF;
4759: IF l_debug_level > 0 THEN
4760: oe_debug_pub.add( 'IN OEXVIMSB ITEM IDENTIFIER IS GEN - OTHERS' ) ;
4761: END IF;
4796: IF l_debug_level > 0 THEN
4797: oe_debug_pub.add( 'INVALID CALCULATE_PRICE FLAG... ' ) ;
4798: END IF;
4799: FND_MESSAGE.SET_NAME('ONT','OE_OI_CALCULATE_PRICE');
4800: OE_MSG_PUB.Add;
4801: p_return_status := FND_API.G_RET_STS_ERROR;
4802: END IF;
4803:
4804: /* -----------------------------------------------------------
4818: IF l_debug_level > 0 THEN
4819: oe_debug_pub.add( 'LIST PRICE OR SELLING PRICE IS NULL... ' ) ;
4820: END IF;
4821: FND_MESSAGE.SET_NAME('ONT','OE_OI_PRICE');
4822: OE_MSG_PUB.Add;
4823: p_return_status := FND_API.G_RET_STS_ERROR;
4824: END IF;
4825:
4826: /* -----------------------------------------------------------
4904: IF l_debug_level > 0 THEN
4905: oe_debug_pub.add( 'NOT FOUND LINEID FOR SEMI-DELAYED SERVICE' ) ;
4906: END IF;
4907: FND_MESSAGE.SET_NAME('ONT','OE_NO_SERV_TRANS');
4908: OE_MSG_PUB.Add;
4909: p_return_status := FND_API.G_RET_STS_ERROR;
4910: WHEN OTHERS THEN
4911: IF l_debug_level > 0 THEN
4912: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4910: WHEN OTHERS THEN
4911: IF l_debug_level > 0 THEN
4912: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4913: END IF;
4914: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_Msg_Lvl_Unexp_Error) THEN
4915: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4916: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.Line_id derivation for semi-delayed service');
4917: END IF;
4918: END;
4912: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4913: END IF;
4914: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_Msg_Lvl_Unexp_Error) THEN
4915: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4916: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.Line_id derivation for semi-delayed service');
4917: END IF;
4918: END;
4919: ELSE
4920: BEGIN
4940: IF l_debug_level > 0 THEN
4941: oe_debug_pub.add( 'NOT FOUND ORDER LINE FOR DELAYED SERVICE' ) ;
4942: END IF;
4943: FND_MESSAGE.SET_NAME('ONT','OE_NO_SERV_TRANS');
4944: OE_MSG_PUB.Add;
4945: p_return_status := FND_API.G_RET_STS_ERROR;
4946: WHEN OTHERS THEN
4947: IF l_debug_level > 0 THEN
4948: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4946: WHEN OTHERS THEN
4947: IF l_debug_level > 0 THEN
4948: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4949: END IF;
4950: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_Msg_Lvl_Unexp_Error) THEN
4951: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4952: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.Line_id derivation for delayed service');
4953: END IF;
4954: END;
4948: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4949: END IF;
4950: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_Msg_Lvl_Unexp_Error) THEN
4951: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4952: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.Line_id derivation for delayed service');
4953: END IF;
4954: END;
4955: END IF;
4956: ELSIF p_x_line_tbl(I).item_type_code = 'SERVICE' AND
4975: WHEN OTHERS THEN
4976: IF l_debug_level > 0 THEN
4977: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4978: END IF;
4979: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_Msg_Lvl_Unexp_Error) THEN
4980: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4981: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.system_id derivation for delayed service');
4982: END IF;
4983: END;
4977: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4978: END IF;
4979: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_Msg_Lvl_Unexp_Error) THEN
4980: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4981: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.system_id derivation for delayed service');
4982: END IF;
4983: END;
4984: ELSIF p_x_line_tbl(I).item_type_code = 'SERVICE'
4985: THEN
4986: IF l_debug_level > 0 THEN
4987: oe_debug_pub.add( 'REQUIRED DATA IS MISSING FOR SERVICE LINE' ) ;
4988: END IF;
4989: FND_MESSAGE.SET_NAME('ONT','OE_NO_SERV_TRANS');
4990: OE_MSG_PUB.Add;
4991: p_return_status := FND_API.G_RET_STS_ERROR;
4992: END IF;
4993: <
4994: null;
5042: IF l_debug_level > 0 THEN
5043: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR LINE PRICE ADJUSTMENTS' ) ;
5044: END IF;
5045:
5046: OE_MSG_PUB.set_msg_context(
5047: p_entity_code => 'LINE_ADJ'
5048: ,p_entity_ref => p_x_line_adj_tbl(I).orig_sys_discount_ref
5049: ,p_entity_id => null
5050: ,p_header_id => p_x_header_rec.header_id
5075: IF l_debug_level > 0 THEN
5076: oe_debug_pub.add( 'INVALID ORIG_SYS_DISCOUNT_REF FOR LINE... ' ) ;
5077: END IF;
5078: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_DISCOUNT_REF');
5079: OE_MSG_PUB.Add;
5080: p_return_status := FND_API.G_RET_STS_ERROR;
5081: END IF;
5082:
5083: /* -----------------------------------------------------------
5103: IF l_debug_level > 0 THEN
5104: oe_debug_pub.add( 'INVALID LINE ADJUSTMENTS OPERATION CODE...' ) ;
5105: END IF;
5106: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5107: OE_MSG_PUB.Add;
5108: p_return_status := FND_API.G_RET_STS_ERROR;
5109: END IF;
5110:
5111: -- aksingh start on this (10/11/2000) this is in process of being coded
5132: IF l_debug_level > 0 THEN
5133: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO INSERT A NEW LNADJ WITH THE SAME HEADER_ID , LINE_ID AND ORIG_SYS_DISCOUNT_REF... ' ) ;
5134: END IF;
5135: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5136: OE_MSG_PUB.Add;
5137: p_return_status := FND_API.G_RET_STS_ERROR;
5138: Exception
5139: When no_data_found then
5140: IF l_debug_level > 0 THEN
5144: IF l_debug_level > 0 THEN
5145: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN INSERTING NEW LINE PRICE ADJ... ' ) ;
5146: END IF;
5147: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5148: OE_MSG_PUB.Add;
5149: p_return_status := FND_API.G_RET_STS_ERROR;
5150: End;
5151: End IF; -- Insert, Create Operation
5152:
5187: IF l_debug_level > 0 THEN
5188: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING LINE ADJ BUT THAT DOES NOT EXIST... ' ) ;
5189: END IF;
5190: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5191: OE_MSG_PUB.Add;
5192: p_return_status := FND_API.G_RET_STS_ERROR;
5193: When others then
5194: IF l_debug_level > 0 THEN
5195: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING LINEADJ ... ' ) ;
5194: IF l_debug_level > 0 THEN
5195: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING LINEADJ ... ' ) ;
5196: END IF;
5197: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5198: OE_MSG_PUB.Add;
5199: p_return_status := FND_API.G_RET_STS_ERROR;
5200: End;
5201: End IF; -- Update and Delete operation
5202:
5231: oe_debug_pub.add( 'NOT VALID PROMOTION NAME =' ||P_X_HEADER_ADJ_VAL_TBL ( I ) .LIST_NAME ) ;
5232: END IF;
5233: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_LIST_NAME');
5234: FND_MESSAGE.SET_TOKEN('LIST_NAME',p_x_line_adj_val_tbl(I).list_name);
5235: OE_MSG_PUB.Add;
5236: p_return_status := FND_API.G_RET_STS_ERROR;
5237: END IF;
5238:
5239: IF p_return_status NOT IN (FND_API.G_RET_STS_ERROR)
5332: IF l_debug_level > 0 THEN
5333: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR LINE ATTS' ) ;
5334: END IF;
5335:
5336: OE_MSG_PUB.set_msg_context(
5337: p_entity_code => 'LINE_PATTS'
5338: -- ,p_entity_ref => p_x_line_price_att_tbl(I).orig_sys_atts_ref
5339: ,p_entity_id => p_x_line_price_att_tbl(I).order_price_attrib_id
5340: ,p_header_id => p_x_header_rec.header_id
5361: IF p_x_line_price_att_tbl(I).orig_sys_atts_ref = FND_API.G_MISS_CHAR
5362: THEN
5363: oe_debug_pub.add('Invalid orig_sys_attribute_ref for line... ');
5364: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_ATT_REF');
5365: OE_MSG_PUB.Add;
5366: p_return_status := FND_API.G_RET_STS_ERROR;
5367: END IF;
5368:
5369: -----------------------------------------------------------
5392: IF l_debug_level > 0 THEN
5393: oe_debug_pub.add( 'INVALID LINE ADJUSTMENTS OPERATION CODE...' ) ;
5394: END IF;
5395: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5396: OE_MSG_PUB.Add;
5397: p_return_status := FND_API.G_RET_STS_ERROR;
5398: END IF;
5399:
5400: IF p_x_line_price_att_tbl(I).operation IN ('INSERT', 'CREATE')
5425: IF l_debug_level > 0 THEN
5426: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO INSERT A NEW HDRATT WITH THE SAME HEADER_ID AND ATTRIBUTE ID....' ) ;
5427: END IF;
5428: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5429: OE_MSG_PUB.Add;
5430: p_return_status := FND_API.G_RET_STS_ERROR;
5431: Exception
5432: When no_data_found then
5433: IF l_debug_level > 0 THEN
5437: IF l_debug_level > 0 THEN
5438: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN INSERTING NEW HDR PRICE ATT... ' ) ;
5439: END IF;
5440: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5441: OE_MSG_PUB.Add;
5442: p_return_status := FND_API.G_RET_STS_ERROR;
5443: End;
5444: End If; -- Insert, Create operation
5445:
5481: IF l_debug_level > 0 THEN
5482: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING HDR ATT BUT THAT DOES NOT EXIST... ' ) ;
5483: END IF;
5484: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5485: OE_MSG_PUB.Add;
5486: p_return_status := FND_API.G_RET_STS_ERROR;
5487: When others then
5488: IF l_debug_level > 0 THEN
5489: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING HDRATT ... ' ) ;
5488: IF l_debug_level > 0 THEN
5489: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING HDRATT ... ' ) ;
5490: END IF;
5491: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5492: OE_MSG_PUB.Add;
5493: p_return_status := FND_API.G_RET_STS_ERROR;
5494: End;
5495: End IF; -- Update and Delete operation
5496:
5534: IF l_debug_level > 0 THEN
5535: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR LINE SALES CREDITS' ) ;
5536: END IF;
5537:
5538: OE_MSG_PUB.set_msg_context(
5539: p_entity_code => 'LINE_SCREDIT'
5540: ,p_entity_ref => p_x_line_scredit_tbl(I).orig_sys_credit_ref
5541: ,p_entity_id => null
5542: ,p_header_id => p_x_header_rec.header_id
5567: IF l_debug_level > 0 THEN
5568: oe_debug_pub.add( 'INVALID ORIG_SYS_CREDIT_REF FOR LINE... ' ) ;
5569: END IF;
5570: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_CREDIT_REF');
5571: OE_MSG_PUB.Add;
5572: p_return_status := FND_API.G_RET_STS_ERROR;
5573: END IF;
5574:
5575: /* -----------------------------------------------------------
5595: IF l_debug_level > 0 THEN
5596: oe_debug_pub.add( 'INVALID LINE SALES CREDITS OPERATION CODE...' ) ;
5597: END IF;
5598: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5599: OE_MSG_PUB.Add;
5600: p_return_status := FND_API.G_RET_STS_ERROR;
5601: END IF;
5602:
5603: -- aksingh start on this (10/11/2000) this is in process of being coded
5624: IF l_debug_level > 0 THEN
5625: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO INSERT A NEW LNSCREDIT WITH THE SAME HEADER_ID , LINE_ID AND ORIG_SYS_CREDIT_REF... ' ) ;
5626: END IF;
5627: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5628: OE_MSG_PUB.Add;
5629: p_return_status := FND_API.G_RET_STS_ERROR;
5630: Exception
5631: When no_data_found then
5632: IF l_debug_level > 0 THEN
5636: IF l_debug_level > 0 THEN
5637: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN INSERTING NEW LINE SALES CREDIT... ' ) ;
5638: END IF;
5639: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5640: OE_MSG_PUB.Add;
5641: p_return_status := FND_API.G_RET_STS_ERROR;
5642: End;
5643: END IF; -- Insert, Update Operation
5644:
5679: IF l_debug_level > 0 THEN
5680: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING LINE CREDIT BUT THAT DOES NOT EXIST... ' ) ;
5681: END IF;
5682: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5683: OE_MSG_PUB.Add;
5684: p_return_status := FND_API.G_RET_STS_ERROR;
5685: When others then
5686: IF l_debug_level > 0 THEN
5687: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING LINECRDT ... ' ) ;
5686: IF l_debug_level > 0 THEN
5687: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING LINECRDT ... ' ) ;
5688: END IF;
5689: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5690: OE_MSG_PUB.Add;
5691: p_return_status := FND_API.G_RET_STS_ERROR;
5692: End;
5693: End IF; -- Update and Delete operation
5694:
5707: IF l_debug_level > 0 THEN
5708: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR LINE PAYMENTS' ) ;
5709: END IF;
5710:
5711: OE_MSG_PUB.set_msg_context(
5712: p_entity_code => 'LINE_PAYMENT'
5713: ,p_entity_ref => p_x_line_payment_tbl(I).orig_sys_payment_ref
5714: ,p_entity_id => null
5715: ,p_header_id => p_x_header_rec.header_id
5741: oe_debug_pub.add( 'INVALID ORIG_SYS_PAYMENT_REF FOR LINE... ' ) ;
5742: END IF;
5743: /* multiple payments: new message */
5744: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_payment_REF');
5745: OE_MSG_PUB.Add;
5746: p_return_status := FND_API.G_RET_STS_ERROR;
5747: END IF;
5748:
5749: /* -----------------------------------------------------------
5769: IF l_debug_level > 0 THEN
5770: oe_debug_pub.add( 'INVALID LINE PAYMENTS OPERATION CODE...' ) ;
5771: END IF;
5772: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5773: OE_MSG_PUB.Add;
5774: p_return_status := FND_API.G_RET_STS_ERROR;
5775: END IF;
5776:
5777: IF p_x_line_payment_tbl(I).operation IN ('INSERT', 'CREATE')
5797: IF l_debug_level > 0 THEN
5798: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO INSERT A NEW LINE PAYMENT WITH THE SAME HEADER_ID , LINE_ID AND ORIG_SYS_PAYMENT_REF... ' ) ;
5799: END IF;
5800: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5801: OE_MSG_PUB.Add;
5802: p_return_status := FND_API.G_RET_STS_ERROR;
5803: Exception
5804: When no_data_found then
5805: IF l_debug_level > 0 THEN
5809: IF l_debug_level > 0 THEN
5810: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN INSERTING NEW LINE PAYMENT... ' ) ;
5811: END IF;
5812: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5813: OE_MSG_PUB.Add;
5814: p_return_status := FND_API.G_RET_STS_ERROR;
5815: End;
5816: END IF; -- Insert, Update Operation
5817:
5840: IF l_debug_level > 0 THEN
5841: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING LINE PAYMENT BUT THAT DOES NOT EXIST... ' ) ;
5842: END IF;
5843: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5844: OE_MSG_PUB.Add;
5845: p_return_status := FND_API.G_RET_STS_ERROR;
5846: When others then
5847: IF l_debug_level > 0 THEN
5848: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING PAYMENT ... ' ) ;
5847: IF l_debug_level > 0 THEN
5848: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING PAYMENT ... ' ) ;
5849: END IF;
5850: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5851: OE_MSG_PUB.Add;
5852: p_return_status := FND_API.G_RET_STS_ERROR;
5853: End;
5854: End IF; -- Update and Delete operation
5855:
5865: IF l_debug_level > 0 THEN
5866: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR LINE LOT SERIALS' ) ;
5867: END IF;
5868:
5869: OE_MSG_PUB.set_msg_context(
5870: p_entity_code => 'LOT_SERIAL'
5871: ,p_entity_ref => p_x_lot_serial_tbl(I).orig_sys_lotserial_ref
5872: ,p_entity_id => null
5873: ,p_header_id => p_x_header_rec.header_id
5898: IF l_debug_level > 0 THEN
5899: oe_debug_pub.add( 'INVALID ORIG_SYS_LOTSERIAL_REF... ' ) ;
5900: END IF;
5901: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_LOTSERIAL_REF');
5902: OE_MSG_PUB.Add;
5903: p_return_status := FND_API.G_RET_STS_ERROR;
5904: END IF;
5905:
5906: /* -----------------------------------------------------------
5920: IF l_debug_level > 0 THEN
5921: oe_debug_pub.add( 'INVALID LINE LOT SERIALS OPERATION CODE...' ) ;
5922: END IF;
5923: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5924: OE_MSG_PUB.Add;
5925: p_return_status := FND_API.G_RET_STS_ERROR;
5926: END IF;
5927:
5928: -- aksingh start on this (10/11/2000) this is in process of being coded
5945: IF l_debug_level > 0 THEN
5946: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO INSERT A NEW LOT WITH THE SAME LINE_ID AND ORIG_SYS_DISCOUNT_REF... ' ) ;
5947: END IF;
5948: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5949: OE_MSG_PUB.Add;
5950: p_return_status := FND_API.G_RET_STS_ERROR;
5951: Exception
5952: When no_data_found then
5953: IF l_debug_level > 0 THEN
5957: IF l_debug_level > 0 THEN
5958: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN INSERTING NEW LINE LOT... ' ) ;
5959: END IF;
5960: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5961: OE_MSG_PUB.Add;
5962: p_return_status := FND_API.G_RET_STS_ERROR;
5963: End;
5964: END IF; -- Insert, Create Opearation
5965:
5991: IF l_debug_level > 0 THEN
5992: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING LOT BUT THAT DOES NOT EXIST... ' ) ;
5993: END IF;
5994: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5995: OE_MSG_PUB.Add;
5996: p_return_status := FND_API.G_RET_STS_ERROR;
5997: When others then
5998: IF l_debug_level > 0 THEN
5999: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING LOT... ' ) ;
5998: IF l_debug_level > 0 THEN
5999: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING LOT... ' ) ;
6000: END IF;
6001: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
6002: OE_MSG_PUB.Add;
6003: p_return_status := FND_API.G_RET_STS_ERROR;
6004: End;
6005: End IF; -- Update and Delete operation
6006:
6018: IF l_debug_level > 0 THEN
6019: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR LINE RESERVATIONS' ) ;
6020: END IF;
6021:
6022: OE_MSG_PUB.set_msg_context(
6023: p_entity_code => 'RESERVATION'
6024: ,p_entity_ref => p_x_reservation_tbl(I).orig_sys_reservation_ref
6025: ,p_entity_id => null
6026: ,p_header_id => p_x_header_rec.header_id
6051: IF l_debug_level > 0 THEN
6052: oe_debug_pub.add( 'INVALID ORIG_SYS_RESERVATION_REF... ' ) ;
6053: END IF;
6054: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_RESERVATION_REF');
6055: OE_MSG_PUB.Add;
6056: p_return_status := FND_API.G_RET_STS_ERROR;
6057: END IF;
6058:
6059: /* -----------------------------------------------------------
6074: IF l_debug_level > 0 THEN
6075: oe_debug_pub.add( 'INVALID RESERVATION DETAILS... ' ) ;
6076: END IF;
6077: FND_MESSAGE.SET_NAME('ONT','OE_OI_RESERVATION_DETAILS');
6078: OE_MSG_PUB.Add;
6079: p_return_status := FND_API.G_RET_STS_ERROR;
6080: END IF;
6081:
6082: /* -----------------------------------------------------------
6094: IF l_debug_level > 0 THEN
6095: oe_debug_pub.add( 'INVALID RESERVATION QUANTITY... ' ) ;
6096: END IF;
6097: FND_MESSAGE.SET_NAME('ONT','OE_OI_RESERVATION_QUANTITY');
6098: OE_MSG_PUB.Add;
6099: p_return_status := FND_API.G_RET_STS_ERROR;
6100: END IF;
6101:
6102: /* -----------------------------------------------------------
6113: IF l_debug_level > 0 THEN
6114: oe_debug_pub.add( 'INVALID RESERVATION OPERATION... ' ) ;
6115: END IF;
6116: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
6117: OE_MSG_PUB.Add;
6118: p_return_status := FND_API.G_RET_STS_ERROR;
6119: END IF;
6120:
6121: -- Following Line are added to fixed the bug for the duplicate reservation
6202: WHEN OTHERS THEN
6203: IF l_debug_level > 0 THEN
6204: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
6205: END IF;
6206: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
6207: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6208: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process');
6209: END IF;
6210:
6204: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
6205: END IF;
6206: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
6207: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6208: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process');
6209: END IF;
6210:
6211: END PRE_PROCESS;
6212:
6298: IF l_debug_level > 0 THEN
6299: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR THE LINE' ) ;
6300: END IF;
6301:
6302: OE_MSG_PUB.set_msg_context(
6303: p_entity_code => 'HEADER'
6304: ,p_entity_ref => null
6305: ,p_entity_id => null
6306: ,p_header_id => p_x_header_rec.header_id
6361: END IF;
6362: FND_MESSAGE.SET_NAME('ONT','OE_OI_PRICE_WARNING');
6363: FND_MESSAGE.SET_TOKEN('CUST_PRICE',p_x_line_tbl(I).customer_item_net_price);
6364: FND_MESSAGE.SET_TOKEN('SPLR_PRICE',l_unit_selling_price);
6365: OE_MSG_PUB.Add;
6366: -- p_return_status := FND_API.G_RET_STS_ERROR;
6367: END IF;
6368:
6369: /* -----------------------------------------------------------
6401: AND nvl(p_x_line_val_tbl_old(I).customer_payment_term,FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR Then
6402: FND_MESSAGE.SET_TOKEN('CUST_TERM',p_x_line_val_tbl_old(I).customer_payment_term);
6403: FND_MESSAGE.SET_TOKEN('SPLR_TERM',oe_id_to_value.payment_term(p_x_line_tbl(I).payment_term_id));
6404: END IF;
6405: OE_MSG_PUB.Add;
6406: -- p_return_status := FND_API.G_RET_STS_ERROR;
6407: END IF;
6408:
6409: END LOOP;
6448: oe_debug_pub.add( 'AFTER CALLING THE INV FOR DO_CHECK_FOR_COMMIT : ' || L_RETURN_STATUS , 1 ) ;
6449: IF l_failed_rsv_temp_tbl.count > 0 THEN
6450: oe_debug_pub.add( ' THE RESERVATION PROCESS HAS FAILED ' , 1 ) ;
6451: FND_MESSAGE.SET_NAME('ONT','OE_SCH_RSV_FAILURE');
6452: OE_MSG_PUB.Add;
6453: END IF;
6454: -- Error Handling Start
6455: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6456: oe_debug_pub.add( 'INSIDE UNEXPECTED ERROR' , 1 ) ;
6453: END IF;
6454: -- Error Handling Start
6455: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6456: oe_debug_pub.add( 'INSIDE UNEXPECTED ERROR' , 1 ) ;
6457: OE_MSG_PUB.Transfer_Msg_Stack;
6458: l_msg_count := OE_MSG_PUB.COUNT_MSG;
6459:
6460: FOR I IN 1..l_msg_count LOOP
6461: l_msg_data := OE_MSG_PUB.Get(I,'F');
6454: -- Error Handling Start
6455: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6456: oe_debug_pub.add( 'INSIDE UNEXPECTED ERROR' , 1 ) ;
6457: OE_MSG_PUB.Transfer_Msg_Stack;
6458: l_msg_count := OE_MSG_PUB.COUNT_MSG;
6459:
6460: FOR I IN 1..l_msg_count LOOP
6461: l_msg_data := OE_MSG_PUB.Get(I,'F');
6462: oe_debug_pub.add( L_MSG_DATA , 1 ) ;
6457: OE_MSG_PUB.Transfer_Msg_Stack;
6458: l_msg_count := OE_MSG_PUB.COUNT_MSG;
6459:
6460: FOR I IN 1..l_msg_count LOOP
6461: l_msg_data := OE_MSG_PUB.Get(I,'F');
6462: oe_debug_pub.add( L_MSG_DATA , 1 ) ;
6463: END LOOP;
6464: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6465: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
6463: END LOOP;
6464: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6465: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
6466: oe_debug_pub.add( ' INSIDE EXPECTED ERROR' , 1 ) ;
6467: OE_MSG_PUB.Transfer_Msg_Stack;
6468: l_msg_count := OE_MSG_PUB.COUNT_MSG;
6469:
6470: FOR I IN 1..l_msg_count LOOP
6471: l_msg_data := OE_MSG_PUB.Get(I,'F');
6464: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6465: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
6466: oe_debug_pub.add( ' INSIDE EXPECTED ERROR' , 1 ) ;
6467: OE_MSG_PUB.Transfer_Msg_Stack;
6468: l_msg_count := OE_MSG_PUB.COUNT_MSG;
6469:
6470: FOR I IN 1..l_msg_count LOOP
6471: l_msg_data := OE_MSG_PUB.Get(I,'F');
6472: oe_debug_pub.add( L_MSG_DATA , 1 ) ;
6467: OE_MSG_PUB.Transfer_Msg_Stack;
6468: l_msg_count := OE_MSG_PUB.COUNT_MSG;
6469:
6470: FOR I IN 1..l_msg_count LOOP
6471: l_msg_data := OE_MSG_PUB.Get(I,'F');
6472: oe_debug_pub.add( L_MSG_DATA , 1 ) ;
6473: END LOOP;
6474: RAISE FND_API.G_EXC_ERROR;
6475:
6526: WHEN OTHERS THEN
6527: IF l_debug_level > 0 THEN
6528: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
6529: END IF;
6530: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
6531: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6532: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Post_Process');
6533: END IF;
6534:
6528: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
6529: END IF;
6530: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
6531: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6532: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Post_Process');
6533: END IF;
6534:
6535: END POST_PROCESS;
6536: