1: PACKAGE BODY CSD_SPLIT_PKG as
2: /* $Header: csdspltb.pls 120.11.12010000.3 2008/11/06 07:34:15 subhat ship $ */
3: -- Start of Comments
4: -- Package name : CSD_SPLIT_PKG
5: -- Purpose :
1: PACKAGE BODY CSD_SPLIT_PKG as
2: /* $Header: csdspltb.pls 120.11.12010000.3 2008/11/06 07:34:15 subhat ship $ */
3: -- Start of Comments
4: -- Package name : CSD_SPLIT_PKG
5: -- Purpose :
6: -- History :
7: -- NOTE :
8: -- End of Comments
6: -- History :
7: -- NOTE :
8: -- End of Comments
9:
10: G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSD_SPLIT_PKG';
11: G_FILE_NAME CONSTANT VARCHAR2(15) := 'csdspltb.pls';
12:
13: PROCEDURE Split_Repair_Order (
14: p_api_version IN NUMBER,
60: Begin
61:
62: IF(l_procedure_level >= l_debug_level) THEN
63: FND_LOG.STRING(l_procedure_level,
64: 'CSD.PLSQL.CSD_SPLIT_PKG.Split_Repair_Order',
65: 'Entered Split_Repair_Order API');
66: END IF;
67:
68: IF(l_statement_level >= l_debug_level) THEN
66: END IF;
67:
68: IF(l_statement_level >= l_debug_level) THEN
69: FND_LOG.STRING(l_statement_level,
70: 'CSD.PLSQL.CSD_SPLIT_PKG.Split_Repair_Order',
71: 'Enabling the Split_Repair_Order savepoint');
72: END IF;
73:
74: -- Standard Start of API Savepoint
71: 'Enabling the Split_Repair_Order savepoint');
72: END IF;
73:
74: -- Standard Start of API Savepoint
75: SAVEPOINT CSD_SPLIT_PKG ;
76:
77: -- Standard Call to check API compatibility
78: IF NOT FND_API.Compatible_API_Call( l_api_version,
79: p_api_version,
102: x_return_status => x_return_status
103: );
104: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
105: IF(l_statement_level >= l_debug_level) THEN
106: FND_LOG.STRING(l_statement_level,'CSD.PLSQL.CSD_SPLIT_PKG.Build_Repln_Record','failed');
107: END IF;
108: RAISE FND_API.G_EXC_ERROR;
109: END IF;
110:
169: p_rep_line_rec => l_rep_line_rec
170: );
171: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
172: IF(l_statement_level >= l_debug_level) THEN
173: FND_LOG.STRING(l_statement_level,'CSD.PLSQL.CSD_SPLIT_PKG.Create_New_Repair_Order','failed');
174: END IF;
175: RAISE FND_API.G_EXC_ERROR;
176: END IF;
177:
308: p_rep_line_rec => l_rep_line_rec
309: );
310: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
311: IF(l_statement_level >= l_debug_level) THEN
312: FND_LOG.STRING(l_statement_level,'CSD.PLSQL.CSD_SPLIT_PKG.Create_New_Repair_Order','failed');
313: END IF;
314: RAISE FND_API.G_EXC_ERROR;
315: END IF;
316:
398: p_data => x_msg_data
399: );
400: EXCEPTION
401: WHEN FND_API.G_EXC_ERROR THEN
402: ROLLBACK TO CSD_SPLIT_PKG;
403: x_return_status := FND_API.G_RET_STS_ERROR;
404: FND_MSG_PUB.Count_And_Get
405: ( p_count => x_msg_count,
406: p_data => x_msg_data
406: p_data => x_msg_data
407: );
408: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
409: FND_LOG.STRING(FND_LOG.LEVEL_ERROR,
410: 'CSD.PLSQL.CSD_SPLIT_PKG.Split_Repair_Order',
411: 'EXC_ERROR ['||x_msg_data||']');
412: END IF;
413: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
414: ROLLBACK TO CSD_SPLIT_PKG;
410: 'CSD.PLSQL.CSD_SPLIT_PKG.Split_Repair_Order',
411: 'EXC_ERROR ['||x_msg_data||']');
412: END IF;
413: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
414: ROLLBACK TO CSD_SPLIT_PKG;
415: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
416: FND_MSG_PUB.Count_And_Get
417: ( p_count => x_msg_count,
418: p_data => x_msg_data
418: p_data => x_msg_data
419: );
420: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
421: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,
422: 'CSD.PLSQL.CSD_SPLIT_PKG.Split_Repair_Order',
423: 'EXC_UNEXPECTED_ERROR ['||x_msg_data||']');
424: END IF;
425: WHEN OTHERS THEN
426: ROLLBACK TO CSD_SPLIT_PKG;
422: 'CSD.PLSQL.CSD_SPLIT_PKG.Split_Repair_Order',
423: 'EXC_UNEXPECTED_ERROR ['||x_msg_data||']');
424: END IF;
425: WHEN OTHERS THEN
426: ROLLBACK TO CSD_SPLIT_PKG;
427: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
428: IF FND_MSG_PUB.Check_Msg_Level
429: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
430: THEN
438: p_data => x_msg_data
439: );
440: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
441: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,
442: 'CSD.PLSQL.CSD_SPLIT_PKG.Split_Repair_Order',
443: 'SQL Message ['||sqlerrm||']');
444: END IF;
445:
446: End Split_Repair_Order;
538: -- Initialize API return status to success
539: x_return_status := FND_API.G_RET_STS_SUCCESS;
540:
541: IF(l_statement_level >= l_debug_level) THEN
542: FND_LOG.STRING(l_statement_level,'CSD.PLSQL.CSD_SPLIT_PKG.Build_Repln_Record','At the Begin in Build_Repln_Record');
543: END IF;
544:
545: IF NVL(p_repair_line_id,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM THEN
546:
633: END IF;
634:
635: EXCEPTION
636: WHEN FND_API.G_EXC_ERROR THEN
637: ROLLBACK TO CSD_SPLIT_PKG;
638: x_return_status := FND_API.G_RET_STS_ERROR;
639: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
640: ROLLBACK TO CSD_SPLIT_PKG;
641: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
636: WHEN FND_API.G_EXC_ERROR THEN
637: ROLLBACK TO CSD_SPLIT_PKG;
638: x_return_status := FND_API.G_RET_STS_ERROR;
639: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
640: ROLLBACK TO CSD_SPLIT_PKG;
641: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
642: WHEN OTHERS THEN
643: ROLLBACK TO CSD_SPLIT_PKG;
644: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
639: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
640: ROLLBACK TO CSD_SPLIT_PKG;
641: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
642: WHEN OTHERS THEN
643: ROLLBACK TO CSD_SPLIT_PKG;
644: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
645: End Build_Repln_Record;
646:
647:
781:
782: -- Standard call to get message count and if count is 1, get message info.
783: EXCEPTION
784: WHEN FND_API.G_EXC_ERROR THEN
785: ROLLBACK TO CSD_SPLIT_PKG;
786: x_return_status := FND_API.G_RET_STS_ERROR;
787: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
788: ROLLBACK TO CSD_SPLIT_PKG;
789: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
784: WHEN FND_API.G_EXC_ERROR THEN
785: ROLLBACK TO CSD_SPLIT_PKG;
786: x_return_status := FND_API.G_RET_STS_ERROR;
787: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
788: ROLLBACK TO CSD_SPLIT_PKG;
789: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
790: WHEN OTHERS THEN
791: ROLLBACK TO CSD_SPLIT_PKG;
792: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
787: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
788: ROLLBACK TO CSD_SPLIT_PKG;
789: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
790: WHEN OTHERS THEN
791: ROLLBACK TO CSD_SPLIT_PKG;
792: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
793: End Build_Product_TXN_Record;
794:
795:
1000: );
1001:
1002: EXCEPTION
1003: WHEN FND_API.G_EXC_ERROR THEN
1004: ROLLBACK TO CSD_SPLIT_PKG;
1005: x_return_status := FND_API.G_RET_STS_ERROR;
1006: FND_MSG_PUB.Count_And_Get
1007: ( p_count => x_msg_count,
1008: p_data => x_msg_data
1008: p_data => x_msg_data
1009: );
1010: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1011: FND_LOG.STRING(FND_LOG.LEVEL_ERROR,
1012: 'CSD.PLSQL.CSD_SPLIT_PKG.Is_Split_Repair_Order_Allow',
1013: 'EXC_ERROR ['||x_msg_data||']');
1014: END IF;
1015: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1016: ROLLBACK TO CSD_SPLIT_PKG;
1012: 'CSD.PLSQL.CSD_SPLIT_PKG.Is_Split_Repair_Order_Allow',
1013: 'EXC_ERROR ['||x_msg_data||']');
1014: END IF;
1015: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1016: ROLLBACK TO CSD_SPLIT_PKG;
1017: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1018: FND_MSG_PUB.Count_And_Get
1019: ( p_count => x_msg_count,
1020: p_data => x_msg_data
1020: p_data => x_msg_data
1021: );
1022: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1023: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,
1024: 'CSD.PLSQL.CSD_SPLIT_PKG.Is_Split_Repair_Order_Allow',
1025: 'EXC_UNEXPECTED_ERROR ['||x_msg_data||']');
1026: END IF;
1027: WHEN OTHERS THEN
1028: ROLLBACK TO CSD_SPLIT_PKG;
1024: 'CSD.PLSQL.CSD_SPLIT_PKG.Is_Split_Repair_Order_Allow',
1025: 'EXC_UNEXPECTED_ERROR ['||x_msg_data||']');
1026: END IF;
1027: WHEN OTHERS THEN
1028: ROLLBACK TO CSD_SPLIT_PKG;
1029: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1030: IF FND_MSG_PUB.Check_Msg_Level
1031: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1032: THEN
1040: p_data => x_msg_data
1041: );
1042: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1043: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,
1044: 'CSD.PLSQL.CSD_SPLIT_PKG.Is_Split_Repair_Order_Allow',
1045: 'SQL Message ['||sqlerrm||']');
1046: END IF;
1047:
1048: End Is_Split_Repair_Order_Allow;
1126: x_return_status => x_return_status
1127: );
1128: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1129: IF(l_statement_level >= l_debug_level) THEN
1130: FND_LOG.STRING(l_statement_level,'CSD.PLSQL.CSD_SPLIT_PKG.Build_Product_TXN_Record','failed');
1131: END IF;
1132: RAISE FND_API.G_EXC_ERROR;
1133: END IF;
1134:
1203: x_return_status => x_return_status );
1204:
1205: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1206: IF(l_statement_level >= l_debug_level) THEN
1207: FND_LOG.STRING(l_statement_level,'CSD.PLSQL.CSD_SPLIT_PKG.Build_Ship_Prod_Txn_Tbl','failed');
1208: END IF;
1209: RAISE FND_API.G_EXC_ERROR;
1210: END IF;
1211:
1245: p_new_repair_line_id => l_repair_line_id);
1246:
1247: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1248: IF(l_statement_level >= l_debug_level) THEN
1249: FND_LOG.STRING(l_statement_level,'CSD.PLSQL.CSD_SPLIT_PKG.Copy_Repair_History','failed');
1250: END IF;
1251: RAISE FND_API.G_EXC_ERROR;
1252: END IF;
1253:
1263: p_new_repair_line_id => l_repair_line_id);
1264:
1265: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1266: IF(l_statement_level >= l_debug_level) THEN
1267: FND_LOG.STRING(l_statement_level,'CSD.PLSQL.CSD_SPLIT_PKG.Copy_JTF_Notes','failed');
1268: END IF;
1269: RAISE FND_API.G_EXC_ERROR;
1270: END IF;
1271:
1303: );
1304:
1305: EXCEPTION
1306: WHEN FND_API.G_EXC_ERROR THEN
1307: ROLLBACK TO CSD_SPLIT_PKG;
1308: x_return_status := FND_API.G_RET_STS_ERROR;
1309: FND_MSG_PUB.Count_And_Get
1310: ( p_count => x_msg_count,
1311: p_data => x_msg_data
1311: p_data => x_msg_data
1312: );
1313: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1314: FND_LOG.STRING(FND_LOG.LEVEL_ERROR,
1315: 'CSD.PLSQL.CSD_SPLIT_PKG.Create_New_Repair_Order',
1316: 'EXC_ERROR ['||x_msg_data||']');
1317: END IF;
1318: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1319: ROLLBACK TO CSD_SPLIT_PKG;
1315: 'CSD.PLSQL.CSD_SPLIT_PKG.Create_New_Repair_Order',
1316: 'EXC_ERROR ['||x_msg_data||']');
1317: END IF;
1318: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1319: ROLLBACK TO CSD_SPLIT_PKG;
1320: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1321: FND_MSG_PUB.Count_And_Get
1322: ( p_count => x_msg_count,
1323: p_data => x_msg_data
1323: p_data => x_msg_data
1324: );
1325: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1326: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,
1327: 'CSD.PLSQL.CSD_SPLIT_PKG.Create_New_Repair_Order',
1328: 'EXC_UNEXPECTED_ERROR ['||x_msg_data||']');
1329: END IF;
1330: WHEN OTHERS THEN
1331: ROLLBACK TO CSD_SPLIT_PKG;
1327: 'CSD.PLSQL.CSD_SPLIT_PKG.Create_New_Repair_Order',
1328: 'EXC_UNEXPECTED_ERROR ['||x_msg_data||']');
1329: END IF;
1330: WHEN OTHERS THEN
1331: ROLLBACK TO CSD_SPLIT_PKG;
1332: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1333: IF FND_MSG_PUB.Check_Msg_Level
1334: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1335: THEN
1343: p_data => x_msg_data
1344: );
1345: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1346: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,
1347: 'CSD.PLSQL.CSD_SPLIT_PKG.Create_New_Repair_Order',
1348: 'SQL Message ['||sqlerrm||']');
1349: END IF;
1350:
1351: End Create_New_Repair_Order;
1403: x_return_status => x_return_status
1404: );
1405: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1406: IF(l_statement_level >= l_debug_level) THEN
1407: FND_LOG.STRING(l_statement_level,'CSD.PLSQL.CSD_SPLIT_PKG.Build_Repair_History_Record','failed');
1408: END IF;
1409: RAISE FND_API.G_EXC_ERROR;
1410: END IF;
1411:
1449: p_data => x_msg_data
1450: );
1451: EXCEPTION
1452: WHEN FND_API.G_EXC_ERROR THEN
1453: ROLLBACK TO CSD_SPLIT_PKG;
1454: x_return_status := FND_API.G_RET_STS_ERROR;
1455: FND_MSG_PUB.Count_And_Get
1456: ( p_count => x_msg_count,
1457: p_data => x_msg_data
1457: p_data => x_msg_data
1458: );
1459: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1460: FND_LOG.STRING(FND_LOG.LEVEL_ERROR,
1461: 'CSD.PLSQL.CSD_SPLIT_PKG.Copy_Repair_History',
1462: 'EXC_ERROR ['||x_msg_data||']');
1463: END IF;
1464: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1465: ROLLBACK TO CSD_SPLIT_PKG;
1461: 'CSD.PLSQL.CSD_SPLIT_PKG.Copy_Repair_History',
1462: 'EXC_ERROR ['||x_msg_data||']');
1463: END IF;
1464: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1465: ROLLBACK TO CSD_SPLIT_PKG;
1466: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1467: FND_MSG_PUB.Count_And_Get
1468: ( p_count => x_msg_count,
1469: p_data => x_msg_data
1469: p_data => x_msg_data
1470: );
1471: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1472: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,
1473: 'CSD.PLSQL.CSD_SPLIT_PKG.Copy_Repair_History',
1474: 'EXC_UNEXPECTED_ERROR ['||x_msg_data||']');
1475: END IF;
1476: WHEN OTHERS THEN
1477: ROLLBACK TO CSD_SPLIT_PKG;
1473: 'CSD.PLSQL.CSD_SPLIT_PKG.Copy_Repair_History',
1474: 'EXC_UNEXPECTED_ERROR ['||x_msg_data||']');
1475: END IF;
1476: WHEN OTHERS THEN
1477: ROLLBACK TO CSD_SPLIT_PKG;
1478: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1479: IF FND_MSG_PUB.Check_Msg_Level
1480: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1481: THEN
1489: p_data => x_msg_data
1490: );
1491: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1492: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,
1493: 'CSD.PLSQL.CSD_SPLIT_PKG.Copy_Repair_History',
1494: 'SQL Message ['||sqlerrm||']');
1495: END IF;
1496:
1497: End Copy_Repair_History;
1676: );
1677:
1678: EXCEPTION
1679: WHEN FND_API.G_EXC_ERROR THEN
1680: ROLLBACK TO CSD_SPLIT_PKG;
1681: x_return_status := FND_API.G_RET_STS_ERROR;
1682: FND_MSG_PUB.Count_And_Get
1683: ( p_count => x_msg_count,
1684: p_data => x_msg_data
1684: p_data => x_msg_data
1685: );
1686: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1687: FND_LOG.STRING(FND_LOG.LEVEL_ERROR,
1688: 'CSD.PLSQL.CSD_SPLIT_PKG.Copy_JTF_Notes',
1689: 'EXC_ERROR ['||x_msg_data||']');
1690: END IF;
1691: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1692: ROLLBACK TO CSD_SPLIT_PKG;
1688: 'CSD.PLSQL.CSD_SPLIT_PKG.Copy_JTF_Notes',
1689: 'EXC_ERROR ['||x_msg_data||']');
1690: END IF;
1691: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1692: ROLLBACK TO CSD_SPLIT_PKG;
1693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1694: FND_MSG_PUB.Count_And_Get
1695: ( p_count => x_msg_count,
1696: p_data => x_msg_data
1696: p_data => x_msg_data
1697: );
1698: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1699: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,
1700: 'CSD.PLSQL.CSD_SPLIT_PKG.Copy_JTF_Notes',
1701: 'EXC_UNEXPECTED_ERROR ['||x_msg_data||']');
1702: END IF;
1703: WHEN OTHERS THEN
1704: ROLLBACK TO CSD_SPLIT_PKG;
1700: 'CSD.PLSQL.CSD_SPLIT_PKG.Copy_JTF_Notes',
1701: 'EXC_UNEXPECTED_ERROR ['||x_msg_data||']');
1702: END IF;
1703: WHEN OTHERS THEN
1704: ROLLBACK TO CSD_SPLIT_PKG;
1705: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1706: IF FND_MSG_PUB.Check_Msg_Level
1707: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1708: THEN
1716: p_data => x_msg_data
1717: );
1718: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1719: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,
1720: 'CSD.PLSQL.CSD_SPLIT_PKG.Copy_JTF_Notes',
1721: 'SQL Message ['||sqlerrm||']');
1722: END IF;
1723: End Copy_JTF_Notes;
1724:
1900: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1901: END build_ship_prod_txn_tbl;
1902:
1903:
1904: End CSD_SPLIT_PKG;
1905: