60: IF FND_API.to_Boolean( p_init_msg_list ) THEN
61: FND_MSG_PUB.initialize;
62: END IF;
63:
64: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
65: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
66: 'Entered Create_Flwsts_Tran');
67: END IF;
68:
61: FND_MSG_PUB.initialize;
62: END IF;
63:
64: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
65: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
66: 'Entered Create_Flwsts_Tran');
67: END IF;
68:
69: -- Initialize API return status to success
71:
72: -- Api body starts
73:
74: -- Check the required parameters
75: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
76: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
77: 'Checking required parameters');
78: end if;
79:
72: -- Api body starts
73:
74: -- Check the required parameters
75: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
76: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
77: 'Checking required parameters');
78: end if;
79:
80: -- Check the required parameters
93: p_param_name => 'TO_FLOW_STATUS_ID',
94: p_api_name => lc_api_name);
95:
96: -- Insert row
97: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
98: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
99: 'Calling Insert_Row table handler');
100: end if;
101:
94: p_api_name => lc_api_name);
95:
96: -- Insert row
97: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
98: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
99: 'Calling Insert_Row table handler');
100: end if;
101:
102: Begin
122: p_last_update_login => FND_GLOBAL.LOGIN_ID
123: );
124: END;
125:
126: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
127: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
128: 'Returned from Insert_Row table handler');
129: end if;
130:
123: );
124: END;
125:
126: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
127: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
128: 'Returned from Insert_Row table handler');
129: end if;
130:
131: -- Api body ends here
139: FND_MSG_PUB.Count_And_Get
140: (p_count => x_msg_count,
141: p_data => x_msg_data );
142:
143: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
144: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
145: 'Leaving Create_Flwsts_Tran');
146: END IF;
147:
140: (p_count => x_msg_count,
141: p_data => x_msg_data );
142:
143: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
144: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
145: 'Leaving Create_Flwsts_Tran');
146: END IF;
147:
148: EXCEPTION
158: (p_count => x_msg_count,
159: p_data => x_msg_data );
160:
161: -- save message in debug log
162: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
163: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
164: 'EXC_ERROR['||x_msg_data||']');
165: END IF;
166: WHEN FND_API.G_EXC_ERROR THEN
159: p_data => x_msg_data );
160:
161: -- save message in debug log
162: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
163: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
164: 'EXC_ERROR['||x_msg_data||']');
165: END IF;
166: WHEN FND_API.G_EXC_ERROR THEN
167: ROLLBACK TO Create_Flwsts_Tran;
171: (p_count => x_msg_count,
172: p_data => x_msg_data );
173:
174: -- save message in debug log
175: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
176: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
177: 'EXC_ERROR['||x_msg_data||']');
178: END IF;
179:
172: p_data => x_msg_data );
173:
174: -- save message in debug log
175: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
176: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
177: 'EXC_ERROR['||x_msg_data||']');
178: END IF;
179:
180: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
184: -- save message in fnd stack
185: IF FND_MSG_PUB.Check_Msg_Level
186: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
187: THEN
188: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
189: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
190: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
191: end if;
192: FND_MSG_PUB.Add_Exc_Msg
185: IF FND_MSG_PUB.Check_Msg_Level
186: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
187: THEN
188: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
189: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
190: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
191: end if;
192: FND_MSG_PUB.Add_Exc_Msg
193: (G_PKG_NAME ,
198: ( p_count => x_msg_count,
199: p_data => x_msg_data );
200:
201: -- save message in debug log
202: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
203: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
204: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
205: END IF;
206:
199: p_data => x_msg_data );
200:
201: -- save message in debug log
202: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
203: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
204: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
205: END IF;
206:
207: WHEN OTHERS THEN
211: -- save message in fnd stack
212: IF FND_MSG_PUB.Check_Msg_Level
213: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
214: THEN
215: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
216: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
217: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
218: end if;
219: FND_MSG_PUB.Add_Exc_Msg
212: IF FND_MSG_PUB.Check_Msg_Level
213: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
214: THEN
215: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
216: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
217: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
218: end if;
219: FND_MSG_PUB.Add_Exc_Msg
220: (G_PKG_NAME ,
225: (p_count => x_msg_count,
226: p_data => x_msg_data );
227:
228: -- save message in debug log
229: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
230: -- create a seeded message
231: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
232: 'SQL Message['||sqlerrm||']' );
233: END IF;
227:
228: -- save message in debug log
229: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
230: -- create a seeded message
231: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
232: 'SQL Message['||sqlerrm||']' );
233: END IF;
234:
235: END Create_Flwsts_Tran;
290: IF FND_API.to_Boolean( p_init_msg_list ) THEN
291: FND_MSG_PUB.initialize;
292: END IF;
293:
294: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
295: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
296: 'Entered Update_Flwsts_Tran');
297: END IF;
298:
291: FND_MSG_PUB.initialize;
292: END IF;
293:
294: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
295: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
296: 'Entered Update_Flwsts_Tran');
297: END IF;
298:
299: -- Initialize API return status to success
301:
302: -- Api body starts
303:
304: -- Check the required parameters
305: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
306: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
307: 'Checking required parameters');
308: end if;
309:
302: -- Api body starts
303:
304: -- Check the required parameters
305: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
306: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
307: 'Checking required parameters');
308: end if;
309:
310: -- Check the required parameters
328: p_param_name => 'TO_FLOW_STATUS_ID',
329: p_api_name => lc_api_name);
330:
331: -- Update row
332: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
333: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
334: 'Calling Update_Row table handler');
335: end if;
336:
329: p_api_name => lc_api_name);
330:
331: -- Update row
332: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
333: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
334: 'Calling Update_Row table handler');
335: end if;
336:
337: Begin
357: x_obj_ver_number := p_flwsts_tran_rec.object_version_number + 1;
358:
359: END;
360:
361: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
362: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
363: 'Returned from Update_Row table handler');
364: end if;
365:
358:
359: END;
360:
361: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
362: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
363: 'Returned from Update_Row table handler');
364: end if;
365:
366: -- Api body ends here
374: FND_MSG_PUB.Count_And_Get
375: (p_count => x_msg_count,
376: p_data => x_msg_data );
377:
378: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
379: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
380: 'Leaving Update_Flwsts_Tran');
381: END IF;
382:
375: (p_count => x_msg_count,
376: p_data => x_msg_data );
377:
378: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
379: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
380: 'Leaving Update_Flwsts_Tran');
381: END IF;
382:
383: EXCEPTION
393: (p_count => x_msg_count,
394: p_data => x_msg_data );
395:
396: -- save message in debug log
397: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
398: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
399: 'EXC_ERROR['||x_msg_data||']');
400: END IF;
401: WHEN FND_API.G_EXC_ERROR THEN
394: p_data => x_msg_data );
395:
396: -- save message in debug log
397: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
398: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
399: 'EXC_ERROR['||x_msg_data||']');
400: END IF;
401: WHEN FND_API.G_EXC_ERROR THEN
402: ROLLBACK TO Update_Flwsts_Tran;
406: (p_count => x_msg_count,
407: p_data => x_msg_data );
408:
409: -- save message in debug log
410: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
411: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
412: 'EXC_ERROR['||x_msg_data||']');
413: END IF;
414:
407: p_data => x_msg_data );
408:
409: -- save message in debug log
410: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
411: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
412: 'EXC_ERROR['||x_msg_data||']');
413: END IF;
414:
415: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
418:
419: IF FND_MSG_PUB.Check_Msg_Level
420: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
421: THEN
422: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
423: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
424: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
425: end if;
426: FND_MSG_PUB.Add_Exc_Msg
419: IF FND_MSG_PUB.Check_Msg_Level
420: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
421: THEN
422: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
423: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
424: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
425: end if;
426: FND_MSG_PUB.Add_Exc_Msg
427: (G_PKG_NAME ,
432: ( p_count => x_msg_count,
433: p_data => x_msg_data );
434:
435: -- save message in debug log
436: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
437: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
438: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
439: END IF;
440:
433: p_data => x_msg_data );
434:
435: -- save message in debug log
436: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
437: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
438: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
439: END IF;
440:
441: WHEN OTHERS THEN
445: -- save message in fnd stack
446: IF FND_MSG_PUB.Check_Msg_Level
447: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
448: THEN
449: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
450: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
451: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
452: end if;
453: FND_MSG_PUB.Add_Exc_Msg
446: IF FND_MSG_PUB.Check_Msg_Level
447: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
448: THEN
449: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
450: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
451: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
452: end if;
453: FND_MSG_PUB.Add_Exc_Msg
454: (G_PKG_NAME ,
459: (p_count => x_msg_count,
460: p_data => x_msg_data );
461:
462: -- save message in debug log
463: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
464: -- create a seeded message
465: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
466: 'SQL Message['||sqlerrm||']' );
467: END IF;
461:
462: -- save message in debug log
463: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
464: -- create a seeded message
465: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
466: 'SQL Message['||sqlerrm||']' );
467: END IF;
468:
469: END Update_Flwsts_Tran;
513: IF FND_API.to_Boolean( p_init_msg_list ) THEN
514: FND_MSG_PUB.initialize;
515: END IF;
516:
517: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
518: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
519: 'Entered Delete_Flwsts_Tran');
520: END IF;
521:
514: FND_MSG_PUB.initialize;
515: END IF;
516:
517: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
518: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
519: 'Entered Delete_Flwsts_Tran');
520: END IF;
521:
522: -- Initialize API return status to success
524:
525: -- Api body starts
526:
527: -- Check the required parameters
528: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
529: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
530: 'Checking required parameter');
531: end if;
532:
525: -- Api body starts
526:
527: -- Check the required parameters
528: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
529: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
530: 'Checking required parameter');
531: end if;
532:
533: -- Check the required parameter
536: p_param_name => 'FLWSTS_TRAN_ID',
537: p_api_name => lc_api_name);
538:
539: -- Delete row
540: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
541: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
542: 'Calling Delete_Row table handler');
543: end if;
544:
537: p_api_name => lc_api_name);
538:
539: -- Delete row
540: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
541: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
542: 'Calling Delete_Row table handler');
543: end if;
544:
545: BEGIN
549: ( p_flwsts_tran_id => p_flwsts_tran_id);
550:
551: END;
552:
553: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
554: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
555: 'Returned from Delete_Row table handler');
556: end if;
557:
550:
551: END;
552:
553: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
554: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
555: 'Returned from Delete_Row table handler');
556: end if;
557:
558: -- Api body ends here
566: FND_MSG_PUB.Count_And_Get
567: (p_count => x_msg_count,
568: p_data => x_msg_data );
569:
570: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
571: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
572: 'Leaving Delete_Flwsts_Tran');
573: END IF;
574:
567: (p_count => x_msg_count,
568: p_data => x_msg_data );
569:
570: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
571: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
572: 'Leaving Delete_Flwsts_Tran');
573: END IF;
574:
575: EXCEPTION
583: (p_count => x_msg_count,
584: p_data => x_msg_data );
585:
586: -- save message in debug log
587: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
588: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
589: 'EXC_ERROR['||x_msg_data||']');
590: END IF;
591:
584: p_data => x_msg_data );
585:
586: -- save message in debug log
587: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
588: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
589: 'EXC_ERROR['||x_msg_data||']');
590: END IF;
591:
592: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
596:
597: IF FND_MSG_PUB.Check_Msg_Level
598: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
599: THEN
600: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
601: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
602: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
603: end if;
604: FND_MSG_PUB.Add_Exc_Msg
597: IF FND_MSG_PUB.Check_Msg_Level
598: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
599: THEN
600: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
601: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
602: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
603: end if;
604: FND_MSG_PUB.Add_Exc_Msg
605: (G_PKG_NAME ,
610: ( p_count => x_msg_count,
611: p_data => x_msg_data );
612:
613: -- save message in debug log
614: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
615: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
616: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
617: END IF;
618:
611: p_data => x_msg_data );
612:
613: -- save message in debug log
614: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
615: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
616: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
617: END IF;
618:
619: WHEN OTHERS THEN
624: -- save message in fnd stack
625: IF FND_MSG_PUB.Check_Msg_Level
626: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
627: THEN
628: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
629: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
630: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
631: end if;
632: FND_MSG_PUB.Add_Exc_Msg
625: IF FND_MSG_PUB.Check_Msg_Level
626: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
627: THEN
628: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
629: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
630: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
631: end if;
632: FND_MSG_PUB.Add_Exc_Msg
633: (G_PKG_NAME ,
638: (p_count => x_msg_count,
639: p_data => x_msg_data );
640:
641: -- save message in debug log
642: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
643: -- create a seeded message
644: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
645: 'SQL Message['||sqlerrm||']' );
646: END IF;
640:
641: -- save message in debug log
642: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
643: -- create a seeded message
644: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
645: 'SQL Message['||sqlerrm||']' );
646: END IF;
647:
648: END Delete_Flwsts_Tran;
693: IF FND_API.to_Boolean( p_init_msg_list ) THEN
694: FND_MSG_PUB.initialize;
695: END IF;
696:
697: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
698: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
699: 'Entered Lock_Flwsts_Tran');
700: END IF;
701:
694: FND_MSG_PUB.initialize;
695: END IF;
696:
697: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
698: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
699: 'Entered Lock_Flwsts_Tran');
700: END IF;
701:
702: -- Initialize API return status to success
704:
705: -- Api body starts
706:
707: -- Check the required parameters
708: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
709: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
710: 'Checking required parameters');
711: end if;
712:
705: -- Api body starts
706:
707: -- Check the required parameters
708: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
709: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
710: 'Checking required parameters');
711: end if;
712:
713: -- Check the required parameters
721: p_param_name => 'OBJECT_VERSION_NUMBER',
722: p_api_name => lc_api_name);
723:
724: -- Lock row
725: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
726: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
727: 'Calling Lock_Row table handler');
728: end if;
729:
722: p_api_name => lc_api_name);
723:
724: -- Lock row
725: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
726: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
727: 'Calling Lock_Row table handler');
728: end if;
729:
730: Begin
737: );
738:
739: END;
740:
741: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
742: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
743: 'Returned from Lock_Row table handler');
744: end if;
745:
738:
739: END;
740:
741: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
742: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
743: 'Returned from Lock_Row table handler');
744: end if;
745:
746: -- Api body ends here
754: FND_MSG_PUB.Count_And_Get
755: (p_count => x_msg_count,
756: p_data => x_msg_data );
757:
758: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
759: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
760: 'Leaving Lock_Flwsts_Tran');
761: END IF;
762:
755: (p_count => x_msg_count,
756: p_data => x_msg_data );
757:
758: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
759: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
760: 'Leaving Lock_Flwsts_Tran');
761: END IF;
762:
763: EXCEPTION
770: (p_count => x_msg_count,
771: p_data => x_msg_data );
772:
773: -- save message in debug log
774: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
775: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
776: 'EXC_ERROR['||x_msg_data||']');
777: END IF;
778:
771: p_data => x_msg_data );
772:
773: -- save message in debug log
774: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
775: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
776: 'EXC_ERROR['||x_msg_data||']');
777: END IF;
778:
779: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
782:
783: IF FND_MSG_PUB.Check_Msg_Level
784: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
785: THEN
786: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
787: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
788: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
789: end if;
790: FND_MSG_PUB.Add_Exc_Msg
783: IF FND_MSG_PUB.Check_Msg_Level
784: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
785: THEN
786: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
787: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
788: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
789: end if;
790: FND_MSG_PUB.Add_Exc_Msg
791: (G_PKG_NAME ,
796: ( p_count => x_msg_count,
797: p_data => x_msg_data );
798:
799: -- save message in debug log
800: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
801: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
802: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
803: END IF;
804:
797: p_data => x_msg_data );
798:
799: -- save message in debug log
800: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
801: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
802: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
803: END IF;
804:
805: WHEN OTHERS THEN
809: -- save message in fnd stack
810: IF FND_MSG_PUB.Check_Msg_Level
811: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
812: THEN
813: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
814: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
815: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
816: end if;
817: FND_MSG_PUB.Add_Exc_Msg
810: IF FND_MSG_PUB.Check_Msg_Level
811: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
812: THEN
813: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
814: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
815: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
816: end if;
817: FND_MSG_PUB.Add_Exc_Msg
818: (G_PKG_NAME ,
823: (p_count => x_msg_count,
824: p_data => x_msg_data );
825:
826: -- save message in debug log
827: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
828: -- create a seeded message
829: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
830: 'SQL Message['||sqlerrm||']' );
831: END IF;
825:
826: -- save message in debug log
827: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
828: -- create a seeded message
829: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
830: 'SQL Message['||sqlerrm||']' );
831: END IF;
832:
833: END Lock_Flwsts_Tran;