59: l_msg_data VARCHAR2(2000);
60:
61:
62: BEGIN
63: -- Standard Start of API Savepoint
64: SAVEPOINT CS_Charge_Create_Order_PUB;
65:
66: -- Standard Call to check API compatibility
67: IF NOT FND_API.Compatible_API_Call( l_api_version,
62: BEGIN
63: -- Standard Start of API Savepoint
64: SAVEPOINT CS_Charge_Create_Order_PUB;
65:
66: -- Standard Call to check API compatibility
67: IF NOT FND_API.Compatible_API_Call( l_api_version,
68: p_api_version,
69: l_api_name,
70: G_PKG_NAME) THEN
207: --
208: -- End of API body
209: --
210:
211: -- Standard check of p_commit.
212: IF FND_API.To_Boolean( p_commit ) THEN
213: COMMIT WORK;
214: END IF;
215:
220: , TO_CHAR(SYSDATE, 'HH24:MI:SSSSS')
221: );
222: END IF;
223:
224: -- Standard call to get message count and if count is 1, get message info.
225: FND_MSG_PUB.Count_And_Get
226: ( p_count => x_msg_count,
227: p_data => x_msg_data
228: );