105:
106:
107: BEGIN
108:
109: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
110: fnd_log.string
111: (
112: fnd_log.level_procedure,
113: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
106:
107: BEGIN
108:
109: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
110: fnd_log.string
111: (
112: fnd_log.level_procedure,
113: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
114: 'At the start of '||l_api_name
108:
109: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
110: fnd_log.string
111: (
112: fnd_log.level_procedure,
113: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
114: 'At the start of '||l_api_name
115: );
116: END IF;
133: FND_MESSAGE.set_name( 'AHL','AHL_COM_INVALID_DML' );
134: FND_MESSAGE.set_token( 'FIELD', p_flight_schedule_rec.DML_OPERATION);
135: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
136: FND_MSG_PUB.add;
137: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
138: fnd_log.string
139: (
140: fnd_log.level_error,
141: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
134: FND_MESSAGE.set_token( 'FIELD', p_flight_schedule_rec.DML_OPERATION);
135: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
136: FND_MSG_PUB.add;
137: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
138: fnd_log.string
139: (
140: fnd_log.level_error,
141: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
142: 'DML Operation specified is invalid for '
136: FND_MSG_PUB.add;
137: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
138: fnd_log.string
139: (
140: fnd_log.level_error,
141: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
142: 'DML Operation specified is invalid for '
143: ||p_flight_schedule_rec.unit_schedule_id
144: );
160: THEN
161: FND_MESSAGE.set_name( 'AHL','AHL_UA_US_NOT_FOUND' );
162: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
163: FND_MSG_PUB.add;
164: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
165: fnd_log.string
166: (
167: fnd_log.level_error,
168: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
161: FND_MESSAGE.set_name( 'AHL','AHL_UA_US_NOT_FOUND' );
162: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
163: FND_MSG_PUB.add;
164: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
165: fnd_log.string
166: (
167: fnd_log.level_error,
168: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
169: 'Unit Schedule ID is null for '
163: FND_MSG_PUB.add;
164: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
165: fnd_log.string
166: (
167: fnd_log.level_error,
168: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
169: 'Unit Schedule ID is null for '
170: ||p_flight_schedule_rec.unit_schedule_id
171: );
180: THEN
181: FND_MESSAGE.set_name( 'AHL','AHL_UA_OBJ_VERNO_NULL' );
182: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
183: FND_MSG_PUB.add;
184: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
185: fnd_log.string
186: (
187: fnd_log.level_error,
188: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
181: FND_MESSAGE.set_name( 'AHL','AHL_UA_OBJ_VERNO_NULL' );
182: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
183: FND_MSG_PUB.add;
184: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
185: fnd_log.string
186: (
187: fnd_log.level_error,
188: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
189: 'Object Version Number is null for '
183: FND_MSG_PUB.add;
184: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
185: fnd_log.string
186: (
187: fnd_log.level_error,
188: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
189: 'Object Version Number is null for '
190: ||p_flight_schedule_rec.unit_schedule_id
191: );
201: THEN
202: FND_MESSAGE.set_name( 'AHL','AHL_UA_REC_CHANGED' );
203: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
204: FND_MSG_PUB.add;
205: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
206: fnd_log.string
207: (
208: fnd_log.level_error,
209: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
202: FND_MESSAGE.set_name( 'AHL','AHL_UA_REC_CHANGED' );
203: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
204: FND_MSG_PUB.add;
205: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
206: fnd_log.string
207: (
208: fnd_log.level_error,
209: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
210: 'Unit Schedule record is not valid ->'
204: FND_MSG_PUB.add;
205: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
206: fnd_log.string
207: (
208: fnd_log.level_error,
209: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
210: 'Unit Schedule record is not valid ->'
211: ||p_flight_schedule_rec.unit_schedule_id
212: );
215: RAISE FND_API.G_EXC_ERROR;
216: END IF;
217: END IF;
218:
219: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
220: fnd_log.string
221: (
222: fnd_log.level_procedure,
223: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
216: END IF;
217: END IF;
218:
219: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
220: fnd_log.string
221: (
222: fnd_log.level_procedure,
223: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
224: 'At the end of '||l_api_name
218:
219: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
220: fnd_log.string
221: (
222: fnd_log.level_procedure,
223: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
224: 'At the end of '||l_api_name
225: );
226: END IF;
273: l_msg_data VARCHAR2(30);
274:
275: BEGIN
276:
277: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
278: fnd_log.string
279: (
280: fnd_log.level_procedure,
281: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
274:
275: BEGIN
276:
277: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
278: fnd_log.string
279: (
280: fnd_log.level_procedure,
281: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
282: 'At the start of '||l_api_name
276:
277: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
278: fnd_log.string
279: (
280: fnd_log.level_procedure,
281: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
282: 'At the start of '||l_api_name
283: );
284: END IF;
307: IF uc_name_to_id_csr%NOTFOUND THEN
308: FND_MESSAGE.SET_NAME('AHL','AHL_UA_INV_UC_NAME');
309: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
310: FND_MSG_PUB.ADD;
311: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
312: fnd_log.string
313: (
314: fnd_log.level_error,
315: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
308: FND_MESSAGE.SET_NAME('AHL','AHL_UA_INV_UC_NAME');
309: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
310: FND_MSG_PUB.ADD;
311: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
312: fnd_log.string
313: (
314: fnd_log.level_error,
315: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
316: 'Unit Config name specified for '||p_x_flight_schedule_rec.unit_schedule_id
310: FND_MSG_PUB.ADD;
311: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
312: fnd_log.string
313: (
314: fnd_log.level_error,
315: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
316: 'Unit Config name specified for '||p_x_flight_schedule_rec.unit_schedule_id
317: ||' is invalid'
318: );
339: IF org_name_to_id_csr%NOTFOUND THEN
340: FND_MESSAGE.SET_NAME('AHL','AHL_UA_INV_ARR_ORG');
341: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
342: FND_MSG_PUB.ADD;
343: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
344: fnd_log.string
345: (
346: fnd_log.level_error,
347: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
340: FND_MESSAGE.SET_NAME('AHL','AHL_UA_INV_ARR_ORG');
341: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
342: FND_MSG_PUB.ADD;
343: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
344: fnd_log.string
345: (
346: fnd_log.level_error,
347: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
348: 'Arrival Org code specified for '||p_x_flight_schedule_rec.unit_schedule_id
342: FND_MSG_PUB.ADD;
343: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
344: fnd_log.string
345: (
346: fnd_log.level_error,
347: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
348: 'Arrival Org code specified for '||p_x_flight_schedule_rec.unit_schedule_id
349: ||' is invalid'
350: );
376: IF dept_name_to_id_csr%NOTFOUND THEN
377: FND_MESSAGE.SET_NAME('AHL','AHL_UA_INV_ARR_DEPT');
378: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
379: FND_MSG_PUB.ADD;
380: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
381: fnd_log.string
382: (
383: fnd_log.level_error,
384: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
377: FND_MESSAGE.SET_NAME('AHL','AHL_UA_INV_ARR_DEPT');
378: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
379: FND_MSG_PUB.ADD;
380: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
381: fnd_log.string
382: (
383: fnd_log.level_error,
384: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
385: 'Arrival Department code specified for '||p_x_flight_schedule_rec.unit_schedule_id
379: FND_MSG_PUB.ADD;
380: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
381: fnd_log.string
382: (
383: fnd_log.level_error,
384: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
385: 'Arrival Department code specified for '||p_x_flight_schedule_rec.unit_schedule_id
386: ||' is invalid'
387: );
408: IF org_name_to_id_csr%NOTFOUND THEN
409: FND_MESSAGE.SET_NAME('AHL','AHL_UA_INV_DEP_ORG');
410: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
411: FND_MSG_PUB.ADD;
412: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
413: fnd_log.string
414: (
415: fnd_log.level_error,
416: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
409: FND_MESSAGE.SET_NAME('AHL','AHL_UA_INV_DEP_ORG');
410: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
411: FND_MSG_PUB.ADD;
412: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
413: fnd_log.string
414: (
415: fnd_log.level_error,
416: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
417: 'Departure org code specified for '||p_x_flight_schedule_rec.unit_schedule_id
411: FND_MSG_PUB.ADD;
412: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
413: fnd_log.string
414: (
415: fnd_log.level_error,
416: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
417: 'Departure org code specified for '||p_x_flight_schedule_rec.unit_schedule_id
418: ||' is invalid'
419: );
445: IF dept_name_to_id_csr%NOTFOUND THEN
446: FND_MESSAGE.SET_NAME('AHL','AHL_UA_INV_DEP_DEPT');
447: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
448: FND_MSG_PUB.ADD;
449: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
450: fnd_log.string
451: (
452: fnd_log.level_error,
453: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
446: FND_MESSAGE.SET_NAME('AHL','AHL_UA_INV_DEP_DEPT');
447: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
448: FND_MSG_PUB.ADD;
449: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
450: fnd_log.string
451: (
452: fnd_log.level_error,
453: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
454: 'Departure department code specified for '||p_x_flight_schedule_rec.unit_schedule_id
448: FND_MSG_PUB.ADD;
449: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
450: fnd_log.string
451: (
452: fnd_log.level_error,
453: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
454: 'Departure department code specified for '||p_x_flight_schedule_rec.unit_schedule_id
455: ||' is invalid'
456: );
484: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
485: FND_MESSAGE.SET_NAME('AHL','AHL_UA_INV_RESCH_MODE');
486: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
487: FND_MSG_PUB.ADD;
488: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
489: fnd_log.string
490: (
491: fnd_log.level_error,
492: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
485: FND_MESSAGE.SET_NAME('AHL','AHL_UA_INV_RESCH_MODE');
486: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
487: FND_MSG_PUB.ADD;
488: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
489: fnd_log.string
490: (
491: fnd_log.level_error,
492: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
493: 'visit reschedule mode specified for '||p_x_flight_schedule_rec.unit_schedule_id
487: FND_MSG_PUB.ADD;
488: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
489: fnd_log.string
490: (
491: fnd_log.level_error,
492: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
493: 'visit reschedule mode specified for '||p_x_flight_schedule_rec.unit_schedule_id
494: ||' is invalid'
495: );
498: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
499: END IF;
500: END IF;
501:
502: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
503: fnd_log.string
504: (
505: fnd_log.level_procedure,
506: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
499: END IF;
500: END IF;
501:
502: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
503: fnd_log.string
504: (
505: fnd_log.level_procedure,
506: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
507: 'At the end of '||l_api_name
501:
502: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
503: fnd_log.string
504: (
505: fnd_log.level_procedure,
506: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
507: 'At the end of '||l_api_name
508: );
509: END IF;
530: l_record_identifier VARCHAR2(150);
531:
532: BEGIN
533:
534: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
535: fnd_log.string
536: (
537: fnd_log.level_procedure,
538: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
531:
532: BEGIN
533:
534: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
535: fnd_log.string
536: (
537: fnd_log.level_procedure,
538: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
539: 'At the start of '||l_api_name
533:
534: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
535: fnd_log.string
536: (
537: fnd_log.level_procedure,
538: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
539: 'At the start of '||l_api_name
540: );
541: END IF;
642: THEN
643: p_x_flight_schedule_rec.visit_reschedule_mode := NULL;
644: END IF;
645:
646: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
647: fnd_log.string
648: (
649: fnd_log.level_procedure,
650: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
643: p_x_flight_schedule_rec.visit_reschedule_mode := NULL;
644: END IF;
645:
646: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
647: fnd_log.string
648: (
649: fnd_log.level_procedure,
650: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
651: 'At the end of '||l_api_name
645:
646: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
647: fnd_log.string
648: (
649: fnd_log.level_procedure,
650: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
651: 'At the end of '||l_api_name
652: );
653: END IF;
672: l_record_identifier VARCHAR2(150);
673:
674: BEGIN
675:
676: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
677: fnd_log.string
678: (
679: fnd_log.level_procedure,
680: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
673:
674: BEGIN
675:
676: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
677: fnd_log.string
678: (
679: fnd_log.level_procedure,
680: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
681: 'At the start of '||l_api_name
675:
676: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
677: fnd_log.string
678: (
679: fnd_log.level_procedure,
680: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
681: 'At the start of '||l_api_name
682: );
683: END IF;
697: THEN
698: FND_MESSAGE.set_name( 'AHL','AHL_UA_INV_UC_NAME' );
699: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
700: FND_MSG_PUB.add;
701: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
702: fnd_log.string
703: (
704: fnd_log.level_error,
705: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
698: FND_MESSAGE.set_name( 'AHL','AHL_UA_INV_UC_NAME' );
699: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
700: FND_MSG_PUB.add;
701: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
702: fnd_log.string
703: (
704: fnd_log.level_error,
705: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
706: 'Unit Config Header id is a mandatory input field and cannot be null for '
700: FND_MSG_PUB.add;
701: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
702: fnd_log.string
703: (
704: fnd_log.level_error,
705: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
706: 'Unit Config Header id is a mandatory input field and cannot be null for '
707: ||p_flight_schedule_rec.unit_schedule_id
708: );
718: THEN
719: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_FLG_NUMBER_NULL' );
720: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
721: FND_MSG_PUB.add;
722: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
723: fnd_log.string
724: (
725: fnd_log.level_error,
726: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
719: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_FLG_NUMBER_NULL' );
720: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
721: FND_MSG_PUB.add;
722: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
723: fnd_log.string
724: (
725: fnd_log.level_error,
726: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
727: 'Flight Number cannot be null for '
721: FND_MSG_PUB.add;
722: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
723: fnd_log.string
724: (
725: fnd_log.level_error,
726: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
727: 'Flight Number cannot be null for '
728: ||p_flight_schedule_rec.unit_schedule_id
729: );
740: THEN
741: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_SEGMENT_NULL' );
742: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
743: FND_MSG_PUB.add;
744: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
745: fnd_log.string
746: (
747: fnd_log.level_error,
748: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
741: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_SEGMENT_NULL' );
742: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
743: FND_MSG_PUB.add;
744: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
745: fnd_log.string
746: (
747: fnd_log.level_error,
748: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
749: 'Segment cannot be null for '
743: FND_MSG_PUB.add;
744: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
745: fnd_log.string
746: (
747: fnd_log.level_error,
748: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
749: 'Segment cannot be null for '
750: ||p_flight_schedule_rec.unit_schedule_id
751: );
762: THEN
763: FND_MESSAGE.set_name( 'AHL','AHL_UA_DEP_DEPT_NULL' );
764: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
765: FND_MSG_PUB.add;
766: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
767: fnd_log.string
768: (
769: fnd_log.level_error,
770: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
763: FND_MESSAGE.set_name( 'AHL','AHL_UA_DEP_DEPT_NULL' );
764: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
765: FND_MSG_PUB.add;
766: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
767: fnd_log.string
768: (
769: fnd_log.level_error,
770: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
771: 'Departure_Dept_Id is a mandatory input field and cannot be null for '
765: FND_MSG_PUB.add;
766: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
767: fnd_log.string
768: (
769: fnd_log.level_error,
770: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
771: 'Departure_Dept_Id is a mandatory input field and cannot be null for '
772: ||p_flight_schedule_rec.unit_schedule_id
773: );
783: THEN
784: FND_MESSAGE.set_name( 'AHL','AHL_UA_DEP_ORG_NULL' );
785: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
786: FND_MSG_PUB.add;
787: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
788: fnd_log.string
789: (
790: fnd_log.level_error,
791: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
784: FND_MESSAGE.set_name( 'AHL','AHL_UA_DEP_ORG_NULL' );
785: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
786: FND_MSG_PUB.add;
787: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
788: fnd_log.string
789: (
790: fnd_log.level_error,
791: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
792: 'Departure_Org_Id is a mandatory input field and cannot be null for '
786: FND_MSG_PUB.add;
787: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
788: fnd_log.string
789: (
790: fnd_log.level_error,
791: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
792: 'Departure_Org_Id is a mandatory input field and cannot be null for '
793: ||p_flight_schedule_rec.unit_schedule_id
794: );
804: THEN
805: FND_MESSAGE.set_name( 'AHL','AHL_UA_ARR_DEPT_NULL' );
806: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
807: FND_MSG_PUB.add;
808: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
809: fnd_log.string
810: (
811: fnd_log.level_error,
812: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
805: FND_MESSAGE.set_name( 'AHL','AHL_UA_ARR_DEPT_NULL' );
806: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
807: FND_MSG_PUB.add;
808: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
809: fnd_log.string
810: (
811: fnd_log.level_error,
812: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
813: 'Arrival_Dept_Id is a mandatory input field and cannot be null for '
807: FND_MSG_PUB.add;
808: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
809: fnd_log.string
810: (
811: fnd_log.level_error,
812: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
813: 'Arrival_Dept_Id is a mandatory input field and cannot be null for '
814: ||p_flight_schedule_rec.unit_schedule_id
815: );
825: THEN
826: FND_MESSAGE.set_name( 'AHL','AHL_UA_ARR_ORG_NULL' );
827: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
828: FND_MSG_PUB.add;
829: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
830: fnd_log.string
831: (
832: fnd_log.level_error,
833: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
826: FND_MESSAGE.set_name( 'AHL','AHL_UA_ARR_ORG_NULL' );
827: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
828: FND_MSG_PUB.add;
829: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
830: fnd_log.string
831: (
832: fnd_log.level_error,
833: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
834: 'Arrival_Org_Id is a mandatory input field and cannot be null for '
828: FND_MSG_PUB.add;
829: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
830: fnd_log.string
831: (
832: fnd_log.level_error,
833: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
834: 'Arrival_Org_Id is a mandatory input field and cannot be null for '
835: ||p_flight_schedule_rec.unit_schedule_id
836: );
846: THEN
847: FND_MESSAGE.set_name( 'AHL','AHL_UA_EST_DEP_TIME_NULL' );
848: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
849: FND_MSG_PUB.add;
850: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
851: fnd_log.string
852: (
853: fnd_log.level_error,
854: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
847: FND_MESSAGE.set_name( 'AHL','AHL_UA_EST_DEP_TIME_NULL' );
848: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
849: FND_MSG_PUB.add;
850: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
851: fnd_log.string
852: (
853: fnd_log.level_error,
854: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
855: 'Est_Departure_Time is a mandatory input field and cannot be null for '
849: FND_MSG_PUB.add;
850: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
851: fnd_log.string
852: (
853: fnd_log.level_error,
854: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
855: 'Est_Departure_Time is a mandatory input field and cannot be null for '
856: ||p_flight_schedule_rec.unit_schedule_id
857: );
867: THEN
868: FND_MESSAGE.set_name( 'AHL','AHL_UA_EST_ARR_TIME_NULL' );
869: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
870: FND_MSG_PUB.add;
871: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
872: fnd_log.string
873: (
874: fnd_log.level_error,
875: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
868: FND_MESSAGE.set_name( 'AHL','AHL_UA_EST_ARR_TIME_NULL' );
869: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
870: FND_MSG_PUB.add;
871: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
872: fnd_log.string
873: (
874: fnd_log.level_error,
875: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
876: 'Est_Arrival_Time is a mandatory input field and cannot be null for '
870: FND_MSG_PUB.add;
871: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
872: fnd_log.string
873: (
874: fnd_log.level_error,
875: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
876: 'Est_Arrival_Time is a mandatory input field and cannot be null for '
877: ||p_flight_schedule_rec.unit_schedule_id
878: );
888: THEN
889: FND_MESSAGE.set_name( 'AHL','AHL_UA_VST_RES_MODE_NULL' );
890: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
891: FND_MSG_PUB.add;
892: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
893: fnd_log.string
894: (
895: fnd_log.level_error,
896: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
889: FND_MESSAGE.set_name( 'AHL','AHL_UA_VST_RES_MODE_NULL' );
890: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
891: FND_MSG_PUB.add;
892: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
893: fnd_log.string
894: (
895: fnd_log.level_error,
896: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
897: 'Visit_Reschedule_Mode is a mandatory input field and cannot be null for '
891: FND_MSG_PUB.add;
892: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
893: fnd_log.string
894: (
895: fnd_log.level_error,
896: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
897: 'Visit_Reschedule_Mode is a mandatory input field and cannot be null for '
898: ||p_flight_schedule_rec.unit_schedule_id
899: );
901: x_return_status := FND_API.G_RET_STS_ERROR;
902: --RAISE FND_API.G_EXC_ERROR;
903: END IF;
904:
905: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
906: fnd_log.string
907: (
908: fnd_log.level_procedure,
909: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
902: --RAISE FND_API.G_EXC_ERROR;
903: END IF;
904:
905: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
906: fnd_log.string
907: (
908: fnd_log.level_procedure,
909: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
910: 'At the end of '||l_api_name
904:
905: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
906: fnd_log.string
907: (
908: fnd_log.level_procedure,
909: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
910: 'At the end of '||l_api_name
911: );
912: END IF;
934: l_record_identifier VARCHAR2(150);
935:
936: BEGIN
937:
938: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
939: fnd_log.string
940: (
941: fnd_log.level_procedure,
942: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
935:
936: BEGIN
937:
938: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
939: fnd_log.string
940: (
941: fnd_log.level_procedure,
942: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
943: 'At the end of '||l_api_name
937:
938: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
939: fnd_log.string
940: (
941: fnd_log.level_procedure,
942: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
943: 'At the end of '||l_api_name
944: );
945: END IF;
966: THEN
967: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_US_NOT_FOUND' );
968: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
969: FND_MSG_PUB.add;
970: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
971: fnd_log.string
972: (
973: fnd_log.level_error,
974: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
967: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_US_NOT_FOUND' );
968: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
969: FND_MSG_PUB.add;
970: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
971: fnd_log.string
972: (
973: fnd_log.level_error,
974: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
975: 'Flight schedule record not found for id '
969: FND_MSG_PUB.add;
970: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
971: fnd_log.string
972: (
973: fnd_log.level_error,
974: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
975: 'Flight schedule record not found for id '
976: ||p_x_flight_schedule_rec.unit_schedule_id
977: );
988: THEN
989: FND_MESSAGE.set_name( 'AHL','AHL_UA_UNIT_NO_UPDATE' );
990: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
991: FND_MSG_PUB.add;
992: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
993: fnd_log.string
994: (
995: fnd_log.level_error,
996: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
989: FND_MESSAGE.set_name( 'AHL','AHL_UA_UNIT_NO_UPDATE' );
990: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
991: FND_MSG_PUB.add;
992: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
993: fnd_log.string
994: (
995: fnd_log.level_error,
996: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
997: 'Unit config header id cannot be updated for '
991: FND_MSG_PUB.add;
992: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
993: fnd_log.string
994: (
995: fnd_log.level_error,
996: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
997: 'Unit config header id cannot be updated for '
998: ||p_x_flight_schedule_rec.unit_schedule_id
999: );
1009: THEN
1010: FND_MESSAGE.set_name( 'AHL','AHL_UA_FLIGHT_NO_UPDATE' );
1011: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1012: FND_MSG_PUB.add;
1013: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1014: fnd_log.string
1015: (
1016: fnd_log.level_error,
1017: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1010: FND_MESSAGE.set_name( 'AHL','AHL_UA_FLIGHT_NO_UPDATE' );
1011: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1012: FND_MSG_PUB.add;
1013: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1014: fnd_log.string
1015: (
1016: fnd_log.level_error,
1017: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1018: 'Flight Number cannot be updated for '
1012: FND_MSG_PUB.add;
1013: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1014: fnd_log.string
1015: (
1016: fnd_log.level_error,
1017: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1018: 'Flight Number cannot be updated for '
1019: ||p_x_flight_schedule_rec.unit_schedule_id
1020: );
1028: THEN
1029: FND_MESSAGE.set_name( 'AHL','AHL_UA_SEGMENT_NO_UPDATE' );
1030: FND_MESSAGE.set_token( 'RECORD', l_record_identifier);
1031: FND_MSG_PUB.add;
1032: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1033: fnd_log.string
1034: (
1035: fnd_log.level_error,
1036: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1029: FND_MESSAGE.set_name( 'AHL','AHL_UA_SEGMENT_NO_UPDATE' );
1030: FND_MESSAGE.set_token( 'RECORD', l_record_identifier);
1031: FND_MSG_PUB.add;
1032: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1033: fnd_log.string
1034: (
1035: fnd_log.level_error,
1036: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1037: 'Flight Segment cannot be updated for '
1031: FND_MSG_PUB.add;
1032: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1033: fnd_log.string
1034: (
1035: fnd_log.level_error,
1036: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1037: 'Flight Segment cannot be updated for '
1038: ||p_x_flight_schedule_rec.unit_schedule_id
1039: );
1050: THEN
1051: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_DEP_DEPT_NO_UPDATE' );
1052: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1053: FND_MSG_PUB.add;
1054: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1055: fnd_log.string
1056: (
1057: fnd_log.level_error,
1058: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1051: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_DEP_DEPT_NO_UPDATE' );
1052: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1053: FND_MSG_PUB.add;
1054: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1055: fnd_log.string
1056: (
1057: fnd_log.level_error,
1058: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1059: 'Departure deparment cannot be updated for '
1053: FND_MSG_PUB.add;
1054: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1055: fnd_log.string
1056: (
1057: fnd_log.level_error,
1058: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1059: 'Departure deparment cannot be updated for '
1060: ||p_x_flight_schedule_rec.unit_schedule_id
1061: );
1070: THEN
1071: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_DEP_ORG_NO_UPDATE' );
1072: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1073: FND_MSG_PUB.add;
1074: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1075: fnd_log.string
1076: (
1077: fnd_log.level_error,
1078: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1071: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_DEP_ORG_NO_UPDATE' );
1072: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1073: FND_MSG_PUB.add;
1074: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1075: fnd_log.string
1076: (
1077: fnd_log.level_error,
1078: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1079: 'Departure org cannot be updated for '
1073: FND_MSG_PUB.add;
1074: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1075: fnd_log.string
1076: (
1077: fnd_log.level_error,
1078: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1079: 'Departure org cannot be updated for '
1080: ||p_x_flight_schedule_rec.unit_schedule_id
1081: );
1090: THEN
1091: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_ARR_DEP_NO_UPDATE' );
1092: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1093: FND_MSG_PUB.add;
1094: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1095: fnd_log.string
1096: (
1097: fnd_log.level_error,
1098: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1091: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_ARR_DEP_NO_UPDATE' );
1092: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1093: FND_MSG_PUB.add;
1094: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1095: fnd_log.string
1096: (
1097: fnd_log.level_error,
1098: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1099: 'Arrival Department cannot be updated for'
1093: FND_MSG_PUB.add;
1094: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1095: fnd_log.string
1096: (
1097: fnd_log.level_error,
1098: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1099: 'Arrival Department cannot be updated for'
1100: ||p_x_flight_schedule_rec.unit_schedule_id
1101: );
1110: THEN
1111: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_ARR_ORG_NO_UPDATE' );
1112: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1113: FND_MSG_PUB.add;
1114: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1115: fnd_log.string
1116: (
1117: fnd_log.level_error,
1118: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1111: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_ARR_ORG_NO_UPDATE' );
1112: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1113: FND_MSG_PUB.add;
1114: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1115: fnd_log.string
1116: (
1117: fnd_log.level_error,
1118: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1119: 'Arrival org cannot be updated for '
1113: FND_MSG_PUB.add;
1114: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1115: fnd_log.string
1116: (
1117: fnd_log.level_error,
1118: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1119: 'Arrival org cannot be updated for '
1120: ||p_x_flight_schedule_rec.unit_schedule_id
1121: );
1130: THEN
1131: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_EST_DEP_NO_UPDATE' );
1132: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1133: FND_MSG_PUB.add;
1134: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1135: fnd_log.string
1136: (
1137: fnd_log.level_error,
1138: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1131: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_EST_DEP_NO_UPDATE' );
1132: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1133: FND_MSG_PUB.add;
1134: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1135: fnd_log.string
1136: (
1137: fnd_log.level_error,
1138: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1139: 'Estimated Departure time cannot be updated for '
1133: FND_MSG_PUB.add;
1134: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1135: fnd_log.string
1136: (
1137: fnd_log.level_error,
1138: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1139: 'Estimated Departure time cannot be updated for '
1140: ||p_x_flight_schedule_rec.unit_schedule_id
1141: );
1150: THEN
1151: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_EST_ARR_NO_UPDATE' );
1152: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1153: FND_MSG_PUB.add;
1154: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1155: fnd_log.string
1156: (
1157: fnd_log.level_error,
1158: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1151: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_EST_ARR_NO_UPDATE' );
1152: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1153: FND_MSG_PUB.add;
1154: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1155: fnd_log.string
1156: (
1157: fnd_log.level_error,
1158: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1159: 'Estimated Arrival time cannot be updated for '
1153: FND_MSG_PUB.add;
1154: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1155: fnd_log.string
1156: (
1157: fnd_log.level_error,
1158: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1159: 'Estimated Arrival time cannot be updated for '
1160: ||p_x_flight_schedule_rec.unit_schedule_id
1161: );
1163: x_return_status := FND_API.G_RET_STS_ERROR;
1164: --RAISE FND_API.G_EXC_ERROR;
1165: END IF;
1166:
1167: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1168: fnd_log.string
1169: (
1170: fnd_log.level_procedure,
1171: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
1164: --RAISE FND_API.G_EXC_ERROR;
1165: END IF;
1166:
1167: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1168: fnd_log.string
1169: (
1170: fnd_log.level_procedure,
1171: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
1172: 'At the end of '||l_api_name
1166:
1167: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1168: fnd_log.string
1169: (
1170: fnd_log.level_procedure,
1171: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
1172: 'At the end of '||l_api_name
1173: );
1174: END IF;
1244: l_est_violation_count NUMBER;
1245:
1246: BEGIN
1247:
1248: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1249: fnd_log.string
1250: (
1251: fnd_log.level_procedure,
1252: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
1245:
1246: BEGIN
1247:
1248: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1249: fnd_log.string
1250: (
1251: fnd_log.level_procedure,
1252: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
1253: 'At the start of '||l_api_name
1247:
1248: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1249: fnd_log.string
1250: (
1251: fnd_log.level_procedure,
1252: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
1253: 'At the start of '||l_api_name
1254: );
1255: END IF;
1280: THEN
1281: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_ACT_NO_DEL' );
1282: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1283: FND_MSG_PUB.add;
1284: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1285: fnd_log.string
1286: (
1287: fnd_log.level_error,
1288: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1281: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_ACT_NO_DEL' );
1282: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1283: FND_MSG_PUB.add;
1284: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1285: fnd_log.string
1286: (
1287: fnd_log.level_error,
1288: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1289: 'Actual times are entered for '||p_x_flight_schedule_rec.unit_schedule_id
1283: FND_MSG_PUB.add;
1284: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1285: fnd_log.string
1286: (
1287: fnd_log.level_error,
1288: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1289: 'Actual times are entered for '||p_x_flight_schedule_rec.unit_schedule_id
1290: ||'so delete not allowed'
1291: );
1308: -- Duplicate found, so throw error.
1309: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_DUP_FLG_SCH' );
1310: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1311: FND_MSG_PUB.add;
1312: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1313: fnd_log.string
1314: (
1315: fnd_log.level_error,
1316: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1309: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_DUP_FLG_SCH' );
1310: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1311: FND_MSG_PUB.add;
1312: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1313: fnd_log.string
1314: (
1315: fnd_log.level_error,
1316: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1317: 'Duplicates flight schedules found for ,'
1311: FND_MSG_PUB.add;
1312: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1313: fnd_log.string
1314: (
1315: fnd_log.level_error,
1316: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1317: 'Duplicates flight schedules found for ,'
1318: ||p_x_flight_schedule_rec.unit_schedule_id
1319: );
1335: THEN
1336: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_ARR_WO_DEP' );
1337: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1338: FND_MSG_PUB.add;
1339: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1340: fnd_log.string
1341: (
1342: fnd_log.level_error,
1343: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1336: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_ARR_WO_DEP' );
1337: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1338: FND_MSG_PUB.add;
1339: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1340: fnd_log.string
1341: (
1342: fnd_log.level_error,
1343: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1344: 'Actuals Arrival time cannot be entered until departure time is entered '||p_x_flight_schedule_rec.unit_schedule_id
1338: FND_MSG_PUB.add;
1339: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1340: fnd_log.string
1341: (
1342: fnd_log.level_error,
1343: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1344: 'Actuals Arrival time cannot be entered until departure time is entered '||p_x_flight_schedule_rec.unit_schedule_id
1345: );
1346: END IF;
1362: THEN
1363: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_ACT_GT_SYSDATE' );
1364: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1365: FND_MSG_PUB.add;
1366: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1367: fnd_log.string
1368: (
1369: fnd_log.level_error,
1370: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1363: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_ACT_GT_SYSDATE' );
1364: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1365: FND_MSG_PUB.add;
1366: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1367: fnd_log.string
1368: (
1369: fnd_log.level_error,
1370: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1371: 'Actuals cannot be greater than sysdate for '||p_x_flight_schedule_rec.unit_schedule_id
1365: FND_MSG_PUB.add;
1366: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1367: fnd_log.string
1368: (
1369: fnd_log.level_error,
1370: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1371: 'Actuals cannot be greater than sysdate for '||p_x_flight_schedule_rec.unit_schedule_id
1372: );
1373: END IF;
1384: THEN
1385: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_ARR_LT_DEP' );
1386: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1387: FND_MSG_PUB.add;
1388: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1389: fnd_log.string
1390: (
1391: fnd_log.level_error,
1392: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1385: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_ARR_LT_DEP' );
1386: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1387: FND_MSG_PUB.add;
1388: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1389: fnd_log.string
1390: (
1391: fnd_log.level_error,
1392: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1393: 'Estimated Departure cannot be greater than arrival for '
1387: FND_MSG_PUB.add;
1388: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1389: fnd_log.string
1390: (
1391: fnd_log.level_error,
1392: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1393: 'Estimated Departure cannot be greater than arrival for '
1394: ||p_x_flight_schedule_rec.unit_schedule_id
1395: );
1407: THEN
1408: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_ARR_LT_DEP' );
1409: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1410: FND_MSG_PUB.add;
1411: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1412: fnd_log.string
1413: (
1414: fnd_log.level_error,
1415: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1408: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_ARR_LT_DEP' );
1409: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1410: FND_MSG_PUB.add;
1411: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1412: fnd_log.string
1413: (
1414: fnd_log.level_error,
1415: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1416: 'Actual Departure cannot be greater than arrival for '
1410: FND_MSG_PUB.add;
1411: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1412: fnd_log.string
1413: (
1414: fnd_log.level_error,
1415: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1416: 'Actual Departure cannot be greater than arrival for '
1417: ||p_x_flight_schedule_rec.unit_schedule_id
1418: );
1462: THEN
1463: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_PRE_ACT_NOT_REC' );
1464: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1465: FND_MSG_PUB.add;
1466: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1467: fnd_log.string
1468: (
1469: fnd_log.level_error,
1470: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1463: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_PRE_ACT_NOT_REC' );
1464: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1465: FND_MSG_PUB.add;
1466: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1467: fnd_log.string
1468: (
1469: fnd_log.level_error,
1470: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1471: 'previous actuals are not entered for '||p_x_flight_schedule_rec.unit_schedule_id
1465: FND_MSG_PUB.add;
1466: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1467: fnd_log.string
1468: (
1469: fnd_log.level_error,
1470: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1471: 'previous actuals are not entered for '||p_x_flight_schedule_rec.unit_schedule_id
1472: );
1473: END IF;
1489: IF l_est_violation_count > 0 THEN
1490: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_EST_ARR_VIO' );
1491: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1492: FND_MSG_PUB.add;
1493: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1494: fnd_log.string
1495: (
1496: fnd_log.level_error,
1497: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1490: FND_MESSAGE.set_name( 'AHL', 'AHL_UA_EST_ARR_VIO' );
1491: FND_MESSAGE.set_token( 'RECORD', l_record_identifier );
1492: FND_MSG_PUB.add;
1493: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1494: fnd_log.string
1495: (
1496: fnd_log.level_error,
1497: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1498: 'estimated arrival time violates another flight'||
1492: FND_MSG_PUB.add;
1493: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1494: fnd_log.string
1495: (
1496: fnd_log.level_error,
1497: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1498: 'estimated arrival time violates another flight'||
1499: 'schedules estimated arrival time for '||p_x_flight_schedule_rec.unit_schedule_id
1500: );
1502: x_return_status := FND_API.G_RET_STS_ERROR;
1503: END IF;
1504:
1505: END IF;
1506: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1507: fnd_log.string
1508: (
1509: fnd_log.level_procedure,
1510: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
1503: END IF;
1504:
1505: END IF;
1506: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1507: fnd_log.string
1508: (
1509: fnd_log.level_procedure,
1510: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
1511: 'At the end of '||l_api_name
1505: END IF;
1506: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1507: fnd_log.string
1508: (
1509: fnd_log.level_procedure,
1510: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
1511: 'At the end of '||l_api_name
1512: );
1513: END IF;
1635: -- Initialize the return status to success.
1636:
1637: x_return_status := FND_API.G_RET_STS_SUCCESS;
1638:
1639: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1640: fnd_log.string
1641: (
1642: fnd_log.level_procedure,
1643: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
1636:
1637: x_return_status := FND_API.G_RET_STS_SUCCESS;
1638:
1639: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1640: fnd_log.string
1641: (
1642: fnd_log.level_procedure,
1643: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
1644: 'At the start of '||l_api_name
1638:
1639: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1640: fnd_log.string
1641: (
1642: fnd_log.level_procedure,
1643: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
1644: 'At the start of '||l_api_name
1645: );
1646: END IF;
1664: l_visit_tbl(l_visit_count).visit_id := l_flight_visit.visit_id;
1665: l_visit_tbl(l_visit_count).object_version_number := l_flight_visit.object_version_number;
1666: l_visit_tbl(l_visit_count).start_date := l_flight_visit.start_date_time + l_time_diff;
1667:
1668: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1669: fnd_log.string
1670: (
1671: fnd_log.level_statement,
1672: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1665: l_visit_tbl(l_visit_count).object_version_number := l_flight_visit.object_version_number;
1666: l_visit_tbl(l_visit_count).start_date := l_flight_visit.start_date_time + l_time_diff;
1667:
1668: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1669: fnd_log.string
1670: (
1671: fnd_log.level_statement,
1672: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1673: ' changed arrival time ' || p_visit_sync_rec.CHANGED_ARRIVAL_TIME ||
1667:
1668: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1669: fnd_log.string
1670: (
1671: fnd_log.level_statement,
1672: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1673: ' changed arrival time ' || p_visit_sync_rec.CHANGED_ARRIVAL_TIME ||
1674: ' changed org id ' || TO_CHAR(p_visit_sync_rec.CHANGED_ORG_ID) ||
1675: ' changed dept id ' || TO_CHAR(p_visit_sync_rec.CHANGED_DEPT_ID )
1728:
1729:
1730: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS )
1731: THEN
1732: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1733: fnd_log.string
1734: (
1735: fnd_log.level_statement,
1736: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1729:
1730: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS )
1731: THEN
1732: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1733: fnd_log.string
1734: (
1735: fnd_log.level_statement,
1736: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1737: ' AHL_VWP_VISITS_PVT.Process_Visit returned errors'
1731: THEN
1732: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1733: fnd_log.string
1734: (
1735: fnd_log.level_statement,
1736: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1737: ' AHL_VWP_VISITS_PVT.Process_Visit returned errors'
1738: );
1739: END IF;
1737: ' AHL_VWP_VISITS_PVT.Process_Visit returned errors'
1738: );
1739: END IF;
1740: ELSE
1741: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1742: fnd_log.string
1743: (
1744: fnd_log.level_statement,
1745: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name,
1738: );
1739: END IF;
1740: ELSE
1741: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1742: fnd_log.string
1743: (
1744: fnd_log.level_statement,
1745: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name,
1746: ' AHL_VWP_VISITS_PVT.Process_Visit executed successfully'
1740: ELSE
1741: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1742: fnd_log.string
1743: (
1744: fnd_log.level_statement,
1745: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name,
1746: ' AHL_VWP_VISITS_PVT.Process_Visit executed successfully'
1747: );
1748: END IF;
1749: END IF;
1750:
1751: END IF;
1752:
1753: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1754: fnd_log.string
1755: (
1756: fnd_log.level_procedure,
1757: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
1750:
1751: END IF;
1752:
1753: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1754: fnd_log.string
1755: (
1756: fnd_log.level_procedure,
1757: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
1758: 'At the end of '||l_api_name
1752:
1753: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1754: fnd_log.string
1755: (
1756: fnd_log.level_procedure,
1757: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
1758: 'At the end of '||l_api_name
1759: );
1760: END IF;
1809: LOOP
1810: IF p_x_flight_schedules_tbl(i).DML_OPERATION = 'C'
1811: THEN
1812: -- Validate all attributes (Item level validation)
1813: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1814: fnd_log.string
1815: (
1816: fnd_log.level_statement,
1817: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1810: IF p_x_flight_schedules_tbl(i).DML_OPERATION = 'C'
1811: THEN
1812: -- Validate all attributes (Item level validation)
1813: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1814: fnd_log.string
1815: (
1816: fnd_log.level_statement,
1817: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1818: 'Validate attributes before creating flight schedules...'
1812: -- Validate all attributes (Item level validation)
1813: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1814: fnd_log.string
1815: (
1816: fnd_log.level_statement,
1817: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1818: 'Validate attributes before creating flight schedules...'
1819: );
1820: END IF;
1824: p_x_flight_schedules_tbl(i),
1825: x_return_status
1826: );
1827:
1828: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1829: fnd_log.string
1830: (
1831: fnd_log.level_statement,
1832: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1825: x_return_status
1826: );
1827:
1828: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1829: fnd_log.string
1830: (
1831: fnd_log.level_statement,
1832: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1833: 'p_x_flight_schedules_tbl('||i||').DML_OPERATION : ' || p_x_flight_schedules_tbl(i).DML_OPERATION
1827:
1828: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1829: fnd_log.string
1830: (
1831: fnd_log.level_statement,
1832: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1833: 'p_x_flight_schedules_tbl('||i||').DML_OPERATION : ' || p_x_flight_schedules_tbl(i).DML_OPERATION
1834: );
1835: END IF;
1834: );
1835: END IF;
1836:
1837: -- Convert Values to Ids.
1838: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1839: fnd_log.string
1840: (
1841: fnd_log.level_statement,
1842: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1835: END IF;
1836:
1837: -- Convert Values to Ids.
1838: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1839: fnd_log.string
1840: (
1841: fnd_log.level_statement,
1842: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1843: 'Calling convert_values_to_ids..'
1837: -- Convert Values to Ids.
1838: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1839: fnd_log.string
1840: (
1841: fnd_log.level_statement,
1842: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1843: 'Calling convert_values_to_ids..'
1844: );
1845: END IF;
1853: );
1854:
1855: -- If any severe error occurs, then, abort API.
1856: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1857: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
1858: fnd_log.string
1859: (
1860: fnd_log.level_exception,
1861: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1854:
1855: -- If any severe error occurs, then, abort API.
1856: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1857: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
1858: fnd_log.string
1859: (
1860: fnd_log.level_exception,
1861: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1862: 'convert_values_to_ids returned with expected error..'
1856: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1857: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
1858: fnd_log.string
1859: (
1860: fnd_log.level_exception,
1861: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1862: 'convert_values_to_ids returned with expected error..'
1863: );
1864: END IF;
1863: );
1864: END IF;
1865: RAISE FND_API.G_EXC_ERROR;
1866: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1867: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
1868: fnd_log.string
1869: (
1870: fnd_log.level_exception,
1871: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1864: END IF;
1865: RAISE FND_API.G_EXC_ERROR;
1866: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1867: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
1868: fnd_log.string
1869: (
1870: fnd_log.level_exception,
1871: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1872: 'convert_values_to_ids returned with un-expected error..'
1866: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1867: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
1868: fnd_log.string
1869: (
1870: fnd_log.level_exception,
1871: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1872: 'convert_values_to_ids returned with un-expected error..'
1873: );
1874: END IF;
1876: END IF;-- return status
1877: END IF;-- module type
1878:
1879:
1880: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1881: fnd_log.string
1882: (
1883: fnd_log.level_statement,
1884: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1877: END IF;-- module type
1878:
1879:
1880: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1881: fnd_log.string
1882: (
1883: fnd_log.level_statement,
1884: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1885: 'call validate_mandatory_inputs to check all missing mandatory fields'
1879:
1880: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1881: fnd_log.string
1882: (
1883: fnd_log.level_statement,
1884: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1885: 'call validate_mandatory_inputs to check all missing mandatory fields'
1886: );
1887: END IF;
1893: );
1894:
1895: -- If any severe error occurs, then, abort API.
1896: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1897: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
1898: fnd_log.string
1899: (
1900: fnd_log.level_exception,
1901: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1894:
1895: -- If any severe error occurs, then, abort API.
1896: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1897: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
1898: fnd_log.string
1899: (
1900: fnd_log.level_exception,
1901: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1902: 'validate_mandatory_fields returned with expected error..'
1896: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1897: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
1898: fnd_log.string
1899: (
1900: fnd_log.level_exception,
1901: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1902: 'validate_mandatory_fields returned with expected error..'
1903: );
1904: END IF;
1903: );
1904: END IF;
1905: RAISE FND_API.G_EXC_ERROR;
1906: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1907: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
1908: fnd_log.string
1909: (
1910: fnd_log.level_exception,
1911: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1904: END IF;
1905: RAISE FND_API.G_EXC_ERROR;
1906: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1907: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
1908: fnd_log.string
1909: (
1910: fnd_log.level_exception,
1911: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1912: 'validate_mandatory_fields returned with un-expected error..'
1906: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1907: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
1908: fnd_log.string
1909: (
1910: fnd_log.level_exception,
1911: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1912: 'validate_mandatory_fields returned with un-expected error..'
1913: );
1914: END IF;
1914: END IF;
1915: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1916: END IF;
1917:
1918: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1919: fnd_log.string
1920: (
1921: fnd_log.level_statement,
1922: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1915: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1916: END IF;
1917:
1918: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1919: fnd_log.string
1920: (
1921: fnd_log.level_statement,
1922: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1923: 'Validate all records before DML '
1917:
1918: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1919: fnd_log.string
1920: (
1921: fnd_log.level_statement,
1922: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1923: 'Validate all records before DML '
1924: );
1925: END IF;
1931: );
1932:
1933: -- If any severe error occurs, then, abort API.
1934: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1935: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
1936: fnd_log.string
1937: (
1938: fnd_log.level_exception,
1939: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1932:
1933: -- If any severe error occurs, then, abort API.
1934: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1935: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
1936: fnd_log.string
1937: (
1938: fnd_log.level_exception,
1939: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1940: 'validate_record returned with expected error..'
1934: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1935: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
1936: fnd_log.string
1937: (
1938: fnd_log.level_exception,
1939: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1940: 'validate_record returned with expected error..'
1941: );
1942: END IF;
1941: );
1942: END IF;
1943: RAISE FND_API.G_EXC_ERROR;
1944: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1945: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
1946: fnd_log.string
1947: (
1948: fnd_log.level_exception,
1949: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1942: END IF;
1943: RAISE FND_API.G_EXC_ERROR;
1944: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1945: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
1946: fnd_log.string
1947: (
1948: fnd_log.level_exception,
1949: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1950: 'validate_record returned with un-expected error..'
1944: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1945: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
1946: fnd_log.string
1947: (
1948: fnd_log.level_exception,
1949: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
1950: 'validate_record returned with un-expected error..'
1951: );
1952: END IF;
1952: END IF;
1953: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1954: END IF;
1955:
1956: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1957: fnd_log.string
1958: (
1959: fnd_log.level_statement,
1960: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1953: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1954: END IF;
1955:
1956: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1957: fnd_log.string
1958: (
1959: fnd_log.level_statement,
1960: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1961: 'Creating new Flight scehdule ..'
1955:
1956: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1957: fnd_log.string
1958: (
1959: fnd_log.level_statement,
1960: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1961: 'Creating new Flight scehdule ..'
1962: );
1963: END IF;
2093: p_flight_schedule_rec => p_x_flight_schedules_tbl(i)
2094: ) );
2095:
2096: p_x_flight_schedules_tbl(i).conflict_message := FND_MESSAGE.GET;
2097: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2098: fnd_log.string
2099: (
2100: fnd_log.level_error,
2101: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2094: ) );
2095:
2096: p_x_flight_schedules_tbl(i).conflict_message := FND_MESSAGE.GET;
2097: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2098: fnd_log.string
2099: (
2100: fnd_log.level_error,
2101: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2102: 'Overlap in flight times specified,'||
2096: p_x_flight_schedules_tbl(i).conflict_message := FND_MESSAGE.GET;
2097: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2098: fnd_log.string
2099: (
2100: fnd_log.level_error,
2101: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2102: 'Overlap in flight times specified,'||
2103: 'this is a warning and not a error for '||p_x_flight_schedules_tbl(i).unit_schedule_id
2104: );
2143: LOOP
2144: IF ( p_x_flight_schedules_tbl(i).DML_OPERATION = 'U' )
2145: THEN
2146: -- Validate all attributes (Item level validation)
2147: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2148: fnd_log.string
2149: (
2150: fnd_log.level_statement,
2151: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2144: IF ( p_x_flight_schedules_tbl(i).DML_OPERATION = 'U' )
2145: THEN
2146: -- Validate all attributes (Item level validation)
2147: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2148: fnd_log.string
2149: (
2150: fnd_log.level_statement,
2151: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2152: 'Validate attributes before creating flight schedules...'
2146: -- Validate all attributes (Item level validation)
2147: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2148: fnd_log.string
2149: (
2150: fnd_log.level_statement,
2151: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2152: 'Validate attributes before creating flight schedules...'
2153: );
2154: END IF;
2158: p_x_flight_schedules_tbl(i),
2159: x_return_status
2160: );
2161:
2162: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2163: fnd_log.string
2164: (
2165: fnd_log.level_statement,
2166: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2159: x_return_status
2160: );
2161:
2162: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2163: fnd_log.string
2164: (
2165: fnd_log.level_statement,
2166: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2167: 'p_x_flight_schedules_tbl('||i||').DML_OPERATION : ' || p_x_flight_schedules_tbl(i).DML_OPERATION
2161:
2162: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2163: fnd_log.string
2164: (
2165: fnd_log.level_statement,
2166: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2167: 'p_x_flight_schedules_tbl('||i||').DML_OPERATION : ' || p_x_flight_schedules_tbl(i).DML_OPERATION
2168: );
2169: END IF;
2167: 'p_x_flight_schedules_tbl('||i||').DML_OPERATION : ' || p_x_flight_schedules_tbl(i).DML_OPERATION
2168: );
2169: END IF;
2170:
2171: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2172: fnd_log.string
2173: (
2174: fnd_log.level_statement,
2175: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2168: );
2169: END IF;
2170:
2171: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2172: fnd_log.string
2173: (
2174: fnd_log.level_statement,
2175: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2176: 'Calling convert_values_to_ids..'
2170:
2171: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2172: fnd_log.string
2173: (
2174: fnd_log.level_statement,
2175: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2176: 'Calling convert_values_to_ids..'
2177: );
2178: END IF;
2186: );
2187:
2188: -- If any severe error occurs, then, abort API.
2189: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2190: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2191: fnd_log.string
2192: (
2193: fnd_log.level_exception,
2194: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2187:
2188: -- If any severe error occurs, then, abort API.
2189: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2190: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2191: fnd_log.string
2192: (
2193: fnd_log.level_exception,
2194: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2195: 'convert_values_to_ids returned with expected error..'
2189: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2190: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2191: fnd_log.string
2192: (
2193: fnd_log.level_exception,
2194: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2195: 'convert_values_to_ids returned with expected error..'
2196: );
2197: END IF;
2196: );
2197: END IF;
2198: RAISE FND_API.G_EXC_ERROR;
2199: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2200: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2201: fnd_log.string
2202: (
2203: fnd_log.level_exception,
2204: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2197: END IF;
2198: RAISE FND_API.G_EXC_ERROR;
2199: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2200: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2201: fnd_log.string
2202: (
2203: fnd_log.level_exception,
2204: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2205: 'convert_values_to_ids returned with un-expected error..'
2199: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2200: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2201: fnd_log.string
2202: (
2203: fnd_log.level_exception,
2204: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2205: 'convert_values_to_ids returned with un-expected error..'
2206: );
2207: END IF;
2211:
2212: -- Default missing and unchanged attributes.
2213: IF ( p_module_type <> 'OAF' )
2214: THEN
2215: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2216: fnd_log.string
2217: (
2218: fnd_log.level_statement,
2219: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2212: -- Default missing and unchanged attributes.
2213: IF ( p_module_type <> 'OAF' )
2214: THEN
2215: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2216: fnd_log.string
2217: (
2218: fnd_log.level_statement,
2219: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2220: 'default_unchanged_attributes for update operation. Module type is '||p_module_type
2214: THEN
2215: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2216: fnd_log.string
2217: (
2218: fnd_log.level_statement,
2219: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2220: 'default_unchanged_attributes for update operation. Module type is '||p_module_type
2221: );
2222: END IF;
2225: (
2226: p_x_flight_schedule_rec => p_x_flight_schedules_tbl(i)
2227: );
2228:
2229: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2230: fnd_log.string
2231: (
2232: fnd_log.level_statement,
2233: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2226: p_x_flight_schedule_rec => p_x_flight_schedules_tbl(i)
2227: );
2228:
2229: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2230: fnd_log.string
2231: (
2232: fnd_log.level_statement,
2233: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2234: 'call validate_mandatory_inputs to check all missing mandatory fields'
2228:
2229: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2230: fnd_log.string
2231: (
2232: fnd_log.level_statement,
2233: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2234: 'call validate_mandatory_inputs to check all missing mandatory fields'
2235: );
2236: END IF;
2243: );
2244:
2245: -- If any severe error occurs, then, abort API.
2246: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2247: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2248: fnd_log.string
2249: (
2250: fnd_log.level_exception,
2251: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2244:
2245: -- If any severe error occurs, then, abort API.
2246: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2247: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2248: fnd_log.string
2249: (
2250: fnd_log.level_exception,
2251: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2252: 'validate_mandatory_fields returned with expected error..'
2246: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2247: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2248: fnd_log.string
2249: (
2250: fnd_log.level_exception,
2251: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2252: 'validate_mandatory_fields returned with expected error..'
2253: );
2254: END IF;
2253: );
2254: END IF;
2255: RAISE FND_API.G_EXC_ERROR;
2256: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2257: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2258: fnd_log.string
2259: (
2260: fnd_log.level_exception,
2261: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2254: END IF;
2255: RAISE FND_API.G_EXC_ERROR;
2256: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2257: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2258: fnd_log.string
2259: (
2260: fnd_log.level_exception,
2261: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2262: 'validate_mandatory_fields returned with un-expected error..'
2256: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2257: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2258: fnd_log.string
2259: (
2260: fnd_log.level_exception,
2261: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2262: 'validate_mandatory_fields returned with un-expected error..'
2263: );
2264: END IF;
2265: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2266: END IF; -- return status
2267:
2268:
2269: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
2270: THEN
2271: fnd_log.string
2272: (
2273: fnd_log.level_statement,
2267:
2268:
2269: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
2270: THEN
2271: fnd_log.string
2272: (
2273: fnd_log.level_statement,
2274: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2275: 'Validate all records before DML '
2269: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
2270: THEN
2271: fnd_log.string
2272: (
2273: fnd_log.level_statement,
2274: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2275: 'Validate all records before DML '
2276: );
2277: END IF;
2283: );
2284:
2285: -- If any severe error occurs, then, abort API.
2286: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2287: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2288: fnd_log.string
2289: (
2290: fnd_log.level_exception,
2291: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2284:
2285: -- If any severe error occurs, then, abort API.
2286: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2287: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2288: fnd_log.string
2289: (
2290: fnd_log.level_exception,
2291: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2292: 'validate_update returned with expected error..'
2286: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2287: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2288: fnd_log.string
2289: (
2290: fnd_log.level_exception,
2291: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2292: 'validate_update returned with expected error..'
2293: );
2294: END IF;
2293: );
2294: END IF;
2295: RAISE FND_API.G_EXC_ERROR;
2296: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2297: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2298: fnd_log.string
2299: (
2300: fnd_log.level_exception,
2301: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2294: END IF;
2295: RAISE FND_API.G_EXC_ERROR;
2296: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2297: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2298: fnd_log.string
2299: (
2300: fnd_log.level_exception,
2301: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2302: 'validate_update returned with un-expected error..'
2296: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2297: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2298: fnd_log.string
2299: (
2300: fnd_log.level_exception,
2301: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2302: 'validate_update returned with un-expected error..'
2303: );
2304: END IF;
2304: END IF;
2305: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2306: END IF;
2307:
2308: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2309: fnd_log.string
2310: (
2311: fnd_log.level_statement,
2312: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2305: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2306: END IF;
2307:
2308: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2309: fnd_log.string
2310: (
2311: fnd_log.level_statement,
2312: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2313: 'Validate all records before DML '
2307:
2308: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2309: fnd_log.string
2310: (
2311: fnd_log.level_statement,
2312: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2313: 'Validate all records before DML '
2314: );
2315: END IF;
2321: );
2322:
2323: -- If any severe error occurs, then, abort API.
2324: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2325: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2326: fnd_log.string
2327: (
2328: fnd_log.level_exception,
2329: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2322:
2323: -- If any severe error occurs, then, abort API.
2324: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2325: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2326: fnd_log.string
2327: (
2328: fnd_log.level_exception,
2329: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2330: 'validate_record returned with expected error..'
2324: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2325: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2326: fnd_log.string
2327: (
2328: fnd_log.level_exception,
2329: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2330: 'validate_record returned with expected error..'
2331: );
2332: END IF;
2331: );
2332: END IF;
2333: RAISE FND_API.G_EXC_ERROR;
2334: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2335: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2336: fnd_log.string
2337: (
2338: fnd_log.level_exception,
2339: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2332: END IF;
2333: RAISE FND_API.G_EXC_ERROR;
2334: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2335: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2336: fnd_log.string
2337: (
2338: fnd_log.level_exception,
2339: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2340: 'validate_record returned with un-expected error..'
2334: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2335: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2336: fnd_log.string
2337: (
2338: fnd_log.level_exception,
2339: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2340: 'validate_record returned with un-expected error..'
2341: );
2342: END IF;
2342: END IF;
2343: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2344: END IF;
2345:
2346: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2347: fnd_log.string
2348: (
2349: fnd_log.level_statement,
2350: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2343: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2344: END IF;
2345:
2346: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2347: fnd_log.string
2348: (
2349: fnd_log.level_statement,
2350: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2351: 'Updating Flight scehdule ->'||p_x_flight_schedules_tbl(i).UNIT_SCHEDULE_ID
2345:
2346: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2347: fnd_log.string
2348: (
2349: fnd_log.level_statement,
2350: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2351: 'Updating Flight scehdule ->'||p_x_flight_schedules_tbl(i).UNIT_SCHEDULE_ID
2352: );
2353: END IF;
2403: FND_MESSAGE.set_token( 'RECORD', get_record_identifier(
2404: p_flight_schedule_rec => p_x_flight_schedules_tbl(i)
2405: ) );
2406: FND_MSG_PUB.add;
2407: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2408: fnd_log.string
2409: (
2410: fnd_log.level_error,
2411: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2404: p_flight_schedule_rec => p_x_flight_schedules_tbl(i)
2405: ) );
2406: FND_MSG_PUB.add;
2407: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2408: fnd_log.string
2409: (
2410: fnd_log.level_error,
2411: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2412: 'SQL Error, Update failed..'
2406: FND_MSG_PUB.add;
2407: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2408: fnd_log.string
2409: (
2410: fnd_log.level_error,
2411: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2412: 'SQL Error, Update failed..'
2413: );
2414: END IF;
2452: --populate visit reschedule mode.
2453: l_visit_sync_rec.visit_reschedule_mode := p_x_flight_schedules_tbl(i).visit_reschedule_mode;
2454: l_visit_sync_rec.unit_schedule_id := p_x_flight_schedules_tbl(i).unit_schedule_id;
2455:
2456: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2457: fnd_log.string
2458: (
2459: fnd_log.level_statement,
2460: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2453: l_visit_sync_rec.visit_reschedule_mode := p_x_flight_schedules_tbl(i).visit_reschedule_mode;
2454: l_visit_sync_rec.unit_schedule_id := p_x_flight_schedules_tbl(i).unit_schedule_id;
2455:
2456: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2457: fnd_log.string
2458: (
2459: fnd_log.level_statement,
2460: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2461: 'Synchronize visits affected if any for flight -> '||p_x_flight_schedules_tbl(i).UNIT_SCHEDULE_ID
2455:
2456: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2457: fnd_log.string
2458: (
2459: fnd_log.level_statement,
2460: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2461: 'Synchronize visits affected if any for flight -> '||p_x_flight_schedules_tbl(i).UNIT_SCHEDULE_ID
2462: );
2463: END IF;
2470: );
2471:
2472: -- If any severe error occurs, then, abort API.
2473: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2474: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2475: fnd_log.string
2476: (
2477: fnd_log.level_exception,
2478: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2471:
2472: -- If any severe error occurs, then, abort API.
2473: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2474: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2475: fnd_log.string
2476: (
2477: fnd_log.level_exception,
2478: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2479: 'Synchronize_Visit_Details returned with expected error..'
2473: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2474: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2475: fnd_log.string
2476: (
2477: fnd_log.level_exception,
2478: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2479: 'Synchronize_Visit_Details returned with expected error..'
2480: );
2481: END IF;
2480: );
2481: END IF;
2482: RAISE FND_API.G_EXC_ERROR;
2483: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2484: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2485: fnd_log.string
2486: (
2487: fnd_log.level_exception,
2488: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2481: END IF;
2482: RAISE FND_API.G_EXC_ERROR;
2483: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2484: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2485: fnd_log.string
2486: (
2487: fnd_log.level_exception,
2488: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2489: 'Synchronize_Visit_Details returned with un-expected error..'
2483: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2484: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2485: fnd_log.string
2486: (
2487: fnd_log.level_exception,
2488: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2489: 'Synchronize_Visit_Details returned with un-expected error..'
2490: );
2491: END IF;
2544: p_flight_schedule_rec => p_x_flight_schedules_tbl(i)
2545: ) );
2546:
2547: p_x_flight_schedules_tbl(i).conflict_message := FND_MESSAGE.GET;
2548: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2549: fnd_log.string
2550: (
2551: fnd_log.level_error,
2552: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2545: ) );
2546:
2547: p_x_flight_schedules_tbl(i).conflict_message := FND_MESSAGE.GET;
2548: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2549: fnd_log.string
2550: (
2551: fnd_log.level_error,
2552: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2553: 'Overlap in flight times specified,'||
2547: p_x_flight_schedules_tbl(i).conflict_message := FND_MESSAGE.GET;
2548: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2549: fnd_log.string
2550: (
2551: fnd_log.level_error,
2552: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2553: 'Overlap in flight times specified,'||
2554: 'this is a warning and not a error for '||p_x_flight_schedules_tbl(i).unit_schedule_id
2555: );
2584:
2585: IF ( p_x_flight_schedules_tbl(i).DML_OPERATION = 'D' )
2586: THEN
2587: -- Validate all attributes (Item level validation)
2588: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2589: fnd_log.string
2590: (
2591: fnd_log.level_statement,
2592: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2585: IF ( p_x_flight_schedules_tbl(i).DML_OPERATION = 'D' )
2586: THEN
2587: -- Validate all attributes (Item level validation)
2588: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2589: fnd_log.string
2590: (
2591: fnd_log.level_statement,
2592: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2593: 'Validate attributes before creating flight schedules...'
2587: -- Validate all attributes (Item level validation)
2588: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2589: fnd_log.string
2590: (
2591: fnd_log.level_statement,
2592: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2593: 'Validate attributes before creating flight schedules...'
2594: );
2595: END IF;
2599: p_x_flight_schedules_tbl(i),
2600: x_return_status
2601: );
2602:
2603: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2604: fnd_log.string
2605: (
2606: fnd_log.level_statement,
2607: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2600: x_return_status
2601: );
2602:
2603: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2604: fnd_log.string
2605: (
2606: fnd_log.level_statement,
2607: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2608: 'Validate all records before DML '
2602:
2603: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2604: fnd_log.string
2605: (
2606: fnd_log.level_statement,
2607: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2608: 'Validate all records before DML '
2609: );
2610: END IF;
2616: );
2617:
2618: -- If any severe error occurs, then, abort API.
2619: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2620: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2621: fnd_log.string
2622: (
2623: fnd_log.level_exception,
2624: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2617:
2618: -- If any severe error occurs, then, abort API.
2619: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2620: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2621: fnd_log.string
2622: (
2623: fnd_log.level_exception,
2624: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2625: 'validate_record returned with expected error..'
2619: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2620: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2621: fnd_log.string
2622: (
2623: fnd_log.level_exception,
2624: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2625: 'validate_record returned with expected error..'
2626: );
2627: END IF;
2626: );
2627: END IF;
2628: RAISE FND_API.G_EXC_ERROR;
2629: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2630: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2631: fnd_log.string
2632: (
2633: fnd_log.level_exception,
2634: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2627: END IF;
2628: RAISE FND_API.G_EXC_ERROR;
2629: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2630: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2631: fnd_log.string
2632: (
2633: fnd_log.level_exception,
2634: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2635: 'validate_record returned with un-expected error..'
2629: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2630: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2631: fnd_log.string
2632: (
2633: fnd_log.level_exception,
2634: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2635: 'validate_record returned with un-expected error..'
2636: );
2637: END IF;
2638: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2639: END IF;
2640:
2641: -- Delete the record
2642: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2643: fnd_log.string
2644: (
2645: fnd_log.level_statement,
2646: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2639: END IF;
2640:
2641: -- Delete the record
2642: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2643: fnd_log.string
2644: (
2645: fnd_log.level_statement,
2646: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2647: 'Deleting Flight scehdule -> '||p_x_flight_schedules_tbl(i).unit_schedule_id
2641: -- Delete the record
2642: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2643: fnd_log.string
2644: (
2645: fnd_log.level_statement,
2646: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2647: 'Deleting Flight scehdule -> '||p_x_flight_schedules_tbl(i).unit_schedule_id
2648: );
2649: END IF;
2667: );
2668:
2669: -- If any severe error occurs, then, abort API.
2670: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2671: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2672: fnd_log.string
2673: (
2674: fnd_log.level_exception,
2675: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2668:
2669: -- If any severe error occurs, then, abort API.
2670: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2671: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2672: fnd_log.string
2673: (
2674: fnd_log.level_exception,
2675: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2676: 'AHL_VWP_VISITS_PVT.Process_Visit returned with expected error..'
2670: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2671: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2672: fnd_log.string
2673: (
2674: fnd_log.level_exception,
2675: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2676: 'AHL_VWP_VISITS_PVT.Process_Visit returned with expected error..'
2677: );
2678: END IF;
2677: );
2678: END IF;
2679: RAISE FND_API.G_EXC_ERROR;
2680: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2681: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2682: fnd_log.string
2683: (
2684: fnd_log.level_exception,
2685: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2678: END IF;
2679: RAISE FND_API.G_EXC_ERROR;
2680: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2681: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2682: fnd_log.string
2683: (
2684: fnd_log.level_exception,
2685: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2686: 'validate_record returned with un-expected error..'
2680: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2681: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2682: fnd_log.string
2683: (
2684: fnd_log.level_exception,
2685: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2686: 'validate_record returned with un-expected error..'
2687: );
2688: END IF;
2704:
2705:
2706: -- If any severe error occurs, then, abort API.
2707: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2708: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2709: fnd_log.string
2710: (
2711: fnd_log.level_exception,
2712: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2705:
2706: -- If any severe error occurs, then, abort API.
2707: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2708: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2709: fnd_log.string
2710: (
2711: fnd_log.level_exception,
2712: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2713: 'AHL_VWP_VISITS_PVT.Process_Visit returned with expected error..'
2707: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2708: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2709: fnd_log.string
2710: (
2711: fnd_log.level_exception,
2712: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2713: 'AHL_VWP_VISITS_PVT.Process_Visit returned with expected error..'
2714: );
2715: END IF;
2714: );
2715: END IF;
2716: RAISE FND_API.G_EXC_ERROR;
2717: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2718: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2719: fnd_log.string
2720: (
2721: fnd_log.level_exception,
2722: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2715: END IF;
2716: RAISE FND_API.G_EXC_ERROR;
2717: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2718: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2719: fnd_log.string
2720: (
2721: fnd_log.level_exception,
2722: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2723: 'validate_record returned with un-expected error..'
2717: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2718: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2719: fnd_log.string
2720: (
2721: fnd_log.level_exception,
2722: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,
2723: 'validate_record returned with un-expected error..'
2724: );
2725: END IF;
2735: FND_MESSAGE.set_token( 'RECORD', get_record_identifier(
2736: p_flight_schedule_rec => p_x_flight_schedules_tbl(i)
2737: ) );
2738: FND_MSG_PUB.add;
2739: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2740: fnd_log.string
2741: (
2742: fnd_log.level_error,
2743: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2736: p_flight_schedule_rec => p_x_flight_schedules_tbl(i)
2737: ) );
2738: FND_MSG_PUB.add;
2739: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2740: fnd_log.string
2741: (
2742: fnd_log.level_error,
2743: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2744: 'SQL Error, Delete failed..'
2738: FND_MSG_PUB.add;
2739: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2740: fnd_log.string
2741: (
2742: fnd_log.level_error,
2743: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2744: 'SQL Error, Delete failed..'
2745: );
2746: END IF;
2769: l_api_name CONSTANT VARCHAR2(30) := 'Process_Flight_Schedules';
2770: l_api_version CONSTANT NUMBER := 1.0;
2771:
2772: BEGIN
2773: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2774: fnd_log.string
2775: (
2776: fnd_log.level_procedure,
2777: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
2770: l_api_version CONSTANT NUMBER := 1.0;
2771:
2772: BEGIN
2773: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2774: fnd_log.string
2775: (
2776: fnd_log.level_procedure,
2777: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
2778: 'At the start of Process_Flight_Schedules'
2772: BEGIN
2773: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2774: fnd_log.string
2775: (
2776: fnd_log.level_procedure,
2777: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
2778: 'At the start of Process_Flight_Schedules'
2779: );
2780: END IF;
2824: p_x_flight_schedules_tbl => p_x_flight_schedules_tbl
2825: );
2826:
2827:
2828: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2829: fnd_log.string
2830: (
2831: fnd_log.level_statement,
2832: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2825: );
2826:
2827:
2828: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2829: fnd_log.string
2830: (
2831: fnd_log.level_statement,
2832: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2833: 'Done DML , committing the work'
2827:
2828: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2829: fnd_log.string
2830: (
2831: fnd_log.level_statement,
2832: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2833: 'Done DML , committing the work'
2834: );
2835: END IF;
2837: IF FND_API.TO_BOOLEAN(p_commit) THEN
2838: COMMIT;
2839: END IF;
2840:
2841: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2842: fnd_log.string
2843: (
2844: fnd_log.level_procedure,
2845: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
2838: COMMIT;
2839: END IF;
2840:
2841: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2842: fnd_log.string
2843: (
2844: fnd_log.level_procedure,
2845: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
2846: 'At the end of Process_Flight_Schedules'
2840:
2841: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2842: fnd_log.string
2843: (
2844: fnd_log.level_procedure,
2845: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
2846: 'At the end of Process_Flight_Schedules'
2847: );
2848: END IF;
2907: WHERE unit_schedule_id = p_unit_schedule_id
2908: AND unit_config_header_id = nvl(p_unit_config_id, unit_config_header_id);
2909:
2910: BEGIN
2911: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2912: fnd_log.string
2913: (
2914: fnd_log.level_procedure,
2915: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
2908: AND unit_config_header_id = nvl(p_unit_config_id, unit_config_header_id);
2909:
2910: BEGIN
2911: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2912: fnd_log.string
2913: (
2914: fnd_log.level_procedure,
2915: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
2916: 'At the start of '||l_api_name
2910: BEGIN
2911: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2912: fnd_log.string
2913: (
2914: fnd_log.level_procedure,
2915: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
2916: 'At the start of '||l_api_name
2917: );
2918: END IF;
2916: 'At the start of '||l_api_name
2917: );
2918: END IF;
2919:
2920: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2921: fnd_log.string
2922: (
2923: fnd_log.level_statement,
2924: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2917: );
2918: END IF;
2919:
2920: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2921: fnd_log.string
2922: (
2923: fnd_log.level_statement,
2924: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2925: 'p_unit_schedule_id -> '||p_unit_schedule_id
2919:
2920: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2921: fnd_log.string
2922: (
2923: fnd_log.level_statement,
2924: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2925: 'p_unit_schedule_id -> '||p_unit_schedule_id
2926: ||', p_unit_config_id -> '||p_unit_config_id
2927: );
2941:
2942: IF p_unit_schedule_id IS NULL THEN
2943: FND_MESSAGE.set_name('AHL','AHL_UA_US_NOT_FOUND');
2944: FND_MSG_PUB.add;
2945: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2946: fnd_log.string
2947: (
2948: fnd_log.level_error,
2949: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2942: IF p_unit_schedule_id IS NULL THEN
2943: FND_MESSAGE.set_name('AHL','AHL_UA_US_NOT_FOUND');
2944: FND_MSG_PUB.add;
2945: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2946: fnd_log.string
2947: (
2948: fnd_log.level_error,
2949: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2950: 'unit schedule id is null..'
2944: FND_MSG_PUB.add;
2945: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2946: fnd_log.string
2947: (
2948: fnd_log.level_error,
2949: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2950: 'unit schedule id is null..'
2951: );
2952: END IF;
2957: FETCH check_flight_exists_csr INTO l_dummy;
2958: IF check_flight_exists_csr%NOTFOUND THEN
2959: FND_MESSAGE.set_name('AHL','AHL_UA_US_NOT_FOUND');
2960: FND_MSG_PUB.add;
2961: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2962: fnd_log.string
2963: (
2964: fnd_log.level_error,
2965: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2958: IF check_flight_exists_csr%NOTFOUND THEN
2959: FND_MESSAGE.set_name('AHL','AHL_UA_US_NOT_FOUND');
2960: FND_MSG_PUB.add;
2961: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2962: fnd_log.string
2963: (
2964: fnd_log.level_error,
2965: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2966: 'unit schedule Record is invalid..'
2960: FND_MSG_PUB.add;
2961: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2962: fnd_log.string
2963: (
2964: fnd_log.level_error,
2965: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2966: 'unit schedule Record is invalid..'
2967: );
2968: END IF;
2972: END IF;
2973: CLOSE check_flight_exists_csr;
2974: END IF;
2975:
2976: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2977: fnd_log.string
2978: (
2979: fnd_log.level_procedure,
2980: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
2973: CLOSE check_flight_exists_csr;
2974: END IF;
2975:
2976: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2977: fnd_log.string
2978: (
2979: fnd_log.level_procedure,
2980: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
2981: 'At the start of '||l_api_name
2975:
2976: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2977: fnd_log.string
2978: (
2979: fnd_log.level_procedure,
2980: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.end',
2981: 'At the start of '||l_api_name
2982: );
2983: END IF;
3055: l_api_name CONSTANT VARCHAR2(30) := 'is_delete_allowed';
3056:
3057: BEGIN
3058: --l_is_super_user := p_is_super_user;
3059: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
3060: fnd_log.string
3061: (
3062: fnd_log.level_procedure,
3063: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
3056:
3057: BEGIN
3058: --l_is_super_user := p_is_super_user;
3059: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
3060: fnd_log.string
3061: (
3062: fnd_log.level_procedure,
3063: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
3064: 'At the start of '||l_api_name
3058: --l_is_super_user := p_is_super_user;
3059: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
3060: fnd_log.string
3061: (
3062: fnd_log.level_procedure,
3063: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
3064: 'At the start of '||l_api_name
3065: );
3066: END IF;
3064: 'At the start of '||l_api_name
3065: );
3066: END IF;
3067:
3068: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
3069: fnd_log.string
3070: (
3071: fnd_log.level_statement,
3072: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
3065: );
3066: END IF;
3067:
3068: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
3069: fnd_log.string
3070: (
3071: fnd_log.level_statement,
3072: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
3073: 'Flight Schedule id --> '|| p_unit_schedule_id ||' and is super user? '||p_is_super_user
3067:
3068: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
3069: fnd_log.string
3070: (
3071: fnd_log.level_statement,
3072: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
3073: 'Flight Schedule id --> '|| p_unit_schedule_id ||' and is super user? '||p_is_super_user
3074: );
3075: END IF;
3119: l_actual_recorded VARCHAR2(1);
3120:
3121: BEGIN
3122:
3123: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
3124: fnd_log.string
3125: (
3126: fnd_log.level_procedure,
3127: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
3120:
3121: BEGIN
3122:
3123: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
3124: fnd_log.string
3125: (
3126: fnd_log.level_procedure,
3127: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
3128: 'At the start of '||l_api_name
3122:
3123: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
3124: fnd_log.string
3125: (
3126: fnd_log.level_procedure,
3127: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||'.begin',
3128: 'At the start of '||l_api_name
3129: );
3130: END IF;
3128: 'At the start of '||l_api_name
3129: );
3130: END IF;
3131:
3132: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
3133: fnd_log.string
3134: (
3135: fnd_log.level_statement,
3136: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
3129: );
3130: END IF;
3131:
3132: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
3133: fnd_log.string
3134: (
3135: fnd_log.level_statement,
3136: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
3137: 'Flight Schedule id --> '|| p_unit_schedule_id ||' and is super user? '||p_is_super_user
3131:
3132: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
3133: fnd_log.string
3134: (
3135: fnd_log.level_statement,
3136: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
3137: 'Flight Schedule id --> '|| p_unit_schedule_id ||' and is super user? '||p_is_super_user
3138: );
3139: END IF;