111: END IF;
112:
113:
114: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
115: FND_MSG_PUB.initialize ;
116: END IF;
117:
118: X_return_status := FND_API.G_RET_STS_SUCCESS ;
119:
320: IF FND_API.To_Boolean ( p_commit ) THEN
321: COMMIT WORK;
322: END iF;
323:
324: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
325: p_data => X_msg_data );
326:
327: RETURN;
328:
338: IF (c_igc_app_id%ISOPEN) THEN
339: CLOSE c_igc_app_id;
340: END IF;
341:
342: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
343: p_data => X_msg_data );
344:
345: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
346:
352: IF (c_igc_app_id%ISOPEN) THEN
353: CLOSE c_igc_app_id;
354: END IF;
355:
356: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
357: p_data => X_msg_data );
358:
359: WHEN OTHERS THEN
360:
366: IF (c_igc_app_id%ISOPEN) THEN
367: CLOSE c_igc_app_id;
368: END IF;
369:
370: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
371: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
372: l_api_name);
373: END if;
374:
367: CLOSE c_igc_app_id;
368: END IF;
369:
370: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
371: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
372: l_api_name);
373: END if;
374:
375: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
371: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
372: l_api_name);
373: END if;
374:
375: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
376: p_data => X_msg_data );
377:
378:
379: END Insert_Row;
483: END IF;
484:
485:
486: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
487: FND_MSG_PUB.initialize ;
488: END IF;
489:
490: X_return_status := FND_API.G_RET_STS_SUCCESS ;
491:
690: IF FND_API.To_Boolean ( p_commit ) THEN
691: COMMIT WORK;
692: END iF;
693:
694: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
695: p_data => X_msg_data );
696:
697: RETURN;
698:
708: IF (c_igc_app_id%ISOPEN) THEN
709: CLOSE c_igc_app_id;
710: END IF;
711:
712: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
713: p_data => X_msg_data );
714:
715: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
716:
722: IF (c_igc_app_id%ISOPEN) THEN
723: CLOSE c_igc_app_id;
724: END IF;
725:
726: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
727: p_data => X_msg_data );
728:
729: WHEN OTHERS THEN
730:
736: IF (c_igc_app_id%ISOPEN) THEN
737: CLOSE c_igc_app_id;
738: END IF;
739:
740: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
741: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
742: l_api_name);
743: END if;
744:
737: CLOSE c_igc_app_id;
738: END IF;
739:
740: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
741: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
742: l_api_name);
743: END if;
744:
745: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
741: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
742: l_api_name);
743: END if;
744:
745: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
746: p_data => X_msg_data );
747:
748:
749: END Insert_Row;
842: END IF;
843:
844:
845: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
846: FND_MSG_PUB.initialize ;
847: END IF;
848:
849: X_return_status := FND_API.G_RET_STS_SUCCESS ;
850: X_row_locked := FND_API.G_TRUE ;
856:
857: IF (C%NOTFOUND) THEN
858: CLOSE C;
859: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
860: FND_MSG_PUB.Add;
861: RAISE FND_API.G_EXC_ERROR ;
862: END IF;
863:
864: CLOSE C;
1000:
1001: ELSE
1002:
1003: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
1004: FND_MSG_PUB.Add;
1005: RAISE FND_API.G_EXC_ERROR ;
1006:
1007: END IF;
1008:
1009: IF FND_API.To_Boolean ( p_commit ) THEN
1010: COMMIT WORK;
1011: END iF;
1012:
1013: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1014: p_data => X_msg_data );
1015:
1016: RETURN;
1017:
1021:
1022: ROLLBACK TO Lock_Row_Pvt ;
1023: X_row_locked := FND_API.G_FALSE;
1024: X_return_status := FND_API.G_RET_STS_ERROR;
1025: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1026: p_data => X_msg_data );
1027:
1028: WHEN FND_API.G_EXC_ERROR THEN
1029:
1028: WHEN FND_API.G_EXC_ERROR THEN
1029:
1030: ROLLBACK TO Lock_Row_Pvt ;
1031: X_return_status := FND_API.G_RET_STS_ERROR;
1032: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1033: p_data => X_msg_data );
1034:
1035: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1036:
1035: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1036:
1037: ROLLBACK TO Lock_Row_Pvt ;
1038: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1039: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1040: p_data => X_msg_data );
1041:
1042: WHEN OTHERS THEN
1043:
1043:
1044: ROLLBACK TO Lock_Row_Pvt ;
1045: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1046:
1047: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1048: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
1049: l_api_name);
1050: END if;
1051:
1044: ROLLBACK TO Lock_Row_Pvt ;
1045: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1046:
1047: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1048: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
1049: l_api_name);
1050: END if;
1051:
1052: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1048: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
1049: l_api_name);
1050: END if;
1051:
1052: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1053: p_data => X_msg_data );
1054:
1055: END Lock_Row;
1056:
1139: END IF;
1140:
1141:
1142: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
1143: FND_MSG_PUB.initialize ;
1144: END IF;
1145:
1146: X_return_status := FND_API.G_RET_STS_SUCCESS ;
1147:
1208: IF FND_API.To_Boolean ( p_commit ) THEN
1209: COMMIT WORK;
1210: END IF;
1211:
1212: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1213: p_data => X_msg_data );
1214:
1215: EXCEPTION
1216:
1217: WHEN FND_API.G_EXC_ERROR THEN
1218:
1219: ROLLBACK TO Update_Row_Pvt ;
1220: X_return_status := FND_API.G_RET_STS_ERROR;
1221: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1222: p_data => X_msg_data );
1223:
1224: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1225:
1224: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1225:
1226: ROLLBACK TO Update_Row_Pvt ;
1227: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1228: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1229: p_data => X_msg_data );
1230:
1231: WHEN OTHERS THEN
1232:
1232:
1233: ROLLBACK TO Update_Row_Pvt ;
1234: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1235:
1236: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1237: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
1238: l_api_name);
1239: END if;
1240:
1233: ROLLBACK TO Update_Row_Pvt ;
1234: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1235:
1236: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1237: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
1238: l_api_name);
1239: END if;
1240:
1241: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1237: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
1238: l_api_name);
1239: END if;
1240:
1241: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1242: p_data => X_msg_data );
1243:
1244:
1245: END Update_Row;
1329: END IF;
1330:
1331:
1332: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
1333: FND_MSG_PUB.initialize ;
1334: END IF;
1335:
1336: X_return_status := FND_API.G_RET_STS_SUCCESS ;
1337:
1397: IF FND_API.To_Boolean ( p_commit ) THEN
1398: COMMIT WORK;
1399: END iF;
1400:
1401: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1402: p_data => X_msg_data );
1403:
1404: EXCEPTION
1405:
1406: WHEN FND_API.G_EXC_ERROR THEN
1407:
1408: ROLLBACK TO Update_Row_Pvt ;
1409: X_return_status := FND_API.G_RET_STS_ERROR;
1410: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1411: p_data => X_msg_data );
1412:
1413: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1414:
1413: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1414:
1415: ROLLBACK TO Update_Row_Pvt ;
1416: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1417: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1418: p_data => X_msg_data );
1419:
1420: WHEN OTHERS THEN
1421:
1421:
1422: ROLLBACK TO Update_Row_Pvt ;
1423: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1424:
1425: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1426: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
1427: l_api_name);
1428: END if;
1429:
1422: ROLLBACK TO Update_Row_Pvt ;
1423: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1424:
1425: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1426: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
1427: l_api_name);
1428: END if;
1429:
1430: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1426: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
1427: l_api_name);
1428: END if;
1429:
1430: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1431: p_data => X_msg_data );
1432:
1433:
1434: END Update_Row;
1467: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1468: END IF;
1469:
1470: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
1471: FND_MSG_PUB.initialize ;
1472: END IF ;
1473:
1474: X_return_status := FND_API.G_RET_STS_SUCCESS ;
1475:
1484: IF FND_API.To_Boolean ( p_commit ) THEN
1485: COMMIT WORK;
1486: END iF;
1487:
1488: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1489: p_data => X_msg_data );
1490:
1491: EXCEPTION
1492:
1493: WHEN FND_API.G_EXC_ERROR THEN
1494:
1495: ROLLBACK TO Delete_Row_Pvt ;
1496: X_return_status := FND_API.G_RET_STS_ERROR;
1497: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1498: p_data => X_msg_data );
1499:
1500: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1501:
1500: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1501:
1502: ROLLBACK TO Delete_Row_Pvt ;
1503: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1504: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1505: p_data => X_msg_data );
1506:
1507: WHEN OTHERS THEN
1508:
1508:
1509: ROLLBACK TO Delete_Row_Pvt ;
1510: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1511:
1512: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1513: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
1514: l_api_name);
1515: END if;
1516:
1509: ROLLBACK TO Delete_Row_Pvt ;
1510: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1511:
1512: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1513: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
1514: l_api_name);
1515: END if;
1516:
1517: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1513: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
1514: l_api_name);
1515: END if;
1516:
1517: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1518: p_data => X_msg_data );
1519:
1520: END Delete_Row;
1521: