[Home] [Help]
1: PACKAGE BODY CSD_REPAIR_ACTUAL_LINES_PVT as
2: /* $Header: csdvalnb.pls 120.6 2008/05/20 22:44:19 swai ship $ */
3:
4:
5: --G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSD_REPAIR_ACTUAL_LINES_PVT';
1: PACKAGE BODY CSD_REPAIR_ACTUAL_LINES_PVT as
2: /* $Header: csdvalnb.pls 120.6 2008/05/20 22:44:19 swai ship $ */
3:
4:
5: --G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSD_REPAIR_ACTUAL_LINES_PVT';
6: G_FILE_NAME CONSTANT VARCHAR2(12) := 'csdvclnb.pls';
7:
8: -- Global variable for storing the debug level
9: G_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
51: l_event_level number := FND_LOG.LEVEL_EVENT;
52: l_excep_level number := FND_LOG.LEVEL_EXCEPTION;
53: l_error_level number := FND_LOG.LEVEL_ERROR;
54: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED;
55: l_mod_name varchar2(2000) := 'csd.plsql.csd_repair_actual_lines_pvt.create_repair_actual_lines';
56:
57: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_REPAIR_ACTUAL_LINES';
58: l_api_version CONSTANT NUMBER := 1.0;
59: l_msg_count NUMBER;
320: --
321: -- API body
322: --
323: IF ( Fnd_Log.Level_Procedure >= G_debug_level) THEN
324: FND_LOG.STRING(Fnd_Log.Level_Procedure,l_mod_name,'Call to CSD_REPAIR_ACTUAL_LINES_REC_PKG.Insert_Row');
325: END IF;
326:
327: IF ( Fnd_Log.Level_Statement >= G_debug_level) THEN
328: FND_LOG.STRING(Fnd_Log.Level_Statement,l_mod_name,'Required columns: ');
336: END IF;
337:
338: BEGIN
339: -- Call table handler CSD_REPAIR_ACTUALS_LINES_PKG.Insert_Row to
340: -- insert the record into CSD_REPAIR_ACTUAL_LINES
341: -- Invoke table handler(CSD_REPAIR_ACTUAL_LINES_PKG.Insert_Row)
342: CSD_REPAIR_ACTUAL_LINES_PKG.Insert_Row(
343: px_REPAIR_ACTUAL_LINE_ID => px_CSD_ACTUAL_LINES_REC.REPAIR_ACTUAL_LINE_ID
344: ,p_OBJECT_VERSION_NUMBER => px_CSD_ACTUAL_LINES_REC.OBJECT_VERSION_NUMBER
337:
338: BEGIN
339: -- Call table handler CSD_REPAIR_ACTUALS_LINES_PKG.Insert_Row to
340: -- insert the record into CSD_REPAIR_ACTUAL_LINES
341: -- Invoke table handler(CSD_REPAIR_ACTUAL_LINES_PKG.Insert_Row)
342: CSD_REPAIR_ACTUAL_LINES_PKG.Insert_Row(
343: px_REPAIR_ACTUAL_LINE_ID => px_CSD_ACTUAL_LINES_REC.REPAIR_ACTUAL_LINE_ID
344: ,p_OBJECT_VERSION_NUMBER => px_CSD_ACTUAL_LINES_REC.OBJECT_VERSION_NUMBER
345: ,p_ESTIMATE_DETAIL_ID => px_CSD_ACTUAL_LINES_REC.ESTIMATE_DETAIL_ID
338: BEGIN
339: -- Call table handler CSD_REPAIR_ACTUALS_LINES_PKG.Insert_Row to
340: -- insert the record into CSD_REPAIR_ACTUAL_LINES
341: -- Invoke table handler(CSD_REPAIR_ACTUAL_LINES_PKG.Insert_Row)
342: CSD_REPAIR_ACTUAL_LINES_PKG.Insert_Row(
343: px_REPAIR_ACTUAL_LINE_ID => px_CSD_ACTUAL_LINES_REC.REPAIR_ACTUAL_LINE_ID
344: ,p_OBJECT_VERSION_NUMBER => px_CSD_ACTUAL_LINES_REC.OBJECT_VERSION_NUMBER
345: ,p_ESTIMATE_DETAIL_ID => px_CSD_ACTUAL_LINES_REC.ESTIMATE_DETAIL_ID
346: ,p_REPAIR_ACTUAL_ID => px_CSD_ACTUAL_LINES_REC.REPAIR_ACTUAL_ID
398: ,p_LOC_SEGMENT19 => px_CSD_ACTUAL_LINES_REC.LOC_SEGMENT19
399: ,p_LOC_SEGMENT20 => px_CSD_ACTUAL_LINES_REC.LOC_SEGMENT20);
400:
401: IF ( Fnd_Log.Level_Procedure >= G_debug_level) THEN
402: FND_LOG.STRING(Fnd_Log.Level_Procedure,l_mod_name,'Returned from CSD_REPAIR_ACTUAL_LINES_REC_PKG.Insert_Row');
403: END IF;
404:
405: EXCEPTION
406: WHEN OTHERS THEN
404:
405: EXCEPTION
406: WHEN OTHERS THEN
407: IF ( Fnd_Log.Level_Exception >= G_debug_level) THEN
408: FND_LOG.STRING(Fnd_Log.Level_Exception,l_mod_name,'Others exception in CSD_REPAIR_ACTUAL_LINES_PKG.Insert_Row Call :'||SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1,255));
409: END IF;
410: x_return_status := FND_API.G_RET_STS_ERROR;
411: END;
412:
437: --
438: -- API body
439: --
440: IF ( Fnd_Log.Level_Procedure >= G_debug_level) THEN
441: FND_LOG.STRING(Fnd_Log.Level_Procedure,l_mod_name,'Call to CSD_REPAIR_ACTUAL_LINES_REC_PKG.Insert_Row');
442: END IF;
443:
444: IF ( Fnd_Log.Level_Statement >= G_debug_level) THEN
445: FND_LOG.STRING(Fnd_Log.Level_Statement,l_mod_name,'Required columns: ');
453: END IF;
454:
455: BEGIN
456: -- Call table handler CSD_REPAIR_ACTUALS_LINES_PKG.Insert_Row to
457: -- insert the record into CSD_REPAIR_ACTUAL_LINES
458: -- Invoke table handler(CSD_REPAIR_ACTUAL_LINES_PKG.Insert_Row)
459: CSD_REPAIR_ACTUAL_LINES_PKG.Insert_Row(
460: px_REPAIR_ACTUAL_LINE_ID => px_CSD_ACTUAL_LINES_REC.REPAIR_ACTUAL_LINE_ID
461: ,p_OBJECT_VERSION_NUMBER => px_CSD_ACTUAL_LINES_REC.OBJECT_VERSION_NUMBER
454:
455: BEGIN
456: -- Call table handler CSD_REPAIR_ACTUALS_LINES_PKG.Insert_Row to
457: -- insert the record into CSD_REPAIR_ACTUAL_LINES
458: -- Invoke table handler(CSD_REPAIR_ACTUAL_LINES_PKG.Insert_Row)
459: CSD_REPAIR_ACTUAL_LINES_PKG.Insert_Row(
460: px_REPAIR_ACTUAL_LINE_ID => px_CSD_ACTUAL_LINES_REC.REPAIR_ACTUAL_LINE_ID
461: ,p_OBJECT_VERSION_NUMBER => px_CSD_ACTUAL_LINES_REC.OBJECT_VERSION_NUMBER
462: ,p_ESTIMATE_DETAIL_ID => px_CSD_ACTUAL_LINES_REC.ESTIMATE_DETAIL_ID
455: BEGIN
456: -- Call table handler CSD_REPAIR_ACTUALS_LINES_PKG.Insert_Row to
457: -- insert the record into CSD_REPAIR_ACTUAL_LINES
458: -- Invoke table handler(CSD_REPAIR_ACTUAL_LINES_PKG.Insert_Row)
459: CSD_REPAIR_ACTUAL_LINES_PKG.Insert_Row(
460: px_REPAIR_ACTUAL_LINE_ID => px_CSD_ACTUAL_LINES_REC.REPAIR_ACTUAL_LINE_ID
461: ,p_OBJECT_VERSION_NUMBER => px_CSD_ACTUAL_LINES_REC.OBJECT_VERSION_NUMBER
462: ,p_ESTIMATE_DETAIL_ID => px_CSD_ACTUAL_LINES_REC.ESTIMATE_DETAIL_ID
463: ,p_REPAIR_ACTUAL_ID => px_CSD_ACTUAL_LINES_REC.REPAIR_ACTUAL_ID
518:
519: EXCEPTION
520: WHEN OTHERS THEN
521: IF ( Fnd_Log.Level_Exception >= G_debug_level) THEN
522: FND_LOG.STRING(Fnd_Log.Level_Exception,l_mod_name,'Others exception in CSD_REPAIR_ACTUAL_LINES_PKG.Insert_Row Call :'||SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1,255));
523: END IF;
524: x_return_status := FND_API.G_RET_STS_ERROR;
525: END;
526:
773: --
774: -- API body
775: --
776: IF ( Fnd_Log.Level_Procedure >= G_debug_level) THEN
777: FND_LOG.STRING(Fnd_Log.Level_Procedure,l_mod_name,'Call to CSD_REPAIR_ACTUAL_LINES_REC_PKG.Insert_Row');
778: END IF;
779:
780: BEGIN
781: -- Call table handler CSD_REPAIR_ACTUALS_LINES_PKG.Insert_Row to
778: END IF;
779:
780: BEGIN
781: -- Call table handler CSD_REPAIR_ACTUALS_LINES_PKG.Insert_Row to
782: -- insert the record into CSD_REPAIR_ACTUAL_LINES
783: -- Invoke table handler(CSD_REPAIR_ACTUAL_LINES_PKG.Insert_Row)
784: CSD_REPAIR_ACTUAL_LINES_PKG.Insert_Row(
785: px_REPAIR_ACTUAL_LINE_ID => px_CSD_ACTUAL_LINES_REC.REPAIR_ACTUAL_LINE_ID
786: ,p_OBJECT_VERSION_NUMBER => px_CSD_ACTUAL_LINES_REC.OBJECT_VERSION_NUMBER
779:
780: BEGIN
781: -- Call table handler CSD_REPAIR_ACTUALS_LINES_PKG.Insert_Row to
782: -- insert the record into CSD_REPAIR_ACTUAL_LINES
783: -- Invoke table handler(CSD_REPAIR_ACTUAL_LINES_PKG.Insert_Row)
784: CSD_REPAIR_ACTUAL_LINES_PKG.Insert_Row(
785: px_REPAIR_ACTUAL_LINE_ID => px_CSD_ACTUAL_LINES_REC.REPAIR_ACTUAL_LINE_ID
786: ,p_OBJECT_VERSION_NUMBER => px_CSD_ACTUAL_LINES_REC.OBJECT_VERSION_NUMBER
787: ,p_ESTIMATE_DETAIL_ID => px_CSD_ACTUAL_LINES_REC.ESTIMATE_DETAIL_ID
780: BEGIN
781: -- Call table handler CSD_REPAIR_ACTUALS_LINES_PKG.Insert_Row to
782: -- insert the record into CSD_REPAIR_ACTUAL_LINES
783: -- Invoke table handler(CSD_REPAIR_ACTUAL_LINES_PKG.Insert_Row)
784: CSD_REPAIR_ACTUAL_LINES_PKG.Insert_Row(
785: px_REPAIR_ACTUAL_LINE_ID => px_CSD_ACTUAL_LINES_REC.REPAIR_ACTUAL_LINE_ID
786: ,p_OBJECT_VERSION_NUMBER => px_CSD_ACTUAL_LINES_REC.OBJECT_VERSION_NUMBER
787: ,p_ESTIMATE_DETAIL_ID => px_CSD_ACTUAL_LINES_REC.ESTIMATE_DETAIL_ID
788: ,p_REPAIR_ACTUAL_ID => px_CSD_ACTUAL_LINES_REC.REPAIR_ACTUAL_ID
843:
844: EXCEPTION
845: WHEN OTHERS THEN
846: IF ( Fnd_Log.Level_Exception >= G_debug_level) THEN
847: FND_LOG.STRING(Fnd_Log.Level_Exception,l_mod_name,'Others exception in CSD_REPAIR_ACTUAL_LINES_PKG.Insert_Row Call :'||SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1,255));
848: END IF;
849: x_return_status := FND_API.G_RET_STS_ERROR;
850: END;
851:
953: l_event_level number := FND_LOG.LEVEL_EVENT;
954: l_excep_level number := FND_LOG.LEVEL_EXCEPTION;
955: l_error_level number := FND_LOG.LEVEL_ERROR;
956: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED;
957: l_mod_name varchar2(2000) := 'csd.plsql.csd_repair_actual_lines_pvt.update_repair_actual_lines';
958:
959: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_REPAIR_ACTUAL_LINES';
960: l_api_version CONSTANT NUMBER := 1.0;
961: l_msg_count NUMBER;
984: WHERE estimate_detail_id = p_est_det_id;
985:
986: CURSOR repair_actual_lines(p_actual_line_id IN NUMBER) IS
987: SELECT a.object_version_number
988: FROM csd_repair_actual_lines a,
989: csd_repairs b
990: WHERE a.repair_line_id = b.repair_line_id
991: and a.repair_actual_line_id = p_actual_line_id;
992:
1065: IF ( Fnd_Log.Level_Statement >= G_debug_level) THEN
1066: FND_LOG.STRING(Fnd_Log.Level_Statement,l_mod_name,'End Validate Repair Line id');
1067: END IF;
1068:
1069: -- Validate the repair actual line id against csd_repair_actual_lines
1070: -- If it is invalid then raise FND_API.G_EXC_ERROR
1071: IF NVL(px_CSD_ACTUAL_LINES_REC.repair_actual_line_id,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM THEN
1072:
1073: OPEN repair_actual_lines(px_CSD_ACTUAL_LINES_REC.repair_actual_line_id);
1164: from csd_product_transactions
1165: where repair_line_id = px_CSD_ACTUAL_LINES_REC.REPAIR_LINE_ID
1166: union
1167: select estimate_detail_id
1168: from csd_repair_actual_lines
1169: where repair_actual_id=px_CSD_ACTUAL_LINES_REC.REPAIR_ACTUAL_ID)
1170: and ced.order_header_id is not null
1171: and ooh.open_flag = 'Y'
1172: and nvl(ooh.cancelled_flag,'N') = 'N'
1194: from csd_product_transactions
1195: where repair_line_id = px_CSD_ACTUAL_LINES_REC.REPAIR_LINE_ID
1196: union
1197: select estimate_detail_id
1198: from csd_repair_actual_lines
1199: where repair_actual_id=px_CSD_ACTUAL_LINES_REC.REPAIR_ACTUAL_ID)
1200: and ced.order_header_id is not null
1201: and ooh.open_flag = 'Y'
1202: and nvl(ooh.cancelled_flag,'N') = 'N'
1305: RAISE FND_API.G_EXC_ERROR;
1306: END;
1307:
1308: IF ( Fnd_Log.Level_Procedure >= G_debug_level) THEN
1309: FND_LOG.STRING(Fnd_Log.Level_Procedure,l_mod_name,'Call to CSD_REPAIR_ACTUAL_LINES_REC_PKG.Update_Row');
1310: END IF;
1311:
1312: BEGIN
1313: -- Invoke table handler(CSD_REPAIR_ACTUAL_LINES_PKG.Update_Row)
1309: FND_LOG.STRING(Fnd_Log.Level_Procedure,l_mod_name,'Call to CSD_REPAIR_ACTUAL_LINES_REC_PKG.Update_Row');
1310: END IF;
1311:
1312: BEGIN
1313: -- Invoke table handler(CSD_REPAIR_ACTUAL_LINES_PKG.Update_Row)
1314: CSD_REPAIR_ACTUAL_LINES_PKG.Update_Row(
1315: p_REPAIR_ACTUAL_LINE_ID => px_CSD_ACTUAL_LINES_REC.REPAIR_ACTUAL_LINE_ID
1316: ,p_OBJECT_VERSION_NUMBER => px_CSD_ACTUAL_LINES_REC.OBJECT_VERSION_NUMBER
1317: ,p_ESTIMATE_DETAIL_ID => px_CSD_ACTUAL_LINES_REC.ESTIMATE_DETAIL_ID
1310: END IF;
1311:
1312: BEGIN
1313: -- Invoke table handler(CSD_REPAIR_ACTUAL_LINES_PKG.Update_Row)
1314: CSD_REPAIR_ACTUAL_LINES_PKG.Update_Row(
1315: p_REPAIR_ACTUAL_LINE_ID => px_CSD_ACTUAL_LINES_REC.REPAIR_ACTUAL_LINE_ID
1316: ,p_OBJECT_VERSION_NUMBER => px_CSD_ACTUAL_LINES_REC.OBJECT_VERSION_NUMBER
1317: ,p_ESTIMATE_DETAIL_ID => px_CSD_ACTUAL_LINES_REC.ESTIMATE_DETAIL_ID
1318: ,p_REPAIR_ACTUAL_ID => px_CSD_ACTUAL_LINES_REC.REPAIR_ACTUAL_ID
1373:
1374: EXCEPTION
1375: WHEN OTHERS THEN
1376: IF ( Fnd_Log.Level_Exception >= G_debug_level) THEN
1377: FND_LOG.STRING(Fnd_Log.Level_Exception,l_mod_name,'Others exception in CSD_REPAIR_ACTUAL_LINES_PKG.Update_Row Cal:'||SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1,255));
1378: END IF;
1379: RAISE FND_API.G_EXC_ERROR;
1380: END;
1381: --
1475: l_event_level number := FND_LOG.LEVEL_EVENT;
1476: l_excep_level number := FND_LOG.LEVEL_EXCEPTION;
1477: l_error_level number := FND_LOG.LEVEL_ERROR;
1478: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED;
1479: l_mod_name varchar2(2000) := 'csd.plsql.csd_repair_actual_lines_pvt.delete_repair_actual_lines';
1480:
1481:
1482: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_REPAIR_ACTUAL_LINES';
1483: l_api_version CONSTANT NUMBER := 1.0;
1500: CURSOR repair_actual_lines(p_actual_line_id IN NUMBER) IS
1501: SELECT
1502: a.repair_actual_line_id,
1503: a.object_version_number
1504: FROM csd_repair_actual_lines a,
1505: csd_repairs b
1506: WHERE a.repair_line_id = b.repair_line_id
1507: and a.repair_actual_line_id = p_actual_line_id;
1508:
1577: -- Check the actual_source_code in Repair_Actual_Lines_Rec
1578:
1579: IF (px_CSD_ACTUAL_LINES_REC.actual_source_code in ('MANUAL', 'ESTIMATE')) then
1580:
1581: -- Validate the repair actual line id against csd_repair_actual_lines
1582: -- If it is interfaced then raise FND_API.G_EXC_ERROR
1583: IF NVL(px_CSD_ACTUAL_LINES_REC.repair_actual_line_id,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM THEN
1584:
1585: OPEN repair_actual_lines(px_CSD_ACTUAL_LINES_REC.repair_actual_line_id);
1661: RAISE FND_API.G_EXC_ERROR;
1662: END IF;
1663:
1664: IF ( Fnd_Log.Level_Procedure >= G_debug_level) THEN
1665: FND_LOG.STRING(Fnd_Log.Level_Procedure,l_mod_name,'Call to CSD_REPAIR_ACTUAL_LINES_PKG.Delete_Row');
1666: END IF;
1667:
1668: BEGIN
1669:
1666: END IF;
1667:
1668: BEGIN
1669:
1670: -- Invoke table handler(CSD_REPAIR_ACTUAL_LINES_PKG.Delete_Row)
1671: CSD_REPAIR_ACTUAL_LINES_PKG.Delete_Row(
1672: p_REPAIR_ACTUAL_LINE_ID => px_CSD_ACTUAL_LINES_REC.REPAIR_ACTUAL_LINE_ID
1673: ,p_OBJECT_VERSION_NUMBER => px_CSD_ACTUAL_LINES_REC.OBJECT_VERSION_NUMBER);
1674:
1667:
1668: BEGIN
1669:
1670: -- Invoke table handler(CSD_REPAIR_ACTUAL_LINES_PKG.Delete_Row)
1671: CSD_REPAIR_ACTUAL_LINES_PKG.Delete_Row(
1672: p_REPAIR_ACTUAL_LINE_ID => px_CSD_ACTUAL_LINES_REC.REPAIR_ACTUAL_LINE_ID
1673: ,p_OBJECT_VERSION_NUMBER => px_CSD_ACTUAL_LINES_REC.OBJECT_VERSION_NUMBER);
1674:
1675: EXCEPTION
1674:
1675: EXCEPTION
1676: WHEN OTHERS THEN
1677: IF ( Fnd_Log.Level_Exception >= G_debug_level) THEN
1678: FND_LOG.STRING(Fnd_Log.Level_Exception,l_mod_name,'Others exception in CSD_REPAIR_ACTUAL_LINES_PKG.Delete_Row Call :'||SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1,255));
1679: END IF;
1680: x_return_status := FND_API.G_RET_STS_ERROR;
1681: END;
1682:
1779: l_event_level number := FND_LOG.LEVEL_EVENT;
1780: l_excep_level number := FND_LOG.LEVEL_EXCEPTION;
1781: l_error_level number := FND_LOG.LEVEL_ERROR;
1782: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED;
1783: l_mod_name varchar2(2000) := 'csd.plsql.csd_repair_actual_lines_pvt.lock_repair_actual_lines';
1784:
1785: l_api_name CONSTANT VARCHAR2(30) := 'LOCK_REPAIR_ACTUAL_LINES';
1786: l_api_version CONSTANT NUMBER := 1.0;
1787: l_msg_count NUMBER;
1838: --
1839: -- API body
1840: --
1841: IF ( Fnd_Log.Level_Procedure >= G_debug_level) THEN
1842: FND_LOG.STRING(Fnd_Log.Level_Procedure,l_mod_name,'Call to CSD_REPAIR_ACTUAL_LINES_PKG.Lock_Row');
1843: END IF;
1844:
1845: BEGIN
1846:
1843: END IF;
1844:
1845: BEGIN
1846:
1847: -- Invoke table handler(CSD_REPAIR_ACTUAL_LINES_PKG.Lock_Row)
1848: CSD_REPAIR_ACTUAL_LINES_PKG.Lock_Row(
1849: p_REPAIR_ACTUAL_LINE_ID => px_CSD_ACTUAL_LINES_REC.REPAIR_ACTUAL_LINE_ID
1850: ,p_OBJECT_VERSION_NUMBER => px_CSD_ACTUAL_LINES_REC.OBJECT_VERSION_NUMBER);
1851:
1844:
1845: BEGIN
1846:
1847: -- Invoke table handler(CSD_REPAIR_ACTUAL_LINES_PKG.Lock_Row)
1848: CSD_REPAIR_ACTUAL_LINES_PKG.Lock_Row(
1849: p_REPAIR_ACTUAL_LINE_ID => px_CSD_ACTUAL_LINES_REC.REPAIR_ACTUAL_LINE_ID
1850: ,p_OBJECT_VERSION_NUMBER => px_CSD_ACTUAL_LINES_REC.OBJECT_VERSION_NUMBER);
1851:
1852: EXCEPTION
1851:
1852: EXCEPTION
1853: WHEN OTHERS THEN
1854: IF ( Fnd_Log.Level_Exception >= G_debug_level) THEN
1855: FND_LOG.STRING(Fnd_Log.Level_Exception,l_mod_name,'Others exception in CSD_REPAIR_ACTUAL_LINES_PKG.Lock_Row Call :'||SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1,255));
1856: END IF;
1857: x_return_status := FND_API.G_RET_STS_ERROR;
1858: END;
1859:
1912: p_data => x_msg_data );
1913:
1914: End LOCK_REPAIR_ACTUAL_LINES;
1915:
1916: End CSD_REPAIR_ACTUAL_LINES_PVT;