34: --| |
35: --| Valid values for message levels are from 1-50. |
36: --| 1 being least severe and 50 highest. |
37: --| |
38: --| The pre-defined levels correspond to standard API |
39: --| return status. Debug levels are used to control the amount of |
40: --| debug information a program writes to the PL/SQL message table. |
41: --| |
42: --| G_MSG_LVL_UNEXP_ERROR CONSTANT NUMBER := 60; |
181: l_no_rows_ins NUMBER(10) ;
182:
183: BEGIN
184:
185: -- Standard Start of API savepoint
186: SAVEPOINT Create_Alloc_Definition_PUB;
187:
188: -- Initialize message list if p_init_msg_list is set to TRUE.
189: IF FND_API.to_Boolean( p_init_msg_list ) THEN
189: IF FND_API.to_Boolean( p_init_msg_list ) THEN
190: FND_MSG_PUB.initialize;
191: END IF;
192:
193: -- Standard call to check for call compatibility.
194: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
195: p_api_version ,
196: l_api_name ,
197: G_PKG_NAME )
289: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN -- Bug 2659435
290: log_msg('1 row inserted');
291: END IF;
292:
293: -- Standard check of p_commit.
294: IF FND_API.To_Boolean( p_commit ) THEN
295: COMMIT WORK;
296: END IF;
297:
294: IF FND_API.To_Boolean( p_commit ) THEN
295: COMMIT WORK;
296: END IF;
297:
298: -- Standard call to get message count and if count is 1, get message info.
299: FND_MSG_PUB.Count_And_Get
300: ( p_count => x_msg_count ,
301: p_data => x_msg_data
302: );
388: l_count NUMBER(10) ;
389: l_data VARCHAR2(2000) ;
390:
391: BEGIN
392: -- Standard Start of API savepoint
393: SAVEPOINT Update_Alloc_Definition_PUB;
394:
395: -- Initialize message list if p_init_msg_list is set to TRUE.
396: IF FND_API.to_Boolean( p_init_msg_list ) THEN
396: IF FND_API.to_Boolean( p_init_msg_list ) THEN
397: FND_MSG_PUB.initialize;
398: END IF;
399:
400: -- Standard call to check for call compatibility.
401: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
402: p_api_version ,
403: l_api_name ,
404: G_PKG_NAME )
499: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN -- Bug 2659435
500: log_msg( l_no_rows_upd || ' rows updated.');
501: END IF;
502:
503: -- Standard check of p_commit.
504: IF FND_API.To_Boolean( p_commit ) THEN
505: COMMIT WORK;
506: END IF;
507:
504: IF FND_API.To_Boolean( p_commit ) THEN
505: COMMIT WORK;
506: END IF;
507:
508: -- Standard call to get message count and if count is 1, get message info.
509: FND_MSG_PUB.Count_And_Get
510: ( p_count => x_msg_count ,
511: p_data => x_msg_data
512: );
598: l_data VARCHAR2(2000) ;
599:
600: BEGIN
601:
602: -- Standard Start of API savepoint
603: SAVEPOINT Delete_Alloc_Definition_PUB;
604:
605: -- Initialize message list if p_init_msg_list is set to TRUE.
606: IF FND_API.to_Boolean( p_init_msg_list ) THEN
606: IF FND_API.to_Boolean( p_init_msg_list ) THEN
607: FND_MSG_PUB.initialize;
608: END IF;
609:
610: -- Standard call to check for call compatibility.
611: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
612: p_api_version ,
613: l_api_name ,
614: G_PKG_NAME )
707: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN -- Bug 2659435
708: log_msg(l_no_rows_del || ' row(s) deleted.');
709: END IF;
710:
711: -- Standard check of p_commit.
712: IF FND_API.To_Boolean( p_commit ) THEN
713: COMMIT WORK;
714: END IF;
715:
712: IF FND_API.To_Boolean( p_commit ) THEN
713: COMMIT WORK;
714: END IF;
715:
716: -- Standard call to get message count and if count is 1, get message info.
717: FND_MSG_PUB.Count_And_Get
718: ( p_count => x_msg_count ,
719: p_data => x_msg_data
720: );
803: l_data VARCHAR2(2000) ;
804:
805: BEGIN
806:
807: -- Standard Start of API savepoint
808: SAVEPOINT Get_Resource_Cost_PUB;
809:
810: -- Initialize message list if p_init_msg_list is set to TRUE.
811: IF FND_API.to_Boolean( p_init_msg_list ) THEN
811: IF FND_API.to_Boolean( p_init_msg_list ) THEN
812: FND_MSG_PUB.initialize;
813: END IF;
814:
815: -- Standard call to check for call compatibility.
816: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
817: p_api_version ,
818: l_api_name ,
819: G_PKG_NAME )
855: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
856: END IF;
857:
858: /*
859: -- Standard check of p_commit.
860: IF FND_API.To_Boolean( p_commit ) THEN
861: COMMIT WORK;
862: END IF;
863: */
860: IF FND_API.To_Boolean( p_commit ) THEN
861: COMMIT WORK;
862: END IF;
863: */
864: -- Standard call to get message count and if count is 1, get message info.
865: FND_MSG_PUB.Count_And_Get
866: ( p_count => x_msg_count ,
867: p_data => x_msg_data
868: );