96: EXCEPTION
97: WHEN OTHERS THEN
98: ROLLBACK TO SAVEPOINT Perform_Versioning;
99:
100: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
101: OE_MSG_PUB.Add_Exc_Msg
102: ( G_PKG_NAME
103: , 'Delete_Created_Records'
104: );
97: WHEN OTHERS THEN
98: ROLLBACK TO SAVEPOINT Perform_Versioning;
99:
100: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
101: OE_MSG_PUB.Add_Exc_Msg
102: ( G_PKG_NAME
103: , 'Delete_Created_Records'
104: );
105: END IF;
259:
260: OE_GLOBALS.G_CASCADING_REQUEST_LOGGED := TRUE;
261: ELSIF l_version_number < OE_Blanket_Util.g_old_header_hist_rec.version_number THEN
262: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_INVALID_REVISION_NUM');
263: OE_MSG_PUB.ADD;
264:
265: RAISE FND_API.G_EXC_ERROR;
266: END IF;
267: END IF;
288: AND HEADER_ID = p_header_id; --7312291
289:
290: ELSIF OE_GLOBALS.G_CAPTURED_REASON = 'V' THEN
291: FND_MESSAGE.SET_NAME('ONT','OE_AUDIT_REASON_RQD');
292: OE_MSG_PUB.ADD;
293:
294: RAISE FND_API.G_EXC_ERROR;
295: END IF;
296:
417: AND version_number = l_version_number;
418:
419: ELSIF IS_REASON_RQD <> 'N' THEN
420: FND_MESSAGE.SET_NAME('ONT','OE_AUDIT_REASON_RQD');
421: OE_MSG_PUB.ADD;
422:
423: RAISE FND_API.G_EXC_ERROR;
424:
425: END IF;
467:
468: OE_GLOBALS.G_CASCADING_REQUEST_LOGGED := TRUE;
469: ELSIF OE_ORDER_UTIL.G_HEADER_REC.VERSION_NUMBER < OE_ORDER_UTIL.G_OLD_HEADER_REC.VERSION_NUMBER THEN
470: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_INVALID_REVISION_NUM');
471: OE_MSG_PUB.ADD;
472:
473: RAISE FND_API.G_EXC_ERROR;
474: END IF;
475: END IF;
503: WHEN OTHERS THEN
504: ROLLBACK TO SAVEPOINT Perform_Versioning;
505: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
506:
507: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
508: OE_MSG_PUB.Add_Exc_Msg
509: ( G_PKG_NAME
510: , 'Perform_Versioning'
511: );
504: ROLLBACK TO SAVEPOINT Perform_Versioning;
505: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
506:
507: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
508: OE_MSG_PUB.Add_Exc_Msg
509: ( G_PKG_NAME
510: , 'Perform_Versioning'
511: );
512: END IF;
1183: EXCEPTION
1184: WHEN OTHERS THEN
1185: ROLLBACK TO SAVEPOINT Record_Changed_Records;
1186: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1187: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1188: OE_MSG_PUB.Add_Exc_Msg
1189: ( G_PKG_NAME
1190: , 'Record Changed Records'
1191: );
1184: WHEN OTHERS THEN
1185: ROLLBACK TO SAVEPOINT Record_Changed_Records;
1186: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1187: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1188: OE_MSG_PUB.Add_Exc_Msg
1189: ( G_PKG_NAME
1190: , 'Record Changed Records'
1191: );
1192: END IF;