[Home] [Help]
189:
190: -- Initialize message list if p_init_msg_list is set to TRUE.
191: IF Fnd_Api.to_Boolean(p_init_msg_list)
192: THEN
193: Fnd_Msg_Pub.initialize;
194: END IF;
195:
196: -- Initialize API return status to success
197: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
368: COMMIT WORK;
369: END IF;
370:
371: -- Standard call to get message count and IF count is get message info.
372: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
373: p_data => x_msg_data);
374: EXCEPTION
375: WHEN Fnd_Api.G_EXC_ERROR THEN
376: ROLLBACK TO process_service_request;
374: EXCEPTION
375: WHEN Fnd_Api.G_EXC_ERROR THEN
376: ROLLBACK TO process_service_request;
377: x_return_status := Fnd_Api.G_RET_STS_ERROR;
378: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
379: p_data => x_msg_data);
380: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
381: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
382: ROLLBACK TO process_service_request;
379: p_data => x_msg_data);
380: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
381: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
382: ROLLBACK TO process_service_request;
383: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
384: p_data => x_msg_data);
385: WHEN OTHERS THEN
386: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
387: ROLLBACK TO process_service_request;
384: p_data => x_msg_data);
385: WHEN OTHERS THEN
386: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
387: ROLLBACK TO process_service_request;
388: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
389: THEN
390: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
391: END IF;
392: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
386: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
387: ROLLBACK TO process_service_request;
388: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
389: THEN
390: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
391: END IF;
392: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
393: p_data => x_msg_data);
394: END process_service_request;
388: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
389: THEN
390: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
391: END IF;
392: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
393: p_data => x_msg_data);
394: END process_service_request;
395:
396: /*--------------------------------------------------*/
444:
445: -- Initialize message list if p_init_msg_list is set to TRUE.
446: IF Fnd_Api.to_Boolean(p_init_msg_list)
447: THEN
448: Fnd_Msg_Pub.initialize;
449: END IF;
450:
451: -- Initialize API return status to success
452: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
675: COMMIT WORK;
676: END IF;
677:
678: -- Standard call to get message count and IF count is get message info.
679: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
680: p_data => x_msg_data);
681: EXCEPTION
682: WHEN Fnd_Api.G_EXC_ERROR THEN
683: ROLLBACK TO process_charge_lines;
681: EXCEPTION
682: WHEN Fnd_Api.G_EXC_ERROR THEN
683: ROLLBACK TO process_charge_lines;
684: x_return_status := Fnd_Api.G_RET_STS_ERROR;
685: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
686: p_data => x_msg_data);
687: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
688: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
689: ROLLBACK TO process_charge_lines;
686: p_data => x_msg_data);
687: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
688: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
689: ROLLBACK TO process_charge_lines;
690: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
691: p_data => x_msg_data);
692: WHEN OTHERS THEN
693: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
694: ROLLBACK TO process_charge_lines;
691: p_data => x_msg_data);
692: WHEN OTHERS THEN
693: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
694: ROLLBACK TO process_charge_lines;
695: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
696: THEN
697: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
698: END IF;
699: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
693: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
694: ROLLBACK TO process_charge_lines;
695: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
696: THEN
697: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
698: END IF;
699: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
700: p_data => x_msg_data);
701: END process_charge_lines;
695: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
696: THEN
697: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
698: END IF;
699: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
700: p_data => x_msg_data);
701: END process_charge_lines;
702:
703: /*--------------------------------------------------*/
736:
737: -- Initialize message list if p_init_msg_list is set to TRUE.
738: IF Fnd_Api.to_Boolean(p_init_msg_list)
739: THEN
740: Fnd_Msg_Pub.initialize;
741: END IF;
742:
743: -- Initialize API return status to success
744: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
779: COMMIT WORK;
780: END IF;
781:
782: -- Standard call to get message count and IF count is get message info.
783: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
784: p_data => x_msg_data);
785: EXCEPTION
786: WHEN Fnd_Api.G_EXC_ERROR THEN
787: ROLLBACK TO apply_contract;
785: EXCEPTION
786: WHEN Fnd_Api.G_EXC_ERROR THEN
787: ROLLBACK TO apply_contract;
788: x_return_status := Fnd_Api.G_RET_STS_ERROR;
789: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
790: p_data => x_msg_data);
791: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
792: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
793: ROLLBACK TO apply_contract;
790: p_data => x_msg_data);
791: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
792: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
793: ROLLBACK TO apply_contract;
794: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
795: p_data => x_msg_data);
796: WHEN OTHERS THEN
797: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
798: ROLLBACK TO apply_contract;
795: p_data => x_msg_data);
796: WHEN OTHERS THEN
797: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
798: ROLLBACK TO apply_contract;
799: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
800: THEN
801: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
802: END IF;
803: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
797: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
798: ROLLBACK TO apply_contract;
799: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
800: THEN
801: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
802: END IF;
803: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
804: p_data => x_msg_data);
805: END apply_contract;
799: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
800: THEN
801: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
802: END IF;
803: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
804: p_data => x_msg_data);
805: END apply_contract;
806:
807: /*--------------------------------------------------*/
923:
924: -- Initialize message list if p_init_msg_list is set to TRUE.
925: IF Fnd_Api.to_Boolean(p_init_msg_list)
926: THEN
927: Fnd_Msg_Pub.initialize;
928: END IF;
929:
930: -- Initialize API return status to success
931: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
951: IF NVL(p_delivery_id, Fnd_Api.G_MISS_NUM) = Fnd_Api.G_MISS_NUM
952: THEN
953: Fnd_Message.SET_NAME('CSD', 'CSD_INV_DELIVERY_ID');
954: Fnd_Message.SET_TOKEN('DELIVERY_ID', p_delivery_id);
955: Fnd_Msg_Pub.ADD;
956: IF (g_debug > 0)
957: THEN
958: Csd_Gen_Utility_Pvt.ADD('Delivery_id is invalid');
959: END IF;
968: EXCEPTION
969: WHEN NO_DATA_FOUND THEN
970: Fnd_Message.SET_NAME('CSD', 'CSD_INV_DELIVERY_ID');
971: Fnd_Message.SET_TOKEN('DELIVERY_ID', p_delivery_id);
972: Fnd_Msg_Pub.ADD;
973: IF (g_debug > 0)
974: THEN
975: Csd_Gen_Utility_Pvt.ADD('Delivery_id is invalid');
976: END IF;
1050: END IF;
1051: Fnd_Message.SET_NAME('CSD',
1052: 'CSD_UPDATE_SHIPPING_FAILED');
1053: Fnd_Message.SET_TOKEN('ERR_MSG', x_msg_data);
1054: Fnd_Msg_Pub.ADD;
1055: RAISE Fnd_Api.G_EXC_ERROR;
1056: END;
1057:
1058: END IF; --end of update_shipping_attributes
1156: IF (x_return_status <> Wsh_Util_Core.G_RET_STS_WARNING)
1157: THEN
1158: Fnd_Message.SET_NAME('CSD', 'CSD_SHIP_CONFIRM_FAILED');
1159: Fnd_Message.SET_TOKEN('ERR_MSG', x_msg_data);
1160: Fnd_Msg_Pub.ADD;
1161: RAISE Fnd_Api.G_EXC_ERROR;
1162: END IF;
1163:
1164: END; -- end of delivery action
1171: COMMIT WORK;
1172: END IF;
1173:
1174: -- Standard call to get message count and IF count is get message info.
1175: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
1176: p_data => x_msg_data);
1177:
1178: EXCEPTION
1179: WHEN Fnd_Api.G_EXC_ERROR THEN
1178: EXCEPTION
1179: WHEN Fnd_Api.G_EXC_ERROR THEN
1180: ROLLBACK TO ship_sales_order;
1181: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1182: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
1183: p_data => x_msg_data);
1184: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1185: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1186: ROLLBACK TO ship_sales_order;
1183: p_data => x_msg_data);
1184: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1185: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1186: ROLLBACK TO ship_sales_order;
1187: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
1188: p_data => x_msg_data);
1189: WHEN OTHERS THEN
1190: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1191: ROLLBACK TO ship_sales_order;
1188: p_data => x_msg_data);
1189: WHEN OTHERS THEN
1190: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1191: ROLLBACK TO ship_sales_order;
1192: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
1193: THEN
1194: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1195: END IF;
1196: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
1190: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1191: ROLLBACK TO ship_sales_order;
1192: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
1193: THEN
1194: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1195: END IF;
1196: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
1197: p_data => x_msg_data);
1198: END ship_sales_order;
1192: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
1193: THEN
1194: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1195: END IF;
1196: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
1197: p_data => x_msg_data);
1198: END ship_sales_order;
1199:
1200:
1205:
1206: begin
1207: IF p_MSG_COUNT > 1 THEN
1208: FOR i IN 1..p_MSG_COUNT LOOP
1209: l_msg := apps.FND_MSG_PUB.Get(i,apps.FND_API.G_FALSE) ;
1210: Fnd_Log.STRING(l_stat_level, p_mod_name, l_msg);
1211: END LOOP ;
1212: ELSE
1213: l_msg := apps.FND_MSG_PUB.Get(1,apps.FND_API.G_FALSE) ;
1209: l_msg := apps.FND_MSG_PUB.Get(i,apps.FND_API.G_FALSE) ;
1210: Fnd_Log.STRING(l_stat_level, p_mod_name, l_msg);
1211: END LOOP ;
1212: ELSE
1213: l_msg := apps.FND_MSG_PUB.Get(1,apps.FND_API.G_FALSE) ;
1214: Fnd_Log.STRING(l_stat_level, p_mod_name, l_msg);
1215: END IF ;
1216:
1217: end dbg_print_stack;
1427:
1428: -- Initialize message list if p_init_msg_list is set to TRUE.
1429: IF Fnd_Api.to_Boolean(p_init_msg_list)
1430: THEN
1431: Fnd_Msg_Pub.initialize;
1432: END IF;
1433:
1434: -- Initialize API return status to success
1435: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
1559: THEN
1560: Fnd_Message.SET_NAME('CSD', 'CSD_INV_ORDER_HEADER_ID');
1561: Fnd_Message.SET_TOKEN('ORDER_HEADER_ID',
1562: p_order_rec.order_header_id);
1563: Fnd_Msg_Pub.ADD;
1564: Debug('Invalid Order header Id is passed ', l_mod_name, 1);
1565: RAISE Fnd_Api.G_EXC_ERROR;
1566: END IF;
1567:
1570: THEN
1571: Fnd_Message.SET_NAME('CSD', 'CSD_INV_PICKING_RULE_ID');
1572: Fnd_Message.SET_TOKEN('PICKING_RULE_ID',
1573: p_order_rec.PICKING_RULE_ID);
1574: Fnd_Msg_Pub.ADD;
1575: Debug('Invalid Picking rule Id is passed ', l_mod_name, 1);
1576: RAISE Fnd_Api.G_EXC_ERROR;
1577: END IF;
1578:
1726: Exception
1727: WHEN OTHERS THEN
1728: Fnd_Message.SET_NAME('CSD', 'CSD_PICK_RELEASE_FAIL');
1729: Fnd_Message.SET_TOKEN('BATCH_NAME', l_batch_name);
1730: Fnd_Msg_Pub.ADD;
1731: Debug(' Picking rules insert failed ',l_mod_name, 1);
1732: RAISE Fnd_Api.G_EXC_ERROR;
1733: End ;
1734:
1799: IF (x_return_status = Fnd_Api.G_RET_STS_ERROR)
1800: THEN
1801: Fnd_Message.SET_NAME('CSD', 'CSD_PICK_RELEASE_FAIL');
1802: Fnd_Message.SET_TOKEN('BATCH_NAME', l_batch_name);
1803: Fnd_Msg_Pub.ADD;
1804: Debug('WSH_PICK_LIST.RELEASE_BATCH failed for batch : ' ||
1805: l_batch_name,
1806: l_mod_name,1) ;
1807: RAISE Fnd_Api.G_EXC_ERROR;
1823: THEN
1824: Fnd_Message.SET_NAME('CSD', 'CSD_INV_ORDER_HEADER_ID');
1825: Fnd_Message.SET_TOKEN('ORDER_HEADER_ID',
1826: p_order_rec.order_header_id);
1827: Fnd_Msg_Pub.ADD;
1828: Debug('Order_header_id is invalid', l_mod_name, 1);
1829: RAISE Fnd_Api.G_EXC_ERROR;
1830: END IF;
1831:
1986:
1987: if nvl(p_product_txn_rec.source_serial_number,FND_API.G_MISS_CHAR)=FND_API.G_MISS_CHAR then
1988: /* Validation 3 */
1989: FND_MESSAGE.SET_NAME('CSD','CSD_API_SERIAL_NUM_REQD');
1990: FND_MSG_PUB.ADD;
1991: RAISE FND_API.G_EXC_ERROR;
1992: else
1993: l_shipped_serial_number := p_product_txn_rec.source_serial_number;
1994: end if;
2006: /*Validation 1 */
2007: FND_MESSAGE.SET_NAME('CSD','CSD_SERIAL_NUM_NOT_IN_INVORG');
2008: FND_MESSAGE.SET_TOKEN('SERIAL_NUMBER',l_shipped_serial_number);
2009: FND_MESSAGE.SET_TOKEN('INV_ORG',i.organization_code);
2010: FND_MSG_PUB.ADD;
2011: RAISE FND_API.G_EXC_ERROR;
2012: else /*if Item is Serialied at SO then user may pass SN that does not resides in any warehouse */
2013: l_SN_at_SO_new_SN_number :=TRUE;
2014: end if;
2018: if ( i.serial_number_control_code =1 or (i.serial_number_control_code=6 and l_SN_at_SO_new_SN_number=TRUE ) ) then
2019: if nvl(p_product_txn_rec.sub_inventory ,FND_API.G_MISS_CHAR)=FND_API.G_MISS_CHAR then
2020: /*Validation 4 */
2021: FND_MESSAGE.SET_NAME('CSD','CSD_SUBINV_IS_REQD');
2022: FND_MSG_PUB.ADD;
2023: RAISE FND_API.G_EXC_ERROR;
2024: end if;
2025:
2026: begin
2037: /*Validation 2 */
2038: FND_MESSAGE.SET_NAME('CSD','CSD_SUBINV_NOT_IN_INVORG');
2039: FND_MESSAGE.SET_TOKEN('SUB_INV',p_product_txn_rec.sub_inventory);
2040: FND_MESSAGE.SET_TOKEN('INV_ORG',i.organization_code);
2041: FND_MSG_PUB.ADD;
2042: RAISE FND_API.G_EXC_ERROR;
2043: end;
2044:
2045: if i.LOT_CONTROL_CODE =2 then
2046: if nvl(p_product_txn_rec.lot_number,FND_API.G_MISS_CHAR)=FND_API.G_MISS_CHAR then
2047: /*Validation 5 */
2048: FND_MESSAGE.SET_NAME('CSD','CSD_LOT_NUMBER_REQD');
2049: FND_MESSAGE.SET_TOKEN('ITEM',i.item_name);
2050: FND_MSG_PUB.ADD;
2051: RAISE FND_API.G_EXC_ERROR;
2052: else
2053: l_lot_number:= p_product_txn_rec.lot_number;
2054: end if;
2057: if i.REVISION_QTY_CONTROL_CODE =2 then
2058: if nvl(p_product_txn_rec.revision,FND_API.G_MISS_CHAR)=FND_API.G_MISS_CHAR then
2059: FND_MESSAGE.SET_NAME('CSD','CSD_ITEM_REVISION_REQD');
2060: FND_MESSAGE.SET_TOKEN('ITEM',i.item_name);
2061: FND_MSG_PUB.ADD;
2062: RAISE FND_API.G_EXC_ERROR;
2063: else
2064: l_revision:=p_product_txn_rec.revision;
2065: end if;
2132: l_mod_name,
2133: 1);
2134: Fnd_Message.SET_NAME('CSD','CSD_UPDATE_SHIPPING_FAILED');
2135: Fnd_Message.SET_TOKEN('ERR_MSG', x_msg_data);
2136: Fnd_Msg_Pub.ADD;
2137: RAISE Fnd_Api.G_EXC_ERROR;
2138: END;
2139:
2140: -- END IF; --end of update_shipping_attributes
2261: end;
2262: if l_shipped_flag = 'N' then
2263: FND_MESSAGE.SET_NAME('CSD','CSD_SHIP_CONFIRM_FAILED');
2264: FND_MESSAGE.SET_TOKEN('ERR_MSG',x_msg_data);
2265: FND_MSG_PUB.ADD;
2266: RAISE FND_API.G_EXC_ERROR;
2267: end if;
2268: END IF;
2269: -- end bug#8269688, FP of bug#7659800, subhat
2281: COMMIT WORK;
2282: END IF;
2283:
2284: -- Standard call to get message count and IF count is get message info.
2285: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
2286: p_data => x_msg_data);
2287:
2288: EXCEPTION
2289: WHEN Fnd_Api.G_EXC_ERROR THEN
2290: Debug('In EXC_ERROR in process_sales_order', l_mod_name, 1);
2291: ROLLBACK TO process_sales_order;
2292:
2293: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2294: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
2295: p_data => x_msg_data);
2296:
2297: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2298: Debug('In EXC_UNEXP_ERROR in process_sales_order', l_mod_name, 1);
2297: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2298: Debug('In EXC_UNEXP_ERROR in process_sales_order', l_mod_name, 1);
2299: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2300: ROLLBACK TO process_sales_order;
2301: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
2302: p_data => x_msg_data);
2303: WHEN OTHERS THEN
2304: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2305: Debug('In OTHERS in process_sales_order' || sqlerrm, l_mod_name, 1);
2303: WHEN OTHERS THEN
2304: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2305: Debug('In OTHERS in process_sales_order' || sqlerrm, l_mod_name, 1);
2306: ROLLBACK TO process_sales_order;
2307: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
2308: THEN
2309: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2310: END IF;
2311: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
2305: Debug('In OTHERS in process_sales_order' || sqlerrm, l_mod_name, 1);
2306: ROLLBACK TO process_sales_order;
2307: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
2308: THEN
2309: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2310: END IF;
2311: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
2312: p_data => x_msg_data);
2313: END process_sales_order;
2307: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
2308: THEN
2309: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2310: END IF;
2311: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
2312: p_data => x_msg_data);
2313: END process_sales_order;
2314:
2315: /*------------------------------------------------------------------*/
2491:
2492: -- Initialize message list if p_init_msg_list is set to TRUE.
2493: IF Fnd_Api.to_Boolean(p_init_msg_list)
2494: THEN
2495: Fnd_Msg_Pub.initialize;
2496: END IF;
2497:
2498: -- Api body starts
2499:
2585: INTO l_tmp_char;
2586: IF (cur_pick_rules%NOTFOUND)
2587: THEN
2588: Fnd_Message.SET_NAME('CSD', 'CSD_INV_PICK_RULE');
2589: Fnd_Msg_Pub.ADD;
2590: RAISE Fnd_Api.G_EXC_ERROR;
2591: END IF;
2592: END IF;
2593: --R12 Development changes End
2632: AND lookup_code = x_product_txn_rec.PROD_TXN_STATUS;
2633: EXCEPTION
2634: WHEN OTHERS THEN
2635: Fnd_Message.SET_NAME('CSD', 'CSD_ERR_PROD_TXN_STATUS');
2636: Fnd_Msg_Pub.ADD;
2637: RAISE Fnd_Api.G_EXC_ERROR;
2638: END;
2639: END IF;
2640:
2655: WHEN OTHERS THEN
2656: Fnd_Message.SET_NAME('CSD', 'CSD_API_INV_REP_LINE_ID');
2657: Fnd_Message.SET_TOKEN('REPAIR_LINE_ID',
2658: x_product_txn_rec.repair_line_id);
2659: Fnd_Msg_Pub.ADD;
2660: RAISE Fnd_Api.G_EXC_ERROR;
2661: END;
2662:
2663: Debug('l_incident_id =' || l_incident_id, l_mod_name, 1);
2760: WHEN NO_DATA_FOUND THEN
2761: Fnd_Message.SET_NAME('CSD', 'CSD_API_CONTRACT_MISSING');
2762: Fnd_Message.SET_TOKEN('CONTRACT_LINE_ID',
2763: x_product_txn_rec.contract_id);
2764: Fnd_Msg_Pub.ADD;
2765: Debug('Contract Line Id missing', l_mod_name, 1);
2766: RAISE Fnd_Api.G_EXC_ERROR;
2767: WHEN TOO_MANY_ROWS THEN
2768: Debug('Too many Contract Line', l_mod_name, 1);
2788: IF (order_rec%NOTFOUND OR l_party_id IS NULL)
2789: THEN
2790: Fnd_Message.SET_NAME('CSD', 'CSD_API_PARTY_MISSING');
2791: Fnd_Message.SET_TOKEN('INCIDENT_ID', l_incident_id);
2792: Fnd_Msg_Pub.ADD;
2793: RAISE Fnd_Api.G_EXC_ERROR;
2794: END IF;
2795: IF order_rec%ISOPEN
2796: THEN
2847: THEN
2848: Fnd_Message.SET_NAME('CSD', 'CSD_API_LINE_TYPE_MISSING');
2849: Fnd_Message.SET_TOKEN('TXN_BILLING_TYPE_ID',
2850: x_product_txn_rec.txn_billing_type_id);
2851: Fnd_Msg_Pub.ADD;
2852: RAISE Fnd_Api.G_EXC_ERROR;
2853: END IF;
2854:
2855: -- Get the currency code from the price list if it is null or g_miss
2866: Fnd_Message.SET_NAME('CSD',
2867: 'CSD_API_INV_PRICE_LIST_ID');
2868: Fnd_Message.SET_TOKEN('PRICE_LIST_ID',
2869: x_product_txn_rec.price_list_id);
2870: Fnd_Msg_Pub.ADD;
2871: RAISE Fnd_Api.G_EXC_ERROR;
2872: WHEN TOO_MANY_ROWS THEN
2873: Debug('Too many currency_codes', l_mod_name, 1);
2874: END;
2881: THEN
2882: Fnd_Message.SET_NAME('CSD', 'CSD_API_INV_CURR_CODE');
2883: Fnd_Message.SET_TOKEN('PRICE_LIST_ID',
2884: x_product_txn_rec.price_list_id);
2885: Fnd_Msg_Pub.ADD;
2886: RAISE Fnd_Api.G_EXC_ERROR;
2887: END IF;
2888:
2889: l_serial_flag := Csd_Process_Util.Is_item_serialized(x_product_txn_rec.inventory_item_id);
2907: THEN
2908: Fnd_Message.SET_NAME('CSD', 'CSD_API_SERIAL_NUM_MISSING');
2909: Fnd_Message.SET_TOKEN('INVENTORY_ITEM_ID',
2910: x_product_txn_rec.inventory_item_id);
2911: Fnd_Msg_Pub.ADD;
2912: Debug('Serial Number missing for inventory_item_id =' ||
2913: x_product_txn_rec.inventory_item_id,
2914: l_mod_name,
2915: 1);
3103: THEN
3104: Fnd_Message.SET_NAME('CSD', 'CSD_ERR_REPAIRS_UPDATE');
3105: Fnd_Message.SET_TOKEN('REPAIR_LINE_ID',
3106: x_product_txn_rec.repair_line_id);
3107: Fnd_Msg_Pub.ADD;
3108: RAISE Fnd_Api.G_EXC_ERROR;
3109: END IF;
3110:
3111: -- Process the product txn only if the process_flag = 'Y'
3139: EXCEPTION
3140: WHEN NO_DATA_FOUND THEN
3141: Fnd_Message.SET_NAME('CSD',
3142: 'CSD_INVALID_INVENTORY_ITEM');
3143: Fnd_Msg_Pub.ADD;
3144: RAISE CREATE_ORDER;
3145: END;
3146:
3147: IF l_rev_ctl_code = 2
3158: EXCEPTION
3159: WHEN NO_DATA_FOUND THEN
3160: Fnd_Message.SET_NAME('CSD',
3161: 'CSD_INVALID_REVISION');
3162: Fnd_Msg_Pub.ADD;
3163: RAISE CREATE_ORDER;
3164: END;
3165: END IF;
3166:
3220: Fnd_Message.SET_NAME('CSD',
3221: 'CSD_ERR_PRD_TXN_UPDATE');
3222: Fnd_Message.SET_TOKEN('PRODUCT_TRANSACTION_ID',
3223: x_product_txn_rec.PRODUCT_TRANSACTION_ID);
3224: Fnd_Msg_Pub.ADD;
3225: RAISE CREATE_ORDER;
3226: END IF;
3227:
3228: UPDATE csd_repairs
3234: Fnd_Message.SET_NAME('CSD',
3235: 'CSD_ERR_REPAIRS_UPDATE');
3236: Fnd_Message.SET_TOKEN('REPAIR_LINE_ID',
3237: x_product_txn_rec.repair_line_id);
3238: Fnd_Msg_Pub.ADD;
3239: RAISE CREATE_ORDER;
3240: END IF;
3241:
3242: -- swai: bug 6001057
3273: else
3274: FND_MESSAGE.SET_NAME('CSD','CSD_ERR_PROJECT_UPDATE');
3275: FND_MESSAGE.SET_TOKEN('project_id',x_product_txn_rec.project_id);
3276: FND_MESSAGE.SET_TOKEN('ship_from_org_id',l_p_ship_from_org_id);
3277: FND_MSG_PUB.ADD;
3278: RAISE CREATE_ORDER;
3279: end if;
3280: end if;
3281: end if; -- end update project and unit number fields
3310: );
3311:
3312: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3313: FND_MESSAGE.SET_NAME('CSD','CSD_ERR_OM_PROCESS_LINE');
3314: FND_MSG_PUB.ADD;
3315: RAISE CREATE_ORDER;
3316: END IF;
3317: end if; -- order line is not null
3318: end if;
3362: Fnd_Message.SET_NAME('CSD',
3363: 'CSD_API_INV_EST_DETAIL_ID');
3364: Fnd_Message.SET_TOKEN('ESTIMATE_DETAIL_ID',
3365: x_estimate_detail_id); */
3366: Fnd_Msg_Pub.ADD;
3367: Debug('Sales Order missing for estimate_detail_id =' ||
3368: x_estimate_detail_id,
3369: l_mod_name,
3370: 1);
3399: Fnd_Message.SET_NAME('CSD',
3400: 'CSD_API_SALES_REP_MISSING');
3401: Fnd_Message.SET_TOKEN('ORDER_LINE_ID',
3402: l_order_line_id);
3403: Fnd_Msg_Pub.ADD;
3404: Debug('Sales rep missing for Line_id=' ||
3405: l_order_line_id,
3406: l_mod_name,
3407: 1);
3417: Fnd_Message.SET_NAME('CSD',
3418: 'CSD_API_SHIP_FROM_ORG_MISSING');
3419: Fnd_Message.SET_TOKEN('ORDER_LINE_ID',
3420: l_order_line_id);
3421: Fnd_Msg_Pub.ADD;
3422: Debug('Ship from Org Id missing for Line_id=' ||
3423: l_order_line_id,
3424: l_mod_name,
3425: 1);
3431: Fnd_Message.SET_NAME('CSD',
3432: 'CSD_API_PRICE_MISSING');
3433: Fnd_Message.SET_TOKEN('ORDER_LINE_ID',
3434: l_order_line_id);
3435: Fnd_Msg_Pub.ADD;
3436: Debug('Unit Selling price missing for Line_id=' ||
3437: l_order_line_id,
3438: l_mod_name,
3439: 1);
3494: else
3495: FND_MESSAGE.SET_NAME('CSD','CSD_ERR_PROJECT_UPDATE');
3496: FND_MESSAGE.SET_TOKEN('project_id',x_product_txn_rec.project_id);
3497: FND_MESSAGE.SET_TOKEN('ship_from_org_id',l_ship_from_org_id);
3498: FND_MSG_PUB.ADD;
3499: RAISE BOOK_ORDER;
3500: end if;
3501: end if;
3502: end if;
3531: );
3532:
3533: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3534: FND_MESSAGE.SET_NAME('CSD','CSD_ERR_OM_PROCESS_LINE');
3535: FND_MSG_PUB.ADD;
3536: RAISE BOOK_ORDER;
3537: END IF;
3538: end if; -- order line is not null
3539: end if;
3568: -- WHERE product_transaction_id = x_product_txn_rec.PRODUCT_TRANSACTION_ID;
3569: -- IF SQL%NOTFOUND then
3570: -- FND_MESSAGE.SET_NAME('CSD','CSD_ERR_PRD_TXN_UPDATE');
3571: -- FND_MESSAGE.SET_TOKEN('PRODUCT_TRANSACTION_ID',x_product_txn_rec.PRODUCT_TRANSACTION_ID);
3572: -- FND_MSG_PUB.ADD;
3573: -- RAISE BOOK_ORDER;
3574: -- END IF;
3575:
3576: -- Fix for bug#4020651
3587: Fnd_Message.SET_NAME('CSD',
3588: 'CSD_ERR_REPAIRS_UPDATE');
3589: Fnd_Message.SET_TOKEN('REPAIR_LINE_ID',
3590: x_product_txn_rec.repair_line_id);
3591: Fnd_Msg_Pub.ADD;
3592: RAISE BOOK_ORDER;
3593: END IF;
3594:
3595: EXCEPTION
3634: Fnd_Message.SET_NAME('CSD',
3635: 'CSD_API_SUB_INV_MISSING');
3636: Fnd_Message.SET_TOKEN('SUB_INVENTORY',
3637: x_product_txn_rec.sub_inventory);
3638: Fnd_Msg_Pub.ADD;
3639: Debug(x_product_txn_rec.sub_inventory ||
3640: ':Subinventory does not exist',
3641: l_mod_name,
3642: 1);
3698: CSD_LOGISTICS_UTIL.Reserve_serial_number(l_serial_rsv_rec, x_return_status);
3699:
3700: if(x_return_status = FND_API.G_RET_STS_ERROR) THEN
3701: Fnd_Message.SET_NAME('CSD', 'CSD_SRL_RESERVE_FAILED');
3702: Fnd_Msg_Pub.ADD;
3703: RAISE RELEASE_ORDER;
3704: END IF;
3705:
3706: END IF;
3735: Fnd_Message.SET_NAME('CSD',
3736: 'CSD_API_INV_PICKING_RULE_ID');
3737: Fnd_Message.SET_TOKEN('PICKING_RULE_ID',
3738: l_picking_rule_id);
3739: Fnd_Msg_Pub.ADD;
3740: Debug(l_picking_rule_id ||
3741: ':Picking Rule does not exist ',
3742: l_mod_name,
3743: 1);
3826: Fnd_Message.SET_NAME('CSD',
3827: 'CSD_ERR_PRD_TXN_UPDATE');
3828: Fnd_Message.SET_TOKEN('PRODUCT_TRANSACTION_ID',
3829: x_product_txn_rec.PRODUCT_TRANSACTION_ID);
3830: Fnd_Msg_Pub.ADD;
3831: RAISE RELEASE_ORDER;
3832: END IF;
3833: END IF;
3834:
3841: Fnd_Message.SET_NAME('CSD',
3842: 'CSD_ERR_REPAIRS_UPDATE');
3843: Fnd_Message.SET_TOKEN('REPAIR_LINE_ID',
3844: x_product_txn_rec.repair_line_id);
3845: Fnd_Msg_Pub.ADD;
3846: RAISE RELEASE_ORDER;
3847: END IF;
3848:
3849: ELSIF l_release_status IN ('S', 'B')
3861: Fnd_Message.SET_NAME('CSD',
3862: 'CSD_ERR_PRD_TXN_UPDATE');
3863: Fnd_Message.SET_TOKEN('PRODUCT_TRANSACTION_ID',
3864: x_product_txn_rec.PRODUCT_TRANSACTION_ID);
3865: Fnd_Msg_Pub.ADD;
3866: RAISE RELEASE_ORDER;
3867: END IF;
3868: END IF;
3869:
3876: Fnd_Message.SET_NAME('CSD',
3877: 'CSD_ERR_REPAIRS_UPDATE');
3878: Fnd_Message.SET_TOKEN('REPAIR_LINE_ID',
3879: x_product_txn_rec.repair_line_id);
3880: Fnd_Msg_Pub.ADD;
3881: RAISE RELEASE_ORDER;
3882: END IF;
3883:
3884: END IF;
3967: Fnd_Message.SET_NAME('CSD',
3968: 'CSD_ERR_PRD_TXN_UPDATE');
3969: Fnd_Message.SET_TOKEN('PRODUCT_TRANSACTION_ID',
3970: x_product_txn_rec.PRODUCT_TRANSACTION_ID);
3971: Fnd_Msg_Pub.ADD;
3972: RAISE SHIP_ORDER;
3973: END IF;
3974: END IF;
3975:
3982: Fnd_Message.SET_NAME('CSD',
3983: 'CSD_ERR_REPAIRS_UPDATE');
3984: Fnd_Message.SET_TOKEN('REPAIR_LINE_ID',
3985: x_product_txn_rec.repair_line_id);
3986: Fnd_Msg_Pub.ADD;
3987: RAISE SHIP_ORDER;
3988: END IF;
3989:
3990: END IF;
4009: COMMIT WORK;
4010: END IF;
4011:
4012: -- Standard call to get message count and IF count is get message info.
4013: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4014: p_data => x_msg_data);
4015: EXCEPTION
4016: WHEN CREATE_ORDER THEN
4017: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
4033: UPDATE csd_repairs
4034: SET auto_process_rma = 'N'
4035: WHERE repair_line_id = x_product_txn_rec.repair_line_id;
4036: END IF;
4037: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4038: p_data => x_msg_data);
4039: WHEN BOOK_ORDER THEN
4040: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
4041: ROLLBACK TO book_sales_order;
4055: UPDATE csd_repairs
4056: SET auto_process_rma = 'N'
4057: WHERE repair_line_id = x_product_txn_rec.repair_line_id;
4058: END IF;
4059: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4060: p_data => x_msg_data);
4061: WHEN RELEASE_ORDER THEN
4062: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
4063: ROLLBACK TO release_sales_order;
4067: SET release_sales_order_flag = 'N',
4068: ship_sales_order_flag = 'N'
4069: WHERE product_transaction_id =
4070: x_product_txn_rec.PRODUCT_TRANSACTION_ID;
4071: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4072: p_data => x_msg_data);
4073: WHEN SHIP_ORDER THEN
4074: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
4075: ROLLBACK TO ship_sales_order;
4078: UPDATE csd_product_transactions
4079: SET ship_sales_order_flag = 'N'
4080: WHERE product_transaction_id =
4081: x_product_txn_rec.PRODUCT_TRANSACTION_ID;
4082: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4083: p_data => x_msg_data);
4084: WHEN Fnd_Api.G_EXC_ERROR THEN
4085: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4086: ROLLBACK TO create_product_txn;
4083: p_data => x_msg_data);
4084: WHEN Fnd_Api.G_EXC_ERROR THEN
4085: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4086: ROLLBACK TO create_product_txn;
4087: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4088: p_data => x_msg_data);
4089: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4090: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
4091: ROLLBACK TO create_product_txn;
4088: p_data => x_msg_data);
4089: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4090: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
4091: ROLLBACK TO create_product_txn;
4092: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4093: p_data => x_msg_data);
4094: WHEN OTHERS THEN
4095: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
4096: ROLLBACK TO create_product_txn;
4093: p_data => x_msg_data);
4094: WHEN OTHERS THEN
4095: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
4096: ROLLBACK TO create_product_txn;
4097: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
4098: THEN
4099: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
4100: END IF;
4101: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4095: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
4096: ROLLBACK TO create_product_txn;
4097: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
4098: THEN
4099: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
4100: END IF;
4101: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4102: p_data => x_msg_data);
4103: END create_product_txn;
4097: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
4098: THEN
4099: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
4100: END IF;
4101: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4102: p_data => x_msg_data);
4103: END create_product_txn;
4104:
4105: /*-----------------------------------------------------------------*/
4191:
4192: -- Initialize message list if p_init_msg_list is set to TRUE.
4193: IF Fnd_Api.to_Boolean(p_init_msg_list)
4194: THEN
4195: Fnd_Msg_Pub.initialize;
4196: END IF;
4197:
4198: -- Initialize API return status to success
4199: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
4333: AND lookup_code = x_product_txn_rec.PROD_TXN_STATUS;
4334: EXCEPTION
4335: WHEN OTHERS THEN
4336: Fnd_Message.SET_NAME('CSD', 'CSD_ERR_PROD_TXN_STATUS');
4337: Fnd_Msg_Pub.ADD;
4338: RAISE Fnd_Api.G_EXC_ERROR;
4339: END;
4340: END IF;
4341:
4350: WHEN OTHERS THEN
4351: Fnd_Message.SET_NAME('CSD', 'CSD_API_INV_REP_LINE_ID');
4352: Fnd_Message.SET_TOKEN('REPAIR_LINE_ID',
4353: x_product_txn_rec.repair_line_id);
4354: Fnd_Msg_Pub.ADD;
4355: RAISE Fnd_Api.G_EXC_ERROR;
4356: END;
4357:
4358: IF (g_debug > 0)
4402: IF (get_account_details%NOTFOUND OR l_party_id IS NULL)
4403: THEN
4404: Fnd_Message.SET_NAME('CSD', 'CSD_API_PARTY_MISSING');
4405: Fnd_Message.SET_TOKEN('INCIDENT_ID', l_incident_id);
4406: Fnd_Msg_Pub.ADD;
4407: RAISE Fnd_Api.G_EXC_ERROR;
4408: END IF;
4409: IF get_account_details%ISOPEN
4410: THEN
4453: THEN
4454: Fnd_Message.SET_NAME('CSD', 'CSD_API_LINE_TYPE_MISSING');
4455: Fnd_Message.SET_TOKEN('TXN_BILLING_TYPE_ID',
4456: x_product_txn_rec.txn_billing_type_id);
4457: Fnd_Msg_Pub.ADD;
4458: RAISE Fnd_Api.G_EXC_ERROR;
4459: END IF;
4460:
4461: -- Get the currency code from the price list if it is null or g_miss
4472: Fnd_Message.SET_NAME('CSD',
4473: 'CSD_API_INV_PRICE_LIST_ID');
4474: Fnd_Message.SET_TOKEN('PRICE_LIST_ID',
4475: x_product_txn_rec.price_list_id);
4476: Fnd_Msg_Pub.ADD;
4477: RAISE Fnd_Api.G_EXC_ERROR;
4478: WHEN TOO_MANY_ROWS THEN
4479: IF (g_debug > 0)
4480: THEN
4494: THEN
4495: Fnd_Message.SET_NAME('CSD', 'CSD_API_INV_CURR_CODE');
4496: Fnd_Message.SET_TOKEN('PRICE_LIST_ID',
4497: x_product_txn_rec.price_list_id);
4498: Fnd_Msg_Pub.ADD;
4499: RAISE Fnd_Api.G_EXC_ERROR;
4500: END IF;
4501:
4502: l_serial_flag := Csd_Process_Util.Is_item_serialized(x_product_txn_rec.inventory_item_id);
4519: THEN
4520: Fnd_Message.SET_NAME('CSD', 'CSD_API_SERIAL_NUM_MISSING');
4521: Fnd_Message.SET_TOKEN('INVENTORY_ITEM_ID',
4522: x_product_txn_rec.inventory_item_id);
4523: Fnd_Msg_Pub.ADD;
4524: IF (g_debug > 0)
4525: THEN
4526: Csd_Gen_Utility_Pvt.ADD('Serial Number missing for inventory_item_id =' ||
4527: x_product_txn_rec.inventory_item_id);
4607: THEN
4608: Fnd_Message.SET_NAME('CSD', 'CSD_ERR_REPAIRS_UPDATE');
4609: Fnd_Message.SET_TOKEN('REPAIR_LINE_ID',
4610: x_product_txn_rec.repair_line_id);
4611: Fnd_Msg_Pub.ADD;
4612: RAISE Fnd_Api.G_EXC_ERROR;
4613: END IF;
4614:
4615: -- Api body ends here
4620: COMMIT WORK;
4621: END IF;
4622:
4623: -- Standard call to get message count and IF count is get message info.
4624: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4625: p_data => x_msg_data);
4626: EXCEPTION
4627: WHEN Fnd_Api.G_EXC_ERROR THEN
4628: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4626: EXCEPTION
4627: WHEN Fnd_Api.G_EXC_ERROR THEN
4628: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4629: ROLLBACK TO create_product_txn;
4630: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4631: p_data => x_msg_data);
4632: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4633: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
4634: ROLLBACK TO create_product_txn;
4631: p_data => x_msg_data);
4632: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4633: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
4634: ROLLBACK TO create_product_txn;
4635: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4636: p_data => x_msg_data);
4637: WHEN OTHERS THEN
4638: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
4639: ROLLBACK TO create_product_txn;
4636: p_data => x_msg_data);
4637: WHEN OTHERS THEN
4638: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
4639: ROLLBACK TO create_product_txn;
4640: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
4641: THEN
4642: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
4643: END IF;
4644: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4638: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
4639: ROLLBACK TO create_product_txn;
4640: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
4641: THEN
4642: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
4643: END IF;
4644: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4645: p_data => x_msg_data);
4646: END create_ext_prod_txn;
4640: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
4641: THEN
4642: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
4643: END IF;
4644: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4645: p_data => x_msg_data);
4646: END create_ext_prod_txn;
4647:
4648: /*----------------------------------------------------------------*/
4712: -- Fix for bug#6210765
4713: -- Initialize message list if p_init_msg_list is set to TRUE.
4714: IF Fnd_Api.to_Boolean(p_init_msg_list)
4715: THEN
4716: Fnd_Msg_Pub.initialize;
4717: END IF;
4718:
4719:
4720: l_prodtxn_db_attr := Csd_Logistics_Util.get_prodtxn_db_attr(x_product_txn_rec.product_transaction_id);
4852: p_inventory_item_id => x_product_txn_rec.inventory_item_id,
4853: p_serial_number => x_product_txn_rec.source_serial_number ) then
4854: fnd_message.set_name('CSD','CSD_NEG_INV_IN_SHIP');
4855: fnd_message.set_token('SUBINV',x_product_txn_rec.sub_inventory);
4856: fnd_msg_pub.add;
4857: RAISE RELEASE_ORDER;
4858: end if;
4859: end if;
4860:
4865: p_order_line_id => x_product_txn_rec.order_line_id ) then
4866: fnd_message.set_name('CSD','CSD_OM_ORDER_ON_HOLD');
4867: fnd_message.set_token('ACTION','Shipping');
4868: fnd_message.set_token('ORDER_NUM',x_product_txn_rec.order_number);
4869: fnd_msg_pub.add;
4870: RAISE RELEASE_ORDER;
4871: end if;
4872: -- end bug fix #7355526, nnadig
4873: /*******************************************************************
4913: COMMIT WORK;
4914: END IF;
4915:
4916: -- Standard call to get message count and IF count is get message info.
4917: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4918: p_data => x_msg_data);
4919: EXCEPTION
4920: WHEN CREATE_ORDER THEN
4921: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
4937: release_sales_order_flag = 'N',
4938: ship_sales_order_flag = 'N'
4939: WHERE product_transaction_id =
4940: x_product_txn_rec.PRODUCT_TRANSACTION_ID;
4941: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4942: p_data => x_msg_data);
4943: WHEN BOOK_ORDER THEN
4944: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
4945: ROLLBACK TO book_sales_order;
4950: release_sales_order_flag = 'N',
4951: ship_sales_order_flag = 'N'
4952: WHERE product_transaction_id =
4953: x_product_txn_rec.PRODUCT_TRANSACTION_ID;
4954: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4955: p_data => x_msg_data);
4956: WHEN RELEASE_ORDER THEN
4957: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
4958: ROLLBACK TO release_sales_order;
4962: SET release_sales_order_flag = 'N',
4963: ship_sales_order_flag = 'N'
4964: WHERE product_transaction_id =
4965: x_product_txn_rec.PRODUCT_TRANSACTION_ID;
4966: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4967: p_data => x_msg_data);
4968: WHEN SHIP_ORDER THEN
4969: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
4970: ROLLBACK TO ship_sales_order;
4973: UPDATE csd_product_transactions
4974: SET ship_sales_order_flag = 'N'
4975: WHERE product_transaction_id =
4976: x_product_txn_rec.PRODUCT_TRANSACTION_ID;
4977: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4978: p_data => x_msg_data);
4979: WHEN Fnd_Api.G_EXC_ERROR THEN
4980: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4981: ROLLBACK TO UPDATE_PRODUCT_TXN_PVT;
4978: p_data => x_msg_data);
4979: WHEN Fnd_Api.G_EXC_ERROR THEN
4980: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4981: ROLLBACK TO UPDATE_PRODUCT_TXN_PVT;
4982: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4983: p_data => x_msg_data);
4984: Debug('in exc_error, x_msg_data,count[' || x_msg_data|| ','||to_char(x_msg_count)||']',
4985: l_mod_name,
4986: l_statement_level);
4985: l_mod_name,
4986: l_statement_level);
4987: IF x_msg_count > 1 THEN
4988: FOR i IN 1..x_msg_count LOOP
4989: l_msg_data := apps.FND_MSG_PUB.Get(i,FND_API.G_TRUE) ;
4990: Debug('in exc_error, l_msg_data[' || l_msg_data||']',
4991: l_mod_name,
4992: l_statement_level);
4993: END LOOP ;
4994: END IF ;
4995: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4996: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
4997: ROLLBACK TO UPDATE_PRODUCT_TXN_PVT;
4998: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4999: p_data => x_msg_data);
5000: Debug('in unexp_Error, x_msg_data[' || x_msg_data||']',
5001: l_mod_name,
5002: l_statement_level);
5001: l_mod_name,
5002: l_statement_level);
5003: IF x_msg_count > 1 THEN
5004: FOR i IN 1..x_msg_count LOOP
5005: l_msg_data := apps.FND_MSG_PUB.Get(i,apps.FND_API.G_FALSE) ;
5006: Debug('in exc_error, l_msg_data[' || l_msg_data||']',
5007: l_mod_name,
5008: l_statement_level);
5009: END LOOP ;
5010: END IF ;
5011: WHEN OTHERS THEN
5012: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5013: ROLLBACK TO UPDATE_PRODUCT_TXN_PVT;
5014: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
5015: THEN
5016: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
5017: END IF;
5018: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5012: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5013: ROLLBACK TO UPDATE_PRODUCT_TXN_PVT;
5014: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
5015: THEN
5016: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
5017: END IF;
5018: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5019: p_data => x_msg_data);
5020: Debug('in others, x_msg_data[' || x_msg_data||']',
5014: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
5015: THEN
5016: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
5017: END IF;
5018: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5019: p_data => x_msg_data);
5020: Debug('in others, x_msg_data[' || x_msg_data||']',
5021: l_mod_name,
5022: l_statement_level);
5021: l_mod_name,
5022: l_statement_level);
5023: IF x_msg_count > 1 THEN
5024: FOR i IN 1..x_msg_count LOOP
5025: l_msg_data := apps.FND_MSG_PUB.Get(i,apps.FND_API.G_FALSE) ;
5026: Debug('in exc_error, l_msg_data[' || l_msg_data||']',
5027: l_mod_name,
5028: l_statement_level);
5029: END LOOP ;
5070:
5071: -- Initialize message list if p_init_msg_list is set to TRUE.
5072: IF Fnd_Api.to_Boolean(p_init_msg_list)
5073: THEN
5074: Fnd_Msg_Pub.initialize;
5075: END IF;
5076:
5077: -- Initialize API return status to success
5078: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
5122: WHEN NO_DATA_FOUND THEN
5123: l_delete_allow := 'N';
5124: Fnd_Message.SET_NAME('CSD', 'CSD_API_DELETE_NOT_ALLOWED');
5125: --FND_MESSAGE.SET_TOKEN('PRODUCT_TXN_ID',p_product_txn_id);
5126: Fnd_Msg_Pub.ADD;
5127: IF (g_debug > 0)
5128: THEN
5129: Csd_Gen_Utility_Pvt.ADD('Product txn is interfaced,so it cannot be deleted');
5130: END IF;
5184: COMMIT WORK;
5185: END IF;
5186:
5187: -- Standard call to get message count and IF count is get message info.
5188: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5189: p_data => x_msg_data);
5190: EXCEPTION
5191: WHEN Fnd_Api.G_EXC_ERROR THEN
5192: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5190: EXCEPTION
5191: WHEN Fnd_Api.G_EXC_ERROR THEN
5192: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5193: ROLLBACK TO delete_product_txn;
5194: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5195: p_data => x_msg_data);
5196: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
5197: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5198: ROLLBACK TO delete_product_txn;
5195: p_data => x_msg_data);
5196: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
5197: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5198: ROLLBACK TO delete_product_txn;
5199: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5200: p_data => x_msg_data);
5201: WHEN OTHERS THEN
5202: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5203: ROLLBACK TO delete_product_txn;
5200: p_data => x_msg_data);
5201: WHEN OTHERS THEN
5202: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5203: ROLLBACK TO delete_product_txn;
5204: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
5205: THEN
5206: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
5207: END IF;
5208: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5202: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5203: ROLLBACK TO delete_product_txn;
5204: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
5205: THEN
5206: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
5207: END IF;
5208: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5209: p_data => x_msg_data);
5210: END delete_product_txn;
5204: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
5205: THEN
5206: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
5207: END IF;
5208: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5209: p_data => x_msg_data);
5210: END delete_product_txn;
5211:
5212: /*--------------------------------------------------*/
5265:
5266: -- Initialize message list if p_init_msg_list is set to TRUE.
5267: IF Fnd_Api.to_Boolean(p_init_msg_list)
5268: THEN
5269: Fnd_Msg_Pub.initialize;
5270: END IF;
5271:
5272: -- Initialize API return status to success
5273: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
5353: END IF;
5354: -- Log the message after processing
5355: -- each prod txn
5356: FOR i in 1..x_msg_Count LOOP
5357: FND_MSG_PUB.Get
5358: (p_msg_index => i,
5359: p_encoded => 'F',
5360: p_data => x_msg_data,
5361: p_msg_index_out => x_msg_index_out );
5414: END IF;
5415: -- Log the message after processing
5416: -- each prod txn
5417: FOR i in 1..x_msg_Count LOOP
5418: FND_MSG_PUB.Get
5419: (p_msg_index => i,
5420: p_encoded => 'F',
5421: p_data => x_msg_data,
5422: p_msg_index_out => x_msg_index_out );
5432: IF l_msg_text IS NOT NULL
5433: THEN
5434: Fnd_Message.SET_NAME('CSD', 'CSD_API_OM_ERR_MSG');
5435: Fnd_Message.SET_TOKEN('MSG_DATA', l_msg_text);
5436: Fnd_Msg_Pub.ADD;
5437: END IF;
5438:
5439: -- Standard check of p_commit.
5440: IF Fnd_Api.To_Boolean(p_commit)
5442: COMMIT WORK;
5443: END IF;
5444:
5445: -- Standard call to get message count and IF count is get message info.
5446: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5447: p_data => x_msg_data);
5448:
5449: EXCEPTION
5450: WHEN Fnd_Api.G_EXC_ERROR THEN
5449: EXCEPTION
5450: WHEN Fnd_Api.G_EXC_ERROR THEN
5451: ROLLBACK TO create_default_prod_txn;
5452: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5453: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5454: p_data => x_msg_data);
5455: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
5456: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5457: ROLLBACK TO create_default_prod_txn;
5454: p_data => x_msg_data);
5455: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
5456: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5457: ROLLBACK TO create_default_prod_txn;
5458: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5459: p_data => x_msg_data);
5460: WHEN OTHERS THEN
5461: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5462: ROLLBACK TO create_default_prod_txn;
5459: p_data => x_msg_data);
5460: WHEN OTHERS THEN
5461: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5462: ROLLBACK TO create_default_prod_txn;
5463: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
5464: THEN
5465: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
5466: END IF;
5467: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5461: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5462: ROLLBACK TO create_default_prod_txn;
5463: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
5464: THEN
5465: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
5466: END IF;
5467: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5468: p_data => x_msg_data);
5469: END create_default_prod_txn;
5463: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
5464: THEN
5465: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
5466: END IF;
5467: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5468: p_data => x_msg_data);
5469: END create_default_prod_txn;
5470:
5471: --------------------- travi changes---------------
5617: END IF;
5618: -- Initialize message list if p_init_msg_list is set to TRUE.
5619: IF Fnd_Api.to_Boolean(p_init_msg_list)
5620: THEN
5621: Fnd_Msg_Pub.initialize;
5622: END IF;
5623: -- Initialize API return status to success
5624: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
5625: -- ---------------
5707: THEN
5708: COMMIT WORK;
5709: END IF;
5710: -- Standard call to get message count and IF count is get message info.
5711: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5712: p_data => x_msg_data);
5713: EXCEPTION
5714: WHEN Fnd_Api.G_EXC_ERROR THEN
5715: ROLLBACK TO create_task;
5713: EXCEPTION
5714: WHEN Fnd_Api.G_EXC_ERROR THEN
5715: ROLLBACK TO create_task;
5716: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5717: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5718: p_data => x_msg_data);
5719: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
5720: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5721: ROLLBACK TO create_task;
5718: p_data => x_msg_data);
5719: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
5720: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5721: ROLLBACK TO create_task;
5722: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5723: p_data => x_msg_data);
5724: WHEN OTHERS THEN
5725: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5726: ROLLBACK TO create_task;
5723: p_data => x_msg_data);
5724: WHEN OTHERS THEN
5725: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5726: ROLLBACK TO create_task;
5727: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
5728: THEN
5729: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
5730: END IF;
5731: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5725: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5726: ROLLBACK TO create_task;
5727: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
5728: THEN
5729: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
5730: END IF;
5731: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5732: p_data => x_msg_data);
5733: END create_task;
5727: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
5728: THEN
5729: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
5730: END IF;
5731: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5732: p_data => x_msg_data);
5733: END create_task;
5734:
5735: /*-----------------------------------------------------------------------------------------------------------*/
5786: END IF;
5787: -- Initialize message list if p_init_msg_list is set to TRUE.
5788: IF Fnd_Api.to_Boolean(p_init_msg_list)
5789: THEN
5790: Fnd_Msg_Pub.initialize;
5791: END IF;
5792: -- Initialize API return status to success
5793: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
5794: -- ---------------
5877: THEN
5878: COMMIT WORK;
5879: END IF;
5880: -- Standard call to get message count and IF count is get message info.
5881: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5882: p_data => x_msg_data);
5883: EXCEPTION
5884: WHEN Fnd_Api.G_EXC_ERROR THEN
5885: ROLLBACK TO update_task;
5883: EXCEPTION
5884: WHEN Fnd_Api.G_EXC_ERROR THEN
5885: ROLLBACK TO update_task;
5886: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5887: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5888: p_data => x_msg_data);
5889: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
5890: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5891: ROLLBACK TO update_task;
5888: p_data => x_msg_data);
5889: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
5890: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5891: ROLLBACK TO update_task;
5892: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5893: p_data => x_msg_data);
5894: WHEN OTHERS THEN
5895: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5896: ROLLBACK TO update_task;
5893: p_data => x_msg_data);
5894: WHEN OTHERS THEN
5895: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5896: ROLLBACK TO update_task;
5897: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
5898: THEN
5899: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
5900: END IF;
5901: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5895: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5896: ROLLBACK TO update_task;
5897: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
5898: THEN
5899: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
5900: END IF;
5901: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5902: p_data => x_msg_data);
5903: END update_task;
5897: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
5898: THEN
5899: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
5900: END IF;
5901: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5902: p_data => x_msg_data);
5903: END update_task;
5904: FUNCTION GET_ADDRESS_REC_TYPE RETURN Csd_Process_Pvt.ADDRESS_REC_TYPE IS
5905: TMP_ADDRESS_REC_TYPE Csd_Process_Pvt.ADDRESS_REC_TYPE;
6152: END IF;
6153: -- Initialize message list if p_init_msg_list is set to TRUE.
6154: IF Fnd_Api.to_Boolean(p_init_msg_list)
6155: THEN
6156: Fnd_Msg_Pub.initialize;
6157: END IF;
6158: -- Initialize API return status to success
6159: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
6160: -- ---------------
6255: COMMIT WORK;
6256: END IF;
6257:
6258: -- Standard call to get message count and IF count is get message info.
6259: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
6260: p_data => x_msg_data);
6261: END IF;
6262: EXCEPTION
6263: WHEN Fnd_Api.G_EXC_ERROR THEN
6262: EXCEPTION
6263: WHEN Fnd_Api.G_EXC_ERROR THEN
6264: ROLLBACK TO Create_repair_task_hist;
6265: x_return_status := Fnd_Api.G_RET_STS_ERROR;
6266: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
6267: p_data => x_msg_data);
6268: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
6269: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6270: ROLLBACK TO Create_repair_task_hist;
6267: p_data => x_msg_data);
6268: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
6269: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6270: ROLLBACK TO Create_repair_task_hist;
6271: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
6272: p_data => x_msg_data);
6273: WHEN OTHERS THEN
6274: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6275: ROLLBACK TO Create_repair_task_hist;
6272: p_data => x_msg_data);
6273: WHEN OTHERS THEN
6274: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6275: ROLLBACK TO Create_repair_task_hist;
6276: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
6277: THEN
6278: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
6279: END IF;
6280: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
6274: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6275: ROLLBACK TO Create_repair_task_hist;
6276: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
6277: THEN
6278: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
6279: END IF;
6280: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
6281: p_data => x_msg_data);
6282: END Create_repair_task_hist;
6276: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
6277: THEN
6278: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
6279: END IF;
6280: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
6281: p_data => x_msg_data);
6282: END Create_repair_task_hist;
6283:
6284: /*-----------------------------------------------------------------------------------------------------------*/
6470: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6471: END IF;
6472: -- Initialize message list if p_init_msg_list is set to TRUE.
6473: IF FND_API.to_Boolean( p_init_msg_list ) THEN
6474: FND_MSG_PUB.initialize;
6475: END IF;
6476: -- Initialize API return status to success
6477: x_return_status := FND_API.G_RET_STS_SUCCESS;
6478: -- ---------------
6571: IF FND_API.To_Boolean( p_commit ) THEN
6572: COMMIT WORK;
6573: END IF;
6574: -- Standard call to get message count and IF count is get message info.
6575: FND_MSG_PUB.Count_And_Get
6576: (p_count => x_msg_count,
6577: p_data => x_msg_data );
6578: END IF;
6579: -- ---------------------------------------------------------
6580: EXCEPTION
6581: WHEN FND_API.G_EXC_ERROR THEN
6582: ROLLBACK TO Update_repair_task_hist;
6583: x_return_status := FND_API.G_RET_STS_ERROR ;
6584: FND_MSG_PUB.Count_And_Get
6585: (p_count => x_msg_count,
6586: p_data => x_msg_data
6587: );
6588: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6587: );
6588: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6589: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6590: ROLLBACK TO Update_repair_task_hist;
6591: FND_MSG_PUB.Count_And_Get
6592: ( p_count => x_msg_count,
6593: p_data => x_msg_data
6594: );
6595: WHEN OTHERS THEN
6594: );
6595: WHEN OTHERS THEN
6596: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6597: ROLLBACK TO Update_repair_task_hist;
6598: IF FND_MSG_PUB.Check_Msg_Level
6599: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6600: THEN
6601: FND_MSG_PUB.Add_Exc_Msg
6602: (G_PKG_NAME ,
6595: WHEN OTHERS THEN
6596: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6597: ROLLBACK TO Update_repair_task_hist;
6598: IF FND_MSG_PUB.Check_Msg_Level
6599: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6600: THEN
6601: FND_MSG_PUB.Add_Exc_Msg
6602: (G_PKG_NAME ,
6603: l_api_name );
6597: ROLLBACK TO Update_repair_task_hist;
6598: IF FND_MSG_PUB.Check_Msg_Level
6599: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6600: THEN
6601: FND_MSG_PUB.Add_Exc_Msg
6602: (G_PKG_NAME ,
6603: l_api_name );
6604: END IF;
6605: FND_MSG_PUB.Count_And_Get
6601: FND_MSG_PUB.Add_Exc_Msg
6602: (G_PKG_NAME ,
6603: l_api_name );
6604: END IF;
6605: FND_MSG_PUB.Count_And_Get
6606: (p_count => x_msg_count,
6607: p_data => x_msg_data );
6608: END Update_repair_task_hist;
6609: */
6757: END IF;
6758: -- Initialize message list if p_init_msg_list is set to TRUE.
6759: IF Fnd_Api.to_Boolean(p_init_msg_list)
6760: THEN
6761: Fnd_Msg_Pub.initialize;
6762: END IF;
6763: -- Initialize API return status to success
6764: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
6765: -- ---------------
6860: COMMIT WORK;
6861: END IF;
6862:
6863: -- Standard call to get message count and IF count is get message info.
6864: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
6865: p_data => x_msg_data);
6866: END IF;
6867: EXCEPTION
6868: WHEN Fnd_Api.G_EXC_ERROR THEN
6867: EXCEPTION
6868: WHEN Fnd_Api.G_EXC_ERROR THEN
6869: ROLLBACK TO Create_repair_task_hist;
6870: x_return_status := Fnd_Api.G_RET_STS_ERROR;
6871: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
6872: p_data => x_msg_data);
6873: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
6874: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6875: ROLLBACK TO Create_repair_task_hist;
6872: p_data => x_msg_data);
6873: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
6874: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6875: ROLLBACK TO Create_repair_task_hist;
6876: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
6877: p_data => x_msg_data);
6878: WHEN OTHERS THEN
6879: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6880: ROLLBACK TO Create_repair_task_hist;
6877: p_data => x_msg_data);
6878: WHEN OTHERS THEN
6879: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6880: ROLLBACK TO Create_repair_task_hist;
6881: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
6882: THEN
6883: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
6884: END IF;
6885: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
6879: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6880: ROLLBACK TO Create_repair_task_hist;
6881: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
6882: THEN
6883: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
6884: END IF;
6885: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
6886: p_data => x_msg_data);
6887: END Create_repair_task_hist;
6881: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
6882: THEN
6883: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
6884: END IF;
6885: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
6886: p_data => x_msg_data);
6887: END Create_repair_task_hist;
6888:
6889: /*-----------------------------------------------------------------------------------------------------------*/
6991: END IF;
6992: -- Initialize message list if p_init_msg_list is set to TRUE.
6993: IF Fnd_Api.to_Boolean(p_init_msg_list)
6994: THEN
6995: Fnd_Msg_Pub.initialize;
6996: END IF;
6997: -- Initialize API return status to success
6998: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
6999: -- ---------------
7279: THEN
7280: COMMIT WORK;
7281: END IF;
7282: -- Standard call to get message count and IF count is get message info.
7283: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
7284: p_data => x_msg_data);
7285: --END IF;
7286: -- ---------------------------------------------------------
7287: EXCEPTION
7287: EXCEPTION
7288: WHEN Fnd_Api.G_EXC_ERROR THEN
7289: ROLLBACK TO Update_repair_task_hist;
7290: x_return_status := Fnd_Api.G_RET_STS_ERROR;
7291: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
7292: p_data => x_msg_data);
7293: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
7294: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
7295: ROLLBACK TO Update_repair_task_hist;
7292: p_data => x_msg_data);
7293: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
7294: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
7295: ROLLBACK TO Update_repair_task_hist;
7296: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
7297: p_data => x_msg_data);
7298: WHEN OTHERS THEN
7299: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
7300: ROLLBACK TO Update_repair_task_hist;
7297: p_data => x_msg_data);
7298: WHEN OTHERS THEN
7299: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
7300: ROLLBACK TO Update_repair_task_hist;
7301: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
7302: THEN
7303: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
7304: END IF;
7305: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
7299: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
7300: ROLLBACK TO Update_repair_task_hist;
7301: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
7302: THEN
7303: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
7304: END IF;
7305: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
7306: p_data => x_msg_data);
7307: END Update_repair_task_hist;
7301: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
7302: THEN
7303: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
7304: END IF;
7305: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
7306: p_data => x_msg_data);
7307: END Update_repair_task_hist;
7308:
7309: /*----------------------------------------------------------------*/
7380: -- Initialize message list if p_init_msg_list is set to TRUE.
7381: ------------------------------------------------------------
7382: IF Fnd_Api.to_Boolean(p_init_msg_list)
7383: THEN
7384: Fnd_Msg_Pub.initialize;
7385: END IF;
7386:
7387: ---------------------------------------------
7388: -- Initialize API return status to success
7482: Fnd_Message.SET_NAME('CSD',
7483: 'CSD_API_RO_STAT_UPD_FAIL');
7484: Fnd_Message.SET_TOKEN('REPAIR_LINE_ID',
7485: ro.repair_line_id);
7486: Fnd_Msg_Pub.ADD;
7487: RAISE Fnd_Api.G_EXC_ERROR;
7488: END IF;
7489:
7490: END LOOP;
7524: Fnd_Message.SET_NAME('CSD',
7525: 'CSD_API_GRP_STAT_UPD_FAIL');
7526: Fnd_Message.SET_TOKEN('REPAIR_GROUP_ID',
7527: grp.repair_group_id);
7528: Fnd_Msg_Pub.ADD;
7529: RAISE Fnd_Api.G_EXC_ERROR;
7530: END IF;
7531:
7532: END IF;
7576: Fnd_Message.SET_NAME('CSD',
7577: 'CSD_API_RO_STAT_UPD_FAIL');
7578: Fnd_Message.SET_TOKEN('REPAIR_LINE_ID',
7579: ro.repair_line_id);
7580: Fnd_Msg_Pub.ADD;
7581: RAISE Fnd_Api.G_EXC_ERROR;
7582: END IF;
7583:
7584: END LOOP;
7619: Fnd_Message.SET_NAME('CSD',
7620: 'CSD_API_GRP_STAT_UPD_FAIL');
7621: Fnd_Message.SET_TOKEN('REPAIR_GROUP_ID',
7622: grp.repair_group_id);
7623: Fnd_Msg_Pub.ADD;
7624: RAISE Fnd_Api.G_EXC_ERROR;
7625: END IF;
7626:
7627: END IF; -- grp_txn_status
7733: THEN
7734: Fnd_Message.SET_NAME('CSD',
7735: 'CSD_API_SR_STAT_UPD_FAIL');
7736: Fnd_Message.SET_TOKEN('INCIDENT_ID', p_incident_id);
7737: Fnd_Msg_Pub.ADD;
7738: RAISE Fnd_Api.G_EXC_ERROR;
7739: END IF;
7740:
7741: END IF;
7792: IF (l_return_status <> 'S')
7793: THEN
7794: Fnd_Message.SET_NAME('CSD', 'CSD_API_RO_STAT_UPD_FAIL');
7795: Fnd_Message.SET_TOKEN('REPAIR_LINE_ID', p_repair_line_id);
7796: Fnd_Msg_Pub.ADD;
7797: RAISE Fnd_Api.G_EXC_ERROR;
7798: END IF;
7799:
7800: BEGIN
7857: Fnd_Message.SET_NAME('CSD',
7858: 'CSD_API_GRP_STAT_UPD_FAIL');
7859: Fnd_Message.SET_TOKEN('REPAIR_GROUP_ID',
7860: l_repair_group_id);
7861: Fnd_Msg_Pub.ADD;
7862: RAISE Fnd_Api.G_EXC_ERROR;
7863: END IF;
7864:
7865: END IF;
7969: THEN
7970: Fnd_Message.SET_NAME('CSD',
7971: 'CSD_API_SR_STAT_UPD_FAIL');
7972: Fnd_Message.SET_TOKEN('INCIDENT_ID', l_incident_id);
7973: Fnd_Msg_Pub.ADD;
7974: --Bug fix for 3555256 Begin
7975: --RAISE FND_API.G_EXC_ERROR;
7976: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
7977: p_data => x_msg_data);
7972: Fnd_Message.SET_TOKEN('INCIDENT_ID', l_incident_id);
7973: Fnd_Msg_Pub.ADD;
7974: --Bug fix for 3555256 Begin
7975: --RAISE FND_API.G_EXC_ERROR;
7976: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
7977: p_data => x_msg_data);
7978: --Bug fix for 3555256 End
7979:
7980: END IF;
7986: EXCEPTION
7987: WHEN Fnd_Api.G_EXC_ERROR THEN
7988: ROLLBACK TO Close_Status;
7989: x_return_status := Fnd_Api.G_RET_STS_ERROR;
7990: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
7991: p_data => x_msg_data);
7992: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
7993: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
7994: ROLLBACK TO status_close;
7991: p_data => x_msg_data);
7992: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
7993: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
7994: ROLLBACK TO status_close;
7995: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
7996: p_data => x_msg_data);
7997: WHEN OTHERS THEN
7998: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
7999: ROLLBACK TO status_close;
7996: p_data => x_msg_data);
7997: WHEN OTHERS THEN
7998: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
7999: ROLLBACK TO status_close;
8000: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
8001: THEN
8002: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
8003: END IF;
8004: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
7998: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
7999: ROLLBACK TO status_close;
8000: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
8001: THEN
8002: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
8003: END IF;
8004: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
8005: p_data => x_msg_data);
8006: END Close_Status;
8000: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
8001: THEN
8002: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
8003: END IF;
8004: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
8005: p_data => x_msg_data);
8006: END Close_Status;
8007:
8008: /*---------------------------------------------------------------*/
8119:
8120: EXCEPTION
8121: WHEN OTHERS THEN
8122: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
8123: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
8124: THEN
8125: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
8126: END IF;
8127: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
8121: WHEN OTHERS THEN
8122: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
8123: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
8124: THEN
8125: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
8126: END IF;
8127: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
8128: p_data => x_msg_data);
8129:
8123: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
8124: THEN
8125: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
8126: END IF;
8127: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
8128: p_data => x_msg_data);
8129:
8130: END Check_Service_Request;
8131:
8332:
8333: -- initialize message list if p_init_msg_list is set to true.
8334: IF Fnd_Api.to_boolean(p_init_msg_list)
8335: THEN
8336: Fnd_Msg_Pub.initialize;
8337: END IF;
8338:
8339: -- initialize api return status to success
8340: x_return_status := Fnd_Api.g_ret_sts_success;
8496: '.check_in_parameters',
8497: 'Product txn status is invalid : ' ||
8498: x_product_txn_rec.prod_txn_status);
8499: END IF;
8500: Fnd_Msg_Pub.ADD;
8501: RAISE Fnd_Api.g_exc_error;
8502: END;
8503: END IF;
8504:
8578: WHEN NO_DATA_FOUND THEN
8579: Fnd_Message.set_name('CSD', 'CSD_API_INV_REP_LINE_ID');
8580: Fnd_Message.set_token('REPAIR_LINE_ID',
8581: l_repair_line_id);
8582: Fnd_Msg_Pub.ADD;
8583: IF l_statement_level >= l_debug_level
8584: THEN
8585: Fnd_Log.string(l_statement_level,
8586: l_module_name ||
8598: CLOSE sr_rec;
8599: ELSE
8600: Fnd_Message.set_name('CSD', 'CSD_API_INV_SR_ID');
8601: Fnd_Message.set_token('INCIDENT_ID', l_incident_id);
8602: Fnd_Msg_Pub.ADD;
8603: IF (g_debug > 0)
8604: THEN
8605: Csd_Gen_Utility_Pvt.ADD('incident id missing ');
8606: END IF;
8673: Fnd_Message.set_name('CSD',
8674: 'CSD_API_INV_PICKING_RULE_ID');
8675: Fnd_Message.set_token('PICKING_RULE_ID',
8676: l_picking_rule_id);
8677: Fnd_Msg_Pub.ADD;
8678: IF l_exception_level >= l_debug_level
8679: THEN
8680: Fnd_Log.string(l_exception_level,
8681: l_module_name,
8837: where repair_line_id = x_product_txn_rec.repair_line_id;
8838: if sql%notfound then
8839: fnd_message.set_name('CSD','CSD_ERR_REPAIRS_UPDATE');
8840: fnd_message.set_token('REPAIR_LINE_ID',x_product_txn_rec.repair_line_id);
8841: fnd_msg_pub.add;
8842: raise release_order_excep;
8843: end if;
8844: ********************************/
8845: ELSE
8898: Fnd_Message.set_name('CSD',
8899: 'CSD_ORDER_LINE_NOT_SHIPABLE');
8900: Fnd_Message.set_token('ORDER_LINE_ID',
8901: l_order_rec.order_line_id);
8902: Fnd_Msg_Pub.ADD;
8903: IF l_statement_level >= l_debug_level
8904: THEN
8905: Fnd_Log.string(l_statement_level,
8906: l_module_name,
8913: Fnd_Message.set_name('CSD',
8914: 'CSD_TOO_MANY_ROWS_SHIPABLE');
8915: Fnd_Message.set_token('ORDER_LINE_ID',
8916: l_order_rec.order_line_id);
8917: Fnd_Msg_Pub.ADD;
8918: IF l_statement_level >= l_debug_level
8919: THEN
8920: Fnd_Log.string(l_statement_level,
8921: l_module_name,
9027: Where repair_line_id = x_product_txn_rec.repair_line_id;
9028: If sql%notfound then
9029: fnd_message.set_name('CSD','CSD_ERR_REPAIRS_UPDATE');
9030: fnd_message.set_token('REPAIR_LINE_ID',x_product_txn_rec.repair_line_id);
9031: fnd_msg_pub.add;
9032: Raise release_order_excep;
9033: End if;
9034: *****************/
9035: ELSE
9066: -- If there is any error then rollback
9067: ROLLBACK TO release_sales_order;
9068: -- Standard procedure to get error message count and error message is also returned
9069: -- if error message count is 1
9070: Fnd_Msg_Pub.count_and_get(p_count => x_msg_count,
9071: p_data => x_msg_data);
9072: WHEN ship_order_excep THEN
9073: -- Set return status to unexpected error
9074: x_return_status := Fnd_Api.g_ret_sts_success;
9075: -- If there is any error then rollback
9076: ROLLBACK TO ship_sales_order;
9077: -- Standard procedure to get error message count and error message is also returned
9078: -- if error message count is 1
9079: Fnd_Msg_Pub.count_and_get(p_count => x_msg_count,
9080: p_data => x_msg_data);
9081: WHEN Fnd_Api.g_exc_error THEN
9082: -- Set return status to unexpected error
9083: x_return_status := Fnd_Api.g_ret_sts_error;
9084: -- If there is any error then rollback
9085: ROLLBACK TO update_iro_product_txn;
9086: -- Standard procedure to get error message count and error message is also returned
9087: -- if error message count is 1
9088: Fnd_Msg_Pub.count_and_get(p_count => x_msg_count,
9089: p_data => x_msg_data);
9090: WHEN Fnd_Api.g_exc_unexpected_error THEN
9091: -- Set return status to unexpected error
9092: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
9093: -- If there is any error then rollback
9094: ROLLBACK TO update_iro_product_txn;
9095: -- Standard procedure to get error message count and error message is also returned
9096: -- if error message count is 1
9097: Fnd_Msg_Pub.count_and_get(p_count => x_msg_count,
9098: p_data => x_msg_data);
9099: WHEN OTHERS THEN
9100: -- Set return status to unexpected error
9101: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
9100: -- Set return status to unexpected error
9101: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
9102: -- If there is any error then rollback
9103: ROLLBACK TO update_iro_product_txn;
9104: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_unexp_error)
9105: THEN
9106: -- Standard way to add sql error message to stack
9107: Fnd_Msg_Pub.add_exc_msg(g_pkg_name, l_api_name);
9108: END IF;
9103: ROLLBACK TO update_iro_product_txn;
9104: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_unexp_error)
9105: THEN
9106: -- Standard way to add sql error message to stack
9107: Fnd_Msg_Pub.add_exc_msg(g_pkg_name, l_api_name);
9108: END IF;
9109: -- Standard procedure to get error message count and error message is also returned
9110: -- if error message count is 1
9111: Fnd_Msg_Pub.count_and_get(p_count => x_msg_count,
9107: Fnd_Msg_Pub.add_exc_msg(g_pkg_name, l_api_name);
9108: END IF;
9109: -- Standard procedure to get error message count and error message is also returned
9110: -- if error message count is 1
9111: Fnd_Msg_Pub.count_and_get(p_count => x_msg_count,
9112: p_data => x_msg_data);
9113: END update_iro_product_txn;
9114:
9115:
9174:
9175: -- Initialize message list if p_init_msg_list is set to TRUE.
9176: IF Fnd_Api.to_Boolean(p_init_msg_list)
9177: THEN
9178: Fnd_Msg_Pub.initialize;
9179: END IF;
9180:
9181: -- Initialize API return status to success
9182: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
9234: Fnd_Message.SET_NAME('CSD',
9235: 'CSD_RO_NOT_OPEN_NO_PRODTXN_LNS');
9236: Fnd_Message.SET_TOKEN('RO_NUMBER', l_RO_Number);
9237: Fnd_Message.SET_TOKEN('RO_STATUS', l_RO_Status_Meaning);
9238: Fnd_Msg_Pub.ADD;
9239: RAISE Fnd_Api.G_EXC_ERROR;
9240: END IF;
9241: -- Check if repair Type Ref is Standard
9242: IF l_RO_Repair_Type_Ref = C_Repair_TYpe_Ref_Standard
9245: -- CSD_STD_REP_TYPE_NO_PRODUCTXN_LINES
9246: Fnd_Message.SET_NAME('CSD',
9247: 'CSD_STD_REPTYPE_NO_PRODTXN_LNS');
9248: Fnd_Message.SET_TOKEN('RO_NUMBER', l_RO_Number);
9249: Fnd_Msg_Pub.ADD;
9250: RAISE Fnd_Api.G_EXC_ERROR;
9251: END IF;
9252: -- Check Serial control code if quantity is greater then 1
9253: IF l_RO_Quantity > 1
9265: -- CSD_RO_QTY_MORE_FOR_SERIAL_ITEM
9266: -- Raise G_Exc_Error,
9267: Fnd_Message.SET_NAME('CSD',
9268: 'CSD_RO_QTY_MORE_FOR_SRLCT_ITEM');
9269: Fnd_Msg_Pub.ADD;
9270: RAISE Fnd_Api.G_EXC_ERROR;
9271: END IF;
9272: EXCEPTION
9273: WHEN NO_DATA_FOUND THEN
9290: 'CSD_NO_ITEM_FOR_SRV_VALDN_ORG');
9291: Fnd_Message.Set_Token('ITEM', l_Item_Name);
9292: Fnd_Message.Set_Token('ORG_NAME',
9293: l_Service_Valdn_Org_Name);
9294: Fnd_Msg_Pub.ADD;
9295: RAISE Fnd_Api.G_EXC_ERROR;
9296:
9297: END;
9298: END IF;
9310: -- RAise G_Exc_Error
9311: Fnd_Message.SET_NAME('CSD',
9312: 'CSD_RO_HAS_PRODUCT_TXN_LINES');
9313: Fnd_Message.SET_TOKEN('RO_NUMBER', l_RO_Number);
9314: Fnd_Msg_Pub.ADD;
9315: RAISE Fnd_Api.G_EXC_ERROR;
9316: END IF;
9317: END;
9318: EXCEPTION
9320: -- Message Code CSD_REPAIR_LINE_ID_INVALID
9321: -- Display message; Invalid repair line id is passed
9322: Fnd_Message.SET_NAME('CSD', 'CSD_API_INV_REP_LINE_ID');
9323: Fnd_Message.SET_TOKEN('REPAIR_LINE_ID', P_Repair_Line_ID);
9324: Fnd_Msg_Pub.ADD;
9325: RAISE Fnd_Api.G_EXC_ERROR;
9326: END;
9327: -- Now call Default Product Txn lines API
9328:
9359:
9360: EXCEPTION
9361: WHEN Fnd_Api.G_EXC_ERROR THEN
9362: x_return_status := Fnd_Api.G_RET_STS_ERROR;
9363: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
9364: p_data => x_msg_data);
9365: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
9366: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
9367: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
9363: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
9364: p_data => x_msg_data);
9365: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
9366: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
9367: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
9368: p_data => x_msg_data);
9369: WHEN OTHERS THEN
9370: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
9371: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
9367: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
9368: p_data => x_msg_data);
9369: WHEN OTHERS THEN
9370: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
9371: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
9372: THEN
9373: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
9374: END IF;
9375: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
9369: WHEN OTHERS THEN
9370: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
9371: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
9372: THEN
9373: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
9374: END IF;
9375: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
9376: p_data => x_msg_data);
9377: END Create_Default_Prod_Txn_Wrapr;
9371: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
9372: THEN
9373: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
9374: END IF;
9375: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
9376: p_data => x_msg_data);
9377: END Create_Default_Prod_Txn_Wrapr;
9378:
9379: /*-----------------------------------------------------------------------------------------------------------*/
9477:
9478: -- Initialize message list if p_init_msg_list is set to TRUE.
9479: IF Fnd_Api.to_Boolean(p_init_msg_list)
9480: THEN
9481: Fnd_Msg_Pub.initialize;
9482: END IF;
9483: -- Initialize API return status to success
9484: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
9485: -- ---------------
9561: THEN
9562: COMMIT WORK;
9563: END IF;
9564: -- Standard call to get message count and IF count is get message info.
9565: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
9566: p_data => x_msg_data);
9567: EXCEPTION
9568: WHEN Fnd_Api.G_EXC_ERROR THEN
9569: ROLLBACK TO create_task;
9567: EXCEPTION
9568: WHEN Fnd_Api.G_EXC_ERROR THEN
9569: ROLLBACK TO create_task;
9570: x_return_status := Fnd_Api.G_RET_STS_ERROR;
9571: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
9572: p_data => x_msg_data);
9573: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
9574: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
9575: ROLLBACK TO create_task;
9572: p_data => x_msg_data);
9573: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
9574: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
9575: ROLLBACK TO create_task;
9576: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
9577: p_data => x_msg_data);
9578: WHEN OTHERS THEN
9579: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
9580: ROLLBACK TO create_task;
9577: p_data => x_msg_data);
9578: WHEN OTHERS THEN
9579: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
9580: ROLLBACK TO create_task;
9581: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
9582: THEN
9583: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
9584: END IF;
9585: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
9579: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
9580: ROLLBACK TO create_task;
9581: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
9582: THEN
9583: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
9584: END IF;
9585: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
9586: p_data => x_msg_data);
9587:
9581: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
9582: THEN
9583: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
9584: END IF;
9585: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
9586: p_data => x_msg_data);
9587:
9588: END CREATE_REPAIR_TASK;
9589:
9687:
9688: -- Initialize message list if p_init_msg_list is set to TRUE.
9689: IF Fnd_Api.to_Boolean(p_init_msg_list)
9690: THEN
9691: Fnd_Msg_Pub.initialize;
9692: END IF;
9693: -- Initialize API return status to success
9694: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
9695: -- ---------------
9778: THEN
9779: COMMIT WORK;
9780: END IF;
9781: -- Standard call to get message count and IF count is get message info.
9782: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
9783: p_data => x_msg_data);
9784: EXCEPTION
9785: WHEN Fnd_Api.G_EXC_ERROR THEN
9786: ROLLBACK TO update_repair_task;
9784: EXCEPTION
9785: WHEN Fnd_Api.G_EXC_ERROR THEN
9786: ROLLBACK TO update_repair_task;
9787: x_return_status := Fnd_Api.G_RET_STS_ERROR;
9788: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
9789: p_data => x_msg_data);
9790: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
9791: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
9792: ROLLBACK TO update_repair_task;
9789: p_data => x_msg_data);
9790: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
9791: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
9792: ROLLBACK TO update_repair_task;
9793: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
9794: p_data => x_msg_data);
9795: WHEN OTHERS THEN
9796: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
9797: ROLLBACK TO update_repair_task;
9794: p_data => x_msg_data);
9795: WHEN OTHERS THEN
9796: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
9797: ROLLBACK TO update_repair_task;
9798: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
9799: THEN
9800: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
9801: END IF;
9802: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
9796: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
9797: ROLLBACK TO update_repair_task;
9798: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
9799: THEN
9800: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
9801: END IF;
9802: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
9803: p_data => x_msg_data);
9804:
9798: IF Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
9799: THEN
9800: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
9801: END IF;
9802: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
9803: p_data => x_msg_data);
9804:
9805: END UPDATE_REPAIR_TASK;
9806: