54: IF FND_API.to_Boolean( p_init_msg_list ) THEN
55: FND_MSG_PUB.initialize;
56: END IF;
57:
58: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
59: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
60: 'Entered Create_Repair_Milestone');
61: END IF;
62:
55: FND_MSG_PUB.initialize;
56: END IF;
57:
58: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
59: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
60: 'Entered Create_Repair_Milestone');
61: END IF;
62:
63: /*
61: END IF;
62:
63: /*
64: -- log parameters
65: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
66: csd_gen_utility_pvt.dump_repair_milestone_rec
67: ( p_repair_milestone_rec => p_repair_milestone_rec);
68: END IF;
69: */
72:
73: -- Api body starts
74:
75: -- Check the required parameters
76: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
77: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
78: 'Checking required parameters');
79: end if;
80:
73: -- Api body starts
74:
75: -- Check the required parameters
76: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
77: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
78: 'Checking required parameters');
79: end if;
80:
81: -- Check the required parameters
94: p_param_name => 'MILESTONE_DATE',
95: p_api_name => lc_api_name);
96:
97: -- Insert row
98: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
99: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
100: 'Calling Insert_Row table handler');
101: end if;
102:
95: p_api_name => lc_api_name);
96:
97: -- Insert row
98: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
99: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
100: 'Calling Insert_Row table handler');
101: end if;
102:
103: Begin
119:
120:
121: EXCEPTION
122: WHEN OTHERS THEN
123: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
124: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,lc_mod_name,
125: 'Others exception in CSD_REPAIR_MILESTONES_PKG.Insert_Row Call :' ||
126: SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1,255));
127: END IF;
120:
121: EXCEPTION
122: WHEN OTHERS THEN
123: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
124: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,lc_mod_name,
125: 'Others exception in CSD_REPAIR_MILESTONES_PKG.Insert_Row Call :' ||
126: SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1,255));
127: END IF;
128: x_return_status := FND_API.G_RET_STS_ERROR;
131: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
132: RAISE FND_API.G_EXC_ERROR;
133: END IF;
134:
135: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
136: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
137: 'Returned from Insert_Row table handler');
138: end if;
139:
132: RAISE FND_API.G_EXC_ERROR;
133: END IF;
134:
135: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
136: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
137: 'Returned from Insert_Row table handler');
138: end if;
139:
140: -- Api body ends here
148: FND_MSG_PUB.Count_And_Get
149: (p_count => x_msg_count,
150: p_data => x_msg_data );
151:
152: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
153: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
154: 'Leaving Create_Repair_Milestone');
155: END IF;
156:
149: (p_count => x_msg_count,
150: p_data => x_msg_data );
151:
152: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
153: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
154: 'Leaving Create_Repair_Milestone');
155: END IF;
156:
157: EXCEPTION
163: (p_count => x_msg_count,
164: p_data => x_msg_data );
165:
166: -- save message in debug log
167: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
168: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
169: 'EXC_ERROR['||x_msg_data||']');
170: END IF;
171:
164: p_data => x_msg_data );
165:
166: -- save message in debug log
167: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
168: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
169: 'EXC_ERROR['||x_msg_data||']');
170: END IF;
171:
172: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
176: -- save message in fnd stack
177: IF FND_MSG_PUB.Check_Msg_Level
178: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
179: THEN
180: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
181: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
182: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
183: end if;
184: FND_MSG_PUB.Add_Exc_Msg
177: IF FND_MSG_PUB.Check_Msg_Level
178: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
179: THEN
180: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
181: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
182: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
183: end if;
184: FND_MSG_PUB.Add_Exc_Msg
185: (G_PKG_NAME ,
190: ( p_count => x_msg_count,
191: p_data => x_msg_data );
192:
193: -- save message in debug log
194: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
195: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
196: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
197: END IF;
198:
191: p_data => x_msg_data );
192:
193: -- save message in debug log
194: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
195: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
196: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
197: END IF;
198:
199: WHEN OTHERS THEN
203: -- save message in fnd stack
204: IF FND_MSG_PUB.Check_Msg_Level
205: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
206: THEN
207: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
208: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
209: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
210: end if;
211: FND_MSG_PUB.Add_Exc_Msg
204: IF FND_MSG_PUB.Check_Msg_Level
205: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
206: THEN
207: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
208: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
209: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
210: end if;
211: FND_MSG_PUB.Add_Exc_Msg
212: (G_PKG_NAME ,
217: (p_count => x_msg_count,
218: p_data => x_msg_data );
219:
220: -- save message in debug log
221: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
222: -- create a seeded message
223: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
224: 'SQL Message['||sqlerrm||']' );
225: END IF;
219:
220: -- save message in debug log
221: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
222: -- create a seeded message
223: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
224: 'SQL Message['||sqlerrm||']' );
225: END IF;
226:
227: END Create_Repair_Milestone;
275: IF FND_API.to_Boolean( p_init_msg_list ) THEN
276: FND_MSG_PUB.initialize;
277: END IF;
278:
279: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
280: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
281: 'Entered Update_Repair_Milestone');
282: END IF;
283:
276: FND_MSG_PUB.initialize;
277: END IF;
278:
279: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
280: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
281: 'Entered Update_Repair_Milestone');
282: END IF;
283:
284: /*
282: END IF;
283:
284: /*
285: -- log parameters
286: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
287: csd_gen_utility_pvt.dump_repair_milestone_rec
288: ( p_repair_milestone_rec => p_repair_milestone_rec);
289: END IF;
290: */
294:
295: -- Api body starts
296:
297: -- Check the required parameters
298: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
299: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
300: 'Checking required parameters');
301: end if;
302:
295: -- Api body starts
296:
297: -- Check the required parameters
298: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
299: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
300: 'Checking required parameters');
301: end if;
302:
303: CSD_PROCESS_UTIL.Check_Reqd_Param
320: p_param_name => 'MILESTONE_DATE',
321: p_api_name => lc_api_name);
322:
323: -- Update row
324: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
325: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
326: 'Calling Update_Row table handler');
327: end if;
328:
321: p_api_name => lc_api_name);
322:
323: -- Update row
324: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
325: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
326: 'Calling Update_Row table handler');
327: end if;
328:
329: Begin
344: x_obj_ver_number := p_repair_milestone_rec.object_version_number + 1;
345:
346: EXCEPTION
347: WHEN OTHERS THEN
348: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
349: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,lc_mod_name,
350: 'Others exception in CSD_REPAIR_MILESTONES_PKG.Update_Row Call :' ||
351: SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1,255));
352: END IF;
345:
346: EXCEPTION
347: WHEN OTHERS THEN
348: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
349: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,lc_mod_name,
350: 'Others exception in CSD_REPAIR_MILESTONES_PKG.Update_Row Call :' ||
351: SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1,255));
352: END IF;
353: x_return_status := FND_API.G_RET_STS_ERROR;
356: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
357: RAISE FND_API.G_EXC_ERROR;
358: END IF;
359:
360: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
361: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
362: 'Returned from Update_Row table handler');
363: end if;
364:
357: RAISE FND_API.G_EXC_ERROR;
358: END IF;
359:
360: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
361: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
362: 'Returned from Update_Row table handler');
363: end if;
364:
365: -- Api body ends here
373: FND_MSG_PUB.Count_And_Get
374: (p_count => x_msg_count,
375: p_data => x_msg_data );
376:
377: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
378: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
379: 'Leaving Update_Repair_Milestone');
380: END IF;
381:
374: (p_count => x_msg_count,
375: p_data => x_msg_data );
376:
377: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
378: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
379: 'Leaving Update_Repair_Milestone');
380: END IF;
381:
382: EXCEPTION
388: (p_count => x_msg_count,
389: p_data => x_msg_data );
390:
391: -- save message in debug log
392: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
393: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
394: 'EXC_ERROR['||x_msg_data||']');
395: END IF;
396:
389: p_data => x_msg_data );
390:
391: -- save message in debug log
392: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
393: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
394: 'EXC_ERROR['||x_msg_data||']');
395: END IF;
396:
397: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
400:
401: IF FND_MSG_PUB.Check_Msg_Level
402: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
403: THEN
404: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
405: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
406: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
407: end if;
408: FND_MSG_PUB.Add_Exc_Msg
401: IF FND_MSG_PUB.Check_Msg_Level
402: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
403: THEN
404: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
405: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
406: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
407: end if;
408: FND_MSG_PUB.Add_Exc_Msg
409: (G_PKG_NAME ,
414: ( p_count => x_msg_count,
415: p_data => x_msg_data );
416:
417: -- save message in debug log
418: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
419: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
420: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
421: END IF;
422:
415: p_data => x_msg_data );
416:
417: -- save message in debug log
418: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
419: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
420: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
421: END IF;
422:
423: WHEN OTHERS THEN
427: -- save message in fnd stack
428: IF FND_MSG_PUB.Check_Msg_Level
429: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
430: THEN
431: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
432: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
433: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
434: end if;
435: FND_MSG_PUB.Add_Exc_Msg
428: IF FND_MSG_PUB.Check_Msg_Level
429: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
430: THEN
431: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
432: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
433: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
434: end if;
435: FND_MSG_PUB.Add_Exc_Msg
436: (G_PKG_NAME ,
441: (p_count => x_msg_count,
442: p_data => x_msg_data );
443:
444: -- save message in debug log
445: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
446: -- create a seeded message
447: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
448: 'SQL Message['||sqlerrm||']' );
449: END IF;
443:
444: -- save message in debug log
445: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
446: -- create a seeded message
447: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
448: 'SQL Message['||sqlerrm||']' );
449: END IF;
450:
451: END Update_Repair_Milestone;
495: IF FND_API.to_Boolean( p_init_msg_list ) THEN
496: FND_MSG_PUB.initialize;
497: END IF;
498:
499: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
500: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
501: 'Entered Delete_Repair_Milestone');
502: END IF;
503:
496: FND_MSG_PUB.initialize;
497: END IF;
498:
499: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
500: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
501: 'Entered Delete_Repair_Milestone');
502: END IF;
503:
504: -- Initialize API return status to success
506:
507: -- Api body starts
508:
509: -- Check the required parameters
510: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
511: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
512: 'Checking required parameter');
513: end if;
514:
507: -- Api body starts
508:
509: -- Check the required parameters
510: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
511: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
512: 'Checking required parameter');
513: end if;
514:
515: -- Check the required parameter
518: p_param_name => 'REPAIR_MILESTONE_ID',
519: p_api_name => lc_api_name);
520:
521: -- Delete row
522: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
523: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
524: 'Calling Delete_Row table handler');
525: end if;
526:
519: p_api_name => lc_api_name);
520:
521: -- Delete row
522: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
523: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
524: 'Calling Delete_Row table handler');
525: end if;
526:
527: BEGIN
531: ( p_repair_milestone_id => p_repair_milestone_id);
532:
533: EXCEPTION
534: WHEN OTHERS THEN
535: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
536: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,lc_mod_name,
537: 'Others exception in CSD_REPAIR_MILESTONES_PKG.Delete_Row Call :' ||
538: SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1,255));
539: END IF;
532:
533: EXCEPTION
534: WHEN OTHERS THEN
535: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
536: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,lc_mod_name,
537: 'Others exception in CSD_REPAIR_MILESTONES_PKG.Delete_Row Call :' ||
538: SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1,255));
539: END IF;
540: x_return_status := FND_API.G_RET_STS_ERROR;
543: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
544: RAISE FND_API.G_EXC_ERROR;
545: END IF;
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,
549: 'Returned from Delete_Row table handler');
550: end if;
551:
544: RAISE FND_API.G_EXC_ERROR;
545: END IF;
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,
549: 'Returned from Delete_Row table handler');
550: end if;
551:
552: -- Api body ends here
560: FND_MSG_PUB.Count_And_Get
561: (p_count => x_msg_count,
562: p_data => x_msg_data );
563:
564: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
565: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
566: 'Leaving Delete_Repair_Milestone');
567: END IF;
568:
561: (p_count => x_msg_count,
562: p_data => x_msg_data );
563:
564: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
565: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
566: 'Leaving Delete_Repair_Milestone');
567: END IF;
568:
569: EXCEPTION
577: (p_count => x_msg_count,
578: p_data => x_msg_data );
579:
580: -- save message in debug log
581: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
582: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
583: 'EXC_ERROR['||x_msg_data||']');
584: END IF;
585:
578: p_data => x_msg_data );
579:
580: -- save message in debug log
581: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
582: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
583: 'EXC_ERROR['||x_msg_data||']');
584: END IF;
585:
586: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
590:
591: IF FND_MSG_PUB.Check_Msg_Level
592: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
593: THEN
594: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
595: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
596: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
597: end if;
598: FND_MSG_PUB.Add_Exc_Msg
591: IF FND_MSG_PUB.Check_Msg_Level
592: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
593: THEN
594: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
595: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
596: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
597: end if;
598: FND_MSG_PUB.Add_Exc_Msg
599: (G_PKG_NAME ,
604: ( p_count => x_msg_count,
605: p_data => x_msg_data );
606:
607: -- save message in debug log
608: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
609: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
610: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
611: END IF;
612:
605: p_data => x_msg_data );
606:
607: -- save message in debug log
608: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
609: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
610: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
611: END IF;
612:
613: WHEN OTHERS THEN
618: -- save message in fnd stack
619: IF FND_MSG_PUB.Check_Msg_Level
620: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
621: THEN
622: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
623: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
624: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
625: end if;
626: FND_MSG_PUB.Add_Exc_Msg
619: IF FND_MSG_PUB.Check_Msg_Level
620: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
621: THEN
622: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
623: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
624: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
625: end if;
626: FND_MSG_PUB.Add_Exc_Msg
627: (G_PKG_NAME ,
632: (p_count => x_msg_count,
633: p_data => x_msg_data );
634:
635: -- save message in debug log
636: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
637: -- create a seeded message
638: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
639: 'SQL Message['||sqlerrm||']' );
640: END IF;
634:
635: -- save message in debug log
636: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
637: -- create a seeded message
638: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
639: 'SQL Message['||sqlerrm||']' );
640: END IF;
641:
642: END Delete_Repair_Milestone;
687: IF FND_API.to_Boolean( p_init_msg_list ) THEN
688: FND_MSG_PUB.initialize;
689: END IF;
690:
691: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
692: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
693: 'Entered Lock_Repair_Milestone');
694: END IF;
695:
688: FND_MSG_PUB.initialize;
689: END IF;
690:
691: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
692: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
693: 'Entered Lock_Repair_Milestone');
694: END IF;
695:
696: -- Initialize API return status to success
698:
699: -- Api body starts
700:
701: -- Check the required parameters
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: 'Checking required parameters');
705: end if;
706:
699: -- Api body starts
700:
701: -- Check the required parameters
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: 'Checking required parameters');
705: end if;
706:
707: -- Check the required parameters
715: p_param_name => 'OBJECT_VERSION_NUMBER',
716: p_api_name => lc_api_name);
717:
718: -- Lock row
719: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
720: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
721: 'Calling Lock_Row table handler');
722: end if;
723:
716: p_api_name => lc_api_name);
717:
718: -- Lock row
719: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
720: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
721: 'Calling Lock_Row table handler');
722: end if;
723:
724: Begin
731: );
732:
733: EXCEPTION
734: WHEN OTHERS THEN
735: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
736: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,lc_mod_name,
737: 'Others exception in CSD_REPAIR_MILESTONES_PKG.Lock_Row Call :' ||
738: SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1,255));
739: END IF;
732:
733: EXCEPTION
734: WHEN OTHERS THEN
735: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
736: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,lc_mod_name,
737: 'Others exception in CSD_REPAIR_MILESTONES_PKG.Lock_Row Call :' ||
738: SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1,255));
739: END IF;
740: x_return_status := FND_API.G_RET_STS_ERROR;
743: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
744: RAISE FND_API.G_EXC_ERROR;
745: END IF;
746:
747: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
748: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
749: 'Returned from Lock_Row table handler');
750: end if;
751:
744: RAISE FND_API.G_EXC_ERROR;
745: END IF;
746:
747: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
748: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
749: 'Returned from Lock_Row table handler');
750: end if;
751:
752: -- Api body ends here
760: FND_MSG_PUB.Count_And_Get
761: (p_count => x_msg_count,
762: p_data => x_msg_data );
763:
764: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
765: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
766: 'Leaving Lock_Repair_Milestone');
767: END IF;
768:
761: (p_count => x_msg_count,
762: p_data => x_msg_data );
763:
764: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
765: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
766: 'Leaving Lock_Repair_Milestone');
767: END IF;
768:
769: EXCEPTION
776: (p_count => x_msg_count,
777: p_data => x_msg_data );
778:
779: -- save message in debug log
780: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
781: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
782: 'EXC_ERROR['||x_msg_data||']');
783: END IF;
784:
777: p_data => x_msg_data );
778:
779: -- save message in debug log
780: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
781: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
782: 'EXC_ERROR['||x_msg_data||']');
783: END IF;
784:
785: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
788:
789: IF FND_MSG_PUB.Check_Msg_Level
790: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
791: THEN
792: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
793: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
794: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
795: end if;
796: FND_MSG_PUB.Add_Exc_Msg
789: IF FND_MSG_PUB.Check_Msg_Level
790: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
791: THEN
792: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
793: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
794: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
795: end if;
796: FND_MSG_PUB.Add_Exc_Msg
797: (G_PKG_NAME ,
802: ( p_count => x_msg_count,
803: p_data => x_msg_data );
804:
805: -- save message in debug log
806: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
807: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
808: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
809: END IF;
810:
803: p_data => x_msg_data );
804:
805: -- save message in debug log
806: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
807: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
808: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
809: END IF;
810:
811: WHEN OTHERS THEN
815: -- save message in fnd stack
816: IF FND_MSG_PUB.Check_Msg_Level
817: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
818: THEN
819: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
820: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
821: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
822: end if;
823: FND_MSG_PUB.Add_Exc_Msg
816: IF FND_MSG_PUB.Check_Msg_Level
817: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
818: THEN
819: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
820: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
821: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
822: end if;
823: FND_MSG_PUB.Add_Exc_Msg
824: (G_PKG_NAME ,
829: (p_count => x_msg_count,
830: p_data => x_msg_data );
831:
832: -- save message in debug log
833: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
834: -- create a seeded message
835: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
836: 'SQL Message['||sqlerrm||']' );
837: END IF;
831:
832: -- save message in debug log
833: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
834: -- create a seeded message
835: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
836: 'SQL Message['||sqlerrm||']' );
837: END IF;
838:
839: END Lock_Repair_Milestone;