639: l_counter_reading NUMBER;
640: l_bind_var_value NUMBER;
641: l_bind_var_name VARCHAR2(255);
642: BEGIN
643: -- Standard Start of API savepoint
644: SAVEPOINT VALIDATE_FORMULA;
645:
646: -- Standard call to check for call compatibility.
647: IF NOT FND_API.Compatible_API_Call (l_api_version,
642: BEGIN
643: -- Standard Start of API savepoint
644: SAVEPOINT VALIDATE_FORMULA;
645:
646: -- Standard call to check for call compatibility.
647: IF NOT FND_API.Compatible_API_Call (l_api_version,
648: p_api_version,
649: l_api_name,
650: G_PKG_NAME)
743: x_return_status := FND_API.G_RET_STS_SUCCESS;
744: --
745: -- End of API body
746: --
747: -- Standard check for p_commit
748: IF FND_API.to_Boolean( p_commit )
749: THEN
750: COMMIT WORK;
751: END IF;
748: IF FND_API.to_Boolean( p_commit )
749: THEN
750: COMMIT WORK;
751: END IF;
752: -- Standard call to get message count and if count is 1, get message info.
753: FND_MSG_PUB.Count_And_Get
754: ( p_count => x_msg_count,
755: p_data => x_msg_data
756: );
843: l_bind_varvalc VARCHAR2(240);
844: l_bind_varvaln NUMBER;
845:
846: BEGIN
847: -- Standard Start of API savepoint
848: SAVEPOINT VALIDATE_GRPOP;
849:
850: -- Standard call to check for call compatibility.
851: IF NOT FND_API.Compatible_API_Call ( l_api_version,
846: BEGIN
847: -- Standard Start of API savepoint
848: SAVEPOINT VALIDATE_GRPOP;
849:
850: -- Standard call to check for call compatibility.
851: IF NOT FND_API.Compatible_API_Call ( l_api_version,
852: p_api_version,
853: l_api_name,
854: G_PKG_NAME)
1022: END IF;
1023: --
1024: -- End of API body
1025: --
1026: -- Standard check for p_commit
1027: IF FND_API.to_Boolean( p_commit )
1028: THEN
1029: COMMIT WORK;
1030: END IF;
1027: IF FND_API.to_Boolean( p_commit )
1028: THEN
1029: COMMIT WORK;
1030: END IF;
1031: -- Standard call to get message count and if count is 1, get message info.
1032: FND_MSG_PUB.Count_And_Get
1033: ( p_count => x_msg_count,
1034: p_data => x_msg_data
1035: );
3394:
3395: l_api_name CONSTANT VARCHAR2(30) := 'dump_txn_rec';
3396: l_api_version CONSTANT NUMBER := 1.0;
3397: BEGIN
3398: -- Standard Start of API savepoint
3399: -- SAVEPOINT dump_txn_rec;
3400:
3401: -- Read the debug profiles values in to global variable 7197402
3402: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
3460: (p_txn_tbl IN csi_datastructures_pub.transaction_tbl) IS
3461: l_api_name CONSTANT VARCHAR2(30) := 'dump_txn_tbl';
3462: l_api_version CONSTANT NUMBER := 1.0;
3463: BEGIN
3464: -- Standard Start of API savepoint
3465: SAVEPOINT dump_txn_tbl;
3466: IF p_txn_tbl.COUNT > 0 THEN
3467: FOR tab_row IN p_txn_tbl.FIRST .. p_txn_tbl.LAST
3468: LOOP