85: l_return_status,
86: l_msg_Count,
87: l_msg_data);
88:
89: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
90: RAISE FND_API.G_EXC_ERROR ;
91: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
92: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
93: END IF ;
86: l_msg_Count,
87: l_msg_data);
88:
89: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
90: RAISE FND_API.G_EXC_ERROR ;
91: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
92: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
93: END IF ;
94: */
87: l_msg_data);
88:
89: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
90: RAISE FND_API.G_EXC_ERROR ;
91: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
92: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
93: END IF ;
94: */
95: -- Start bug 11830349
88:
89: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
90: RAISE FND_API.G_EXC_ERROR ;
91: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
92: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
93: END IF ;
94: */
95: -- Start bug 11830349
96: Select timezone_code Into l_timezone_code
116: l_return_status,
117: l_msg_count,
118: l_msg_data);
119:
120: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
121: RAISE FND_API.G_EXC_ERROR ;
122: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
123: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
124: END IF ;
117: l_msg_count,
118: l_msg_data);
119:
120: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
121: RAISE FND_API.G_EXC_ERROR ;
122: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
123: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
124: END IF ;
125: */
118: l_msg_data);
119:
120: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
121: RAISE FND_API.G_EXC_ERROR ;
122: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
123: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
124: END IF ;
125: */
126: -- Start bug 11830349
119:
120: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
121: RAISE FND_API.G_EXC_ERROR ;
122: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
123: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
124: END IF ;
125: */
126: -- Start bug 11830349
127: Select timezone_code Into l_timezone_code
146: x_return_status := l_return_status;
147:
148: EXCEPTION
149:
150: WHEN FND_API.G_EXC_ERROR THEN
151: ROLLBACK TO get_gmt_deviation;
152: x_return_status := FND_API.G_RET_STS_ERROR ;
153: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
154: p_data => x_msg_data ,
148: EXCEPTION
149:
150: WHEN FND_API.G_EXC_ERROR THEN
151: ROLLBACK TO get_gmt_deviation;
152: x_return_status := FND_API.G_RET_STS_ERROR ;
153: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
154: p_data => x_msg_data ,
155: p_encoded => fnd_api.g_false );
156:
151: ROLLBACK TO get_gmt_deviation;
152: x_return_status := FND_API.G_RET_STS_ERROR ;
153: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
154: p_data => x_msg_data ,
155: p_encoded => fnd_api.g_false );
156:
157: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
158: ROLLBACK TO get_gmt_deviation;
159: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
153: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
154: p_data => x_msg_data ,
155: p_encoded => fnd_api.g_false );
156:
157: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
158: ROLLBACK TO get_gmt_deviation;
159: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
160: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
161: p_data => x_msg_data ,
155: p_encoded => fnd_api.g_false );
156:
157: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
158: ROLLBACK TO get_gmt_deviation;
159: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
160: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
161: p_data => x_msg_data ,
162: p_encoded => fnd_api.g_false );
163:
158: ROLLBACK TO get_gmt_deviation;
159: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
160: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
161: p_data => x_msg_data ,
162: p_encoded => fnd_api.g_false );
163:
164: WHEN OTHERS THEN
165: ROLLBACK TO get_gmt_deviation;
166: x_return_status := FND_API.G_RET_STS_unexp_error ;
162: p_encoded => fnd_api.g_false );
163:
164: WHEN OTHERS THEN
165: ROLLBACK TO get_gmt_deviation;
166: x_return_status := FND_API.G_RET_STS_unexp_error ;
167:
168: IF fnd_msg_pub.check_msg_level( fnd_msg_pub.g_msg_lvl_unexp_error ) THEN
169: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name ) ;
170: END IF;
170: END IF;
171:
172: fnd_msg_pub.count_and_get (p_count =>x_msg_count ,
173: p_data => x_msg_data ,
174: p_encoded => fnd_api.g_false );
175:
176: END;
177:
178:
283: l_return_status,
284: l_msg_count,
285: l_msg_data);
286:
287: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
288: RAISE FND_API.G_EXC_ERROR ;
289: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
290: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
291: END IF ;
284: l_msg_count,
285: l_msg_data);
286:
287: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
288: RAISE FND_API.G_EXC_ERROR ;
289: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
290: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
291: END IF ;
292:
285: l_msg_data);
286:
287: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
288: RAISE FND_API.G_EXC_ERROR ;
289: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
290: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
291: END IF ;
292:
293: HZ_TIMEZONE_PUB.Get_Timezone_GMT_Deviation(p_api_version,
286:
287: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
288: RAISE FND_API.G_EXC_ERROR ;
289: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
290: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
291: END IF ;
292:
293: HZ_TIMEZONE_PUB.Get_Timezone_GMT_Deviation(p_api_version,
294: p_init_msg_list,
300: l_return_status,
301: l_msg_count,
302: l_msg_data);
303:
304: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
305: RAISE FND_API.G_EXC_ERROR ;
306: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
307: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
308: END IF ;
301: l_msg_count,
302: l_msg_data);
303:
304: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
305: RAISE FND_API.G_EXC_ERROR ;
306: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
307: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
308: END IF ;
309: */
302: l_msg_data);
303:
304: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
305: RAISE FND_API.G_EXC_ERROR ;
306: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
307: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
308: END IF ;
309: */
310: -- Calculate the timelag between two timezones.
303:
304: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
305: RAISE FND_API.G_EXC_ERROR ;
306: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
307: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
308: END IF ;
309: */
310: -- Calculate the timelag between two timezones.
311:
312: x_leadtime := l_s_GMT_dev - l_e_GMT_dev;
313:
314: ELSE
315:
316: l_return_status := FND_API.G_RET_STS_SUCCESS;
317: x_leadtime := 0;
318:
319: END IF;
320:
321: x_return_status := l_return_status;
322:
323: EXCEPTION
324:
325: WHEN FND_API.G_EXC_ERROR THEN
326: ROLLBACK TO get_leadtime;
327: x_return_status := FND_API.G_RET_STS_ERROR ;
328: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
329: p_data => x_msg_data ,
323: EXCEPTION
324:
325: WHEN FND_API.G_EXC_ERROR THEN
326: ROLLBACK TO get_leadtime;
327: x_return_status := FND_API.G_RET_STS_ERROR ;
328: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
329: p_data => x_msg_data ,
330: p_encoded => fnd_api.g_false );
331:
326: ROLLBACK TO get_leadtime;
327: x_return_status := FND_API.G_RET_STS_ERROR ;
328: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
329: p_data => x_msg_data ,
330: p_encoded => fnd_api.g_false );
331:
332: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
333: ROLLBACK TO get_leadtime;
334: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
328: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
329: p_data => x_msg_data ,
330: p_encoded => fnd_api.g_false );
331:
332: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
333: ROLLBACK TO get_leadtime;
334: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
335: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
336: p_data => x_msg_data ,
330: p_encoded => fnd_api.g_false );
331:
332: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
333: ROLLBACK TO get_leadtime;
334: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
335: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
336: p_data => x_msg_data ,
337: p_encoded => fnd_api.g_false );
338:
333: ROLLBACK TO get_leadtime;
334: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
335: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
336: p_data => x_msg_data ,
337: p_encoded => fnd_api.g_false );
338:
339: WHEN OTHERS THEN
340: ROLLBACK TO get_leadtime;
341: x_return_status := FND_API.G_RET_STS_unexp_error ;
337: p_encoded => fnd_api.g_false );
338:
339: WHEN OTHERS THEN
340: ROLLBACK TO get_leadtime;
341: x_return_status := FND_API.G_RET_STS_unexp_error ;
342:
343: IF fnd_msg_pub.check_msg_level ( fnd_msg_pub.g_msg_lvl_unexp_error ) THEN
344: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name ) ;
345: END IF;
345: END IF;
346:
347: fnd_msg_pub.count_and_get ( p_count =>x_msg_count ,
348: p_data => x_msg_data ,
349: p_encoded => fnd_api.g_false );
350:
351: END;
352:
353:
433: l_return_status,
434: l_msg_count,
435: l_msg_data);
436:
437: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
438: RAISE FND_API.G_EXC_ERROR ;
439: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
440: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
441: END IF ;
434: l_msg_count,
435: l_msg_data);
436:
437: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
438: RAISE FND_API.G_EXC_ERROR ;
439: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
440: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
441: END IF ;
442:
435: l_msg_data);
436:
437: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
438: RAISE FND_API.G_EXC_ERROR ;
439: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
440: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
441: END IF ;
442:
443: -- Current System date is used in the Get_Timezone procedure to
436:
437: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
438: RAISE FND_API.G_EXC_ERROR ;
439: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
440: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
441: END IF ;
442:
443: -- Current System date is used in the Get_Timezone procedure to
444: -- find out the Daylight Savings time for the current year, if applicable.
489: l_msg_count,
490: l_msg_data);
491:
492:
493: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
494: RAISE FND_API.G_EXC_ERROR ;
495: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
496: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
497: END IF ;
490: l_msg_data);
491:
492:
493: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
494: RAISE FND_API.G_EXC_ERROR ;
495: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
496: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
497: END IF ;
498:
491:
492:
493: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
494: RAISE FND_API.G_EXC_ERROR ;
495: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
496: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
497: END IF ;
498:
499:
492:
493: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
494: RAISE FND_API.G_EXC_ERROR ;
495: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
496: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
497: END IF ;
498:
499:
500: HZ_TIMEZONE_PUB.Get_Timezone_GMT_Deviation(p_api_version,
507: l_return_status,
508: l_msg_count,
509: l_msg_data);
510:
511: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
512: RAISE FND_API.G_EXC_ERROR ;
513: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
515: END IF ;
508: l_msg_count,
509: l_msg_data);
510:
511: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
512: RAISE FND_API.G_EXC_ERROR ;
513: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
515: END IF ;
516: */
509: l_msg_data);
510:
511: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
512: RAISE FND_API.G_EXC_ERROR ;
513: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
515: END IF ;
516: */
517:
510:
511: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
512: RAISE FND_API.G_EXC_ERROR ;
513: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
515: END IF ;
516: */
517:
518: -- Calculate the timelag between two timezones.
520: x_leadtime := l_s_GMT_dev - l_e_GMT_dev;
521:
522: ELSE
523:
524: l_return_status := FND_API.G_RET_STS_SUCCESS;
525: x_leadtime := 0;
526:
527:
528: END IF;
530: x_return_status := l_return_status;
531:
532: EXCEPTION
533:
534: WHEN FND_API.G_EXC_ERROR THEN
535: ROLLBACK TO get_leadtime;
536: x_return_status := FND_API.G_RET_STS_ERROR ;
537: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
538: p_data => x_msg_data ,
532: EXCEPTION
533:
534: WHEN FND_API.G_EXC_ERROR THEN
535: ROLLBACK TO get_leadtime;
536: x_return_status := FND_API.G_RET_STS_ERROR ;
537: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
538: p_data => x_msg_data ,
539: p_encoded => fnd_api.g_false );
540:
535: ROLLBACK TO get_leadtime;
536: x_return_status := FND_API.G_RET_STS_ERROR ;
537: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
538: p_data => x_msg_data ,
539: p_encoded => fnd_api.g_false );
540:
541: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
542: ROLLBACK TO get_leadtime;
543: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
537: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
538: p_data => x_msg_data ,
539: p_encoded => fnd_api.g_false );
540:
541: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
542: ROLLBACK TO get_leadtime;
543: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
544: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
545: p_data => x_msg_data ,
539: p_encoded => fnd_api.g_false );
540:
541: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
542: ROLLBACK TO get_leadtime;
543: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
544: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
545: p_data => x_msg_data ,
546: p_encoded => fnd_api.g_false );
547:
542: ROLLBACK TO get_leadtime;
543: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
544: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
545: p_data => x_msg_data ,
546: p_encoded => fnd_api.g_false );
547:
548: WHEN OTHERS THEN
549: ROLLBACK TO get_leadtime;
550: x_return_status := FND_API.G_RET_STS_unexp_error ;
546: p_encoded => fnd_api.g_false );
547:
548: WHEN OTHERS THEN
549: ROLLBACK TO get_leadtime;
550: x_return_status := FND_API.G_RET_STS_unexp_error ;
551:
552: IF fnd_msg_pub.check_msg_level ( fnd_msg_pub.g_msg_lvl_unexp_error ) THEN
553: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name ) ;
554: END IF;
554: END IF;
555:
556: fnd_msg_pub.count_and_get (p_count =>x_msg_count ,
557: p_data => x_msg_data ,
558: p_encoded => fnd_api.g_false );
559:
560: END;
561: /*====================================================================================================+
562: ==