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_Resp');
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_Resp');
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
88: p_param_name => 'RESPONSIBILITY_ID',
89: p_api_name => lc_api_name);
90:
91: -- Insert row
92: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
93: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
94: 'Calling Insert_Row table handler');
95: end if;
96:
89: p_api_name => lc_api_name);
90:
91: -- Insert row
92: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
93: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
94: 'Calling Insert_Row table handler');
95: end if;
96:
97: Begin
111: );
112:
113: END;
114:
115: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
116: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
117: 'Returned from Insert_Row table handler');
118: end if;
119:
112:
113: END;
114:
115: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
116: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
117: 'Returned from Insert_Row table handler');
118: end if;
119:
120: -- Api body ends here
128: FND_MSG_PUB.Count_And_Get
129: (p_count => x_msg_count,
130: p_data => x_msg_data );
131:
132: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
133: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
134: 'Leaving Create_Flwsts_Tran_Resp');
135: END IF;
136:
129: (p_count => x_msg_count,
130: p_data => x_msg_data );
131:
132: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
133: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
134: 'Leaving Create_Flwsts_Tran_Resp');
135: END IF;
136:
137: EXCEPTION
147: (p_count => x_msg_count,
148: p_data => x_msg_data );
149:
150: -- save message in debug log
151: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
152: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
153: 'EXC_ERROR['||x_msg_data||']');
154: END IF;
155: WHEN FND_API.G_EXC_ERROR THEN
148: p_data => x_msg_data );
149:
150: -- save message in debug log
151: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
152: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
153: 'EXC_ERROR['||x_msg_data||']');
154: END IF;
155: WHEN FND_API.G_EXC_ERROR THEN
156: ROLLBACK TO Create_Flwsts_Tran_Resp;
160: (p_count => x_msg_count,
161: p_data => x_msg_data );
162:
163: -- save message in debug log
164: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
165: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
166: 'EXC_ERROR['||x_msg_data||']');
167: END IF;
168:
161: p_data => x_msg_data );
162:
163: -- save message in debug log
164: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
165: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
166: 'EXC_ERROR['||x_msg_data||']');
167: END IF;
168:
169: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
173: -- save message in fnd stack
174: IF FND_MSG_PUB.Check_Msg_Level
175: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
176: THEN
177: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
178: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
179: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
180: end if;
181: FND_MSG_PUB.Add_Exc_Msg
174: IF FND_MSG_PUB.Check_Msg_Level
175: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
176: THEN
177: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
178: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
179: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
180: end if;
181: FND_MSG_PUB.Add_Exc_Msg
182: (G_PKG_NAME ,
187: ( p_count => x_msg_count,
188: p_data => x_msg_data );
189:
190: -- save message in debug log
191: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
192: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
193: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
194: END IF;
195:
188: p_data => x_msg_data );
189:
190: -- save message in debug log
191: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
192: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
193: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
194: END IF;
195:
196: WHEN OTHERS THEN
200: -- save message in fnd stack
201: IF FND_MSG_PUB.Check_Msg_Level
202: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
203: THEN
204: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
205: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
206: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
207: end if;
208: FND_MSG_PUB.Add_Exc_Msg
201: IF FND_MSG_PUB.Check_Msg_Level
202: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
203: THEN
204: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
205: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
206: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
207: end if;
208: FND_MSG_PUB.Add_Exc_Msg
209: (G_PKG_NAME ,
214: (p_count => x_msg_count,
215: p_data => x_msg_data );
216:
217: -- save message in debug log
218: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
219: -- create a seeded message
220: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
221: 'SQL Message['||sqlerrm||']' );
222: END IF;
216:
217: -- save message in debug log
218: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
219: -- create a seeded message
220: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
221: 'SQL Message['||sqlerrm||']' );
222: END IF;
223:
224: END Create_Flwsts_Tran_Resp;
279: IF FND_API.to_Boolean( p_init_msg_list ) THEN
280: FND_MSG_PUB.initialize;
281: END IF;
282:
283: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
284: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
285: 'Entered Update_Flwsts_Tran_Resp');
286: END IF;
287:
280: FND_MSG_PUB.initialize;
281: END IF;
282:
283: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
284: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
285: 'Entered Update_Flwsts_Tran_Resp');
286: END IF;
287:
288: -- Initialize API return status to success
290:
291: -- Api body starts
292:
293: -- Check the required parameters
294: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
295: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
296: 'Checking required parameters');
297: end if;
298:
291: -- Api body starts
292:
293: -- Check the required parameters
294: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
295: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
296: 'Checking required parameters');
297: end if;
298:
299: CSD_PROCESS_UTIL.Check_Reqd_Param
311: p_param_name => 'RESPONSIBILITY_ID',
312: p_api_name => lc_api_name);
313:
314: -- Update row
315: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
316: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
317: 'Calling Update_Row table handler');
318: end if;
319:
312: p_api_name => lc_api_name);
313:
314: -- Update row
315: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
316: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
317: 'Calling Update_Row table handler');
318: end if;
319:
320: Begin
334: x_obj_ver_number := p_flwsts_tran_resp_rec.object_version_number + 1;
335:
336: END;
337:
338: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
339: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
340: 'Returned from Update_Row table handler');
341: end if;
342:
335:
336: END;
337:
338: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
339: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
340: 'Returned from Update_Row table handler');
341: end if;
342:
343: -- Api body ends here
351: FND_MSG_PUB.Count_And_Get
352: (p_count => x_msg_count,
353: p_data => x_msg_data );
354:
355: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
356: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
357: 'Leaving Update_Flwsts_Tran_Resp');
358: END IF;
359:
352: (p_count => x_msg_count,
353: p_data => x_msg_data );
354:
355: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
356: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
357: 'Leaving Update_Flwsts_Tran_Resp');
358: END IF;
359:
360: EXCEPTION
370: (p_count => x_msg_count,
371: p_data => x_msg_data );
372:
373: -- save message in debug log
374: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
375: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
376: 'EXC_ERROR['||x_msg_data||']');
377: END IF;
378: WHEN FND_API.G_EXC_ERROR THEN
371: p_data => x_msg_data );
372:
373: -- save message in debug log
374: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
375: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
376: 'EXC_ERROR['||x_msg_data||']');
377: END IF;
378: WHEN FND_API.G_EXC_ERROR THEN
379: ROLLBACK TO Update_Flwsts_Tran_Resp;
383: (p_count => x_msg_count,
384: p_data => x_msg_data );
385:
386: -- save message in debug log
387: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
388: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
389: 'EXC_ERROR['||x_msg_data||']');
390: END IF;
391:
384: p_data => x_msg_data );
385:
386: -- save message in debug log
387: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
388: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
389: 'EXC_ERROR['||x_msg_data||']');
390: END IF;
391:
392: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
395:
396: IF FND_MSG_PUB.Check_Msg_Level
397: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
398: THEN
399: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
400: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
401: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
402: end if;
403: FND_MSG_PUB.Add_Exc_Msg
396: IF FND_MSG_PUB.Check_Msg_Level
397: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
398: THEN
399: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
400: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
401: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
402: end if;
403: FND_MSG_PUB.Add_Exc_Msg
404: (G_PKG_NAME ,
409: ( p_count => x_msg_count,
410: p_data => x_msg_data );
411:
412: -- save message in debug log
413: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
414: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
415: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
416: END IF;
417:
410: p_data => x_msg_data );
411:
412: -- save message in debug log
413: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
414: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
415: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
416: END IF;
417:
418: WHEN OTHERS THEN
422: -- save message in fnd stack
423: IF FND_MSG_PUB.Check_Msg_Level
424: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
425: THEN
426: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
427: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
428: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
429: end if;
430: FND_MSG_PUB.Add_Exc_Msg
423: IF FND_MSG_PUB.Check_Msg_Level
424: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
425: THEN
426: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
427: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
428: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
429: end if;
430: FND_MSG_PUB.Add_Exc_Msg
431: (G_PKG_NAME ,
436: (p_count => x_msg_count,
437: p_data => x_msg_data );
438:
439: -- save message in debug log
440: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
441: -- create a seeded message
442: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
443: 'SQL Message['||sqlerrm||']' );
444: END IF;
438:
439: -- save message in debug log
440: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
441: -- create a seeded message
442: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
443: 'SQL Message['||sqlerrm||']' );
444: END IF;
445:
446: END Update_Flwsts_Tran_Resp;
490: IF FND_API.to_Boolean( p_init_msg_list ) THEN
491: FND_MSG_PUB.initialize;
492: END IF;
493:
494: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
495: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
496: 'Entered Delete_Flwsts_Tran_Resp');
497: END IF;
498:
491: FND_MSG_PUB.initialize;
492: END IF;
493:
494: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
495: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
496: 'Entered Delete_Flwsts_Tran_Resp');
497: END IF;
498:
499: -- Initialize API return status to success
501:
502: -- Api body starts
503:
504: -- Check the required parameters
505: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
506: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
507: 'Checking required parameter');
508: end if;
509:
502: -- Api body starts
503:
504: -- Check the required parameters
505: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
506: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
507: 'Checking required parameter');
508: end if;
509:
510: -- Check the required parameter
513: p_param_name => 'FLWSTS_TRAN_RESP_ID',
514: p_api_name => lc_api_name);
515:
516: -- Delete row
517: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
518: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
519: 'Calling Delete_Row table handler');
520: end if;
521:
514: p_api_name => lc_api_name);
515:
516: -- Delete row
517: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
518: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
519: 'Calling Delete_Row table handler');
520: end if;
521:
522: BEGIN
526: ( p_flwsts_tran_resp_id => p_flwsts_tran_resp_id);
527:
528: END;
529:
530: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
531: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
532: 'Returned from Delete_Row table handler');
533: end if;
534:
527:
528: END;
529:
530: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
531: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
532: 'Returned from Delete_Row table handler');
533: end if;
534:
535: -- Api body ends here
543: FND_MSG_PUB.Count_And_Get
544: (p_count => x_msg_count,
545: p_data => x_msg_data );
546:
547: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
548: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
549: 'Leaving Delete_Flwsts_Tran_Resp');
550: END IF;
551:
544: (p_count => x_msg_count,
545: p_data => x_msg_data );
546:
547: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
548: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
549: 'Leaving Delete_Flwsts_Tran_Resp');
550: END IF;
551:
552: EXCEPTION
560: (p_count => x_msg_count,
561: p_data => x_msg_data );
562:
563: -- save message in debug log
564: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
565: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
566: 'EXC_ERROR['||x_msg_data||']');
567: END IF;
568:
561: p_data => x_msg_data );
562:
563: -- save message in debug log
564: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
565: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
566: 'EXC_ERROR['||x_msg_data||']');
567: END IF;
568:
569: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
573:
574: IF FND_MSG_PUB.Check_Msg_Level
575: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
576: THEN
577: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
578: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
579: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
580: end if;
581: FND_MSG_PUB.Add_Exc_Msg
574: IF FND_MSG_PUB.Check_Msg_Level
575: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
576: THEN
577: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
578: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
579: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
580: end if;
581: FND_MSG_PUB.Add_Exc_Msg
582: (G_PKG_NAME ,
587: ( p_count => x_msg_count,
588: p_data => x_msg_data );
589:
590: -- save message in debug log
591: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
592: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
593: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
594: END IF;
595:
588: p_data => x_msg_data );
589:
590: -- save message in debug log
591: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
592: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
593: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
594: END IF;
595:
596: WHEN OTHERS THEN
601: -- save message in fnd stack
602: IF FND_MSG_PUB.Check_Msg_Level
603: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
604: THEN
605: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
606: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
607: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
608: end if;
609: FND_MSG_PUB.Add_Exc_Msg
602: IF FND_MSG_PUB.Check_Msg_Level
603: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
604: THEN
605: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
606: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
607: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
608: end if;
609: FND_MSG_PUB.Add_Exc_Msg
610: (G_PKG_NAME ,
615: (p_count => x_msg_count,
616: p_data => x_msg_data );
617:
618: -- save message in debug log
619: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
620: -- create a seeded message
621: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
622: 'SQL Message['||sqlerrm||']' );
623: END IF;
617:
618: -- save message in debug log
619: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
620: -- create a seeded message
621: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
622: 'SQL Message['||sqlerrm||']' );
623: END IF;
624:
625: END Delete_Flwsts_Tran_Resp;
670: IF FND_API.to_Boolean( p_init_msg_list ) THEN
671: FND_MSG_PUB.initialize;
672: END IF;
673:
674: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
675: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
676: 'Entered Lock_Flwsts_Tran_Resp');
677: END IF;
678:
671: FND_MSG_PUB.initialize;
672: END IF;
673:
674: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
675: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
676: 'Entered Lock_Flwsts_Tran_Resp');
677: END IF;
678:
679: -- Initialize API return status to success
681:
682: -- Api body starts
683:
684: -- Check the required parameters
685: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
686: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
687: 'Checking required parameters');
688: end if;
689:
682: -- Api body starts
683:
684: -- Check the required parameters
685: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
686: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
687: 'Checking required parameters');
688: end if;
689:
690: -- Check the required parameters
698: p_param_name => 'OBJECT_VERSION_NUMBER',
699: p_api_name => lc_api_name);
700:
701: -- Lock row
702: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
703: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
704: 'Calling Lock_Row table handler');
705: end if;
706:
699: p_api_name => lc_api_name);
700:
701: -- Lock row
702: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
703: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
704: 'Calling Lock_Row table handler');
705: end if;
706:
707: Begin
714: );
715:
716: END;
717:
718: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
719: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
720: 'Returned from Lock_Row table handler');
721: end if;
722:
715:
716: END;
717:
718: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
719: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
720: 'Returned from Lock_Row table handler');
721: end if;
722:
723: -- Api body ends here
731: FND_MSG_PUB.Count_And_Get
732: (p_count => x_msg_count,
733: p_data => x_msg_data );
734:
735: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
736: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
737: 'Leaving Lock_Flwsts_Tran_Resp');
738: END IF;
739:
732: (p_count => x_msg_count,
733: p_data => x_msg_data );
734:
735: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
736: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
737: 'Leaving Lock_Flwsts_Tran_Resp');
738: END IF;
739:
740: EXCEPTION
747: (p_count => x_msg_count,
748: p_data => x_msg_data );
749:
750: -- save message in debug log
751: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
752: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
753: 'EXC_ERROR['||x_msg_data||']');
754: END IF;
755:
748: p_data => x_msg_data );
749:
750: -- save message in debug log
751: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
752: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
753: 'EXC_ERROR['||x_msg_data||']');
754: END IF;
755:
756: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
759:
760: IF FND_MSG_PUB.Check_Msg_Level
761: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
762: THEN
763: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
764: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
765: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
766: end if;
767: FND_MSG_PUB.Add_Exc_Msg
760: IF FND_MSG_PUB.Check_Msg_Level
761: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
762: THEN
763: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
764: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
765: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
766: end if;
767: FND_MSG_PUB.Add_Exc_Msg
768: (G_PKG_NAME ,
773: ( p_count => x_msg_count,
774: p_data => x_msg_data );
775:
776: -- save message in debug log
777: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
778: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
779: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
780: END IF;
781:
774: p_data => x_msg_data );
775:
776: -- save message in debug log
777: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
778: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
779: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
780: END IF;
781:
782: WHEN OTHERS THEN
786: -- save message in fnd stack
787: IF FND_MSG_PUB.Check_Msg_Level
788: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
789: THEN
790: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
791: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
792: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
793: end if;
794: FND_MSG_PUB.Add_Exc_Msg
787: IF FND_MSG_PUB.Check_Msg_Level
788: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
789: THEN
790: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
791: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
792: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
793: end if;
794: FND_MSG_PUB.Add_Exc_Msg
795: (G_PKG_NAME ,
800: (p_count => x_msg_count,
801: p_data => x_msg_data );
802:
803: -- save message in debug log
804: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
805: -- create a seeded message
806: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
807: 'SQL Message['||sqlerrm||']' );
808: END IF;
802:
803: -- save message in debug log
804: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
805: -- create a seeded message
806: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
807: 'SQL Message['||sqlerrm||']' );
808: END IF;
809:
810: END Lock_Flwsts_Tran_Resp;