DBA Data[Home] [Help]

APPS.AS_INTEREST_TYPES_PUB dependencies on FND_API

Line 97: IF FND_API.to_Boolean( p_init_msg_list ) THEN

93: -- Standard Start of API SavePoint
94: SAVEPOINT create_interest_type_PUB;
95:
96: -- Initialize message list if p_init_msg_list is set to TRUE.
97: IF FND_API.to_Boolean( p_init_msg_list ) THEN
98: FND_MSG_PUB.initialize;
99: END IF;
100:
101:

Line 103: IF NOT FND_API.Compatible_API_Call (l_api_version,

99: END IF;
100:
101:
102: -- Standard call to check for call compatibility.
103: IF NOT FND_API.Compatible_API_Call (l_api_version,
104: p_api_version_number,
105: l_api_name,
106: G_PKG_NAME )
107: THEN

Line 108: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

104: p_api_version_number,
105: l_api_name,
106: G_PKG_NAME )
107: THEN
108: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
109: END IF;
110:
111:
112: -- Initialize API return status to success

Line 113: x_return_status := FND_API.G_RET_STS_SUCCESS;

109: END IF;
110:
111:
112: -- Initialize API return status to success
113: x_return_status := FND_API.G_RET_STS_SUCCESS;
114:
115: -- API Body --
116:
117: -- Initialize the flags

Line 118: IF ( p_interest_type_rec.master_enabled_flag = FND_API.G_MISS_CHAR OR

114:
115: -- API Body --
116:
117: -- Initialize the flags
118: IF ( p_interest_type_rec.master_enabled_flag = FND_API.G_MISS_CHAR OR
119: TRIM(p_interest_type_rec.master_enabled_flag) IS NULL) THEN
120: l_master_enabled_flag := 'N';
121: ELSE
122: l_master_enabled_flag := p_interest_type_rec.master_enabled_flag;

Line 125: IF ( p_interest_type_rec.company_classification_flag = FND_API.G_MISS_CHAR

121: ELSE
122: l_master_enabled_flag := p_interest_type_rec.master_enabled_flag;
123: END IF;
124:
125: IF ( p_interest_type_rec.company_classification_flag = FND_API.G_MISS_CHAR
126: OR TRIM(p_interest_type_rec.company_classification_flag ) IS NULL ) THEN
127: l_company_classification_flag := 'N';
128: ELSE
129: l_company_classification_flag := p_interest_type_rec.company_classification_flag;

Line 132: IF ( p_interest_type_rec.contact_interest_flag = FND_API.G_MISS_CHAR

128: ELSE
129: l_company_classification_flag := p_interest_type_rec.company_classification_flag;
130: END IF;
131:
132: IF ( p_interest_type_rec.contact_interest_flag = FND_API.G_MISS_CHAR
133: OR TRIM(p_interest_type_rec.contact_interest_flag ) IS NULL ) THEN
134: l_contact_interest_flag := 'N';
135: ELSE
136: l_contact_interest_flag := p_interest_type_rec.contact_interest_flag;

Line 139: IF ( p_interest_type_rec.lead_classification_flag = FND_API.G_MISS_CHAR

135: ELSE
136: l_contact_interest_flag := p_interest_type_rec.contact_interest_flag;
137: END IF;
138:
139: IF ( p_interest_type_rec.lead_classification_flag = FND_API.G_MISS_CHAR
140: OR TRIM(p_interest_type_rec.lead_classification_flag ) IS NULL ) THEN
141: l_lead_classification_flag := 'N';
142: ELSE
143: l_lead_classification_flag := p_interest_type_rec.lead_classification_flag;

Line 146: IF ( p_interest_type_rec.expected_purchase_flag = FND_API.G_MISS_CHAR

142: ELSE
143: l_lead_classification_flag := p_interest_type_rec.lead_classification_flag;
144: END IF;
145:
146: IF ( p_interest_type_rec.expected_purchase_flag = FND_API.G_MISS_CHAR
147: OR TRIM(p_interest_type_rec.expected_purchase_flag ) IS NULL) THEN
148: l_expected_purchase_flag := 'N';
149: ELSE
150: l_expected_purchase_flag := p_interest_type_rec.expected_purchase_flag;

Line 153: IF ( p_interest_type_rec.current_environment_flag = FND_API.G_MISS_CHAR

149: ELSE
150: l_expected_purchase_flag := p_interest_type_rec.expected_purchase_flag;
151: END IF;
152:
153: IF ( p_interest_type_rec.current_environment_flag = FND_API.G_MISS_CHAR
154: OR TRIM(p_interest_type_rec.current_environment_flag ) IS NULL ) THEN
155: l_current_environment_flag := 'N';
156: ELSE
157: l_current_environment_flag := p_interest_type_rec.current_environment_flag;

Line 160: IF ( p_interest_type_rec.enabled_flag = FND_API.G_MISS_CHAR

156: ELSE
157: l_current_environment_flag := p_interest_type_rec.current_environment_flag;
158: END IF;
159:
160: IF ( p_interest_type_rec.enabled_flag = FND_API.G_MISS_CHAR
161: OR TRIM(p_interest_type_rec.enabled_flag ) IS NULL ) THEN
162: l_enabled_flag := 'N';
163: ELSE
164: l_enabled_flag := p_interest_type_rec.enabled_flag;

Line 170: IF (p_interest_type_rec.creation_date= FND_API.G_MISS_DATE)

166:
167: -- Initialize the creation date and created by
168: -- if the User has not entered them.
169:
170: IF (p_interest_type_rec.creation_date= FND_API.G_MISS_DATE)
171: OR TRIM(p_interest_type_rec.creation_date) IS NULL THEN
172: l_creation_date := SYSDATE;
173: END IF;
174:

Line 175: IF (p_interest_type_rec.created_by = FND_API.G_MISS_NUM)

171: OR TRIM(p_interest_type_rec.creation_date) IS NULL THEN
172: l_creation_date := SYSDATE;
173: END IF;
174:
175: IF (p_interest_type_rec.created_by = FND_API.G_MISS_NUM)
176: OR TRIM(p_interest_type_rec.created_by ) IS NULL THEN
177: l_created_by := FND_GLOBAL.user_id;
178: ELSE
179: l_created_by := p_interest_type_rec.created_by;

Line 182: IF (p_interest_type_rec.last_update_date = FND_API.G_MISS_DATE)

178: ELSE
179: l_created_by := p_interest_type_rec.created_by;
180: END IF;
181:
182: IF (p_interest_type_rec.last_update_date = FND_API.G_MISS_DATE)
183: OR TRIM(p_interest_type_rec.last_update_date) IS NULL THEN
184: l_last_update_date := sysdate;
185: ELSE
186: l_last_update_date := p_interest_type_rec.last_update_date;

Line 189: IF (p_interest_type_rec.last_updated_by = FND_API.G_MISS_NUM)

185: ELSE
186: l_last_update_date := p_interest_type_rec.last_update_date;
187: END IF;
188:
189: IF (p_interest_type_rec.last_updated_by = FND_API.G_MISS_NUM)
190: OR TRIM(p_interest_type_rec.last_updated_by ) IS NULL THEN
191: l_last_updated_by := FND_GLOBAL.user_id;
192: ELSE
193: l_last_updated_by := p_interest_type_rec.last_updated_by;

Line 196: IF (p_interest_type_rec.last_update_login = FND_API.G_MISS_NUM)

192: ELSE
193: l_last_updated_by := p_interest_type_rec.last_updated_by;
194: END IF;
195:
196: IF (p_interest_type_rec.last_update_login = FND_API.G_MISS_NUM)
197: OR TRIM(p_interest_type_rec.last_update_login ) IS NULL THEN
198: l_last_update_login := FND_GLOBAL.login_id;
199: ELSE
200: l_last_update_login := p_interest_type_rec.last_update_login;

Line 207: IF p_interest_type_rec.description = FND_API.G_MISS_CHAR

203: -- If g_miss is passed then replace with null before insert
204: -- otherwise use the value passed for the insert.
205: -- This is done only for optional fields, for required fields
206: -- the DB will throw error.
207: IF p_interest_type_rec.description = FND_API.G_MISS_CHAR
208: OR TRIM(p_interest_type_rec.description ) IS NULL
209: THEN
210: l_description := NULL;
211: ELSE

Line 215: IF (p_interest_type_rec.prod_cat_set_id = FND_API.G_MISS_NUM) THEN

211: ELSE
212: l_description := p_interest_type_rec.description;
213: END IF;
214:
215: IF (p_interest_type_rec.prod_cat_set_id = FND_API.G_MISS_NUM) THEN
216: l_prod_cat_set_id := NULL;
217: ELSE
218: l_prod_cat_set_id := p_interest_type_rec.prod_cat_set_id;
219: END IF;

Line 221: IF (p_interest_type_rec.prod_cat_id = FND_API.G_MISS_NUM) THEN

217: ELSE
218: l_prod_cat_set_id := p_interest_type_rec.prod_cat_set_id;
219: END IF;
220:
221: IF (p_interest_type_rec.prod_cat_id = FND_API.G_MISS_NUM) THEN
222: l_prod_cat_id := NULL;
223: ELSE
224: l_prod_cat_id := p_interest_type_rec.prod_cat_id;
225: END IF;

Line 241: IF ( l_interest_type = FND_API.G_MISS_CHAR

237: FND_MESSAGE.SET_TOKEN('MASTER_ENABLED_FLAG',l_master_enabled_flag);
238: FND_MSG_PUB.Add;
239: END IF;
240:
241: IF ( l_interest_type = FND_API.G_MISS_CHAR
242: OR TRIM(l_interest_type) IS NULL) THEN
243: FND_MESSAGE.SET_NAME ( 'AS' , 'AS_INVALID_INT_TYPE');
244: FND_MESSAGE.SET_TOKEN('INTEREST_TYPE',l_interest_type);
245: FND_MSG_PUB.Add;

Line 284: IF ( l_org_id = FND_API.G_MISS_NUM

280: FND_MESSAGE.SET_TOKEN('ENABLED_FLAG',l_enabled_flag);
281: FND_MSG_PUB.Add;
282: END IF;
283:
284: IF ( l_org_id = FND_API.G_MISS_NUM
285: OR TRIM(l_org_id) IS NULL ) THEN
286: FND_MESSAGE.SET_NAME ( 'AS' , 'AS_INVALID_ORG_ID');
287: FND_MESSAGE.SET_TOKEN('ORG_ID',l_org_id);
288: FND_MSG_PUB.Add;

Line 294: RAISE fnd_api.g_exc_error;

290:
291: -- Raise exception if error
292: IF (FND_MSG_PUB.COUNT_MSG > 0)
293: THEN
294: RAISE fnd_api.g_exc_error;
295: END IF;
296:
297: -- Check for duplicate or uniqueness of the Interest Type
298: OPEN interest_dup_cur(TRIM(NLS_UPPER(p_interest_type_rec.interest_type)));

Line 306: RAISE fnd_api.g_exc_error;

302: FND_MESSAGE.SET_NAME('ASF', 'ASF_ADM_DUPLICATE');
303: --FND_MESSAGE.SET_NAME ( 'AS' , 'AS_DUPLICATE_INTEREST_TYPE');
304: fnd_msg_pub.add;
305: CLOSE interest_dup_cur;
306: RAISE fnd_api.g_exc_error;
307: ELSE
308: -- get nextval for interest type id
309: OPEN interest_id_cur;
310: FETCH interest_id_cur INTO x_interest_type_id;

Line 314: RAISE fnd_api.g_exc_error;

310: FETCH interest_id_cur INTO x_interest_type_id;
311: IF (interest_id_cur%NOTFOUND)
312: THEN
313: CLOSE interest_id_cur;
314: RAISE fnd_api.g_exc_error;
315: END IF;
316: CLOSE interest_id_cur;
317:
318: if (l_prod_cat_set_id is not null

Line 336: RAISE fnd_api.g_exc_error;

332:
333: if (l_prod_cat_not_found = 'Y') THEN
334: FND_MESSAGE.SET_NAME ( 'AS' , 'AS_INVALID_PRODUCT_CATEGORY');
335: fnd_msg_pub.add;
336: RAISE fnd_api.g_exc_error;
337: end if;
338:
339: -- Insert a New Interest Type into table
340: as_interest_types_pkg.insert_row(

Line 364: IF FND_API.To_Boolean( p_commit ) THEN

360: );
361: END IF;
362:
363: -- Standard check of p_commit.
364: IF FND_API.To_Boolean( p_commit ) THEN
365: COMMIT WORK;
366: END IF;
367:
368: -- Standard call to get message count and if count is 1,

Line 377: WHEN FND_API.G_EXC_ERROR THEN

373: p_data => x_msg_data
374: );
375:
376: EXCEPTION
377: WHEN FND_API.G_EXC_ERROR THEN
378: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
379: P_MODULE => l_module
380: ,P_API_NAME => L_API_NAME
381: ,P_PKG_NAME => G_PKG_NAME

Line 388: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

384: ,X_MSG_COUNT => X_MSG_COUNT
385: ,X_MSG_DATA => X_MSG_DATA
386: ,X_RETURN_STATUS => X_RETURN_STATUS);
387:
388: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
389: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
390: P_MODULE => l_module
391: ,P_API_NAME => L_API_NAME
392: ,P_PKG_NAME => G_PKG_NAME

Line 526: IF FND_API.to_Boolean( p_init_msg_list ) THEN

522: -- Standard STart of API SavePoint
523: SAVEPOINT update_interest_type_PUB;
524:
525: -- Initialize message list if p_init_msg_list is set to TRUE.
526: IF FND_API.to_Boolean( p_init_msg_list ) THEN
527: FND_MSG_PUB.initialize;
528: END IF;
529:
530: -- Standard call to check for call compatibility.

Line 531: IF NOT FND_API.Compatible_API_Call (l_api_version,

527: FND_MSG_PUB.initialize;
528: END IF;
529:
530: -- Standard call to check for call compatibility.
531: IF NOT FND_API.Compatible_API_Call (l_api_version,
532: p_api_version_number,
533: l_api_name,
534: G_PKG_NAME )
535: THEN

Line 536: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

532: p_api_version_number,
533: l_api_name,
534: G_PKG_NAME )
535: THEN
536: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
537: END IF;
538:
539: -- Initialize API return status to success
540: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 540: x_return_status := FND_API.G_RET_STS_SUCCESS;

536: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
537: END IF;
538:
539: -- Initialize API return status to success
540: x_return_status := FND_API.G_RET_STS_SUCCESS;
541:
542: -- API Body --
543:
544: -- Check if Required Values have been passed

Line 545: IF (p_interest_type_rec.interest_type_id = FND_API.G_MISS_NUM)

541:
542: -- API Body --
543:
544: -- Check if Required Values have been passed
545: IF (p_interest_type_rec.interest_type_id = FND_API.G_MISS_NUM)
546: OR TRIM(p_interest_type_rec.interest_type_id) IS NULL THEN
547: FND_MESSAGE.SET_NAME ( 'AS' , 'AS_INVALID_INT_TYPE_ID');
548: FND_MESSAGE.SET_TOKEN('INTEREST_TYPE_ID',
549: p_interest_type_rec.interest_type_id);

Line 578: RAISE FND_API.G_EXC_ERROR;

574: l_prod_cat_id;
575: IF get_db_values_cur%NOTFOUND
576: THEN
577: CLOSE get_db_values_cur;
578: RAISE FND_API.G_EXC_ERROR;
579: END IF;
580: CLOSE get_db_values_cur;
581:
582:

Line 586: IF p_interest_type_rec.master_enabled_flag = FND_API.G_MISS_CHAR

582:
583: -- If the value passed in is G_MISS then replace the value with
584: -- fetched value from the database before updating.
585:
586: IF p_interest_type_rec.master_enabled_flag = FND_API.G_MISS_CHAR
587: THEN
588: x_master_enabled_flag := l_master_enabled_flag ;
589: ELSE
590: x_master_enabled_flag := p_interest_type_rec.master_enabled_flag ;

Line 593: IF p_interest_type_rec.enabled_flag = FND_API.G_MISS_CHAR

589: ELSE
590: x_master_enabled_flag := p_interest_type_rec.master_enabled_flag ;
591: END IF;
592:
593: IF p_interest_type_rec.enabled_flag = FND_API.G_MISS_CHAR
594: THEN
595: x_enabled_flag := l_enabled_flag ;
596: ELSE
597: x_enabled_flag := p_interest_type_rec.enabled_flag ;

Line 600: IF p_interest_type_rec.company_classification_flag = FND_API.G_MISS_CHAR

596: ELSE
597: x_enabled_flag := p_interest_type_rec.enabled_flag ;
598: END IF;
599:
600: IF p_interest_type_rec.company_classification_flag = FND_API.G_MISS_CHAR
601: THEN
602: x_company_classification_flag := l_company_classification_flag ;
603: ELSE
604: x_company_classification_flag := p_interest_type_rec.company_classification_flag ;

Line 607: IF p_interest_type_rec.contact_interest_flag = FND_API.G_MISS_CHAR

603: ELSE
604: x_company_classification_flag := p_interest_type_rec.company_classification_flag ;
605: END IF;
606:
607: IF p_interest_type_rec.contact_interest_flag = FND_API.G_MISS_CHAR
608: THEN
609: x_contact_interest_flag := l_contact_interest_flag ;
610: ELSE
611: x_contact_interest_flag := p_interest_type_rec.contact_interest_flag ;

Line 614: IF p_interest_type_rec.lead_classification_flag = FND_API.G_MISS_CHAR

610: ELSE
611: x_contact_interest_flag := p_interest_type_rec.contact_interest_flag ;
612: END IF;
613:
614: IF p_interest_type_rec.lead_classification_flag = FND_API.G_MISS_CHAR
615: THEN
616: x_lead_classification_flag := l_lead_classification_flag ;
617: ELSE
618: x_lead_classification_flag := p_interest_type_rec.lead_classification_flag ;

Line 621: IF p_interest_type_rec.expected_purchase_flag = FND_API.G_MISS_CHAR

617: ELSE
618: x_lead_classification_flag := p_interest_type_rec.lead_classification_flag ;
619: END IF;
620:
621: IF p_interest_type_rec.expected_purchase_flag = FND_API.G_MISS_CHAR
622: THEN
623: x_expected_purchase_flag := l_expected_purchase_flag ;
624: ELSE
625: x_expected_purchase_flag := p_interest_type_rec.expected_purchase_flag ;

Line 628: IF p_interest_type_rec.current_environment_flag = FND_API.G_MISS_CHAR

624: ELSE
625: x_expected_purchase_flag := p_interest_type_rec.expected_purchase_flag ;
626: END IF;
627:
628: IF p_interest_type_rec.current_environment_flag = FND_API.G_MISS_CHAR
629: THEN
630: x_current_environment_flag := l_current_environment_flag ;
631: ELSE
632: x_current_environment_flag := p_interest_type_rec.current_environment_flag ;

Line 636: IF p_interest_type_rec.org_id = FND_API.G_MISS_NUM

632: x_current_environment_flag := p_interest_type_rec.current_environment_flag ;
633: END IF;
634:
635:
636: IF p_interest_type_rec.org_id = FND_API.G_MISS_NUM
637: THEN
638: x_org_id := l_org_id ;
639: ELSE
640: x_org_id := p_interest_type_rec.org_id ;

Line 644: IF p_interest_type_rec.interest_type = FND_API.G_MISS_CHAR

640: x_org_id := p_interest_type_rec.org_id ;
641: END IF;
642:
643:
644: IF p_interest_type_rec.interest_type = FND_API.G_MISS_CHAR
645: THEN
646: x_interest_type := l_interest_type ;
647: ELSE
648: x_interest_type := p_interest_type_rec.interest_type ;

Line 651: IF p_interest_type_rec.description = FND_API.G_MISS_CHAR

647: ELSE
648: x_interest_type := p_interest_type_rec.interest_type ;
649: END IF;
650:
651: IF p_interest_type_rec.description = FND_API.G_MISS_CHAR
652: THEN
653: x_description := l_description ;
654: ELSE
655: x_description := p_interest_type_rec.description ;

Line 658: IF p_interest_type_rec.last_update_date = FND_API.G_MISS_DATE

654: ELSE
655: x_description := p_interest_type_rec.description ;
656: END IF;
657:
658: IF p_interest_type_rec.last_update_date = FND_API.G_MISS_DATE
659: OR TRIM(p_interest_type_rec.last_update_date) IS NULL
660: THEN
661: x_last_update_date := sysdate ;
662: ELSE

Line 666: IF p_interest_type_rec.last_updated_by = FND_API.G_MISS_NUM

662: ELSE
663: x_last_update_date := p_interest_type_rec.last_update_date ;
664: END IF;
665:
666: IF p_interest_type_rec.last_updated_by = FND_API.G_MISS_NUM
667: OR TRIM(p_interest_type_rec.last_updated_by ) IS NULL
668: THEN
669: x_last_updated_by := fnd_global.user_id ;
670: ELSE

Line 674: IF p_interest_type_rec.last_update_login = FND_API.G_MISS_NUM

670: ELSE
671: x_last_updated_by := p_interest_type_rec.last_updated_by ;
672: END IF;
673:
674: IF p_interest_type_rec.last_update_login = FND_API.G_MISS_NUM
675: OR TRIM(p_interest_type_rec.last_update_login ) IS NULL
676: THEN
677: x_last_update_login := fnd_global.login_id ;
678: ELSE

Line 682: IF p_interest_type_rec.prod_cat_set_id = FND_API.G_MISS_NUM

678: ELSE
679: x_last_update_login := p_interest_type_rec.last_update_login ;
680: END IF;
681:
682: IF p_interest_type_rec.prod_cat_set_id = FND_API.G_MISS_NUM
683: THEN
684: x_prod_cat_set_id := l_prod_cat_set_id;
685: ELSE
686: x_prod_cat_set_id := p_interest_type_rec.prod_cat_set_id;

Line 688: IF p_interest_type_rec.prod_cat_id = FND_API.G_MISS_NUM

684: x_prod_cat_set_id := l_prod_cat_set_id;
685: ELSE
686: x_prod_cat_set_id := p_interest_type_rec.prod_cat_set_id;
687: END IF;
688: IF p_interest_type_rec.prod_cat_id = FND_API.G_MISS_NUM
689: THEN
690: x_prod_cat_id := l_prod_cat_id;
691: ELSE
692: x_prod_cat_id := p_interest_type_rec.prod_cat_id;

Line 782: IF x_org_id = FND_API.G_MISS_NUM

778: FND_MESSAGE.SET_TOKEN('ENABLED_FLAG',p_interest_type_rec.enabled_flag);
779: FND_MSG_PUB.Add;
780: END IF;
781:
782: IF x_org_id = FND_API.G_MISS_NUM
783: THEN
784: FND_MESSAGE.SET_NAME ( 'AS' , 'AS_INVALID_ORG_ID');
785: FND_MESSAGE.SET_TOKEN('ORG_ID',p_interest_type_rec.org_id);
786: FND_MSG_PUB.Add;

Line 791: RAISE fnd_api.g_exc_error;

787: END IF;
788:
789: IF (FND_MSG_PUB.COUNT_MSG > 0)
790: THEN
791: RAISE fnd_api.g_exc_error;
792: END IF;
793:
794:
795: -- Check if Interest Type ID and Type exists

Line 803: RAISE FND_API.G_EXC_ERROR;

799: THEN
800: FND_MESSAGE.SET_NAME('ASF', 'ASF_ADM_DUPLICATE');
801: FND_MSG_PUB.Add;
802: CLOSE as_int_type_cur;
803: RAISE FND_API.G_EXC_ERROR;
804: END IF;
805: CLOSE as_int_type_cur;
806:
807: if (x_prod_cat_set_id is not null

Line 824: RAISE fnd_api.g_exc_error;

820:
821: if (l_prod_cat_not_found = 'Y') THEN
822: FND_MESSAGE.SET_NAME ( 'AS' , 'AS_INVALID_PRODUCT_CATEGORY');
823: fnd_msg_pub.add;
824: RAISE fnd_api.g_exc_error;
825: end if;
826:
827: -- Lock the row for update. Check to see if the fetched value is same still.
828: -- If they are same then update the record else give a message that the row has been

Line 836: RAISE fnd_api.g_exc_unexpected_error;

832: FETCH lock_row_for_update INTO l_current_last_update_date;
833: IF lock_row_for_update%NOTFOUND
834: THEN
835: CLOSE lock_row_for_update;
836: RAISE fnd_api.g_exc_unexpected_error;
837: END IF;
838:
839: IF l_last_update_date <> l_current_last_update_date
840: THEN

Line 844: RAISE fnd_api.g_exc_unexpected_error;

840: THEN
841: fnd_message.set_name('AS', 'API_RECORD_CHANGED');
842: FND_MESSAGE.Set_Token('INFO', 'interest_type', FALSE); -- ??
843: fnd_msg_pub.add;
844: RAISE fnd_api.g_exc_unexpected_error;
845: END IF;
846:
847: -- update Interest Type ID in the table
848: as_interest_types_pkg.update_row(

Line 870: IF FND_API.To_Boolean( p_commit ) THEN

866: -- Close Cursor
867: CLOSE lock_row_for_update ;
868:
869: -- Standard check of p_commit.
870: IF FND_API.To_Boolean( p_commit ) THEN
871: COMMIT WORK;
872: END IF;
873:
874: -- Standard call to get message count and if count is 1, get

Line 881: WHEN FND_API.G_EXC_ERROR THEN

877: p_count => x_msg_count,
878: p_data => x_msg_data
879: );
880: EXCEPTION
881: WHEN FND_API.G_EXC_ERROR THEN
882: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
883: P_MODULE => l_module
884: ,P_API_NAME => L_API_NAME
885: ,P_PKG_NAME => G_PKG_NAME

Line 892: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

888: ,X_MSG_COUNT => X_MSG_COUNT
889: ,X_MSG_DATA => X_MSG_DATA
890: ,X_RETURN_STATUS => X_RETURN_STATUS);
891:
892: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
893: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
894: P_MODULE => l_module
895: ,P_API_NAME => L_API_NAME
896: ,P_PKG_NAME => G_PKG_NAME