909: END IF;
910: END IF;
911:
912: IF (l_return_status IS NULL) THEN
913: l_return_status := FND_API.g_ret_sts_success;
914: END IF;
915:
916: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
917: po_message_s.sql_error('remove_req_from_po', x_progress, l_msg_data);
912: IF (l_return_status IS NULL) THEN
913: l_return_status := FND_API.g_ret_sts_success;
914: END IF;
915:
916: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
917: po_message_s.sql_error('remove_req_from_po', x_progress, l_msg_data);
918: END IF;
919:
920: END LOOP;
1310:
1311: END IF; -- IF ( x_req_line_id IS NOT NULL OR x_req_header_id IS NOT NULL )
1312:
1313: x_progress := '040';
1314: x_return_status := FND_API.G_RET_STS_SUCCESS;
1315:
1316: EXCEPTION
1317:
1318: WHEN OTHERS THEN
1315:
1316: EXCEPTION
1317:
1318: WHEN OTHERS THEN
1319: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1320: PO_MESSAGE_S.sql_error('UPDATE_REQS_IN_POOL_FLAG',x_progress,sqlcode);
1321:
1322: END update_reqs_in_pool_flag;
1323:
1379: x_return_status => X_oe_return);
1380:
1381: X_progress := '040';
1382:
1383: If X_oe_return = fnd_api.g_ret_sts_success then
1384:
1385: /* If the table X_oe_line_tbl is empty, return TRUE */
1386: If (X_oe_line_tbl.FIRST is NULL) Then
1387: return(TRUE);
1400: x_return_status => X_wsh_return,
1401: x_msg_count => X_msg_count,
1402: x_msg_data => X_msg_data);
1403:
1404: If X_wsh_return = fnd_api.g_ret_sts_success then
1405: If X_out_rec_type.nonintf_line_qty > 0 then
1406: return FALSE;
1407:
1408: End If; /* If X_out_rec_type.nonintf_line_qty */