[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
2363: IF l_debug_level > 0 THEN
2364: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
2365: END IF;
2366:
2367: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_Msg_Lvl_Unexp_Error) THEN
2368: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2369: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.Req_Header_Id_derivation');
2370: END IF;
2371: END;
2365: END IF;
2366:
2367: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_Msg_Lvl_Unexp_Error) THEN
2368: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2369: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.Req_Header_Id_derivation');
2370: END IF;
2371: END;
2372: END IF;
2373:
2479: oe_debug_pub.add( 'REF DATA PASSED BUT PARAMETER NOT SET' ) ;
2480: END IF;
2481: fnd_message.set_name('ONT','ONT_OI_INL_SET_PARAMETER');
2482: fnd_message.set_token('TYPE', 'Customers, Addresses or Contacts');
2483: oe_msg_pub.add;
2484: p_return_status := FND_API.G_RET_STS_ERROR;
2485: End If;
2486: -- End of If for checking add customers parameter}
2487: End If;
2584: IF l_debug_level > 0 THEN
2585: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO INSERT A NEW ORDER WITH THE SAME ORDER SOURCE ID AND ORIG_SYS_DOCUMENT_REF... ' ) ;
2586: END IF;
2587: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
2588: OE_MSG_PUB.Add;
2589: p_return_status := FND_API.G_RET_STS_ERROR;
2590: Exception
2591: When no_data_found then
2592: IF l_debug_level > 0 THEN
2596: IF l_debug_level > 0 THEN
2597: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO INSERT NEW ORDER... ' ) ;
2598: END IF;
2599: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
2600: OE_MSG_PUB.Add;
2601: p_return_status := FND_API.G_RET_STS_ERROR;
2602: End;
2603: --}{
2604: ELSIF p_x_header_rec.operation IN ('UPDATE','DELETE')
2633: IF l_debug_level > 0 THEN
2634: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING ORDER BUT THAT ORDER DOES NOT EXIST... ' ) ;
2635: END IF;
2636: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
2637: OE_MSG_PUB.Add;
2638: p_return_status := FND_API.G_RET_STS_ERROR;
2639: When others then
2640: IF l_debug_level > 0 THEN
2641: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING ORDER ... ' ) ;
2640: IF l_debug_level > 0 THEN
2641: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING ORDER ... ' ) ;
2642: END IF;
2643: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
2644: OE_MSG_PUB.Add;
2645: p_return_status := FND_API.G_RET_STS_ERROR;
2646: End;
2647: --}{
2648: ELSE --IF p_x_header_rec.operation NOT IN ('INSERT','CREATE','UPDATE','DELETE')
2649: IF l_debug_level > 0 THEN
2650: oe_debug_pub.add( 'INVALID OPERATION CODE. NOT ONE OF INSERT , CREATE , UPDATE OR DELETE... ' ) ;
2651: END IF;
2652: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
2653: OE_MSG_PUB.Add;
2654: p_return_status := FND_API.G_RET_STS_ERROR;
2655:
2656: END IF; --}
2657:
2660: IF l_debug_level > 0 THEN
2661: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
2662: END IF;
2663:
2664: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2665: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2666: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.header_operation_validation');
2667: END IF;
2668: END;
2662: END IF;
2663:
2664: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2665: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2666: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.header_operation_validation');
2667: END IF;
2668: END;
2669:
2670: /* bsadri fill in the IDs for actions if this is an update */
2704: IF l_debug_level > 0 THEN
2705: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR HEADER ADJUSTMENTS' ) ;
2706: END IF;
2707:
2708: OE_MSG_PUB.set_msg_context(
2709: p_entity_code => 'HEADER_ADJ'
2710: ,p_entity_ref => p_x_header_adj_tbl(I).orig_sys_discount_ref
2711: ,p_entity_id => null
2712: ,p_header_id => p_x_header_rec.header_id
2737: IF l_debug_level > 0 THEN
2738: oe_debug_pub.add( 'INVALID ORIG_SYS_DISCOUNT_REF... ' ) ;
2739: END IF;
2740: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_DISCOUNT_REF');
2741: OE_MSG_PUB.Add;
2742: p_return_status := FND_API.G_RET_STS_ERROR;
2743: END IF;
2744:
2745: /* -----------------------------------------------------------
2762: IF l_debug_level > 0 THEN
2763: oe_debug_pub.add( 'INVALID HEADER ADJUSTMENTS OPERATION CODE...' ) ;
2764: END IF;
2765: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
2766: OE_MSG_PUB.Add;
2767: p_return_status := FND_API.G_RET_STS_ERROR;
2768: END IF;
2769:
2770: -- aksingh(10/11/2000) this is in process of being coded
2791: IF l_debug_level > 0 THEN
2792: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO INSERT A NEW HDRADJ WITH THE SAME HEADER_ID AND ORIG_SYS_DISCOUNT_REF... ' ) ;
2793: END IF;
2794: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
2795: OE_MSG_PUB.Add;
2796: p_return_status := FND_API.G_RET_STS_ERROR;
2797: Exception
2798: When no_data_found then
2799: IF l_debug_level > 0 THEN
2803: IF l_debug_level > 0 THEN
2804: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN INSERTING NEW HDR PRICE ADJ... ' ) ;
2805: END IF;
2806: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
2807: OE_MSG_PUB.Add;
2808: p_return_status := FND_API.G_RET_STS_ERROR;
2809: End;
2810: End If; -- Insert, Create operation
2811:
2841: IF l_debug_level > 0 THEN
2842: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING HDR ADJ BUT THAT DOES NOT EXIST... ' ) ;
2843: END IF;
2844: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
2845: OE_MSG_PUB.Add;
2846: p_return_status := FND_API.G_RET_STS_ERROR;
2847: When others then
2848: IF l_debug_level > 0 THEN
2849: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING HDRADJ ... ' ) ;
2848: IF l_debug_level > 0 THEN
2849: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING HDRADJ ... ' ) ;
2850: END IF;
2851: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
2852: OE_MSG_PUB.Add;
2853: p_return_status := FND_API.G_RET_STS_ERROR;
2854: End;
2855: End IF; -- Update and Delete operation
2856:
2884: oe_debug_pub.add( 'NOT VALID PROMOTION NAME =' ||P_X_HEADER_ADJ_VAL_TBL ( I ) .LIST_NAME ) ;
2885: END IF;
2886: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_LIST_NAME');
2887: FND_MESSAGE.SET_TOKEN('LIST_NAME',p_x_header_adj_val_tbl(I).list_name);
2888: OE_MSG_PUB.Add;
2889: p_return_status := FND_API.G_RET_STS_ERROR;
2890: END IF;
2891:
2892: IF (p_return_status NOT IN (FND_API.G_RET_STS_ERROR)
2968: IF l_debug_level > 0 THEN
2969: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR HEADER ATTS' ) ;
2970: END IF;
2971:
2972: OE_MSG_PUB.set_msg_context(
2973: p_entity_code => 'HEADER_PATTS'
2974: ,p_entity_ref => p_x_header_price_att_tbl(I).orig_sys_atts_ref
2975: ,p_entity_id => null
2976: ,p_header_id => p_x_header_rec.header_id
3001: IF l_debug_level > 0 THEN
3002: oe_debug_pub.add( 'INVALID ORIG_SYS_ATTRIBUTE_REF... ' ) ;
3003: END IF;
3004: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_ATTS_REF');
3005: OE_MSG_PUB.Add;
3006: p_return_status := FND_API.G_RET_STS_ERROR;
3007: END IF;
3008:
3009: /* -----------------------------------------------------------
3026: IF l_debug_level > 0 THEN
3027: oe_debug_pub.add( 'INVALID HEADER ATTRIBUTE OPERATION CODE...' ) ;
3028: END IF;
3029: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3030: OE_MSG_PUB.Add;
3031: p_return_status := FND_API.G_RET_STS_ERROR;
3032: END IF;
3033:
3034: IF p_x_header_price_att_tbl(I).operation IN ('INSERT', 'CREATE')
3054: IF l_debug_level > 0 THEN
3055: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO INSERT A NEW HDRATT WITH THE SAME HEADER_ID AND ATTRIBUTE ID....' ) ;
3056: END IF;
3057: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3058: OE_MSG_PUB.Add;
3059: p_return_status := FND_API.G_RET_STS_ERROR;
3060: Exception
3061: When no_data_found then
3062: IF l_debug_level > 0 THEN
3066: IF l_debug_level > 0 THEN
3067: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN INSERTING NEW HDR PRICE ATT... ' ) ;
3068: END IF;
3069: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3070: OE_MSG_PUB.Add;
3071: p_return_status := FND_API.G_RET_STS_ERROR;
3072: End;
3073: End If; -- Insert, Create operation
3074:
3102: IF l_debug_level > 0 THEN
3103: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING HDR ATT BUT THAT DOES NOT EXIST... ' ) ;
3104: END IF;
3105: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3106: OE_MSG_PUB.Add;
3107: p_return_status := FND_API.G_RET_STS_ERROR;
3108: When others then
3109: IF l_debug_level > 0 THEN
3110: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING HDRATT ... ' ) ;
3109: IF l_debug_level > 0 THEN
3110: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING HDRATT ... ' ) ;
3111: END IF;
3112: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3113: OE_MSG_PUB.Add;
3114: p_return_status := FND_API.G_RET_STS_ERROR;
3115: End;
3116: End IF; -- Update and Delete operation
3117:
3159: IF l_debug_level > 0 THEN
3160: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR HEADER SALES CREDITS' ) ;
3161: END IF;
3162:
3163: OE_MSG_PUB.set_msg_context(
3164: p_entity_code => 'HEADER_SCREDIT'
3165: ,p_entity_ref => p_x_header_scredit_tbl(I).orig_sys_credit_ref
3166: ,p_entity_id => null
3167: ,p_header_id => p_x_header_rec.header_id
3192: IF l_debug_level > 0 THEN
3193: oe_debug_pub.add( 'INVALID ORIG_SYS_CREDIT_REF... ' ) ;
3194: END IF;
3195: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_CREDIT_REF');
3196: OE_MSG_PUB.Add;
3197: p_return_status := FND_API.G_RET_STS_ERROR;
3198: END IF;
3199:
3200: /* -----------------------------------------------------------
3218: IF l_debug_level > 0 THEN
3219: oe_debug_pub.add( 'INVALID HEADER SALES CREDITS OPERATION CODE...' ) ;
3220: END IF;
3221: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3222: OE_MSG_PUB.Add;
3223: p_return_status := FND_API.G_RET_STS_ERROR;
3224: END IF;
3225:
3226: -- aksingh(10/11/2000) this is in process of being coded
3244: IF l_debug_level > 0 THEN
3245: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO INSERT A NEW HDRCREDIT WITH THE SAME HEADER_ID AND ORIG_SYS_CREDIT_REF... ' ) ;
3246: END IF;
3247: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3248: OE_MSG_PUB.Add;
3249: p_return_status := FND_API.G_RET_STS_ERROR;
3250: Exception
3251: When no_data_found then
3252: IF l_debug_level > 0 THEN
3256: IF l_debug_level > 0 THEN
3257: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN INSERTING NEW HDR SALES CREDIT... ' ) ;
3258: END IF;
3259: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3260: OE_MSG_PUB.Add;
3261: p_return_status := FND_API.G_RET_STS_ERROR;
3262:
3263: End;
3264: END IF; -- Insert, Create Operation
3295: IF l_debug_level > 0 THEN
3296: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING ORDER BUT THAT ORDER DOES NOT EXIST... ' ) ;
3297: END IF;
3298: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3299: OE_MSG_PUB.Add;
3300: p_return_status := FND_API.G_RET_STS_ERROR;
3301: When others then
3302: IF l_debug_level > 0 THEN
3303: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING HEADER LEVEL SCREDIT ... ' ) ;
3302: IF l_debug_level > 0 THEN
3303: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING HEADER LEVEL SCREDIT ... ' ) ;
3304: END IF;
3305: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3306: OE_MSG_PUB.Add;
3307: p_return_status := FND_API.G_RET_STS_ERROR;
3308: End;
3309: End IF; -- Update and Delete operation
3310:
3322: IF l_debug_level > 0 THEN
3323: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR HEADER PAYMENTS' ) ;
3324: END IF;
3325:
3326: OE_MSG_PUB.set_msg_context(
3327: p_entity_code => 'HEADER_PAYMENT'
3328: ,p_entity_ref => p_x_header_payment_tbl(I).orig_sys_payment_ref
3329: ,p_entity_id => null
3330: ,p_header_id => p_x_header_rec.header_id
3356: oe_debug_pub.add( 'INVALID ORIG_SYS_PAYMENT_REF... ' ) ;
3357: END IF;
3358: /* multiple payment: new message */
3359: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_PAYMENT_REF');
3360: OE_MSG_PUB.Add;
3361: p_return_status := FND_API.G_RET_STS_ERROR;
3362: END IF;
3363:
3364: /* -----------------------------------------------------------
3382: IF l_debug_level > 0 THEN
3383: oe_debug_pub.add( 'INVALID HEADER PAYMENT OPERATION CODE...' ) ;
3384: END IF;
3385: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3386: OE_MSG_PUB.Add;
3387: p_return_status := FND_API.G_RET_STS_ERROR;
3388: END IF;
3389:
3390: IF p_x_header_payment_tbl(I).operation IN ('INSERT', 'CREATE')
3407: IF l_debug_level > 0 THEN
3408: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO INSERT A NEW HDR PAYMENT WITH THE SAME HEADER_ID AND ORIG_SYS_PAYMENT_REF... ' ) ;
3409: END IF;
3410: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3411: OE_MSG_PUB.Add;
3412: p_return_status := FND_API.G_RET_STS_ERROR;
3413: Exception
3414: When no_data_found then
3415: IF l_debug_level > 0 THEN
3419: IF l_debug_level > 0 THEN
3420: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN INSERTING NEW HDR PAYMENT... ' ) ;
3421: END IF;
3422: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3423: OE_MSG_PUB.Add;
3424: p_return_status := FND_API.G_RET_STS_ERROR;
3425:
3426: End;
3427: END IF; -- Insert, Create Operation
3461: IF l_debug_level > 0 THEN
3462: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING ORDER BUT THAT ORDER DOES NOT EXIST... ' ) ;
3463: END IF;
3464: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3465: OE_MSG_PUB.Add;
3466: p_return_status := FND_API.G_RET_STS_ERROR;
3467: When others then
3468: IF l_debug_level > 0 THEN
3469: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING HEADER LEVEL payment ... ' ) ;
3468: IF l_debug_level > 0 THEN
3469: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING HEADER LEVEL payment ... ' ) ;
3470: END IF;
3471: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3472: OE_MSG_PUB.Add;
3473: p_return_status := FND_API.G_RET_STS_ERROR;
3474: End;
3475: End IF; -- Update and Delete operation
3476: END LOOP; -- header payment
3512: IF l_debug_level > 0 THEN
3513: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR THE LINE' ) ;
3514: END IF;
3515:
3516: OE_MSG_PUB.set_msg_context(
3517: p_entity_code => 'LINE'
3518: ,p_entity_ref => null
3519: ,p_entity_id => null
3520: ,p_header_id => p_x_header_rec.header_id
3548: IF l_debug_level > 0 THEN
3549: oe_debug_pub.add( 'INVALID ORIG_SYS_LINE_REF... ' ) ;
3550: END IF;
3551: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_LINE_REF');
3552: OE_MSG_PUB.Add;
3553: p_return_status := FND_API.G_RET_STS_ERROR;
3554: END IF;
3555: ELSIF OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL >= '110508' AND
3556: G_IMPORT_SHIPMENTS = 'NO' THEN
3558: IF l_debug_level > 0 THEN
3559: oe_debug_pub.add( 'INVALID ORIG_SYS_LINE_REF... ' ) ;
3560: END IF;
3561: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_LINE_REF');
3562: OE_MSG_PUB.Add;
3563: p_return_status := FND_API.G_RET_STS_ERROR;
3564: END IF;
3565: ELSIF OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL < '110508' THEN
3566: IF p_x_line_tbl(I).orig_sys_line_ref = FND_API.G_MISS_CHAR THEN
3567: IF l_debug_level > 0 THEN
3568: oe_debug_pub.add( 'INVALID ORIG_SYS_LINE_REF... ' ) ;
3569: END IF;
3570: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_LINE_REF');
3571: OE_MSG_PUB.Add;
3572: p_return_status := FND_API.G_RET_STS_ERROR;
3573: END IF;
3574: END IF;
3575:
3621: IF ( p_x_line_tbl(I).ordered_quantity_uom2 IS NOT NULL
3622: AND p_x_line_tbl(I).ordered_quantity_uom2 <> FND_API.G_MISS_CHAR ) THEN
3623: --oe_debug_pub.add( 'OPM INVALID ordered_quantity_uom2 - should not be provided... ' ) ;
3624: FND_MESSAGE.SET_NAME('INV','INV_SECONDARY_UOM_NOT_REQUIRED'); -- INVCONV
3625: OE_MSG_PUB.Add;
3626: p_return_status := FND_API.G_RET_STS_ERROR;
3627: IF l_debug_level > 0 THEN
3628: oe_debug_pub.add( 'INVALID ORDERED_QUANTITY_UOM2... should not be provided' ) ;
3629: END IF;
3634: IF ( ( p_x_line_tbl(I).ordered_quantity_uom2 IS NOT NULL
3635: AND p_x_line_tbl(I).ordered_quantity_uom2 <> FND_API.G_MISS_CHAR )
3636: AND p_x_line_tbl(I).ordered_quantity_uom2 <> l_secondary_uom_code ) THEN -- INVCONV
3637: FND_MESSAGE.SET_NAME('PO','PO_INCORRECT_SECONDARY_UOM'); -- INVCONV
3638: OE_MSG_PUB.Add;
3639: p_return_status := FND_API.G_RET_STS_ERROR;
3640: IF l_debug_level > 0 THEN
3641: oe_debug_pub.add( 'INVALID ORDERED_QUANTITY_UOM2... does not match mtl_system_items' ) ;
3642: END IF;
3661: IF l_debug_level > 0 THEN
3662: oe_debug_pub.add( 'INVALID QUANTITY ON 3A9' ) ;
3663: END IF;
3664: FND_MESSAGE.SET_NAME('ONT','OE_OI_INVALID_QTY_3A9');
3665: OE_MSG_PUB.Add;
3666: p_return_status := FND_API.G_RET_STS_ERROR;
3667: Else
3668:
3669: Begin
3683: IF l_debug_level > 0 THEN
3684: oe_debug_pub.add( 'INVALID QUANTITY ON 3A9' ) ;
3685: END IF;
3686: FND_MESSAGE.SET_NAME('ONT','OE_OI_INVALID_QTY_3A9');
3687: OE_MSG_PUB.Add;
3688: p_return_status := FND_API.G_RET_STS_ERROR;
3689: End If;
3690: Exception
3691: When Others Then
3712: IF l_debug_level > 0 THEN
3713: 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...' ) ;
3714: END IF;
3715: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3716: OE_MSG_PUB.Add;
3717: p_return_status := FND_API.G_RET_STS_ERROR;
3718: END IF;
3719:
3720: /* -----------------------------------------------------------
3828: IF l_debug_level > 0 THEN
3829: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
3830: END IF;
3831:
3832: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3833: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3834: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.Req_Line_Id_derivation');
3835: END IF;
3836: END;
3830: END IF;
3831:
3832: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3833: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3834: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.Req_Line_Id_derivation');
3835: END IF;
3836: END;
3837: END IF;
3838:
3872: oe_debug_pub.add( 'REF DATA PASSED BUT PARAMETER NOT SET' ) ;
3873: END IF;
3874: fnd_message.set_name('ONT','ONT_OI_INL_SET_PARAMETER');
3875: fnd_message.set_token('TYPE', 'Customers, Addresses or Contacts');
3876: oe_msg_pub.add;
3877: p_return_status := FND_API.G_RET_STS_ERROR;
3878: End If;
3879: -- End of If for checking add customers parameter}
3880: End If;
3929: FND_MESSAGE.SET_TOKEN('OBJECT',
3930: p_x_line_tbl(I).split_from_line_ref);
3931: FND_MESSAGE.SET_TOKEN('REASON',
3932: 'Could not find the reference line');
3933: OE_MSG_PUB.Add;
3934: p_return_status := FND_API.G_RET_STS_ERROR;
3935: END IF;
3936: END IF;
3937: BEGIN
3952: IF l_debug_level > 0 THEN
3953: 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... ' ) ;
3954: END IF;
3955: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3956: OE_MSG_PUB.Add;
3957: p_return_status := FND_API.G_RET_STS_ERROR;
3958: Exception
3959: When no_data_found then
3960: IF l_debug_level > 0 THEN
3964: IF l_debug_level > 0 THEN
3965: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO INSERT A NEW LINE... ' ) ;
3966: END IF;
3967: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
3968: OE_MSG_PUB.Add;
3969: p_return_status := FND_API.G_RET_STS_ERROR;
3970: End;
3971: ELSIF OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL >= '110508' AND
3972: G_IMPORT_SHIPMENTS = 'NO' THEN
4003: FND_MESSAGE.SET_TOKEN('OBJECT',
4004: p_x_line_tbl(I).split_from_line_ref);
4005: FND_MESSAGE.SET_TOKEN('REASON',
4006: 'Could not find the reference line');
4007: OE_MSG_PUB.Add;
4008: p_return_status := FND_API.G_RET_STS_ERROR;
4009: END IF;
4010: END IF;
4011: BEGIN
4025: IF l_debug_level > 0 THEN
4026: 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. .. ' ) ;
4027: END IF;
4028: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
4029: OE_MSG_PUB.Add;
4030: p_return_status := FND_API.G_RET_STS_ERROR;
4031: Exception
4032: When no_data_found then
4033: IF l_debug_level > 0 THEN
4037: IF l_debug_level > 0 THEN
4038: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO INSERT A NEW LINE... ' ) ;
4039: END IF;
4040: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
4041: OE_MSG_PUB.Add;
4042: p_return_status := FND_API.G_RET_STS_ERROR;
4043: End;
4044: ELSIF OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL < '110508' THEN
4045: IF (p_x_line_tbl(I).split_from_line_ref IS NOT NULL) AND
4075: FND_MESSAGE.SET_TOKEN('OBJECT',
4076: p_x_line_tbl(I).split_from_line_ref);
4077: FND_MESSAGE.SET_TOKEN('REASON',
4078: 'Could not find the reference line');
4079: OE_MSG_PUB.Add;
4080: p_return_status := FND_API.G_RET_STS_ERROR;
4081: END IF;
4082: END IF;
4083: BEGIN
4093: IF l_debug_level > 0 THEN
4094: 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. .. ' ) ;
4095: END IF;
4096: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
4097: OE_MSG_PUB.Add;
4098: p_return_status := FND_API.G_RET_STS_ERROR;
4099: Exception
4100: When no_data_found then
4101: IF l_debug_level > 0 THEN
4105: IF l_debug_level > 0 THEN
4106: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO INSERT A NEW LINE... ' ) ;
4107: END IF;
4108: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
4109: OE_MSG_PUB.Add;
4110: p_return_status := FND_API.G_RET_STS_ERROR;
4111: End;
4112:
4113: END IF;
4161: IF l_debug_level > 0 THEN
4162: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING LINE BUT THAT LINE DOES NOT EXIST... ' ) ;
4163: END IF;
4164: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
4165: OE_MSG_PUB.Add;
4166: p_return_status := FND_API.G_RET_STS_ERROR;
4167: When others then
4168: IF l_debug_level > 0 THEN
4169: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING LINE ... ' ) ;
4168: IF l_debug_level > 0 THEN
4169: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING LINE ... ' ) ;
4170: END IF;
4171: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
4172: OE_MSG_PUB.Add;
4173: p_return_status := FND_API.G_RET_STS_ERROR;
4174: End;
4175: ELSE
4176: Begin
4194: IF l_debug_level > 0 THEN
4195: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING LINE BUT THAT LINE DOES NOT EXIST... ' ) ;
4196: END IF;
4197: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
4198: OE_MSG_PUB.Add;
4199: p_return_status := FND_API.G_RET_STS_ERROR;
4200: When others then
4201: IF l_debug_level > 0 THEN
4202: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING LINE ... ' ) ;
4201: IF l_debug_level > 0 THEN
4202: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING LINE ... ' ) ;
4203: END IF;
4204: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
4205: OE_MSG_PUB.Add;
4206: p_return_status := FND_API.G_RET_STS_ERROR;
4207: End;
4208: END IF;
4209:
4228: IF l_debug_level > 0 THEN
4229: oe_debug_pub.add( 'INVALID OPERATION CODE. NOT ONE OF INSERT , CREATE , UPDATE OR DELETE... ' ) ;
4230: END IF;
4231: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
4232: OE_MSG_PUB.Add;
4233: p_return_status := FND_API.G_RET_STS_ERROR;
4234:
4235: END IF;
4236:
4239: IF l_debug_level > 0 THEN
4240: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4241: END IF;
4242:
4243: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4244: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4245: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.header_operation_validation');
4246: END IF;
4247: END;
4241: END IF;
4242:
4243: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4244: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4245: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.header_operation_validation');
4246: END IF;
4247: END;
4248:
4249: /* -----------------------------------------------------------
4261: IF l_debug_level > 0 THEN
4262: oe_debug_pub.add( 'INVALID ITEM TYPE CODE... ' ) ;
4263: END IF;
4264: FND_MESSAGE.SET_NAME('ONT','OE_OI_ITEM_TYPE');
4265: OE_MSG_PUB.Add;
4266: p_return_status := FND_API.G_RET_STS_ERROR;
4267: END IF;
4268: -- { Start of derivation of the sold_to_org_id for Header/Line
4269: If p_x_header_rec.sold_to_org_id IS NOT NULL AND
4308: IF l_debug_level > 0 THEN
4309: oe_debug_pub.add( 'SOLD TO ORG ID IS MISSING , AFTER CALL TO VALUE TO ID' ) ;
4310: END IF;
4311: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_CUSTOMER_ID');
4312: OE_MSG_PUB.Add;
4313: p_return_status := FND_API.G_RET_STS_ERROR;
4314: END IF;
4315: END IF;
4316: Exception
4318: IF l_debug_level > 0 THEN
4319: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN GETTING SOLD TO ORG ID IN OEXVIMSB... ' ) ;
4320: END IF;
4321: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_CUSTOMER_ID');
4322: OE_MSG_PUB.Add;
4323: p_return_status := FND_API.G_RET_STS_ERROR;
4324: End;
4325: -- End Begin}
4326: End If;
4372: END IF;
4373: IF l_debug_level > 0 THEN
4374: oe_debug_pub.add( 'TOO MANY ROWS ERROR: '||SQLERRM ) ;
4375: END IF;
4376: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4377: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4378: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4379: END IF;
4380: When others then
4374: oe_debug_pub.add( 'TOO MANY ROWS ERROR: '||SQLERRM ) ;
4375: END IF;
4376: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4377: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4378: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4379: END IF;
4380: When others then
4381: IF l_debug_level > 0 THEN
4382: oe_debug_pub.add( 'IN OEXVIMSB ITEM IDENTIFIER IS INT - OTHERS' ) ;
4383: END IF;
4384: IF l_debug_level > 0 THEN
4385: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4386: END IF;
4387: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4388: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4389: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4390: END IF;
4391: END;
4385: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4386: END IF;
4387: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4388: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4389: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4390: END IF;
4391: END;
4392: END IF;
4393: -- Adding 11/14/2000 End }
4423: END IF;
4424: IF l_debug_level > 0 THEN
4425: oe_debug_pub.add( 'TOO MANY ROWS ERROR: '||SQLERRM ) ;
4426: END IF;
4427: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4428: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4429: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4430: END IF;
4431: When others then
4425: oe_debug_pub.add( 'TOO MANY ROWS ERROR: '||SQLERRM ) ;
4426: END IF;
4427: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4428: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4429: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4430: END IF;
4431: When others then
4432: IF l_debug_level > 0 THEN
4433: oe_debug_pub.add( 'IN OEXVIMSB ITEM IDENTIFIER IS INT - OTHERS' ) ;
4434: END IF;
4435: IF l_debug_level > 0 THEN
4436: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4437: END IF;
4438: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4439: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4440: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4441: END IF;
4442: END;
4436: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4437: END IF;
4438: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4439: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4440: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4441: END IF;
4442: END;
4443: ELSIF (p_x_line_tbl(I).ordered_item_id <> FND_API.G_MISS_NUM AND
4444: p_x_line_tbl(I).ordered_item_id IS NOT NULL)
4464: END IF;
4465: IF l_debug_level > 0 THEN
4466: oe_debug_pub.add( 'TOO MANY ROWS ERROR: '||SQLERRM ) ;
4467: END IF;
4468: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4469: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4470: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4471: END IF;
4472: When others then
4466: oe_debug_pub.add( 'TOO MANY ROWS ERROR: '||SQLERRM ) ;
4467: END IF;
4468: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4469: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4470: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4471: END IF;
4472: When others then
4473: IF l_debug_level > 0 THEN
4474: oe_debug_pub.add( 'IN OEXVIMSB ITEM IDENTIFIER IS INT - OTHERS' ) ;
4475: END IF;
4476: IF l_debug_level > 0 THEN
4477: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4478: END IF;
4479: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4480: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4481: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4482: END IF;
4483: END;
4477: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4478: END IF;
4479: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4480: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4481: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_INT_ITEM');
4482: END IF;
4483: END;
4484: END IF;
4485: END IF;
4654: END IF;
4655: FND_MESSAGE.SET_NAME('ONT','OE_INV_CUS_ITEM');
4656: FND_MESSAGE.SET_TOKEN('ERROR_CODE', l_error_code);
4657: FND_MESSAGE.SET_TOKEN('ERROR_MESSAGE', l_error_message);
4658: OE_MSG_PUB.Add;
4659: END IF;
4660:
4661: --Start of bug# 13574394
4662: IF Nvl(p_x_line_tbl(I).return_reason_code,FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR OR
4713: END IF;
4714: FND_MESSAGE.SET_NAME('ONT','OE_INV_CUS_ITEM');
4715: FND_MESSAGE.SET_TOKEN('ERROR_CODE', l_error_code);
4716: FND_MESSAGE.SET_TOKEN('ERROR_MESSAGE', l_error_message);
4717: OE_MSG_PUB.Add;
4718: ELSE --moved assignment of item_identifier_type to ELSE clause to prevent incorrect
4719: --assignment when a customer item is not found by the inventory API...bug 3683667
4720: IF l_debug_level > 0 THEN
4721: oe_debug_pub.add( 'ASSIGNING ITEM_IDENTIFIER_TYPE AS CUST' ) ;
4733: END IF;
4734: FND_MESSAGE.SET_NAME('ONT','OE_INV_INT_CUS_ITEM_ID');
4735: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', l_inventory_item_id_ord);
4736: FND_MESSAGE.SET_TOKEN('CUST_ITEM_ID', l_inventory_item_id_cust);
4737: OE_MSG_PUB.Add;
4738: p_x_line_tbl(I).inventory_item_id := l_inventory_item_id_cust;
4739: ELSIF l_inventory_item_id_ord IS NOT NULL
4740: THEN
4741: p_x_line_tbl(I).inventory_item_id := l_inventory_item_id_ord;
4784: END IF;
4785: FND_MESSAGE.SET_NAME('ONT','OE_INV_INT_CUS_ITEM_ID');
4786: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', l_inventory_item_id_ord);
4787: FND_MESSAGE.SET_TOKEN('CUST_ITEM_ID', l_inventory_item_id_gen);
4788: OE_MSG_PUB.Add;
4789: p_x_line_tbl(I).inventory_item_id := l_inventory_item_id_gen;
4790: ELSIF l_inventory_item_id_ord IS NOT NULL
4791: THEN
4792: p_x_line_tbl(I).inventory_item_id := l_inventory_item_id_ord;
4805: oe_debug_pub.add( 'TOO MANY ROWS ERROR: '||SQLERRM ) ;
4806: END IF;
4807: FND_MESSAGE.SET_NAME('ONT','OE_NOT_UNIQUE_ITEM');
4808: FND_MESSAGE.SET_TOKEN('GENERIC_ITEM', p_x_line_tbl(I).ordered_item);
4809: OE_MSG_PUB.Add;
4810: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4811: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4812: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_GEN_ITEM');
4813: END IF;
4806: END IF;
4807: FND_MESSAGE.SET_NAME('ONT','OE_NOT_UNIQUE_ITEM');
4808: FND_MESSAGE.SET_TOKEN('GENERIC_ITEM', p_x_line_tbl(I).ordered_item);
4809: OE_MSG_PUB.Add;
4810: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4811: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4812: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_GEN_ITEM');
4813: END IF;
4814: IF l_debug_level > 0 THEN
4808: FND_MESSAGE.SET_TOKEN('GENERIC_ITEM', p_x_line_tbl(I).ordered_item);
4809: OE_MSG_PUB.Add;
4810: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4811: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4812: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_GEN_ITEM');
4813: END IF;
4814: IF l_debug_level > 0 THEN
4815: oe_debug_pub.add( 'IN OEXVIMSB ITEM IDENTIFIER IS GEN - TO_MANY' ) ;
4816: END IF;
4817: When others then
4818: IF l_debug_level > 0 THEN
4819: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4820: END IF;
4821: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4822: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4823: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_GEN_ITEM');
4824: END IF;
4825: IF l_debug_level > 0 THEN
4819: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4820: END IF;
4821: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4822: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4823: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process_GEN_ITEM');
4824: END IF;
4825: IF l_debug_level > 0 THEN
4826: oe_debug_pub.add( 'IN OEXVIMSB ITEM IDENTIFIER IS GEN - OTHERS' ) ;
4827: END IF;
4863: IF l_debug_level > 0 THEN
4864: oe_debug_pub.add( 'INVALID CALCULATE_PRICE FLAG... ' ) ;
4865: END IF;
4866: FND_MESSAGE.SET_NAME('ONT','OE_OI_CALCULATE_PRICE');
4867: OE_MSG_PUB.Add;
4868: p_return_status := FND_API.G_RET_STS_ERROR;
4869: END IF;
4870:
4871: /* -----------------------------------------------------------
4885: IF l_debug_level > 0 THEN
4886: oe_debug_pub.add( 'LIST PRICE OR SELLING PRICE IS NULL... ' ) ;
4887: END IF;
4888: FND_MESSAGE.SET_NAME('ONT','OE_OI_PRICE');
4889: OE_MSG_PUB.Add;
4890: p_return_status := FND_API.G_RET_STS_ERROR;
4891: END IF;
4892:
4893: /* -----------------------------------------------------------
4971: IF l_debug_level > 0 THEN
4972: oe_debug_pub.add( 'NOT FOUND LINEID FOR SEMI-DELAYED SERVICE' ) ;
4973: END IF;
4974: FND_MESSAGE.SET_NAME('ONT','OE_NO_SERV_TRANS');
4975: OE_MSG_PUB.Add;
4976: p_return_status := FND_API.G_RET_STS_ERROR;
4977: WHEN OTHERS THEN
4978: IF l_debug_level > 0 THEN
4979: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4977: WHEN OTHERS THEN
4978: IF l_debug_level > 0 THEN
4979: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4980: END IF;
4981: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_Msg_Lvl_Unexp_Error) THEN
4982: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4983: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.Line_id derivation for semi-delayed service');
4984: END IF;
4985: END;
4979: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
4980: END IF;
4981: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_Msg_Lvl_Unexp_Error) THEN
4982: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4983: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.Line_id derivation for semi-delayed service');
4984: END IF;
4985: END;
4986: ELSE
4987: BEGIN
5007: IF l_debug_level > 0 THEN
5008: oe_debug_pub.add( 'NOT FOUND ORDER LINE FOR DELAYED SERVICE' ) ;
5009: END IF;
5010: FND_MESSAGE.SET_NAME('ONT','OE_NO_SERV_TRANS');
5011: OE_MSG_PUB.Add;
5012: p_return_status := FND_API.G_RET_STS_ERROR;
5013: WHEN OTHERS THEN
5014: IF l_debug_level > 0 THEN
5015: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
5013: WHEN OTHERS THEN
5014: IF l_debug_level > 0 THEN
5015: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
5016: END IF;
5017: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_Msg_Lvl_Unexp_Error) THEN
5018: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5019: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.Line_id derivation for delayed service');
5020: END IF;
5021: END;
5015: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
5016: END IF;
5017: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_Msg_Lvl_Unexp_Error) THEN
5018: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5019: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.Line_id derivation for delayed service');
5020: END IF;
5021: END;
5022: END IF;
5023: ELSIF p_x_line_tbl(I).item_type_code = 'SERVICE' AND
5042: WHEN OTHERS THEN
5043: IF l_debug_level > 0 THEN
5044: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
5045: END IF;
5046: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_Msg_Lvl_Unexp_Error) THEN
5047: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5048: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.system_id derivation for delayed service');
5049: END IF;
5050: END;
5044: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
5045: END IF;
5046: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_Msg_Lvl_Unexp_Error) THEN
5047: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5048: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process.system_id derivation for delayed service');
5049: END IF;
5050: END;
5051: ELSIF p_x_line_tbl(I).item_type_code = 'SERVICE'
5052: THEN
5053: IF l_debug_level > 0 THEN
5054: oe_debug_pub.add( 'REQUIRED DATA IS MISSING FOR SERVICE LINE' ) ;
5055: END IF;
5056: FND_MESSAGE.SET_NAME('ONT','OE_NO_SERV_TRANS');
5057: OE_MSG_PUB.Add;
5058: p_return_status := FND_API.G_RET_STS_ERROR;
5059: END IF;
5060: <
5061: null;
5109: IF l_debug_level > 0 THEN
5110: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR LINE PRICE ADJUSTMENTS' ) ;
5111: END IF;
5112:
5113: OE_MSG_PUB.set_msg_context(
5114: p_entity_code => 'LINE_ADJ'
5115: ,p_entity_ref => p_x_line_adj_tbl(I).orig_sys_discount_ref
5116: ,p_entity_id => null
5117: ,p_header_id => p_x_header_rec.header_id
5142: IF l_debug_level > 0 THEN
5143: oe_debug_pub.add( 'INVALID ORIG_SYS_DISCOUNT_REF FOR LINE... ' ) ;
5144: END IF;
5145: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_DISCOUNT_REF');
5146: OE_MSG_PUB.Add;
5147: p_return_status := FND_API.G_RET_STS_ERROR;
5148: END IF;
5149:
5150: /* -----------------------------------------------------------
5170: IF l_debug_level > 0 THEN
5171: oe_debug_pub.add( 'INVALID LINE ADJUSTMENTS OPERATION CODE...' ) ;
5172: END IF;
5173: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5174: OE_MSG_PUB.Add;
5175: p_return_status := FND_API.G_RET_STS_ERROR;
5176: END IF;
5177:
5178: -- aksingh start on this (10/11/2000) this is in process of being coded
5199: IF l_debug_level > 0 THEN
5200: 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... ' ) ;
5201: END IF;
5202: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5203: OE_MSG_PUB.Add;
5204: p_return_status := FND_API.G_RET_STS_ERROR;
5205: Exception
5206: When no_data_found then
5207: IF l_debug_level > 0 THEN
5211: IF l_debug_level > 0 THEN
5212: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN INSERTING NEW LINE PRICE ADJ... ' ) ;
5213: END IF;
5214: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5215: OE_MSG_PUB.Add;
5216: p_return_status := FND_API.G_RET_STS_ERROR;
5217: End;
5218: End IF; -- Insert, Create Operation
5219:
5254: IF l_debug_level > 0 THEN
5255: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING LINE ADJ BUT THAT DOES NOT EXIST... ' ) ;
5256: END IF;
5257: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5258: OE_MSG_PUB.Add;
5259: p_return_status := FND_API.G_RET_STS_ERROR;
5260: When others then
5261: IF l_debug_level > 0 THEN
5262: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING LINEADJ ... ' ) ;
5261: IF l_debug_level > 0 THEN
5262: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING LINEADJ ... ' ) ;
5263: END IF;
5264: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5265: OE_MSG_PUB.Add;
5266: p_return_status := FND_API.G_RET_STS_ERROR;
5267: End;
5268: End IF; -- Update and Delete operation
5269:
5298: oe_debug_pub.add( 'NOT VALID PROMOTION NAME =' ||P_X_HEADER_ADJ_VAL_TBL ( I ) .LIST_NAME ) ;
5299: END IF;
5300: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_LIST_NAME');
5301: FND_MESSAGE.SET_TOKEN('LIST_NAME',p_x_line_adj_val_tbl(I).list_name);
5302: OE_MSG_PUB.Add;
5303: p_return_status := FND_API.G_RET_STS_ERROR;
5304: END IF;
5305:
5306: IF p_return_status NOT IN (FND_API.G_RET_STS_ERROR)
5399: IF l_debug_level > 0 THEN
5400: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR LINE ATTS' ) ;
5401: END IF;
5402:
5403: OE_MSG_PUB.set_msg_context(
5404: p_entity_code => 'LINE_PATTS'
5405: -- ,p_entity_ref => p_x_line_price_att_tbl(I).orig_sys_atts_ref
5406: ,p_entity_id => p_x_line_price_att_tbl(I).order_price_attrib_id
5407: ,p_header_id => p_x_header_rec.header_id
5428: IF p_x_line_price_att_tbl(I).orig_sys_atts_ref = FND_API.G_MISS_CHAR
5429: THEN
5430: oe_debug_pub.add('Invalid orig_sys_attribute_ref for line... ');
5431: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_ATT_REF');
5432: OE_MSG_PUB.Add;
5433: p_return_status := FND_API.G_RET_STS_ERROR;
5434: END IF;
5435:
5436: -----------------------------------------------------------
5459: IF l_debug_level > 0 THEN
5460: oe_debug_pub.add( 'INVALID LINE ADJUSTMENTS OPERATION CODE...' ) ;
5461: END IF;
5462: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5463: OE_MSG_PUB.Add;
5464: p_return_status := FND_API.G_RET_STS_ERROR;
5465: END IF;
5466:
5467: IF p_x_line_price_att_tbl(I).operation IN ('INSERT', 'CREATE')
5492: IF l_debug_level > 0 THEN
5493: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO INSERT A NEW HDRATT WITH THE SAME HEADER_ID AND ATTRIBUTE ID....' ) ;
5494: END IF;
5495: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5496: OE_MSG_PUB.Add;
5497: p_return_status := FND_API.G_RET_STS_ERROR;
5498: Exception
5499: When no_data_found then
5500: IF l_debug_level > 0 THEN
5504: IF l_debug_level > 0 THEN
5505: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN INSERTING NEW HDR PRICE ATT... ' ) ;
5506: END IF;
5507: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5508: OE_MSG_PUB.Add;
5509: p_return_status := FND_API.G_RET_STS_ERROR;
5510: End;
5511: End If; -- Insert, Create operation
5512:
5548: IF l_debug_level > 0 THEN
5549: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING HDR ATT BUT THAT DOES NOT EXIST... ' ) ;
5550: END IF;
5551: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5552: OE_MSG_PUB.Add;
5553: p_return_status := FND_API.G_RET_STS_ERROR;
5554: When others then
5555: IF l_debug_level > 0 THEN
5556: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING HDRATT ... ' ) ;
5555: IF l_debug_level > 0 THEN
5556: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING HDRATT ... ' ) ;
5557: END IF;
5558: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5559: OE_MSG_PUB.Add;
5560: p_return_status := FND_API.G_RET_STS_ERROR;
5561: End;
5562: End IF; -- Update and Delete operation
5563:
5601: IF l_debug_level > 0 THEN
5602: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR LINE SALES CREDITS' ) ;
5603: END IF;
5604:
5605: OE_MSG_PUB.set_msg_context(
5606: p_entity_code => 'LINE_SCREDIT'
5607: ,p_entity_ref => p_x_line_scredit_tbl(I).orig_sys_credit_ref
5608: ,p_entity_id => null
5609: ,p_header_id => p_x_header_rec.header_id
5634: IF l_debug_level > 0 THEN
5635: oe_debug_pub.add( 'INVALID ORIG_SYS_CREDIT_REF FOR LINE... ' ) ;
5636: END IF;
5637: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_CREDIT_REF');
5638: OE_MSG_PUB.Add;
5639: p_return_status := FND_API.G_RET_STS_ERROR;
5640: END IF;
5641:
5642: /* -----------------------------------------------------------
5662: IF l_debug_level > 0 THEN
5663: oe_debug_pub.add( 'INVALID LINE SALES CREDITS OPERATION CODE...' ) ;
5664: END IF;
5665: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5666: OE_MSG_PUB.Add;
5667: p_return_status := FND_API.G_RET_STS_ERROR;
5668: END IF;
5669:
5670: -- aksingh start on this (10/11/2000) this is in process of being coded
5691: IF l_debug_level > 0 THEN
5692: 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... ' ) ;
5693: END IF;
5694: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5695: OE_MSG_PUB.Add;
5696: p_return_status := FND_API.G_RET_STS_ERROR;
5697: Exception
5698: When no_data_found then
5699: IF l_debug_level > 0 THEN
5703: IF l_debug_level > 0 THEN
5704: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN INSERTING NEW LINE SALES CREDIT... ' ) ;
5705: END IF;
5706: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5707: OE_MSG_PUB.Add;
5708: p_return_status := FND_API.G_RET_STS_ERROR;
5709: End;
5710: END IF; -- Insert, Update Operation
5711:
5746: IF l_debug_level > 0 THEN
5747: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING LINE CREDIT BUT THAT DOES NOT EXIST... ' ) ;
5748: END IF;
5749: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5750: OE_MSG_PUB.Add;
5751: p_return_status := FND_API.G_RET_STS_ERROR;
5752: When others then
5753: IF l_debug_level > 0 THEN
5754: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING LINECRDT ... ' ) ;
5753: IF l_debug_level > 0 THEN
5754: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING LINECRDT ... ' ) ;
5755: END IF;
5756: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5757: OE_MSG_PUB.Add;
5758: p_return_status := FND_API.G_RET_STS_ERROR;
5759: End;
5760: End IF; -- Update and Delete operation
5761:
5774: IF l_debug_level > 0 THEN
5775: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR LINE PAYMENTS' ) ;
5776: END IF;
5777:
5778: OE_MSG_PUB.set_msg_context(
5779: p_entity_code => 'LINE_PAYMENT'
5780: ,p_entity_ref => p_x_line_payment_tbl(I).orig_sys_payment_ref
5781: ,p_entity_id => null
5782: ,p_header_id => p_x_header_rec.header_id
5808: oe_debug_pub.add( 'INVALID ORIG_SYS_PAYMENT_REF FOR LINE... ' ) ;
5809: END IF;
5810: /* multiple payments: new message */
5811: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_payment_REF');
5812: OE_MSG_PUB.Add;
5813: p_return_status := FND_API.G_RET_STS_ERROR;
5814: END IF;
5815:
5816: /* -----------------------------------------------------------
5836: IF l_debug_level > 0 THEN
5837: oe_debug_pub.add( 'INVALID LINE PAYMENTS OPERATION CODE...' ) ;
5838: END IF;
5839: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5840: OE_MSG_PUB.Add;
5841: p_return_status := FND_API.G_RET_STS_ERROR;
5842: END IF;
5843:
5844: IF p_x_line_payment_tbl(I).operation IN ('INSERT', 'CREATE')
5864: IF l_debug_level > 0 THEN
5865: 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... ' ) ;
5866: END IF;
5867: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5868: OE_MSG_PUB.Add;
5869: p_return_status := FND_API.G_RET_STS_ERROR;
5870: Exception
5871: When no_data_found then
5872: IF l_debug_level > 0 THEN
5876: IF l_debug_level > 0 THEN
5877: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN INSERTING NEW LINE PAYMENT... ' ) ;
5878: END IF;
5879: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5880: OE_MSG_PUB.Add;
5881: p_return_status := FND_API.G_RET_STS_ERROR;
5882: End;
5883: END IF; -- Insert, Update Operation
5884:
5907: IF l_debug_level > 0 THEN
5908: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING LINE PAYMENT BUT THAT DOES NOT EXIST... ' ) ;
5909: END IF;
5910: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5911: OE_MSG_PUB.Add;
5912: p_return_status := FND_API.G_RET_STS_ERROR;
5913: When others then
5914: IF l_debug_level > 0 THEN
5915: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING PAYMENT ... ' ) ;
5914: IF l_debug_level > 0 THEN
5915: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING PAYMENT ... ' ) ;
5916: END IF;
5917: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5918: OE_MSG_PUB.Add;
5919: p_return_status := FND_API.G_RET_STS_ERROR;
5920: End;
5921: End IF; -- Update and Delete operation
5922:
5932: IF l_debug_level > 0 THEN
5933: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR LINE LOT SERIALS' ) ;
5934: END IF;
5935:
5936: OE_MSG_PUB.set_msg_context(
5937: p_entity_code => 'LOT_SERIAL'
5938: ,p_entity_ref => p_x_lot_serial_tbl(I).orig_sys_lotserial_ref
5939: ,p_entity_id => null
5940: ,p_header_id => p_x_header_rec.header_id
5965: IF l_debug_level > 0 THEN
5966: oe_debug_pub.add( 'INVALID ORIG_SYS_LOTSERIAL_REF... ' ) ;
5967: END IF;
5968: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_LOTSERIAL_REF');
5969: OE_MSG_PUB.Add;
5970: p_return_status := FND_API.G_RET_STS_ERROR;
5971: END IF;
5972:
5973: /* -----------------------------------------------------------
5987: IF l_debug_level > 0 THEN
5988: oe_debug_pub.add( 'INVALID LINE LOT SERIALS OPERATION CODE...' ) ;
5989: END IF;
5990: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
5991: OE_MSG_PUB.Add;
5992: p_return_status := FND_API.G_RET_STS_ERROR;
5993: END IF;
5994:
5995: -- aksingh start on this (10/11/2000) this is in process of being coded
6012: IF l_debug_level > 0 THEN
6013: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO INSERT A NEW LOT WITH THE SAME LINE_ID AND ORIG_SYS_DISCOUNT_REF... ' ) ;
6014: END IF;
6015: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
6016: OE_MSG_PUB.Add;
6017: p_return_status := FND_API.G_RET_STS_ERROR;
6018: Exception
6019: When no_data_found then
6020: IF l_debug_level > 0 THEN
6024: IF l_debug_level > 0 THEN
6025: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN INSERTING NEW LINE LOT... ' ) ;
6026: END IF;
6027: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
6028: OE_MSG_PUB.Add;
6029: p_return_status := FND_API.G_RET_STS_ERROR;
6030: End;
6031: END IF; -- Insert, Create Opearation
6032:
6058: IF l_debug_level > 0 THEN
6059: oe_debug_pub.add( 'INVALID OPERATION CODE. TRYING TO UPDATE OR DELETE AN EXISTING LOT BUT THAT DOES NOT EXIST... ' ) ;
6060: END IF;
6061: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
6062: OE_MSG_PUB.Add;
6063: p_return_status := FND_API.G_RET_STS_ERROR;
6064: When others then
6065: IF l_debug_level > 0 THEN
6066: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING LOT... ' ) ;
6065: IF l_debug_level > 0 THEN
6066: oe_debug_pub.add( 'OTHERS EXCEPTION WHEN TRYING TO UPDATE OR DELETE AN EXISTING LOT... ' ) ;
6067: END IF;
6068: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
6069: OE_MSG_PUB.Add;
6070: p_return_status := FND_API.G_RET_STS_ERROR;
6071: End;
6072: End IF; -- Update and Delete operation
6073:
6085: IF l_debug_level > 0 THEN
6086: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR LINE RESERVATIONS' ) ;
6087: END IF;
6088:
6089: OE_MSG_PUB.set_msg_context(
6090: p_entity_code => 'RESERVATION'
6091: ,p_entity_ref => p_x_reservation_tbl(I).orig_sys_reservation_ref
6092: ,p_entity_id => null
6093: ,p_header_id => p_x_header_rec.header_id
6118: IF l_debug_level > 0 THEN
6119: oe_debug_pub.add( 'INVALID ORIG_SYS_RESERVATION_REF... ' ) ;
6120: END IF;
6121: FND_MESSAGE.SET_NAME('ONT','OE_OI_ORIG_SYS_RESERVATION_REF');
6122: OE_MSG_PUB.Add;
6123: p_return_status := FND_API.G_RET_STS_ERROR;
6124: END IF;
6125:
6126: /* -----------------------------------------------------------
6141: IF l_debug_level > 0 THEN
6142: oe_debug_pub.add( 'INVALID RESERVATION DETAILS... ' ) ;
6143: END IF;
6144: FND_MESSAGE.SET_NAME('ONT','OE_OI_RESERVATION_DETAILS');
6145: OE_MSG_PUB.Add;
6146: p_return_status := FND_API.G_RET_STS_ERROR;
6147: END IF;
6148:
6149: /* -----------------------------------------------------------
6161: IF l_debug_level > 0 THEN
6162: oe_debug_pub.add( 'INVALID RESERVATION QUANTITY... ' ) ;
6163: END IF;
6164: FND_MESSAGE.SET_NAME('ONT','OE_OI_RESERVATION_QUANTITY');
6165: OE_MSG_PUB.Add;
6166: p_return_status := FND_API.G_RET_STS_ERROR;
6167: END IF;
6168:
6169: /* -----------------------------------------------------------
6180: IF l_debug_level > 0 THEN
6181: oe_debug_pub.add( 'INVALID RESERVATION OPERATION... ' ) ;
6182: END IF;
6183: FND_MESSAGE.SET_NAME('ONT','OE_OI_OPERATION_CODE');
6184: OE_MSG_PUB.Add;
6185: p_return_status := FND_API.G_RET_STS_ERROR;
6186: END IF;
6187:
6188: -- Following Line are added to fixed the bug for the duplicate reservation
6269: WHEN OTHERS THEN
6270: IF l_debug_level > 0 THEN
6271: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
6272: END IF;
6273: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
6274: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6275: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process');
6276: END IF;
6277:
6271: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
6272: END IF;
6273: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
6274: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6275: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Pre_Process');
6276: END IF;
6277:
6278: END PRE_PROCESS;
6279:
6365: IF l_debug_level > 0 THEN
6366: oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT FOR THE LINE' ) ;
6367: END IF;
6368:
6369: OE_MSG_PUB.set_msg_context(
6370: p_entity_code => 'HEADER'
6371: ,p_entity_ref => null
6372: ,p_entity_id => null
6373: ,p_header_id => p_x_header_rec.header_id
6428: END IF;
6429: FND_MESSAGE.SET_NAME('ONT','OE_OI_PRICE_WARNING');
6430: FND_MESSAGE.SET_TOKEN('CUST_PRICE',p_x_line_tbl(I).customer_item_net_price);
6431: FND_MESSAGE.SET_TOKEN('SPLR_PRICE',l_unit_selling_price);
6432: OE_MSG_PUB.Add;
6433: -- p_return_status := FND_API.G_RET_STS_ERROR;
6434: END IF;
6435:
6436: /* -----------------------------------------------------------
6468: AND nvl(p_x_line_val_tbl_old(I).customer_payment_term,FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR Then
6469: FND_MESSAGE.SET_TOKEN('CUST_TERM',p_x_line_val_tbl_old(I).customer_payment_term);
6470: FND_MESSAGE.SET_TOKEN('SPLR_TERM',oe_id_to_value.payment_term(p_x_line_tbl(I).payment_term_id));
6471: END IF;
6472: OE_MSG_PUB.Add;
6473: -- p_return_status := FND_API.G_RET_STS_ERROR;
6474: END IF;
6475:
6476: END LOOP;
6515: oe_debug_pub.add( 'AFTER CALLING THE INV FOR DO_CHECK_FOR_COMMIT : ' || L_RETURN_STATUS , 1 ) ;
6516: IF l_failed_rsv_temp_tbl.count > 0 THEN
6517: oe_debug_pub.add( ' THE RESERVATION PROCESS HAS FAILED ' , 1 ) ;
6518: FND_MESSAGE.SET_NAME('ONT','OE_SCH_RSV_FAILURE');
6519: OE_MSG_PUB.Add;
6520: END IF;
6521: -- Error Handling Start
6522: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6523: oe_debug_pub.add( 'INSIDE UNEXPECTED ERROR' , 1 ) ;
6520: END IF;
6521: -- Error Handling Start
6522: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6523: oe_debug_pub.add( 'INSIDE UNEXPECTED ERROR' , 1 ) ;
6524: OE_MSG_PUB.Transfer_Msg_Stack;
6525: l_msg_count := OE_MSG_PUB.COUNT_MSG;
6526:
6527: FOR I IN 1..l_msg_count LOOP
6528: l_msg_data := OE_MSG_PUB.Get(I,'F');
6521: -- Error Handling Start
6522: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6523: oe_debug_pub.add( 'INSIDE UNEXPECTED ERROR' , 1 ) ;
6524: OE_MSG_PUB.Transfer_Msg_Stack;
6525: l_msg_count := OE_MSG_PUB.COUNT_MSG;
6526:
6527: FOR I IN 1..l_msg_count LOOP
6528: l_msg_data := OE_MSG_PUB.Get(I,'F');
6529: oe_debug_pub.add( L_MSG_DATA , 1 ) ;
6524: OE_MSG_PUB.Transfer_Msg_Stack;
6525: l_msg_count := OE_MSG_PUB.COUNT_MSG;
6526:
6527: FOR I IN 1..l_msg_count LOOP
6528: l_msg_data := OE_MSG_PUB.Get(I,'F');
6529: oe_debug_pub.add( L_MSG_DATA , 1 ) ;
6530: END LOOP;
6531: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6532: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
6530: END LOOP;
6531: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6532: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
6533: oe_debug_pub.add( ' INSIDE EXPECTED ERROR' , 1 ) ;
6534: OE_MSG_PUB.Transfer_Msg_Stack;
6535: l_msg_count := OE_MSG_PUB.COUNT_MSG;
6536:
6537: FOR I IN 1..l_msg_count LOOP
6538: l_msg_data := OE_MSG_PUB.Get(I,'F');
6531: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6532: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
6533: oe_debug_pub.add( ' INSIDE EXPECTED ERROR' , 1 ) ;
6534: OE_MSG_PUB.Transfer_Msg_Stack;
6535: l_msg_count := OE_MSG_PUB.COUNT_MSG;
6536:
6537: FOR I IN 1..l_msg_count LOOP
6538: l_msg_data := OE_MSG_PUB.Get(I,'F');
6539: oe_debug_pub.add( L_MSG_DATA , 1 ) ;
6534: OE_MSG_PUB.Transfer_Msg_Stack;
6535: l_msg_count := OE_MSG_PUB.COUNT_MSG;
6536:
6537: FOR I IN 1..l_msg_count LOOP
6538: l_msg_data := OE_MSG_PUB.Get(I,'F');
6539: oe_debug_pub.add( L_MSG_DATA , 1 ) ;
6540: END LOOP;
6541: RAISE FND_API.G_EXC_ERROR;
6542:
6593: WHEN OTHERS THEN
6594: IF l_debug_level > 0 THEN
6595: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
6596: END IF;
6597: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
6598: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6599: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Post_Process');
6600: END IF;
6601:
6595: oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
6596: END IF;
6597: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
6598: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6599: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Post_Process');
6600: END IF;
6601:
6602: END POST_PROCESS;
6603: