[Home] [Help]
193: OPEN c_mo_type;
194: FETCH c_mo_type
195: INTO l_move_order_type;
196: IF NOT c_mo_type%FOUND THEN
197: x_return_status := fnd_api.g_ret_sts_error;
198: IF is_debug THEN
199: print_debug('Move Order Line not found ' || p_mo_line_id,'INV_PICK_RELEASE_PVT.GET_TOLERANCE');
200: END IF;
201: END IF;
220: FETCH c_detail_info INTO l_detail_info;
221: --l_found_flag := c_detail_info%FOUND;
222:
223: IF NOT c_detail_info%FOUND THEN
224: x_return_status := fnd_api.g_ret_sts_error;
225: IF is_debug THEN
226: print_debug('Delivery Detail not found ' || p_mo_line_id,'INV_PICK_RELEASE_PVT.GET_TOLERANCE');
227: END IF;
228: ELSE
390: , p_revision VARCHAR2 DEFAULT NULL
391: ) IS
392: p_pr_mode BOOLEAN := WSH_PICK_LIST.G_PICK_REL_PARALLEL;
393: BEGIN
394: x_api_status := fnd_api.g_ret_sts_success;
395: -- Bug 2666620:
396: -- If the Patchset Level of Shipping is less than 'I' then call
397: -- Shipping's GET_PICK_SLIP_NUMBER.
398: -- Otherwise calls Inventory's GET_PICK_SLIP_NUMBER
496: , p_mo_line_rec IN inv_move_order_pub.trolin_rec_type
497: , p_mso_line_id IN NUMBER
498: , p_demand_source_type IN VARCHAR2
499: , p_demand_source_name IN VARCHAR2
500: , p_allow_partial_pick IN VARCHAR2 DEFAULT fnd_api.g_true
501: , x_demand_rsvs_ordered OUT NOCOPY inv_reservation_global.mtl_reservation_tbl_type
502: , x_rsv_qty_available OUT NOCOPY NUMBER
503: , x_rsv_qty2_available OUT NOCOPY NUMBER
504: ) IS
668:
669: l_qry_rsv_rec.organization_id := p_mo_line_rec.organization_id;
670: l_qry_rsv_rec.inventory_item_id := p_mo_line_rec.inventory_item_id;
671: l_qry_rsv_rec.demand_source_type_id := p_demand_source_type;
672: l_qry_rsv_rec.demand_source_header_id := nvl(p_mso_line_id,fnd_api.g_miss_num);
673: l_qry_rsv_rec.demand_source_line_id := p_demand_info.oe_line_id;
674: l_qry_rsv_rec.demand_source_name := nvl(p_demand_source_name,fnd_api.g_miss_char);
675: l_qry_rsv_rec.supply_source_type_id := inv_reservation_global.g_source_type_inv;
676: inv_reservation_pub.query_reservation(
670: l_qry_rsv_rec.inventory_item_id := p_mo_line_rec.inventory_item_id;
671: l_qry_rsv_rec.demand_source_type_id := p_demand_source_type;
672: l_qry_rsv_rec.demand_source_header_id := nvl(p_mso_line_id,fnd_api.g_miss_num);
673: l_qry_rsv_rec.demand_source_line_id := p_demand_info.oe_line_id;
674: l_qry_rsv_rec.demand_source_name := nvl(p_demand_source_name,fnd_api.g_miss_char);
675: l_qry_rsv_rec.supply_source_type_id := inv_reservation_global.g_source_type_inv;
676: inv_reservation_pub.query_reservation(
677: p_api_version_number => 1.0
678: , p_init_msg_lst => fnd_api.g_false
674: l_qry_rsv_rec.demand_source_name := nvl(p_demand_source_name,fnd_api.g_miss_char);
675: l_qry_rsv_rec.supply_source_type_id := inv_reservation_global.g_source_type_inv;
676: inv_reservation_pub.query_reservation(
677: p_api_version_number => 1.0
678: , p_init_msg_lst => fnd_api.g_false
679: , x_return_status => l_api_return_status
680: , x_msg_count => x_msg_count
681: , x_msg_data => x_msg_data
682: , p_query_input => l_qry_rsv_rec
686: , x_error_code => l_api_error_code
687: );
688:
689: -- Return an error if the query reservations call failed
690: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
691: IF (is_debug) THEN
692: print_debug('return error from query reservation: '||l_api_return_status,'INV_Pick_Release_PVT.Process_Reservations');
693: END IF;
694: fnd_message.set_name('INV', 'INV_QRY_RSV_FAILED');
692: print_debug('return error from query reservation: '||l_api_return_status,'INV_Pick_Release_PVT.Process_Reservations');
693: END IF;
694: fnd_message.set_name('INV', 'INV_QRY_RSV_FAILED');
695: fnd_msg_pub.ADD;
696: RAISE fnd_api.g_exc_unexpected_error;
697: END IF;
698:
699: IF (is_debug) THEN
700: print_debug('Unstaged l_non_inv_reservations_qty '|| l_non_inv_reservations_qty,'Inv_Pick_Release_PVT.Process_Reservations');
709: If NOT l_return_value Then
710: if is_debug then
711: print_debug('Error setting from sub cache','Inv_Pick_Release_PVT.Process_Reservations');
712: end if;
713: RAISE fnd_api.g_exc_unexpected_error;
714: End If;
715: g_sub_reservable_type := INV_CACHE.fromsub_rec.reservable_type;
716: ELSE
717: g_sub_reservable_type := 1;
806: if is_debug then
807: print_debug('Error setting from sub cache',
808: 'Inv_Pick_Release_PVT.Process_Reservations');
809: end if;
810: RAISE fnd_api.g_exc_unexpected_error;
811: End If;
812:
813: l_primary_uom:= INV_CACHE.item_rec.primary_uom_code;
814: l_secondary_uom:= INV_CACHE.item_rec.secondary_uom_code;
840: fnd_message.set_name('INV', 'INV-CANNOT CONVERT');
841: fnd_message.set_token('UOM', l_primary_uom);
842: fnd_message.set_token('ROUTINE', 'Pick Release process');
843: fnd_msg_pub.ADD;
844: RAISE fnd_api.g_exc_unexpected_error;
845: END IF;
846: ELSE
847: l_quantity_to_detail := l_qty_to_detail_unconv;
848: END IF;
889: IF NOT l_return_value Then
890: IF (is_debug) THEN
891: print_debug('Error setting cache for order line', 'Inv_Pick_Release_PVT.Process_Reservations');
892: END IF;
893: RAISE fnd_api.g_exc_unexpected_error;
894: END IF;
895:
896: l_order_line_qty_unconv := INV_CACHE.oola_rec.ordered_quantity;
897: l_order_line_uom := INV_CACHE.oola_rec.order_quantity_uom;
919: fnd_message.set_name('INV', 'INV-CANNOT CONVERT');
920: fnd_message.set_token('UOM', l_primary_uom);
921: fnd_message.set_token('ROUTINE', 'Pick Release process');
922: fnd_msg_pub.ADD;
923: RAISE fnd_api.g_exc_unexpected_error;
924: END IF;
925: ELSE
926: l_order_line_qty := l_order_line_qty_unconv;
927: END IF;
1006: -- Added following secondary qty related section for Bug 7377744
1007:
1008: inv_quantity_tree_pub.query_quantities(
1009: p_api_version_number => 1.0
1010: , p_init_msg_lst => fnd_api.g_false
1011: , x_return_status => l_api_return_status
1012: , x_msg_count => x_msg_count
1013: , x_msg_data => x_msg_data
1014: , p_organization_id => p_mo_line_rec.organization_id
1045: print_debug('Reservable qty from qtytree '|| l_qty_available_to_reserve, 'Inv_Pick_Release_PVT.Process_Reservations');
1046: print_debug('Reservable qty2 from qtytree '|| l_sec_qty_available_to_reserve, 'Inv_Pick_Release_PVT.Process_Reservations');
1047: END IF;
1048:
1049: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
1050: IF (is_debug) THEN
1051: print_debug('Error from query quantity tree', 'Inv_Pick_Release_PVT.Process_Reservations');
1052: END IF;
1053: fnd_message.set_name('INV', 'INV_QRY_QTY_FAILED');
1051: print_debug('Error from query quantity tree', 'Inv_Pick_Release_PVT.Process_Reservations');
1052: END IF;
1053: fnd_message.set_name('INV', 'INV_QRY_QTY_FAILED');
1054: fnd_msg_pub.ADD;
1055: RAISE fnd_api.g_exc_unexpected_error;
1056: END IF;
1057:
1058: IF (is_debug) THEN
1059: print_debug('l_qty_available_to_reserve = '||l_qty_available_to_reserve||', l_qty_att = '||l_qty_att||', p_demand_source_type = '||p_demand_source_type, 'Inv_Pick_Release_PVT.Process_Reservations');
1117: print_debug('update reservation', 'Inv_Pick_Release_PVT.Process_Reservations');
1118: END IF;
1119: inv_reservation_pub.update_reservation(
1120: p_api_version_number => 1.0
1121: , p_init_msg_lst => fnd_api.g_false
1122: , x_return_status => l_api_return_status
1123: , x_msg_count => x_msg_count
1124: , x_msg_data => x_msg_data
1125: , p_original_rsv_rec => l_qry_rsv_rec
1125: , p_original_rsv_rec => l_qry_rsv_rec
1126: , p_to_rsv_rec => l_update_rsv_rec
1127: , p_original_serial_number => l_dummy_sn
1128: , p_to_serial_number => l_dummy_sn
1129: , p_validation_flag => fnd_api.g_true
1130: );
1131:
1132: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
1133: IF (is_debug) THEN
1128: , p_to_serial_number => l_dummy_sn
1129: , p_validation_flag => fnd_api.g_true
1130: );
1131:
1132: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
1133: IF (is_debug) THEN
1134: print_debug('error in update reservation', 'Inv_Pick_Release_PVT.Process_Reservations');
1135: END IF;
1136: fnd_message.set_name('INV', 'INV_UPD_RSV_FAILED');
1134: print_debug('error in update reservation', 'Inv_Pick_Release_PVT.Process_Reservations');
1135: END IF;
1136: fnd_message.set_name('INV', 'INV_UPD_RSV_FAILED');
1137: fnd_msg_pub.ADD;
1138: RAISE fnd_api.g_exc_unexpected_error;
1139: ELSE
1140: --Requery the reservation record and update it in the local table.
1141: IF (is_debug) THEN
1142: print_debug('query that reservation again',
1144: END IF;
1145: l_qry_rsv_rec_by_id.reservation_id := l_update_rsv_rec.reservation_id;
1146: inv_reservation_pub.query_reservation(
1147: p_api_version_number => 1.0
1148: , p_init_msg_lst => fnd_api.g_true
1149: , x_return_status => l_api_return_status
1150: , x_msg_count => x_msg_count
1151: , x_msg_data => x_msg_data
1152: , p_query_input => l_qry_rsv_rec_by_id
1155: , x_error_code => l_api_error_code
1156: );
1157:
1158: -- Return an error if the query reservations call failed
1159: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
1160: fnd_message.set_name('INV', 'INV_QRY_RSV_FAILED');
1161: fnd_msg_pub.ADD;
1162: RAISE fnd_api.g_exc_unexpected_error;
1163: END IF;
1158: -- Return an error if the query reservations call failed
1159: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
1160: fnd_message.set_name('INV', 'INV_QRY_RSV_FAILED');
1161: fnd_msg_pub.ADD;
1162: RAISE fnd_api.g_exc_unexpected_error;
1163: END IF;
1164:
1165: l_res_tbl_index := l_demand_reservations.FIRST;
1166: l_demand_rsvs_ordered(l_res_ordered_index) := l_demand_reservations(l_res_tbl_index);
1173:
1174: -- Added following secondary qty related section for Bug 7377744
1175: inv_quantity_tree_pub.update_quantities(
1176: p_api_version_number => 1.0
1177: , p_init_msg_lst => fnd_api.g_false
1178: , x_return_status => l_api_return_status
1179: , x_msg_count => x_msg_count
1180: , x_msg_data => x_msg_data
1181: , p_organization_id => p_mo_line_rec.organization_id
1211: , x_sqs => l_sec_qty_sug
1212: , x_satt => l_sec_qty_att
1213: , x_satr => l_sec_qty_available_to_reserve
1214: );
1215: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
1216: IF (is_debug) THEN
1217: print_debug('Error from query quantity tree', 'Inv_Pick_Release_PVT.Process_Reservations');
1218: END IF;
1219: fnd_message.set_name('INV', 'INV_QRY_QTY_FAILED');
1217: print_debug('Error from query quantity tree', 'Inv_Pick_Release_PVT.Process_Reservations');
1218: END IF;
1219: fnd_message.set_name('INV', 'INV_QRY_QTY_FAILED');
1220: fnd_msg_pub.ADD;
1221: RAISE fnd_api.g_exc_unexpected_error;
1222: END IF;
1223:
1224: --find new reservation quantities
1225: l_index := l_demand_rsvs_ordered.LAST;
1258: fnd_message.set_name('INV', 'INV-CANNOT CONVERT');
1259: fnd_message.set_token('UOM', l_secondary_uom);
1260: fnd_message.set_token('ROUTINE', 'Pick Release process');
1261: fnd_msg_pub.ADD;
1262: RAISE fnd_api.g_exc_unexpected_error;
1263: END IF;
1264: ELSE
1265: l_new_rsv_quantity := inv_convert.inv_um_convert(
1266: item_id => p_mo_line_rec.inventory_item_id
1279: fnd_message.set_name('INV', 'INV-CANNOT CONVERT');
1280: fnd_message.set_token('UOM', l_primary_uom);
1281: fnd_message.set_token('ROUTINE', 'Pick Release process');
1282: fnd_msg_pub.ADD;
1283: RAISE fnd_api.g_exc_unexpected_error;
1284: END IF;
1285: END IF;
1286: IF (is_debug) THEN
1287: print_debug('0 New prim rsv qty: ' || l_new_prim_rsv_quantity, 'Inv_Pick_Release_PVT.Process_Reservations');
1300: , x_return_status => l_api_return_status
1301: , x_msg_count => x_msg_count
1302: , x_msg_data => x_msg_data);
1303:
1304: IF l_api_return_status = fnd_api.g_ret_sts_error THEN
1305: IF (is_debug) THEN
1306: print_debug('Error from inv_rsv_synch.for_update', 'Inv_Pick_Release_PVT.Process_Reservations');
1307: END IF;
1308: RAISE fnd_api.g_exc_error;
1304: IF l_api_return_status = fnd_api.g_ret_sts_error THEN
1305: IF (is_debug) THEN
1306: print_debug('Error from inv_rsv_synch.for_update', 'Inv_Pick_Release_PVT.Process_Reservations');
1307: END IF;
1308: RAISE fnd_api.g_exc_error;
1309: END IF;
1310: --
1311: IF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
1312: IF (is_debug) THEN
1307: END IF;
1308: RAISE fnd_api.g_exc_error;
1309: END IF;
1310: --
1311: IF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
1312: IF (is_debug) THEN
1313: print_debug('Unexp. error from inv_rsv_synch.for_update', 'Inv_Pick_Release_PVT.Process_Reservations');
1314: END IF;
1315: RAISE fnd_api.g_exc_unexpected_error;
1311: IF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
1312: IF (is_debug) THEN
1313: print_debug('Unexp. error from inv_rsv_synch.for_update', 'Inv_Pick_Release_PVT.Process_Reservations');
1314: END IF;
1315: RAISE fnd_api.g_exc_unexpected_error;
1316: END IF;
1317:
1318: l_demand_rsvs_ordered(l_index).primary_reservation_quantity := l_new_prim_rsv_quantity;
1319: l_demand_rsvs_ordered(l_index).secondary_reservation_quantity := l_new_sec_rsv_quantity;
1416: IF l_update_rsv_rec.reservation_quantity = -99999 THEN
1417: -- conversion failed
1418: fnd_message.set_name('INV', 'CAN-NOT-CONVERT-TO-PRIMARY-UOM');
1419: fnd_msg_pub.ADD;
1420: RAISE fnd_api.g_exc_error;
1421: END IF;
1422: END IF;
1423: END IF;
1424: END IF;
1428: print_debug('create new reservation', 'Inv_Pick_Release_PVT.Process_Reservations');
1429: END IF;
1430: inv_reservation_pub.create_reservation(
1431: p_api_version_number => 1.0
1432: , p_init_msg_lst => fnd_api.g_false
1433: , x_return_status => l_api_return_status
1434: , x_msg_count => x_msg_count
1435: , x_msg_data => x_msg_data
1436: , p_rsv_rec => l_update_rsv_rec
1435: , x_msg_data => x_msg_data
1436: , p_rsv_rec => l_update_rsv_rec
1437: , p_serial_number => l_dummy_sn
1438: , x_serial_number => l_dummy_sn
1439: , p_partial_reservation_flag => fnd_api.g_true
1440: , p_force_reservation_flag => fnd_api.g_false
1441: , p_validation_flag => 'Q'
1442: , x_quantity_reserved => l_qty_succ_reserved
1443: , x_reservation_id => l_org_wide_res_id
1436: , p_rsv_rec => l_update_rsv_rec
1437: , p_serial_number => l_dummy_sn
1438: , x_serial_number => l_dummy_sn
1439: , p_partial_reservation_flag => fnd_api.g_true
1440: , p_force_reservation_flag => fnd_api.g_false
1441: , p_validation_flag => 'Q'
1442: , x_quantity_reserved => l_qty_succ_reserved
1443: , x_reservation_id => l_org_wide_res_id
1444: , p_over_reservation_flag => 2 -- Bug 5365200 Passing p_over_reservation_flag to allow reservation of demand for overpicking case
1444: , p_over_reservation_flag => 2 -- Bug 5365200 Passing p_over_reservation_flag to allow reservation of demand for overpicking case
1445: );
1446:
1447: -- Return an error if the create reservation call failed
1448: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
1449: IF (is_debug) THEN
1450: print_debug('error in create reservation', 'Inv_Pick_Release_PVT.Process_Reservations');
1451: END IF;
1452: fnd_message.set_name('INV', 'INV_QRY_RSV_FAILED');
1450: print_debug('error in create reservation', 'Inv_Pick_Release_PVT.Process_Reservations');
1451: END IF;
1452: fnd_message.set_name('INV', 'INV_QRY_RSV_FAILED');
1453: fnd_msg_pub.ADD;
1454: RAISE fnd_api.g_exc_unexpected_error;
1455: END IF;
1456:
1457: -- If partial picking is not allowed and the full quantity could no
1458: -- be reserved, return an error.
1455: END IF;
1456:
1457: -- If partial picking is not allowed and the full quantity could no
1458: -- be reserved, return an error.
1459: IF p_allow_partial_pick = fnd_api.g_false
1460: AND l_qty_succ_reserved < l_quantity_to_reserve THEN
1461: IF (is_debug) THEN
1462: print_debug('p_allow_partial_pick is false and could not reserve the quantity requested'
1463: , 'Inv-Pick_Release_PVT.Process_Reservations');
1463: , 'Inv-Pick_Release_PVT.Process_Reservations');
1464: END IF;
1465: fnd_message.set_name('INV', 'INV_COULD_NOT_PICK_FULL');
1466: fnd_msg_pub.ADD;
1467: RAISE fnd_api.g_exc_unexpected_error;
1468: END IF;
1469:
1470: -- Query up the reservation which was just created and add it to the
1471: -- filtered table.
1471: -- filtered table.
1472: l_qry_rsv_rec_by_id.reservation_id := l_org_wide_res_id;
1473: inv_reservation_pub.query_reservation(
1474: p_api_version_number => 1.0
1475: , p_init_msg_lst => fnd_api.g_true
1476: , x_return_status => l_api_return_status
1477: , x_msg_count => x_msg_count
1478: , x_msg_data => x_msg_data
1479: , p_query_input => l_qry_rsv_rec_by_id
1482: , x_error_code => l_api_error_code
1483: );
1484:
1485: -- Return an error if the query reservations call failed
1486: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
1487: fnd_message.set_name('INV', 'INV_QRY_RSV_FAILED');
1488: fnd_msg_pub.ADD;
1489: RAISE fnd_api.g_exc_unexpected_error;
1490: END IF;
1485: -- Return an error if the query reservations call failed
1486: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
1487: fnd_message.set_name('INV', 'INV_QRY_RSV_FAILED');
1488: fnd_msg_pub.ADD;
1489: RAISE fnd_api.g_exc_unexpected_error;
1490: END IF;
1491:
1492: -- Add the retrieved reservation to the filtered table
1493: l_res_tbl_index := l_demand_reservations.FIRST;
1597: END LOOP;
1598: END IF;
1599: END IF;
1600: EXCEPTION
1601: WHEN fnd_api.g_exc_error THEN
1602: x_return_status := fnd_api.g_ret_sts_error;
1603: -- Get message count and data
1604: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1605: GMI_RESERVATION_UTIL.println('sqlerror'|| SUBSTRB(SQLERRM, 1, 100));
1598: END IF;
1599: END IF;
1600: EXCEPTION
1601: WHEN fnd_api.g_exc_error THEN
1602: x_return_status := fnd_api.g_ret_sts_error;
1603: -- Get message count and data
1604: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1605: GMI_RESERVATION_UTIL.println('sqlerror'|| SUBSTRB(SQLERRM, 1, 100));
1606: WHEN fnd_api.g_exc_unexpected_error THEN
1602: x_return_status := fnd_api.g_ret_sts_error;
1603: -- Get message count and data
1604: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1605: GMI_RESERVATION_UTIL.println('sqlerror'|| SUBSTRB(SQLERRM, 1, 100));
1606: WHEN fnd_api.g_exc_unexpected_error THEN
1607: x_return_status := fnd_api.g_ret_sts_unexp_error;
1608: -- Get message count and data
1609: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1610: GMI_RESERVATION_UTIL.println('sqlerror'|| SUBSTRB(SQLERRM, 1, 100));
1603: -- Get message count and data
1604: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1605: GMI_RESERVATION_UTIL.println('sqlerror'|| SUBSTRB(SQLERRM, 1, 100));
1606: WHEN fnd_api.g_exc_unexpected_error THEN
1607: x_return_status := fnd_api.g_ret_sts_unexp_error;
1608: -- Get message count and data
1609: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1610: GMI_RESERVATION_UTIL.println('sqlerror'|| SUBSTRB(SQLERRM, 1, 100));
1611: WHEN OTHERS THEN
1608: -- Get message count and data
1609: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1610: GMI_RESERVATION_UTIL.println('sqlerror'|| SUBSTRB(SQLERRM, 1, 100));
1611: WHEN OTHERS THEN
1612: x_return_status := fnd_api.g_ret_sts_unexp_error;
1613:
1614: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1615: fnd_msg_pub.add_exc_msg(g_pkg_name, 'INV_PICK_RELEASE_PVT');
1616: END IF;
1639: l_return_status VARCHAR2(1);
1640: l_pick_slip_number NUMBER;
1641: l_ready_to_print VARCHAR2(1);
1642: l_api_error_msg VARCHAR2(2000);
1643: l_default_subinventory VARCHAR2(10) := fnd_api.g_miss_char;
1644: l_default_locator_id NUMBER := fnd_api.g_miss_num;
1645: l_call_mode VARCHAR2(1);
1646:
1647: --8430412 add for getting revision
1640: l_pick_slip_number NUMBER;
1641: l_ready_to_print VARCHAR2(1);
1642: l_api_error_msg VARCHAR2(2000);
1643: l_default_subinventory VARCHAR2(10) := fnd_api.g_miss_char;
1644: l_default_locator_id NUMBER := fnd_api.g_miss_num;
1645: l_call_mode VARCHAR2(1);
1646:
1647: --8430412 add for getting revision
1648: l_revision_control NUMBER;
1658: BEGIN
1659: IF (is_debug) THEN
1660: print_debug('Inside Process_Unreservable', 'Inv_Pick_Release_PVT.Process_Unreservable_Items');
1661: END IF;
1662: x_return_status := fnd_api.g_ret_sts_success;
1663:
1664: /* bug 1560334 jxlu */
1665:
1666: IF g_organization_id IS NOT NULL and
1824: print_debug('after update shipping attributes',
1825: 'Inv_Pick_Release_Pvt.Process_Unreservable_Items');
1826: END IF;
1827:
1828: IF (l_return_status = fnd_api.g_ret_sts_error) THEN
1829: IF (is_debug) THEN
1830: print_debug('return error from update shipping attributes',
1831: 'Inv_Pick_Release_Pvt.Process_Unreservable_Items');
1832: END IF;
1829: IF (is_debug) THEN
1830: print_debug('return error from update shipping attributes',
1831: 'Inv_Pick_Release_Pvt.Process_Unreservable_Items');
1832: END IF;
1833: RAISE fnd_api.g_exc_error;
1834: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
1835: IF (is_debug) THEN
1836: print_debug('return error from update shipping attributes',
1837: 'Inv_Pick_Release_Pvt.Process_Unreservable_Items');
1830: print_debug('return error from update shipping attributes',
1831: 'Inv_Pick_Release_Pvt.Process_Unreservable_Items');
1832: END IF;
1833: RAISE fnd_api.g_exc_error;
1834: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
1835: IF (is_debug) THEN
1836: print_debug('return error from update shipping attributes',
1837: 'Inv_Pick_Release_Pvt.Process_Unreservable_Items');
1838: END IF;
1835: IF (is_debug) THEN
1836: print_debug('return error from update shipping attributes',
1837: 'Inv_Pick_Release_Pvt.Process_Unreservable_Items');
1838: END IF;
1839: RAISE fnd_api.g_exc_unexpected_error;
1840: END IF;
1841:
1842: -- call the get pick slip number
1843:
1874: print_debug('after calling get_pick_slip_number',
1875: 'Inv_Pick_Release_Pvt.Process_Unreservable_Items');
1876: END IF;
1877:
1878: IF l_return_status <> fnd_api.g_ret_sts_success
1879: OR l_pick_slip_number = -1 THEN
1880: IF (is_debug) THEN
1881: print_debug('return error from get_pick_slip_number',
1882: 'Inv_Pick_Release_Pvt.Process_Unreservable_Items');
1882: 'Inv_Pick_Release_Pvt.Process_Unreservable_Items');
1883: END IF;
1884: fnd_message.set_name('INV', 'INV_NO_PICK_SLIP_NUMBER');
1885: fnd_msg_pub.ADD;
1886: RAISE fnd_api.g_exc_unexpected_error;
1887: END IF;
1888:
1889: if ( p_pick_slip_mode <> 'I' ) then
1890: WSH_INV_INTEGRATION_GRP.find_printer
1892: , p_organization_id => p_mo_line_rec.organization_id
1893: , x_error_message => l_api_error_msg
1894: , x_api_Status => l_return_status
1895: );
1896: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1897: IF (is_debug) THEN
1898: print_debug('return error from WSH_INV_INTEGRATION.find_printer',
1899: 'Inv_Pick_Release_Pvt.Process_Unreservable_Items');
1900: END IF;
1897: IF (is_debug) THEN
1898: print_debug('return error from WSH_INV_INTEGRATION.find_printer',
1899: 'Inv_Pick_Release_Pvt.Process_Unreservable_Items');
1900: END IF;
1901: RAISE fnd_api.g_exc_unexpected_error;
1902: END IF;
1903: end if ;
1904:
1905: IF (is_debug) THEN
1934: print_debug('end of process_unreservable_items ',
1935: 'Inv_pick_release_pvt.process_unreservable_items');
1936: END IF;
1937: EXCEPTION
1938: WHEN fnd_api.g_exc_error THEN
1939: x_return_status := fnd_api.g_ret_sts_error;
1940: -- Get message count and data
1941: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1942: WHEN fnd_api.g_exc_unexpected_error THEN
1935: 'Inv_pick_release_pvt.process_unreservable_items');
1936: END IF;
1937: EXCEPTION
1938: WHEN fnd_api.g_exc_error THEN
1939: x_return_status := fnd_api.g_ret_sts_error;
1940: -- Get message count and data
1941: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1942: WHEN fnd_api.g_exc_unexpected_error THEN
1943: x_return_status := fnd_api.g_ret_sts_unexp_error;
1938: WHEN fnd_api.g_exc_error THEN
1939: x_return_status := fnd_api.g_ret_sts_error;
1940: -- Get message count and data
1941: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1942: WHEN fnd_api.g_exc_unexpected_error THEN
1943: x_return_status := fnd_api.g_ret_sts_unexp_error;
1944: -- Get message count and data
1945: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1946: WHEN OTHERS THEN
1939: x_return_status := fnd_api.g_ret_sts_error;
1940: -- Get message count and data
1941: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1942: WHEN fnd_api.g_exc_unexpected_error THEN
1943: x_return_status := fnd_api.g_ret_sts_unexp_error;
1944: -- Get message count and data
1945: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1946: WHEN OTHERS THEN
1947: x_return_status := fnd_api.g_ret_sts_unexp_error;
1943: x_return_status := fnd_api.g_ret_sts_unexp_error;
1944: -- Get message count and data
1945: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1946: WHEN OTHERS THEN
1947: x_return_status := fnd_api.g_ret_sts_unexp_error;
1948:
1949: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1950: fnd_msg_pub.add_exc_msg(g_pkg_name, 'INV_PICK_RELEASE_PVT');
1951: END IF;
1994: IF (is_debug) THEN
1995: print_debug('inside process_prj_dynamic_locator',
1996: 'Inv_Pick_Release_PVt.Process_Prj_Dynamic_Locator');
1997: END IF;
1998: x_return_status := fnd_api.g_ret_sts_success;
1999:
2000: IF p_to_subinventory IS NULL THEN
2001: l_to_subinventory := p_mo_line_rec.to_subinventory_code;
2002: ELSE
2014: IF (is_debug) THEN
2015: print_debug('error setting org cache',
2016: 'Inv_Pick_Release_PVt.Process_Prj_Dynamic_Locator');
2017: END IF;
2018: RAISE fnd_api.g_exc_unexpected_error;
2019: END IF;
2020: l_org_loc_control := INV_CACHE.org_rec.stock_locator_control_code;
2021:
2022: l_return_value := INV_CACHE.set_item_rec(
2026: IF (is_debug) THEN
2027: print_debug('error setting item cache',
2028: 'Inv_Pick_Release_PVt.Process_Prj_Dynamic_Locator');
2029: END IF;
2030: RAISE fnd_api.g_exc_unexpected_error;
2031: END IF;
2032: l_item_loc_control := INV_CACHE.item_rec.location_control_code;
2033:
2034: l_return_value := INV_CACHE.set_tosub_rec(
2038: IF (is_debug) THEN
2039: print_debug('error setting to sub cache',
2040: 'Inv_Pick_Release_PVt.Process_Prj_Dynamic_Locator');
2041: END IF;
2042: RAISE fnd_api.g_exc_unexpected_error;
2043: END IF;
2044: l_sub_loc_control := INV_CACHE.tosub_rec.locator_type;
2045:
2046: IF (is_debug) THEN
2139: end loop;
2140: end if;*/
2141: fnd_message.set_name('INV', 'INV_INT_LOCSEGCODE');
2142: fnd_msg_pub.ADD;
2143: RAISE fnd_api.g_exc_unexpected_error;
2144: END IF; --success
2145: ELSE --no task/project
2146: IF (NVL(TO_NUMBER(l_locator.segment19), -1) <> NVL(p_mo_line_rec.project_id, -1)
2147: AND NVL(TO_NUMBER(l_locator.segment20), -1) <> NVL(p_mo_line_rec.task_id, -1)
2147: AND NVL(TO_NUMBER(l_locator.segment20), -1) <> NVL(p_mo_line_rec.task_id, -1)
2148: ) THEN
2149: fnd_message.set_name('INV', 'INV_INT_LOCCODE');
2150: fnd_msg_pub.ADD;
2151: RAISE fnd_api.g_exc_error;
2152: END IF;
2153: END IF; --task project
2154: END;
2155:
2176: END IF;
2177: x_to_locator_id := NVL(l_new_to_locator_id, p_to_locator_id);
2178:
2179: EXCEPTION
2180: WHEN fnd_api.g_exc_error THEN
2181: x_return_status := fnd_api.g_ret_sts_error;
2182: -- Get message count and data
2183: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
2184: WHEN fnd_api.g_exc_unexpected_error THEN
2177: x_to_locator_id := NVL(l_new_to_locator_id, p_to_locator_id);
2178:
2179: EXCEPTION
2180: WHEN fnd_api.g_exc_error THEN
2181: x_return_status := fnd_api.g_ret_sts_error;
2182: -- Get message count and data
2183: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
2184: WHEN fnd_api.g_exc_unexpected_error THEN
2185: x_return_status := fnd_api.g_ret_sts_unexp_error;
2180: WHEN fnd_api.g_exc_error THEN
2181: x_return_status := fnd_api.g_ret_sts_error;
2182: -- Get message count and data
2183: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
2184: WHEN fnd_api.g_exc_unexpected_error THEN
2185: x_return_status := fnd_api.g_ret_sts_unexp_error;
2186: -- Get message count and data
2187: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
2188: WHEN OTHERS THEN
2181: x_return_status := fnd_api.g_ret_sts_error;
2182: -- Get message count and data
2183: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
2184: WHEN fnd_api.g_exc_unexpected_error THEN
2185: x_return_status := fnd_api.g_ret_sts_unexp_error;
2186: -- Get message count and data
2187: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
2188: WHEN OTHERS THEN
2189: x_return_status := fnd_api.g_ret_sts_unexp_error;
2185: x_return_status := fnd_api.g_ret_sts_unexp_error;
2186: -- Get message count and data
2187: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
2188: WHEN OTHERS THEN
2189: x_return_status := fnd_api.g_ret_sts_unexp_error;
2190:
2191: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2192: fnd_msg_pub.add_exc_msg(g_pkg_name, 'INV_PICK_RELEASE_PVT');
2193: END IF;
2229: --
2230: -- Output Parameters
2231: -- x_return_status
2232: -- if the process succeeds, the value is
2233: -- fnd_api.g_ret_sts_success;
2234: -- if there is an expected error, the value is
2235: -- fnd_api.g_ret_sts_error;
2236: -- if there is an unexpected error, the value is
2237: -- fnd_api.g_ret_sts_unexp_error;
2231: -- x_return_status
2232: -- if the process succeeds, the value is
2233: -- fnd_api.g_ret_sts_success;
2234: -- if there is an expected error, the value is
2235: -- fnd_api.g_ret_sts_error;
2236: -- if there is an unexpected error, the value is
2237: -- fnd_api.g_ret_sts_unexp_error;
2238: -- x_msg_count
2239: -- if there is one or more errors, the number of error messages
2233: -- fnd_api.g_ret_sts_success;
2234: -- if there is an expected error, the value is
2235: -- fnd_api.g_ret_sts_error;
2236: -- if there is an unexpected error, the value is
2237: -- fnd_api.g_ret_sts_unexp_error;
2238: -- x_msg_count
2239: -- if there is one or more errors, the number of error messages
2240: -- in the buffer
2241: -- x_msg_data
2239: -- if there is one or more errors, the number of error messages
2240: -- in the buffer
2241: -- x_msg_data
2242: -- if there is one and only one error, the error message
2243: -- (See fnd_api package for more details about the above output parameters)
2244: --
2245: -- Bug8757642. Added p_wave_simulation_mode with default vale 'N' for WavePlanning Project.
2246: -- This project is available only in for R121 and mainline. To retain dual maintenance INV code changes are made in branchline, however it will not affect any existing flow.
2247: PROCEDURE process_line(
2245: -- Bug8757642. Added p_wave_simulation_mode with default vale 'N' for WavePlanning Project.
2246: -- This project is available only in for R121 and mainline. To retain dual maintenance INV code changes are made in branchline, however it will not affect any existing flow.
2247: PROCEDURE process_line(
2248: p_api_version IN NUMBER
2249: , p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false
2250: , p_commit IN VARCHAR2 DEFAULT fnd_api.g_false
2251: , x_return_status OUT NOCOPY VARCHAR2
2252: , x_msg_count OUT NOCOPY NUMBER
2253: , x_msg_data OUT NOCOPY VARCHAR2
2246: -- This project is available only in for R121 and mainline. To retain dual maintenance INV code changes are made in branchline, however it will not affect any existing flow.
2247: PROCEDURE process_line(
2248: p_api_version IN NUMBER
2249: , p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false
2250: , p_commit IN VARCHAR2 DEFAULT fnd_api.g_false
2251: , x_return_status OUT NOCOPY VARCHAR2
2252: , x_msg_count OUT NOCOPY NUMBER
2253: , x_msg_data OUT NOCOPY VARCHAR2
2254: , p_mo_line_rec IN OUT NOCOPY inv_move_order_pub.trolin_rec_type
2252: , x_msg_count OUT NOCOPY NUMBER
2253: , x_msg_data OUT NOCOPY VARCHAR2
2254: , p_mo_line_rec IN OUT NOCOPY inv_move_order_pub.trolin_rec_type
2255: , p_grouping_rule_id IN NUMBER
2256: , p_allow_partial_pick IN VARCHAR2 DEFAULT fnd_api.g_true
2257: , p_print_mode IN VARCHAR2
2258: , x_detail_rec_count OUT NOCOPY NUMBER
2259: , p_plan_tasks IN BOOLEAN DEFAULT FALSE
2260: , p_wave_simulation_mode IN VARCHAR2 DEFAULT 'N'
2393: x_detail_rec_count := 0;
2394: l_num_detail_recs := 0;
2395:
2396: -- Standard Call to check for call compatibility
2397: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
2398: RAISE fnd_api.g_exc_unexpected_error;
2399: END IF;
2400:
2401: -- Initialize message list if p_init_msg_list is set to true
2394: l_num_detail_recs := 0;
2395:
2396: -- Standard Call to check for call compatibility
2397: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
2398: RAISE fnd_api.g_exc_unexpected_error;
2399: END IF;
2400:
2401: -- Initialize message list if p_init_msg_list is set to true
2402: IF fnd_api.to_boolean(p_init_msg_list) THEN
2398: RAISE fnd_api.g_exc_unexpected_error;
2399: END IF;
2400:
2401: -- Initialize message list if p_init_msg_list is set to true
2402: IF fnd_api.to_boolean(p_init_msg_list) THEN
2403: fnd_msg_pub.initialize;
2404: END IF;
2405:
2406: -- Initialize API return status to success
2403: fnd_msg_pub.initialize;
2404: END IF;
2405:
2406: -- Initialize API return status to success
2407: x_return_status := fnd_api.g_ret_sts_success;
2408:
2409: -- Return success immediately if the line is already fully detailed
2410: -- check required quantity otherwise use the quantity - CMS change bug 2135900
2411: IF NVL(p_mo_line_rec.quantity_detailed, 0) >= NVL(p_mo_line_rec.required_quantity, NVL(p_mo_line_rec.quantity, 0)) THEN
2412: RETURN;
2413: END IF;
2414: -- Override the printing mode to deferred if allow partial pick is false.
2415: -- Otherwise set it based on the parameter passed in.
2416: IF p_allow_partial_pick = fnd_api.g_false THEN
2417: l_pick_slip_mode := 'E';
2418: ELSE
2419: l_pick_slip_mode := p_print_mode;
2420: END IF;
2484: END IF;
2485: ROLLBACK TO process_line_pvt;
2486: fnd_message.set_name('INV', 'INV_DELIV_INFO_MISSING');
2487: fnd_msg_pub.ADD;
2488: RAISE fnd_api.g_exc_unexpected_error;
2489: END;
2490: IF (is_debug) THEN
2491: gmi_reservation_util.println('Process_Line after fetch wdd');
2492: END IF;
2494: IF NOT l_return_value THEN
2495: If is_debug THEN
2496: print_debug('Error setting item cache', 'Inv_Pick_Release_PVT.Process_Line');
2497: End If;
2498: raise fnd_api.g_exc_unexpected_error;
2499: End If;
2500: l_reservable_type:= INV_CACHE.item_rec.reservable_type;
2501:
2502: IF p_mo_line_rec.transaction_type_id = 52 THEN
2510: IF NOT l_return_value THEN
2511: If is_debug THEN
2512: print_debug('Error setting item cache','Inv_Pick_Release_PVT.Process_Line');
2513: End If;
2514: raise fnd_api.g_exc_unexpected_error;
2515: End If;
2516: l_demand_source_type := INV_CACHE.mtt_rec.transaction_source_type_id;
2517: g_transaction_type_id := p_mo_line_rec.transaction_type_id;
2518: g_transaction_source_type_id := l_demand_source_type;
2531: gmi_reservation_util.println('No Mtl_Sales_Order ID found for oe header');
2532: END IF;
2533: fnd_message.set_name('INV', 'INV_COULD_NOT_GET_MSO_HEADER');
2534: fnd_msg_pub.ADD;
2535: RAISE fnd_api.g_exc_unexpected_error;
2536: END IF;
2537:
2538: l_mso_header_id := INV_CACHE.mso_rec.sales_order_id;
2539:
2567: , x_rsv_qty2_available => l_rsv_qty2_available
2568: );
2569:
2570: -- Return an error if the query reservations call failed
2571: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
2572: ROLLBACK TO process_line_pvt;
2573: RAISE fnd_api.g_exc_unexpected_error;
2574: END IF;
2575: ELSIF (l_reservable_type = 2) THEN
2569:
2570: -- Return an error if the query reservations call failed
2571: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
2572: ROLLBACK TO process_line_pvt;
2573: RAISE fnd_api.g_exc_unexpected_error;
2574: END IF;
2575: ELSIF (l_reservable_type = 2) THEN
2576: -- bug 1412145 for non reservable item, just update shipping attr with released_status = 'Y'
2577: -- update the qty_Detailed and qty_Delivered in the move order line
2592: , p_print_mode => p_print_mode
2593: , x_call_mode => l_call_mode
2594: );
2595:
2596: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
2597: ROLLBACK TO process_line_pvt;
2598: RAISE fnd_api.g_exc_unexpected_error;
2599: END IF;
2600:
2594: );
2595:
2596: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
2597: ROLLBACK TO process_line_pvt;
2598: RAISE fnd_api.g_exc_unexpected_error;
2599: END IF;
2600:
2601: IF l_ready_to_print = fnd_api.g_true
2602: AND p_allow_partial_pick = fnd_api.g_true
2597: ROLLBACK TO process_line_pvt;
2598: RAISE fnd_api.g_exc_unexpected_error;
2599: END IF;
2600:
2601: IF l_ready_to_print = fnd_api.g_true
2602: AND p_allow_partial_pick = fnd_api.g_true
2603: AND l_call_mode IS NULL THEN
2604: COMMIT WORK;
2605:
2598: RAISE fnd_api.g_exc_unexpected_error;
2599: END IF;
2600:
2601: IF l_ready_to_print = fnd_api.g_true
2602: AND p_allow_partial_pick = fnd_api.g_true
2603: AND l_call_mode IS NULL THEN
2604: COMMIT WORK;
2605:
2606: l_return_value := INV_CACHE.set_mtrh_rec(p_mo_line_rec.header_id);
2607: IF NOT l_return_value THEN
2608: If is_debug THEN
2609: print_debug('Error setting header cache', 'Inv_Pick_Release_PVT.Process_Line');
2610: End If;
2611: raise fnd_api.g_exc_unexpected_error;
2612: END IF;
2613: l_request_number := INV_CACHE.mtrh_rec.request_number;
2614:
2615: IF g_request_number is NOT NULL and
2626: WHEN NO_DATA_FOUND THEN
2627: IF is_debug THEN
2628: print_debug('No Data found - document set','Inv_Pick_Release_PVT.Process_Line');
2629: END IF;
2630: x_return_status := fnd_api.g_ret_sts_error;
2631: RAISE fnd_api.g_exc_error;
2632: END;
2633: g_request_number := l_request_number;
2634: g_report_set_id := l_report_set_id;
2627: IF is_debug THEN
2628: print_debug('No Data found - document set','Inv_Pick_Release_PVT.Process_Line');
2629: END IF;
2630: x_return_status := fnd_api.g_ret_sts_error;
2631: RAISE fnd_api.g_exc_error;
2632: END;
2633: g_request_number := l_request_number;
2634: g_report_set_id := l_report_set_id;
2635: END IF;
2641: , x_api_status => l_api_return_status
2642: , x_error_message => l_api_error_msg
2643: );
2644:
2645: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
2646: IF (is_debug) THEN
2647: print_debug('Error in Print Pick Slip', 'Inv_Pick_Release_PVT.Process_Line');
2648: END IF;
2649: ROLLBACK TO process_line_pvt;
2649: ROLLBACK TO process_line_pvt;
2650: fnd_message.set_name('INV', 'INV_PRINT_PICK_SLIP_FAILED');
2651: fnd_message.set_token('PICK_SLIP_NUM', TO_CHAR(l_pick_slip_number));
2652: fnd_msg_pub.ADD;
2653: RAISE fnd_api.g_exc_unexpected_error;
2654: END IF;
2655: END IF; -- ready to print
2656:
2657: GOTO end_pick;
2717: --Bug3237702 ends
2718: -- Bug 5264987 Added p_organization_id to the create_suggestions call
2719: inv_ppengine_pvt.create_suggestions(
2720: p_api_version => 1.0
2721: , p_init_msg_list => fnd_api.g_false
2722: , p_commit => fnd_api.g_false
2723: , x_return_status => l_api_return_status
2724: , x_msg_count => x_msg_count
2725: , x_msg_data => x_msg_data
2718: -- Bug 5264987 Added p_organization_id to the create_suggestions call
2719: inv_ppengine_pvt.create_suggestions(
2720: p_api_version => 1.0
2721: , p_init_msg_list => fnd_api.g_false
2722: , p_commit => fnd_api.g_false
2723: , x_return_status => l_api_return_status
2724: , x_msg_count => x_msg_count
2725: , x_msg_data => x_msg_data
2726: , p_transaction_temp_id => p_mo_line_rec.line_id
2732: );
2733:
2734: g_pick_nonrsv_lots := 2; -- Bug 8560030
2735:
2736: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
2737: IF (is_debug) THEN
2738: print_debug('l_return_status = '|| l_api_return_status, 'Inv_Pick_Release_PVT.Process_Line');
2739: print_debug('inv detailing failed', 'Inv_Pick_Release_PVT.Process_Line');
2740: END IF;
2770: IF NOT l_return_value THEN
2771: If is_debug THEN
2772: print_debug('Error setting header cache', 'Inv_Pick_Release_PVT.Process_Line');
2773: End If;
2774: raise fnd_api.g_exc_unexpected_error;
2775: END IF;
2776: l_request_number := INV_CACHE.mtrh_rec.request_number;
2777:
2778: fnd_message.set_name('INV', 'INV_DETAILING_FAILED');
2778: fnd_message.set_name('INV', 'INV_DETAILING_FAILED');
2779: fnd_message.set_token('LINE_NUM', TO_CHAR(p_mo_line_rec.line_number));
2780: fnd_message.set_token('MO_NUMBER', l_request_number);
2781: fnd_msg_pub.ADD;
2782: RAISE fnd_api.g_exc_unexpected_error;
2783: END IF;
2784:
2785: IF (is_debug) THEN
2786: print_debug('after calling create suggestions with return status = '||l_api_return_status, 'Inv_Pick_Release_PVT.Process_Line');
2843: -- {{ Test Case # UTK-REALLOC-3.2.6:62 }}
2844: -- Description: Partially detailed should be set to 1 if allocation within tolerance but less
2845: -- than the requested quantity
2846: IF l_quantity_detailed < p_mo_line_rec.primary_quantity - l_min_tolerance THEN
2847: IF p_allow_partial_pick = fnd_api.g_false THEN
2848: IF (is_debug) THEN
2849: print_debug('Error - could not pick full', 'Inv_Pick_Release_PVT.Process_Line');
2850: END IF;
2851: ROLLBACK TO process_line_pvt;
2850: END IF;
2851: ROLLBACK TO process_line_pvt;
2852: fnd_message.set_name('INV', 'INV_COULD_NOT_PICK_FULL');
2853: fnd_msg_pub.ADD;
2854: RAISE fnd_api.g_exc_unexpected_error;
2855: ELSE
2856: -- Set a flag to later set the return status for success,
2857: -- but only partially detailed
2858: IF (is_debug) THEN
2887: END IF;
2888:
2889: IF l_fulfill_base = 'S' THEN
2890: IF l_sec_quantity_detailed < p_mo_line_rec.secondary_quantity - l_min_tolerance2 THEN
2891: IF p_allow_partial_pick = fnd_api.g_false THEN
2892: IF (is_debug) THEN
2893: print_debug('Error - could not pick full', 'Inv_Pick_Release_PVT.Process_Line');
2894: END IF;
2895: ROLLBACK TO process_line_pvt;
2894: END IF;
2895: ROLLBACK TO process_line_pvt;
2896: fnd_message.set_name('INV', 'INV_COULD_NOT_PICK_FULL');
2897: fnd_msg_pub.ADD;
2898: RAISE fnd_api.g_exc_unexpected_error;
2899: ELSE
2900: -- Set a flag to later set the return status for success,
2901: -- but only partially detailed
2902: IF (is_debug) THEN
2964: print_debug('Delete org level reservation', 'Inv_Pick_Release_PVT.Process_Reservations');
2965: END IF;
2966: inv_reservation_pvt.delete_reservation(
2967: p_api_version_number => 1.0
2968: ,p_init_msg_lst => fnd_api.g_false
2969: ,x_return_status => l_api_return_status
2970: ,x_msg_count => x_msg_count
2971: ,x_msg_data => x_msg_data
2972: ,p_rsv_rec => l_demand_rsvs_ordered(l_index)
2970: ,x_msg_count => x_msg_count
2971: ,x_msg_data => x_msg_data
2972: ,p_rsv_rec => l_demand_rsvs_ordered(l_index)
2973: ,p_original_serial_number => l_dummy_sn
2974: ,p_validation_flag => fnd_api.g_true
2975: );
2976:
2977: IF (l_api_return_status = fnd_api.g_ret_sts_error) THEN
2978: IF (is_debug) THEN
2973: ,p_original_serial_number => l_dummy_sn
2974: ,p_validation_flag => fnd_api.g_true
2975: );
2976:
2977: IF (l_api_return_status = fnd_api.g_ret_sts_error) THEN
2978: IF (is_debug) THEN
2979: print_debug('return error from delete_reservation', 'Inv_Pick_Release_Pvt.Process_Line');
2980: END IF;
2981: RAISE fnd_api.g_exc_error;
2977: IF (l_api_return_status = fnd_api.g_ret_sts_error) THEN
2978: IF (is_debug) THEN
2979: print_debug('return error from delete_reservation', 'Inv_Pick_Release_Pvt.Process_Line');
2980: END IF;
2981: RAISE fnd_api.g_exc_error;
2982: ELSIF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
2983: IF (is_debug) THEN
2984: print_debug('return unexpected error from delete_reservation','Inv_Pick_Release_Pvt.Process_Line');
2985: END IF;
2978: IF (is_debug) THEN
2979: print_debug('return error from delete_reservation', 'Inv_Pick_Release_Pvt.Process_Line');
2980: END IF;
2981: RAISE fnd_api.g_exc_error;
2982: ELSIF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
2983: IF (is_debug) THEN
2984: print_debug('return unexpected error from delete_reservation','Inv_Pick_Release_Pvt.Process_Line');
2985: END IF;
2986: RAISE fnd_api.g_exc_unexpected_error;
2982: ELSIF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
2983: IF (is_debug) THEN
2984: print_debug('return unexpected error from delete_reservation','Inv_Pick_Release_Pvt.Process_Line');
2985: END IF;
2986: RAISE fnd_api.g_exc_unexpected_error;
2987: END IF;
2988:
2989: Else
2990: --update quantity tree
3018:
3019: -- Added secondary qty related parameters section for Bug 7377744
3020: inv_quantity_tree_pub.update_quantities(
3021: p_api_version_number => 1.0
3022: , p_init_msg_lst => fnd_api.g_false
3023: , x_return_status => l_api_return_status
3024: , x_msg_count => x_msg_count
3025: , x_msg_data => x_msg_data
3026: , p_organization_id => p_mo_line_rec.organization_id
3056: , x_sqs => l_sec_qty_sug
3057: , x_satt => l_sec_qty_att
3058: , x_satr => l_sec_qty_available_to_reserve
3059: );
3060: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
3061: IF (is_debug) THEN
3062: print_debug('Error from update quantity tree',
3063: 'Inv_Pick_Release_PVT.Process_Line');
3064: END IF;
3061: IF (is_debug) THEN
3062: print_debug('Error from update quantity tree',
3063: 'Inv_Pick_Release_PVT.Process_Line');
3064: END IF;
3065: RAISE fnd_api.g_exc_unexpected_error;
3066: END IF;
3067:
3068: --handle conversion to reservation UOM
3069: IF l_demand_rsvs_ordered(l_index).reservation_uom_code IS NULL OR l_new_prim_rsv_quantity = 0 THEN
3093: fnd_message.set_name('INV', 'INV-CANNOT CONVERT');
3094: fnd_message.set_token('UOM', l_secondary_uom);
3095: fnd_message.set_token('ROUTINE', 'Pick Release process');
3096: fnd_msg_pub.ADD;
3097: RAISE fnd_api.g_exc_unexpected_error;
3098: END IF;
3099: ELSE
3100: l_new_rsv_quantity := inv_convert.inv_um_convert(
3101: item_id => p_mo_line_rec.inventory_item_id
3115: fnd_message.set_name('INV', 'INV-CANNOT CONVERT');
3116: fnd_message.set_token('UOM', l_primary_uom);
3117: fnd_message.set_token('ROUTINE', 'Pick Release process');
3118: fnd_msg_pub.ADD;
3119: RAISE fnd_api.g_exc_unexpected_error;
3120: END IF;
3121: END IF;
3122:
3123: -- Bug 6989438
3137: , x_return_status => l_api_return_status
3138: , x_msg_count => x_msg_count
3139: , x_msg_data => x_msg_data);
3140:
3141: IF l_api_return_status = fnd_api.g_ret_sts_error THEN
3142: IF (is_debug) THEN
3143: print_debug('Error from inv_rsv_synch.for_update','Inv_Pick_Release_PVT.Process_Reservations');
3144: END IF;
3145: RAISE fnd_api.g_exc_error;
3141: IF l_api_return_status = fnd_api.g_ret_sts_error THEN
3142: IF (is_debug) THEN
3143: print_debug('Error from inv_rsv_synch.for_update','Inv_Pick_Release_PVT.Process_Reservations');
3144: END IF;
3145: RAISE fnd_api.g_exc_error;
3146: END IF;
3147: --
3148: IF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
3149: IF (is_debug) THEN
3144: END IF;
3145: RAISE fnd_api.g_exc_error;
3146: END IF;
3147: --
3148: IF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
3149: IF (is_debug) THEN
3150: print_debug('Unexp. error from inv_rsv_synch.for_update','Inv_Pick_Release_PVT.Process_Reservations');
3151: END IF;
3152: RAISE fnd_api.g_exc_unexpected_error;
3148: IF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
3149: IF (is_debug) THEN
3150: print_debug('Unexp. error from inv_rsv_synch.for_update','Inv_Pick_Release_PVT.Process_Reservations');
3151: END IF;
3152: RAISE fnd_api.g_exc_unexpected_error;
3153: END IF;
3154:
3155: End If; -- new rsv qty = 0
3156: END IF; -- demand rsvs ordered count > 0
3234: fnd_message.set_name('INV', 'INV-CANNOT CONVERT');
3235: fnd_message.set_token('UOM', l_secondary_uom);
3236: fnd_message.set_token('ROUTINE', 'Pick Release process');
3237: fnd_msg_pub.ADD;
3238: RAISE fnd_api.g_exc_unexpected_error;
3239: END IF;
3240: ELSE
3241: l_new_rsv_quantity := inv_convert.inv_um_convert(
3242: item_id => p_mo_line_rec.inventory_item_id
3255: fnd_message.set_name('INV', 'INV-CANNOT CONVERT');
3256: fnd_message.set_token('UOM', l_primary_uom);
3257: fnd_message.set_token('ROUTINE', 'Pick Release process');
3258: fnd_msg_pub.ADD;
3259: RAISE fnd_api.g_exc_unexpected_error;
3260: END IF;
3261: END IF;
3262: IF (is_debug) THEN
3263: print_debug('2 New prim rsv qty: ' || l_new_prim_rsv_quantity,'Inv_Pick_Release_PVT.Process_Line');
3280: l_to_rsv_record.secondary_reservation_quantity := l_new_sec_rsv_quantity; -- Bug 6989438
3281:
3282: inv_reservation_pub.update_reservation(
3283: p_api_version_number => 1.0
3284: , p_init_msg_lst => fnd_api.g_false
3285: , x_return_status => l_api_return_status
3286: , x_msg_count => l_count
3287: , x_msg_data => l_message
3288: , p_original_rsv_rec => l_original_rsv_record
3288: , p_original_rsv_rec => l_original_rsv_record
3289: , p_to_rsv_rec => l_to_rsv_record
3290: , p_original_serial_number => l_dummy_sn
3291: , p_to_serial_number => l_dummy_sn
3292: , p_validation_flag => fnd_api.g_true
3293: );
3294:
3295: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
3296: IF (is_debug) THEN
3291: , p_to_serial_number => l_dummy_sn
3292: , p_validation_flag => fnd_api.g_true
3293: );
3294:
3295: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
3296: IF (is_debug) THEN
3297: print_debug('error in update reservation', 'Inv_Pick_Release_PVT.Process_Reservations');
3298: END IF;
3299: fnd_message.set_name('INV', 'INV_UPD_RSV_FAILED');
3297: print_debug('error in update reservation', 'Inv_Pick_Release_PVT.Process_Reservations');
3298: END IF;
3299: fnd_message.set_name('INV', 'INV_UPD_RSV_FAILED');
3300: fnd_msg_pub.ADD;
3301: RAISE fnd_api.g_exc_unexpected_error;
3302: END IF;
3303:
3304: /* inv_rsv_synch.for_update(
3305: p_reservation_id => l_demand_rsvs_ordered(l_res_ordered_index).reservation_id
3306: , x_return_status => l_api_return_status
3307: , x_msg_count => x_msg_count
3308: , x_msg_data => x_msg_data);
3309:
3310: IF l_api_return_status = fnd_api.g_ret_sts_error THEN
3311: IF (is_debug) THEN
3312: print_debug('Error from inv_rsv_synch.for_update','Inv_Pick_Release_PVT.Process_Line');
3313: END IF;
3314: RAISE fnd_api.g_exc_error;
3310: IF l_api_return_status = fnd_api.g_ret_sts_error THEN
3311: IF (is_debug) THEN
3312: print_debug('Error from inv_rsv_synch.for_update','Inv_Pick_Release_PVT.Process_Line');
3313: END IF;
3314: RAISE fnd_api.g_exc_error;
3315: END IF;
3316: --
3317: IF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
3318: IF (is_debug) THEN
3313: END IF;
3314: RAISE fnd_api.g_exc_error;
3315: END IF;
3316: --
3317: IF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
3318: IF (is_debug) THEN
3319: print_debug('Unexp. error from inv_rsv_synch.for_update','Inv_Pick_Release_PVT.Process_Line');
3320: END IF;
3321: RAISE fnd_api.g_exc_unexpected_error;
3317: IF l_api_return_status = fnd_api.g_ret_sts_unexp_error THEN
3318: IF (is_debug) THEN
3319: print_debug('Unexp. error from inv_rsv_synch.for_update','Inv_Pick_Release_PVT.Process_Line');
3320: END IF;
3321: RAISE fnd_api.g_exc_unexpected_error;
3322: END IF;*/
3323: /* end bug 7253296 */
3324: END IF; /* IF NVL(l_reduce_rsv_qty,0) > 0 THEN */
3325: END IF;
3409: print_debug('updating quantity tree', 'Inv_Pick_Release_PVT.Process_Line');
3410: END IF;
3411: inv_quantity_tree_pub.update_quantities(
3412: p_api_version_number => 1.0
3413: , p_init_msg_lst => fnd_api.g_false
3414: , x_return_status => l_api_return_status
3415: , x_msg_count => x_msg_count
3416: , x_msg_data => x_msg_data
3417: , p_organization_id => p_mo_line_rec.organization_id
3447: , x_sqs => l_sec_qty_sug
3448: , x_satt => l_sec_qty_att
3449: , x_satr => l_sec_qty_available_to_reserve
3450: );
3451: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
3452: IF (is_debug) THEN
3453: print_debug('Error from update quantity tree', 'Inv_Pick_Release_PVT.Process_Line');
3454: END IF;
3455: RAISE fnd_api.g_exc_unexpected_error;
3451: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
3452: IF (is_debug) THEN
3453: print_debug('Error from update quantity tree', 'Inv_Pick_Release_PVT.Process_Line');
3454: END IF;
3455: RAISE fnd_api.g_exc_unexpected_error;
3456: END IF;
3457: IF (is_debug) THEN
3458: print_debug('update reservation with quantity_detailed', 'Inv_Pick_Release_PVT.Process_Line');
3459: print_debug('quantity_detailed'|| l_reservation_detailed_qty, 'Inv_Pick_Release_PVT.Process_Line');
3490: fnd_message.set_name('INV', 'INV-CANNOT CONVERT');
3491: fnd_message.set_token('UOM', l_secondary_uom);
3492: fnd_message.set_token('ROUTINE', 'Pick Release process');
3493: fnd_msg_pub.ADD;
3494: RAISE fnd_api.g_exc_unexpected_error;
3495: END IF;
3496: ELSE
3497: l_rsv_detailed_qty_conv := inv_convert.inv_um_convert(
3498: item_id => p_mo_line_rec.inventory_item_id
3510: fnd_message.set_name('INV', 'INV-CANNOT CONVERT');
3511: fnd_message.set_token('UOM', l_primary_uom);
3512: fnd_message.set_token('ROUTINE', 'Pick Release process');
3513: fnd_msg_pub.ADD;
3514: RAISE fnd_api.g_exc_unexpected_error;
3515: END IF;
3516: END IF;
3517: -- End of Bug Fix 5624514
3518: IF (is_debug) THEN
3584: );
3585:
3586:
3587:
3588: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
3589: ROLLBACK TO process_line_pvt;
3590: RAISE fnd_api.g_exc_unexpected_error;
3591: END IF;
3592:
3586:
3587:
3588: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
3589: ROLLBACK TO process_line_pvt;
3590: RAISE fnd_api.g_exc_unexpected_error;
3591: END IF;
3592:
3593: IF (is_debug) THEN
3594: print_debug('Value of locator id obtained from process_prj_dynamic_locator '||l_dest_locator_id,'Inv_Pick_Release_PVT.Process_Line');
3642: IF (is_debug) THEN
3643: print_debug('l_call_mode'|| l_call_mode, 'Inv_Pick_Release_PVT.Process_Line');
3644: END IF;
3645:
3646: IF l_api_return_status <> fnd_api.g_ret_sts_success OR l_pick_slip_number = -1 THEN
3647: ROLLBACK TO process_line_pvt;
3648: fnd_message.set_name('INV', 'INV_NO_PICK_SLIP_NUMBER');
3649: fnd_msg_pub.ADD;
3650: RAISE fnd_api.g_exc_unexpected_error;
3646: IF l_api_return_status <> fnd_api.g_ret_sts_success OR l_pick_slip_number = -1 THEN
3647: ROLLBACK TO process_line_pvt;
3648: fnd_message.set_name('INV', 'INV_NO_PICK_SLIP_NUMBER');
3649: fnd_msg_pub.ADD;
3650: RAISE fnd_api.g_exc_unexpected_error;
3651: END IF;
3652: IF ( l_pick_slip_mode <> 'I' ) THEN
3653: WSH_INV_INTEGRATION_GRP.FIND_PRINTER
3654: ( p_subinventory => l_mold_sub_code
3656: , x_error_message => l_api_error_msg
3657: , x_api_Status => l_api_return_status
3658: ) ;
3659:
3660: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
3661: IF (is_debug) THEN
3662: print_debug('return error from WSH_INV_INTEGRATION.find_printer','Inv_Pick_Release_Pvt.Process_Line');
3663: END IF;
3664: RAISE fnd_api.g_exc_unexpected_error;
3660: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
3661: IF (is_debug) THEN
3662: print_debug('return error from WSH_INV_INTEGRATION.find_printer','Inv_Pick_Release_Pvt.Process_Line');
3663: END IF;
3664: RAISE fnd_api.g_exc_unexpected_error;
3665: END IF;
3666: END IF ;
3667: -- Assign the pick slip number to the record in MTL_MATERIAL_TRANSACTIONS_TEMP
3668: UPDATE mtl_material_transactions_temp
3678: -- picking is allowed) commit
3679: -- and print at this point.
3680: -- Bug 1663376 - Don't Commit if Ship_set_Id is not null,
3681: -- since we need to be able to rollback
3682: IF l_ready_to_print = fnd_api.g_true
3683: AND p_allow_partial_pick = fnd_api.g_true
3684: AND p_mo_line_rec.ship_set_id IS NULL
3685: AND p_mo_line_rec.ship_model_id IS NULL
3686: AND l_call_mode IS NULL THEN
3679: -- and print at this point.
3680: -- Bug 1663376 - Don't Commit if Ship_set_Id is not null,
3681: -- since we need to be able to rollback
3682: IF l_ready_to_print = fnd_api.g_true
3683: AND p_allow_partial_pick = fnd_api.g_true
3684: AND p_mo_line_rec.ship_set_id IS NULL
3685: AND p_mo_line_rec.ship_model_id IS NULL
3686: AND l_call_mode IS NULL THEN
3687: COMMIT WORK;
3690: IF NOT l_return_value THEN
3691: If is_debug THEN
3692: print_debug('Error setting header cache','Inv_Pick_Release_PVT.Process_Line');
3693: End If;
3694: raise fnd_api.g_exc_unexpected_error;
3695: END IF;
3696: l_request_number := INV_CACHE.mtrh_rec.request_number;
3697:
3698: IF g_request_number is NOT NULL and
3710: IF is_debug THEN
3711: print_debug('No Data found - document set',
3712: 'Inv_Pick_Release_PVT.Process_Line');
3713: END IF;
3714: x_return_status := fnd_api.g_ret_sts_error;
3715: RAISE fnd_api.g_exc_error;
3716: END;
3717: g_request_number := l_request_number;
3718: g_report_set_id := l_report_set_id;
3711: print_debug('No Data found - document set',
3712: 'Inv_Pick_Release_PVT.Process_Line');
3713: END IF;
3714: x_return_status := fnd_api.g_ret_sts_error;
3715: RAISE fnd_api.g_exc_error;
3716: END;
3717: g_request_number := l_request_number;
3718: g_report_set_id := l_report_set_id;
3719: END IF;
3723: , p_organization_id => p_mo_line_rec.organization_id
3724: , x_api_status => l_api_return_status
3725: , x_error_message => l_api_error_msg
3726: );
3727: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
3728: ROLLBACK TO process_line_pvt;
3729: fnd_message.set_name('INV', 'INV_PRINT_PICK_SLIP_FAILED');
3730: fnd_message.set_token('PICK_SLIP_NUM', TO_CHAR(l_pick_slip_number));
3731: fnd_msg_pub.ADD;
3728: ROLLBACK TO process_line_pvt;
3729: fnd_message.set_name('INV', 'INV_PRINT_PICK_SLIP_FAILED');
3730: fnd_message.set_token('PICK_SLIP_NUM', TO_CHAR(l_pick_slip_number));
3731: fnd_msg_pub.ADD;
3732: RAISE fnd_api.g_exc_unexpected_error;
3733: END IF;
3734: END IF;
3735: END IF; -- end the patchset J and WMS org check
3736: END IF;
3743: END IF; -- if l_num_detail_rec > 0
3744:
3745: -- If the line was only partially detailed and the API was about to return success,
3746: -- set the return status to 'P' (for partial) instead.
3747: IF x_return_status = fnd_api.g_ret_sts_success
3748: AND l_partially_detailed = 1 THEN
3749: IF (is_debug) THEN
3750: print_debug('x_return_status is '|| x_return_status, 'Inv_Pick_Release_PVT.Process_Line');
3751: END IF;
3763:
3764: --x_detail_rec_count := l_num_detail_recs;
3765: -- Standard call to commit
3766: <
3767: IF p_commit = fnd_api.g_true
3768: AND p_allow_partial_pick = fnd_api.g_true THEN
3769: COMMIT;
3770: END IF;
3771: print_debug('Commit? is '|| p_commit, 'Inv_Pick_Release_PVT.Process_Line');
3764: --x_detail_rec_count := l_num_detail_recs;
3765: -- Standard call to commit
3766: <
3767: IF p_commit = fnd_api.g_true
3768: AND p_allow_partial_pick = fnd_api.g_true THEN
3769: COMMIT;
3770: END IF;
3771: print_debug('Commit? is '|| p_commit, 'Inv_Pick_Release_PVT.Process_Line');
3772:
3771: print_debug('Commit? is '|| p_commit, 'Inv_Pick_Release_PVT.Process_Line');
3772:
3773: x_detail_rec_count := l_num_detail_recs;
3774: EXCEPTION
3775: WHEN fnd_api.g_exc_error THEN
3776: x_return_status := fnd_api.g_ret_sts_error;
3777: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
3778: WHEN fnd_api.g_exc_unexpected_error THEN
3779: x_return_status := fnd_api.g_ret_sts_unexp_error;
3772:
3773: x_detail_rec_count := l_num_detail_recs;
3774: EXCEPTION
3775: WHEN fnd_api.g_exc_error THEN
3776: x_return_status := fnd_api.g_ret_sts_error;
3777: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
3778: WHEN fnd_api.g_exc_unexpected_error THEN
3779: x_return_status := fnd_api.g_ret_sts_unexp_error;
3780: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
3774: EXCEPTION
3775: WHEN fnd_api.g_exc_error THEN
3776: x_return_status := fnd_api.g_ret_sts_error;
3777: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
3778: WHEN fnd_api.g_exc_unexpected_error THEN
3779: x_return_status := fnd_api.g_ret_sts_unexp_error;
3780: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
3781: WHEN OTHERS THEN
3782: x_return_status := fnd_api.g_ret_sts_unexp_error;
3775: WHEN fnd_api.g_exc_error THEN
3776: x_return_status := fnd_api.g_ret_sts_error;
3777: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
3778: WHEN fnd_api.g_exc_unexpected_error THEN
3779: x_return_status := fnd_api.g_ret_sts_unexp_error;
3780: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
3781: WHEN OTHERS THEN
3782: x_return_status := fnd_api.g_ret_sts_unexp_error;
3783:
3778: WHEN fnd_api.g_exc_unexpected_error THEN
3779: x_return_status := fnd_api.g_ret_sts_unexp_error;
3780: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
3781: WHEN OTHERS THEN
3782: x_return_status := fnd_api.g_ret_sts_unexp_error;
3783:
3784: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
3785: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
3786: END IF;