13:
14:
15:
16:
17: AS_DEBUG_HIGH_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
18: AS_DEBUG_LOW_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
19: AS_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
20: AS_DEBUG_ERROR_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_ERROR);
21:
14:
15:
16:
17: AS_DEBUG_HIGH_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
18: AS_DEBUG_LOW_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
19: AS_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
20: AS_DEBUG_ERROR_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_ERROR);
21:
22: PROCEDURE Create_timeframe(
15:
16:
17: AS_DEBUG_HIGH_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
18: AS_DEBUG_LOW_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
19: AS_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
20: AS_DEBUG_ERROR_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_ERROR);
21:
22: PROCEDURE Create_timeframe(
23: P_Api_Version_Number IN NUMBER,
16:
17: AS_DEBUG_HIGH_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
18: AS_DEBUG_LOW_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
19: AS_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
20: AS_DEBUG_ERROR_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_ERROR);
21:
22: PROCEDURE Create_timeframe(
23: P_Api_Version_Number IN NUMBER,
24: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
56:
57: -- Initialize message list if p_init_msg_list is set to TRUE.
58: IF FND_API.to_Boolean( p_init_msg_list )
59: THEN
60: FND_MSG_PUB.initialize;
61: END IF;
62:
63:
64: -- Debug Message
63:
64: -- Debug Message
65: IF (AS_DEBUG_LOW_ON) THEN
66:
67: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Public API: ' || l_api_name || 'start');
68: END IF;
69:
70: IF (AS_DEBUG_LOW_ON) THEN
71:
70: IF (AS_DEBUG_LOW_ON) THEN
71:
72:
73:
74: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
75: 'Start time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
76:
77: END IF;
78:
127:
128: -- Debug Message
129: IF (AS_DEBUG_LOW_ON) THEN
130:
131: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Public API: ' || l_api_name || 'end');
132: END IF;
133:
134: IF (AS_DEBUG_LOW_ON) THEN
135:
134: IF (AS_DEBUG_LOW_ON) THEN
135:
136:
137:
138: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
139: 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
140:
141: END IF;
142:
140:
141: END IF;
142:
143: -- Standard call to get message count and if count is 1, get message info.
144: FND_MSG_PUB.Count_And_Get
145: ( p_count => x_msg_count,
146: p_data => x_msg_data
147: );
148:
150: WHEN FND_API.G_EXC_ERROR THEN
151: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
152: P_API_NAME => L_API_NAME
153: ,P_PKG_NAME => G_PKG_NAME
154: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
155: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PUB
156: ,X_MSG_COUNT => X_MSG_COUNT
157: ,X_MSG_DATA => X_MSG_DATA
158: ,X_RETURN_STATUS => X_RETURN_STATUS);
160: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
161: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
162: P_API_NAME => L_API_NAME
163: ,P_PKG_NAME => G_PKG_NAME
164: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
165: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PUB
166: ,X_MSG_COUNT => X_MSG_COUNT
167: ,X_MSG_DATA => X_MSG_DATA
168: ,X_RETURN_STATUS => X_RETURN_STATUS);
218:
219: -- Initialize message list if p_init_msg_list is set to TRUE.
220: IF FND_API.to_Boolean( p_init_msg_list )
221: THEN
222: FND_MSG_PUB.initialize;
223: END IF;
224:
225:
226: -- Debug Message
225:
226: -- Debug Message
227: IF (AS_DEBUG_LOW_ON) THEN
228:
229: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Public API: ' || l_api_name || 'start');
230: END IF;
231:
232: IF (AS_DEBUG_LOW_ON) THEN
233:
232: IF (AS_DEBUG_LOW_ON) THEN
233:
234:
235:
236: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
237: 'Start time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
238:
239: END IF;
240:
284:
285: -- Debug Message
286: IF (AS_DEBUG_LOW_ON) THEN
287:
288: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Public API: ' || l_api_name || 'end');
289: END IF;
290:
291: IF (AS_DEBUG_LOW_ON) THEN
292:
291: IF (AS_DEBUG_LOW_ON) THEN
292:
293:
294:
295: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
296: 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
297:
298: END IF;
299:
297:
298: END IF;
299:
300: -- Standard call to get message count and if count is 1, get message info.
301: FND_MSG_PUB.Count_And_Get
302: ( p_count => x_msg_count,
303: p_data => x_msg_data
304: );
305:
356: WHEN FND_API.G_EXC_ERROR THEN
357: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
358: P_API_NAME => L_API_NAME
359: ,P_PKG_NAME => G_PKG_NAME
360: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
361: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PUB
362: ,X_MSG_COUNT => X_MSG_COUNT
363: ,X_MSG_DATA => X_MSG_DATA
364: ,X_RETURN_STATUS => X_RETURN_STATUS);
366: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
367: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
368: P_API_NAME => L_API_NAME
369: ,P_PKG_NAME => G_PKG_NAME
370: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
371: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PUB
372: ,X_MSG_COUNT => X_MSG_COUNT
373: ,X_MSG_DATA => X_MSG_DATA
374: ,X_RETURN_STATUS => X_RETURN_STATUS);
425:
426: -- Initialize message list if p_init_msg_list is set to TRUE.
427: IF FND_API.to_Boolean( p_init_msg_list )
428: THEN
429: FND_MSG_PUB.initialize;
430: END IF;
431:
432:
433: -- Debug Message
432:
433: -- Debug Message
434: IF (AS_DEBUG_LOW_ON) THEN
435:
436: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Public API: ' || l_api_name || 'start');
437: END IF;
438:
439: IF (AS_DEBUG_LOW_ON) THEN
440:
439: IF (AS_DEBUG_LOW_ON) THEN
440:
441:
442:
443: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
444: 'Start time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
445:
446: END IF;
447:
540:
541: -- Debug Message
542: IF (AS_DEBUG_LOW_ON) THEN
543:
544: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Public API: ' || l_api_name || 'end');
545: END IF;
546:
547: IF (AS_DEBUG_LOW_ON) THEN
548:
547: IF (AS_DEBUG_LOW_ON) THEN
548:
549:
550:
551: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
552: 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
553:
554: END IF;
555:
553:
554: END IF;
555:
556: -- Standard call to get message count and if count is 1, get message info.
557: FND_MSG_PUB.Count_And_Get
558: ( p_count => x_msg_count,
559: p_data => x_msg_data
560: );
561:
612: WHEN FND_API.G_EXC_ERROR THEN
613: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
614: P_API_NAME => L_API_NAME
615: ,P_PKG_NAME => G_PKG_NAME
616: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
617: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PUB
618: ,X_MSG_COUNT => X_MSG_COUNT
619: ,X_MSG_DATA => X_MSG_DATA
620: ,X_RETURN_STATUS => X_RETURN_STATUS);
622: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
623: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
624: P_API_NAME => L_API_NAME
625: ,P_PKG_NAME => G_PKG_NAME
626: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
627: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PUB
628: ,X_MSG_COUNT => X_MSG_COUNT
629: ,X_MSG_DATA => X_MSG_DATA
630: ,X_RETURN_STATUS => X_RETURN_STATUS);
687:
688: -- Initialize message list if p_init_msg_list is set to TRUE.
689: IF FND_API.to_Boolean( p_init_msg_list )
690: THEN
691: FND_MSG_PUB.initialize;
692: END IF;
693:
694:
695: -- Debug Message
694:
695: -- Debug Message
696: IF (AS_DEBUG_LOW_ON) THEN
697:
698: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Public API: ' || l_api_name || 'start');
699: END IF;
700:
701: IF (AS_DEBUG_LOW_ON) THEN
702:
701: IF (AS_DEBUG_LOW_ON) THEN
702:
703:
704:
705: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
706: 'Start time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
707:
708: END IF;
709:
715: --
716: -- Debug Message
717: IF (AS_DEBUG_LOW_ON) THEN
718:
719: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
720: 'Public API: - Calling PVT.Get_TIMEFRAME');
721: END IF;
722: AML_timeframe_PVT.Get_timeframe(
723: P_Api_Version_Number => 2.0,
756:
757: -- Debug Message
758: IF (AS_DEBUG_LOW_ON) THEN
759:
760: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Public API: ' || l_api_name || 'end');
761: END IF;
762:
763: IF (AS_DEBUG_LOW_ON) THEN
764:
763: IF (AS_DEBUG_LOW_ON) THEN
764:
765:
766:
767: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
768: 'End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
769:
770: END IF;
771:
769:
770: END IF;
771:
772: -- Standard call to get message count and if count is 1, get message info.
773: FND_MSG_PUB.Count_And_Get
774: ( p_count => x_msg_count,
775: p_data => x_msg_data
776: );
777:
779: WHEN FND_API.G_EXC_ERROR THEN
780: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
781: P_API_NAME => L_API_NAME
782: ,P_PKG_NAME => G_PKG_NAME
783: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
784: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PUB
785: ,X_MSG_COUNT => X_MSG_COUNT
786: ,X_MSG_DATA => X_MSG_DATA
787: ,X_RETURN_STATUS => X_RETURN_STATUS);
789: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
790: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
791: P_API_NAME => L_API_NAME
792: ,P_PKG_NAME => G_PKG_NAME
793: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
794: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PUB
795: ,X_MSG_COUNT => X_MSG_COUNT
796: ,X_MSG_DATA => X_MSG_DATA
797: ,X_RETURN_STATUS => X_RETURN_STATUS);