DBA Data[Home] [Help]

APPS.AS_GAR_QOT_PUB dependencies on AS_GAR

Line 1: PACKAGE BODY AS_GAR_QOT_PUB AS

1: PACKAGE BODY AS_GAR_QOT_PUB AS
2: /* $Header: asxgrqtb.pls 120.22 2006/02/02 21:30 amagupta noship $ */
3:
4: ---------------------------------------------------------------------------
5: -- Start of Comments

Line 7: -- PACKAGE NAME: AS_GAR_QOT_PUB

3:
4: ---------------------------------------------------------------------------
5: -- Start of Comments
6: ---------------------------------------------------------------------------
7: -- PACKAGE NAME: AS_GAR_QOT_PUB
8: -- ---------------------------------------------------------------------
9: -- PURPOSE
10: -- --------
11: -- This package contains procedures to accomplish each of the following

Line 47: l_terr_globals AS_GAR.TERR_GLOBALS;

43: p_trace_mode IN VARCHAR2,
44: p_worker_id IN VARCHAR2,
45: P_percent_analyzed IN NUMBER )
46: IS
47: l_terr_globals AS_GAR.TERR_GLOBALS;
48: l_msg_count NUMBER;
49: l_msg_data VARCHAR2(2000);
50: l_errbuf VARCHAR2(4000);
51: l_retcode VARCHAR2(255);

Line 58: AS_GAR.g_debug_flag := p_debug_mode;

54: l_target_type VARCHAR2(15);
55: l_status BOOLEAN;
56: l_proc VARCHAR2(30):= 'GAR_WRAPPER::';
57: BEGIN
58: AS_GAR.g_debug_flag := p_debug_mode;
59: IF p_trace_mode = 'Y' THEN AS_GAR.SETTRACE; END IF;
60: AS_GAR.LOG(G_ENTITY || l_proc || AS_GAR.G_START);
61:
62: IF p_run_mode = AS_GAR.G_TOTAL_MODE THEN

Line 59: IF p_trace_mode = 'Y' THEN AS_GAR.SETTRACE; END IF;

55: l_status BOOLEAN;
56: l_proc VARCHAR2(30):= 'GAR_WRAPPER::';
57: BEGIN
58: AS_GAR.g_debug_flag := p_debug_mode;
59: IF p_trace_mode = 'Y' THEN AS_GAR.SETTRACE; END IF;
60: AS_GAR.LOG(G_ENTITY || l_proc || AS_GAR.G_START);
61:
62: IF p_run_mode = AS_GAR.G_TOTAL_MODE THEN
63: l_target_type := 'TOTAL';

Line 60: AS_GAR.LOG(G_ENTITY || l_proc || AS_GAR.G_START);

56: l_proc VARCHAR2(30):= 'GAR_WRAPPER::';
57: BEGIN
58: AS_GAR.g_debug_flag := p_debug_mode;
59: IF p_trace_mode = 'Y' THEN AS_GAR.SETTRACE; END IF;
60: AS_GAR.LOG(G_ENTITY || l_proc || AS_GAR.G_START);
61:
62: IF p_run_mode = AS_GAR.G_TOTAL_MODE THEN
63: l_target_type := 'TOTAL';
64: ELSIF p_run_mode = AS_GAR.G_NEW_MODE THEN

Line 62: IF p_run_mode = AS_GAR.G_TOTAL_MODE THEN

58: AS_GAR.g_debug_flag := p_debug_mode;
59: IF p_trace_mode = 'Y' THEN AS_GAR.SETTRACE; END IF;
60: AS_GAR.LOG(G_ENTITY || l_proc || AS_GAR.G_START);
61:
62: IF p_run_mode = AS_GAR.G_TOTAL_MODE THEN
63: l_target_type := 'TOTAL';
64: ELSIF p_run_mode = AS_GAR.G_NEW_MODE THEN
65: l_target_type := 'INCREMENTAL';
66: END If;

Line 64: ELSIF p_run_mode = AS_GAR.G_NEW_MODE THEN

60: AS_GAR.LOG(G_ENTITY || l_proc || AS_GAR.G_START);
61:
62: IF p_run_mode = AS_GAR.G_TOTAL_MODE THEN
63: l_target_type := 'TOTAL';
64: ELSIF p_run_mode = AS_GAR.G_NEW_MODE THEN
65: l_target_type := 'INCREMENTAL';
66: END If;
67:
68: -- Set the Global variables

Line 69: AS_GAR.INIT(

65: l_target_type := 'INCREMENTAL';
66: END If;
67:
68: -- Set the Global variables
69: AS_GAR.INIT(
70: p_run_mode,
71: p_worker_id,
72: l_terr_globals);
73:

Line 75: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CW || AS_GAR.G_START);

71: p_worker_id,
72: l_terr_globals);
73:
74: /* This inserts into Oppty winners */
75: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CW || AS_GAR.G_START);
76: JTY_ASSIGN_BULK_PUB.GET_WINNERS
77: ( p_api_version_number => 1.0,
78: p_init_msg_list => FND_API.G_TRUE,
79: p_source_id => -1001,

Line 90: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CW || AS_GAR.G_END);

86: x_msg_count => l_msg_count,
87: x_msg_data => l_msg_data,
88: ERRBUF => l_errbuf,
89: RETCODE => l_retcode);
90: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CW || AS_GAR.G_END);
91: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CW || AS_GAR.G_RETURN_STATUS || l_return_status);
92:
93: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
94: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CW, l_errbuf, l_retcode);

Line 91: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CW || AS_GAR.G_RETURN_STATUS || l_return_status);

87: x_msg_data => l_msg_data,
88: ERRBUF => l_errbuf,
89: RETCODE => l_retcode);
90: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CW || AS_GAR.G_END);
91: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CW || AS_GAR.G_RETURN_STATUS || l_return_status);
92:
93: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
94: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CW, l_errbuf, l_retcode);
95: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 94: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CW, l_errbuf, l_retcode);

90: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CW || AS_GAR.G_END);
91: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CW || AS_GAR.G_RETURN_STATUS || l_return_status);
92:
93: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
94: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CW, l_errbuf, l_retcode);
95: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
96: End If;
97:
98: COMMIT;

Line 102: /* AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_GROUPS || AS_GAR.G_START);

98: COMMIT;
99:
100: --Commenting the following call since Real Time API is not supporting other than rs_employee
101: -- Explode GROUPS if any inside winners
102: /* AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_GROUPS || AS_GAR.G_START);
103: AS_GAR_QOT_PUB.EXPLODE_GROUPS_QOT(
104: x_errbuf => l_errbuf,
105: x_retcode => l_retcode,
106: p_terr_globals => l_terr_globals,

Line 103: AS_GAR_QOT_PUB.EXPLODE_GROUPS_QOT(

99:
100: --Commenting the following call since Real Time API is not supporting other than rs_employee
101: -- Explode GROUPS if any inside winners
102: /* AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_GROUPS || AS_GAR.G_START);
103: AS_GAR_QOT_PUB.EXPLODE_GROUPS_QOT(
104: x_errbuf => l_errbuf,
105: x_retcode => l_retcode,
106: p_terr_globals => l_terr_globals,
107: x_return_status => l_return_status);

Line 109: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_GROUPS || AS_GAR.G_END);

105: x_retcode => l_retcode,
106: p_terr_globals => l_terr_globals,
107: x_return_status => l_return_status);
108:
109: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_GROUPS || AS_GAR.G_END);
110: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_GROUPS || AS_GAR.G_RETURN_STATUS || l_return_status);
111:
112: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
113: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_GROUPS, l_errbuf, l_retcode);

Line 110: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_GROUPS || AS_GAR.G_RETURN_STATUS || l_return_status);

106: p_terr_globals => l_terr_globals,
107: x_return_status => l_return_status);
108:
109: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_GROUPS || AS_GAR.G_END);
110: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_GROUPS || AS_GAR.G_RETURN_STATUS || l_return_status);
111:
112: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
113: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_GROUPS, l_errbuf, l_retcode);
114: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 113: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_GROUPS, l_errbuf, l_retcode);

109: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_GROUPS || AS_GAR.G_END);
110: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_GROUPS || AS_GAR.G_RETURN_STATUS || l_return_status);
111:
112: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
113: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_GROUPS, l_errbuf, l_retcode);
114: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
115: End If;
116:
117: COMMIT;

Line 120: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_TEAMS || AS_GAR.G_START);

116:
117: COMMIT;
118:
119: -- Explode TEAMS if any inside winners
120: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_TEAMS || AS_GAR.G_START);
121: AS_GAR_QOT_PUB.EXPLODE_TEAMS_QOT(
122: x_errbuf => l_errbuf,
123: x_retcode => l_retcode,
124: p_terr_globals => l_terr_globals,

Line 121: AS_GAR_QOT_PUB.EXPLODE_TEAMS_QOT(

117: COMMIT;
118:
119: -- Explode TEAMS if any inside winners
120: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_TEAMS || AS_GAR.G_START);
121: AS_GAR_QOT_PUB.EXPLODE_TEAMS_QOT(
122: x_errbuf => l_errbuf,
123: x_retcode => l_retcode,
124: p_terr_globals => l_terr_globals,
125: x_return_status => l_return_status);

Line 127: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_TEAMS || AS_GAR.G_END);

123: x_retcode => l_retcode,
124: p_terr_globals => l_terr_globals,
125: x_return_status => l_return_status);
126:
127: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_TEAMS || AS_GAR.G_END);
128: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_TEAMS || AS_GAR.G_RETURN_STATUS || l_return_status);
129:
130: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
131: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_TEAMS, l_errbuf, l_retcode);

Line 128: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_TEAMS || AS_GAR.G_RETURN_STATUS || l_return_status);

124: p_terr_globals => l_terr_globals,
125: x_return_status => l_return_status);
126:
127: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_TEAMS || AS_GAR.G_END);
128: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_TEAMS || AS_GAR.G_RETURN_STATUS || l_return_status);
129:
130: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
131: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_TEAMS, l_errbuf, l_retcode);
132: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 131: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_TEAMS, l_errbuf, l_retcode);

127: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_TEAMS || AS_GAR.G_END);
128: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_TEAMS || AS_GAR.G_RETURN_STATUS || l_return_status);
129:
130: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
131: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_TEAMS, l_errbuf, l_retcode);
132: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
133: End If;
134:
135: COMMIT;

Line 138: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_STLEAD || AS_GAR.G_START);

134:
135: COMMIT;
136: */
137: -- Set team leader for Quotes
138: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_STLEAD || AS_GAR.G_START);
139: AS_GAR_QOT_PUB.SET_TEAM_LEAD_QOT(
140: x_errbuf => l_errbuf,
141: x_retcode => l_retcode,
142: p_terr_globals => l_terr_globals,

Line 139: AS_GAR_QOT_PUB.SET_TEAM_LEAD_QOT(

135: COMMIT;
136: */
137: -- Set team leader for Quotes
138: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_STLEAD || AS_GAR.G_START);
139: AS_GAR_QOT_PUB.SET_TEAM_LEAD_QOT(
140: x_errbuf => l_errbuf,
141: x_retcode => l_retcode,
142: p_terr_globals => l_terr_globals,
143: x_return_status => l_return_status);

Line 145: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_STLEAD || AS_GAR.G_END);

141: x_retcode => l_retcode,
142: p_terr_globals => l_terr_globals,
143: x_return_status => l_return_status);
144:
145: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_STLEAD || AS_GAR.G_END);
146: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_STLEAD || AS_GAR.G_RETURN_STATUS || l_return_status);
147:
148: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
149: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_STLEAD, l_errbuf, l_retcode);

Line 146: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_STLEAD || AS_GAR.G_RETURN_STATUS || l_return_status);

142: p_terr_globals => l_terr_globals,
143: x_return_status => l_return_status);
144:
145: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_STLEAD || AS_GAR.G_END);
146: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_STLEAD || AS_GAR.G_RETURN_STATUS || l_return_status);
147:
148: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
149: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_STLEAD, l_errbuf, l_retcode);
150: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 149: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_STLEAD, l_errbuf, l_retcode);

145: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_STLEAD || AS_GAR.G_END);
146: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_STLEAD || AS_GAR.G_RETURN_STATUS || l_return_status);
147:
148: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
149: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_STLEAD, l_errbuf, l_retcode);
150: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
151: End If;
152:
153: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || 'UPDATE FAF::' || AS_GAR.G_START);

Line 153: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || 'UPDATE FAF::' || AS_GAR.G_START);

149: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_STLEAD, l_errbuf, l_retcode);
150: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
151: End If;
152:
153: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || 'UPDATE FAF::' || AS_GAR.G_START);
154: AS_GAR_QOT_PUB.SET_FAF_QOT(
155: x_errbuf => l_errbuf,
156: x_retcode => l_retcode,
157: p_terr_globals => l_terr_globals,

Line 154: AS_GAR_QOT_PUB.SET_FAF_QOT(

150: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
151: End If;
152:
153: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || 'UPDATE FAF::' || AS_GAR.G_START);
154: AS_GAR_QOT_PUB.SET_FAF_QOT(
155: x_errbuf => l_errbuf,
156: x_retcode => l_retcode,
157: p_terr_globals => l_terr_globals,
158: x_return_status => l_return_status);

Line 160: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || 'UPDATE FAF::' || AS_GAR.G_END);

156: x_retcode => l_retcode,
157: p_terr_globals => l_terr_globals,
158: x_return_status => l_return_status);
159:
160: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || 'UPDATE FAF::' || AS_GAR.G_END);
161: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || 'UPDATE FAF::' || AS_GAR.G_RETURN_STATUS || l_return_status);
162:
163: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
164: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || 'UPDATE FAF::', l_errbuf, l_retcode);

Line 161: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || 'UPDATE FAF::' || AS_GAR.G_RETURN_STATUS || l_return_status);

157: p_terr_globals => l_terr_globals,
158: x_return_status => l_return_status);
159:
160: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || 'UPDATE FAF::' || AS_GAR.G_END);
161: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || 'UPDATE FAF::' || AS_GAR.G_RETURN_STATUS || l_return_status);
162:
163: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
164: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || 'UPDATE FAF::', l_errbuf, l_retcode);
165: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 164: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || 'UPDATE FAF::', l_errbuf, l_retcode);

160: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || 'UPDATE FAF::' || AS_GAR.G_END);
161: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || 'UPDATE FAF::' || AS_GAR.G_RETURN_STATUS || l_return_status);
162:
163: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
164: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || 'UPDATE FAF::', l_errbuf, l_retcode);
165: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
166: End If;
167:
168: -- Insert into Qot Accesses from Winners

Line 169: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSACC || AS_GAR.G_START);

165: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
166: End If;
167:
168: -- Insert into Qot Accesses from Winners
169: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSACC || AS_GAR.G_START);
170: AS_GAR_QOT_PUB.INSERT_ACCESSES_QOT(
171: x_errbuf => l_errbuf,
172: x_retcode => l_retcode,
173: p_terr_globals => l_terr_globals,

Line 170: AS_GAR_QOT_PUB.INSERT_ACCESSES_QOT(

166: End If;
167:
168: -- Insert into Qot Accesses from Winners
169: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSACC || AS_GAR.G_START);
170: AS_GAR_QOT_PUB.INSERT_ACCESSES_QOT(
171: x_errbuf => l_errbuf,
172: x_retcode => l_retcode,
173: p_terr_globals => l_terr_globals,
174: x_return_status => l_return_status);

Line 176: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSACC || AS_GAR.G_END);

172: x_retcode => l_retcode,
173: p_terr_globals => l_terr_globals,
174: x_return_status => l_return_status);
175:
176: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSACC || AS_GAR.G_END);
177: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSACC || AS_GAR.G_RETURN_STATUS || l_return_status);
178:
179: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
180: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSACC, l_errbuf, l_retcode);

Line 177: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSACC || AS_GAR.G_RETURN_STATUS || l_return_status);

173: p_terr_globals => l_terr_globals,
174: x_return_status => l_return_status);
175:
176: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSACC || AS_GAR.G_END);
177: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSACC || AS_GAR.G_RETURN_STATUS || l_return_status);
178:
179: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
180: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSACC, l_errbuf, l_retcode);
181: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 180: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSACC, l_errbuf, l_retcode);

176: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSACC || AS_GAR.G_END);
177: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSACC || AS_GAR.G_RETURN_STATUS || l_return_status);
178:
179: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
180: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSACC, l_errbuf, l_retcode);
181: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
182: End If;
183: -- Insert into territory Accesses
184: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSTERRACC || AS_GAR.G_START);

Line 184: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSTERRACC || AS_GAR.G_START);

180: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSACC, l_errbuf, l_retcode);
181: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
182: End If;
183: -- Insert into territory Accesses
184: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSTERRACC || AS_GAR.G_START);
185: AS_GAR_QOT_PUB.INSERT_TERR_ACCESSES_QOT(
186: x_errbuf => l_errbuf,
187: x_retcode => l_retcode,
188: p_terr_globals => l_terr_globals,

Line 185: AS_GAR_QOT_PUB.INSERT_TERR_ACCESSES_QOT(

181: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
182: End If;
183: -- Insert into territory Accesses
184: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSTERRACC || AS_GAR.G_START);
185: AS_GAR_QOT_PUB.INSERT_TERR_ACCESSES_QOT(
186: x_errbuf => l_errbuf,
187: x_retcode => l_retcode,
188: p_terr_globals => l_terr_globals,
189: x_return_status => l_return_status);

Line 191: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSTERRACC || AS_GAR.G_END);

187: x_retcode => l_retcode,
188: p_terr_globals => l_terr_globals,
189: x_return_status => l_return_status);
190:
191: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSTERRACC || AS_GAR.G_END);
192: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSTERRACC || AS_GAR.G_RETURN_STATUS || l_return_status);
193:
194: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
195: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSTERRACC, l_errbuf, l_retcode);

Line 192: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSTERRACC || AS_GAR.G_RETURN_STATUS || l_return_status);

188: p_terr_globals => l_terr_globals,
189: x_return_status => l_return_status);
190:
191: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSTERRACC || AS_GAR.G_END);
192: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSTERRACC || AS_GAR.G_RETURN_STATUS || l_return_status);
193:
194: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
195: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSTERRACC, l_errbuf, l_retcode);
196: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 195: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSTERRACC, l_errbuf, l_retcode);

191: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSTERRACC || AS_GAR.G_END);
192: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSTERRACC || AS_GAR.G_RETURN_STATUS || l_return_status);
193:
194: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
195: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSTERRACC, l_errbuf, l_retcode);
196: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
197: End If;
198:
199: -- Remove records in access table that are not qualified

Line 200: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CC || AS_GAR.G_START);

196: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
197: End If;
198:
199: -- Remove records in access table that are not qualified
200: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CC || AS_GAR.G_START);
201: AS_GAR_QOT_PUB.PERFORM_QOT_CLEANUP(
202: x_errbuf => l_errbuf,
203: x_retcode => l_retcode,
204: p_terr_globals => l_terr_globals,

Line 201: AS_GAR_QOT_PUB.PERFORM_QOT_CLEANUP(

197: End If;
198:
199: -- Remove records in access table that are not qualified
200: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CC || AS_GAR.G_START);
201: AS_GAR_QOT_PUB.PERFORM_QOT_CLEANUP(
202: x_errbuf => l_errbuf,
203: x_retcode => l_retcode,
204: p_terr_globals => l_terr_globals,
205: x_return_status => l_return_status);

Line 207: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CC || AS_GAR.G_END);

203: x_retcode => l_retcode,
204: p_terr_globals => l_terr_globals,
205: x_return_status => l_return_status);
206:
207: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CC || AS_GAR.G_END);
208: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CC || AS_GAR.G_RETURN_STATUS || l_return_status);
209:
210: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
211: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CC, l_errbuf, l_retcode);

Line 208: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CC || AS_GAR.G_RETURN_STATUS || l_return_status);

204: p_terr_globals => l_terr_globals,
205: x_return_status => l_return_status);
206:
207: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CC || AS_GAR.G_END);
208: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CC || AS_GAR.G_RETURN_STATUS || l_return_status);
209:
210: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
211: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CC, l_errbuf, l_retcode);
212: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 211: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CC, l_errbuf, l_retcode);

207: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CC || AS_GAR.G_END);
208: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CC || AS_GAR.G_RETURN_STATUS || l_return_status);
209:
210: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
211: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CC, l_errbuf, l_retcode);
212: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
213: End If;
214: -- Quote Owner assignment
215: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CO || AS_GAR.G_START);

Line 215: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CO || AS_GAR.G_START);

211: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CC, l_errbuf, l_retcode);
212: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
213: End If;
214: -- Quote Owner assignment
215: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CO || AS_GAR.G_START);
216: AS_GAR_QOT_PUB.ASSIGN_QOT_OWNER(
217: x_errbuf => l_errbuf,
218: x_retcode => l_retcode,
219: p_terr_globals => l_terr_globals,

Line 216: AS_GAR_QOT_PUB.ASSIGN_QOT_OWNER(

212: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
213: End If;
214: -- Quote Owner assignment
215: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CO || AS_GAR.G_START);
216: AS_GAR_QOT_PUB.ASSIGN_QOT_OWNER(
217: x_errbuf => l_errbuf,
218: x_retcode => l_retcode,
219: p_terr_globals => l_terr_globals,
220: x_return_status => l_return_status);

Line 221: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CO || AS_GAR.G_END);

217: x_errbuf => l_errbuf,
218: x_retcode => l_retcode,
219: p_terr_globals => l_terr_globals,
220: x_return_status => l_return_status);
221: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CO || AS_GAR.G_END);
222: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CO || AS_GAR.G_RETURN_STATUS || l_return_status);
223:
224: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
225: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CO, l_errbuf, l_retcode);

Line 222: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CO || AS_GAR.G_RETURN_STATUS || l_return_status);

218: x_retcode => l_retcode,
219: p_terr_globals => l_terr_globals,
220: x_return_status => l_return_status);
221: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CO || AS_GAR.G_END);
222: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CO || AS_GAR.G_RETURN_STATUS || l_return_status);
223:
224: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
225: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CO, l_errbuf, l_retcode);
226: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 225: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CO, l_errbuf, l_retcode);

221: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CO || AS_GAR.G_END);
222: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CO || AS_GAR.G_RETURN_STATUS || l_return_status);
223:
224: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
225: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CO, l_errbuf, l_retcode);
226: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
227: End If;
228:
229: AS_GAR.LOG(G_ENTITY || l_proc || AS_GAR.G_END);

Line 229: AS_GAR.LOG(G_ENTITY || l_proc || AS_GAR.G_END);

225: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CO, l_errbuf, l_retcode);
226: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
227: End If;
228:
229: AS_GAR.LOG(G_ENTITY || l_proc || AS_GAR.G_END);
230: EXCEPTION
231: WHEN OTHERS THEN
232: AS_GAR.LOG_EXCEPTION(G_ENTITY, SQLERRM, TO_CHAR(SQLCODE));
233: l_status := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR', SQLERRM);

Line 232: AS_GAR.LOG_EXCEPTION(G_ENTITY, SQLERRM, TO_CHAR(SQLCODE));

228:
229: AS_GAR.LOG(G_ENTITY || l_proc || AS_GAR.G_END);
230: EXCEPTION
231: WHEN OTHERS THEN
232: AS_GAR.LOG_EXCEPTION(G_ENTITY, SQLERRM, TO_CHAR(SQLCODE));
233: l_status := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR', SQLERRM);
234: END GAR_WRAPPER;
235:
236: /************************** End GAR Wrapper *****************************/

Line 242: p_terr_globals IN AS_GAR.TERR_GLOBALS,

238: /************************** Start Explode Teams Opptys ******************/
239: PROCEDURE EXPLODE_TEAMS_QOT(
240: x_errbuf OUT NOCOPY VARCHAR2,
241: x_retcode OUT NOCOPY VARCHAR2,
242: p_terr_globals IN AS_GAR.TERR_GLOBALS,
243: x_return_status OUT NOCOPY VARCHAR2)
244: IS
245:
246: /*-------------------------------------------------------------------------+

Line 289: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_TEAMS || AS_GAR.G_START);

285: AND rules.source_id = -1001
286: AND rsc.terr_rsc_id = acc.terr_rsc_id;
287:
288: BEGIN
289: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_TEAMS || AS_GAR.G_START);
290: x_return_status := FND_API.G_RET_STS_SUCCESS;
291: l_request_id := p_terr_globals.request_id;
292: l_worker_id := p_terr_globals.worker_id;
293: l_resource_type := 'RS_TEAM';

Line 305: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_TEAMS || AS_GAR.G_N_ROWS_PROCESSED || l_res_type_count);

301: FETCH c_get_res_type_count INTO l_res_type_count;
302: CLOSE c_get_res_type_count;
303: END IF;
304:
305: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_TEAMS || AS_GAR.G_N_ROWS_PROCESSED || l_res_type_count);
306: IF l_res_type_count > 0 THEN
307: /* Get resources within a resource team */
308: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_TEAMS || AS_GAR.G_INS_WINNERS || AS_GAR.G_START);
309: /** Note

Line 308: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_TEAMS || AS_GAR.G_INS_WINNERS || AS_GAR.G_START);

304:
305: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_TEAMS || AS_GAR.G_N_ROWS_PROCESSED || l_res_type_count);
306: IF l_res_type_count > 0 THEN
307: /* Get resources within a resource team */
308: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_TEAMS || AS_GAR.G_INS_WINNERS || AS_GAR.G_START);
309: /** Note
310: Hard coding RS_EMPLOYEE INSTEAD OF resource_category IN following SQL
311: because JTA returns RS_EMPLOYEE AND NOT EMPLOYEE
312: **/

Line 494: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_TEAMS || AS_GAR.G_INS_WINNERS || AS_GAR.G_N_ROWS_PROCESSED || SQL%ROWCOUNT);

490: AND rt1.worker_id = t.worker_id
491: AND rt1.trans_object_id = t.trans_object_id
492: AND NVL(rt1.trans_detail_object_id,-1) = NVL(t.trans_detail_object_id,-1));
493:
494: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_TEAMS || AS_GAR.G_INS_WINNERS || AS_GAR.G_N_ROWS_PROCESSED || SQL%ROWCOUNT);
495: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_TEAMS || AS_GAR.G_INS_WINNERS || AS_GAR.G_END);
496:
497:
498: COMMIT;

Line 495: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_TEAMS || AS_GAR.G_INS_WINNERS || AS_GAR.G_END);

491: AND rt1.trans_object_id = t.trans_object_id
492: AND NVL(rt1.trans_detail_object_id,-1) = NVL(t.trans_detail_object_id,-1));
493:
494: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_TEAMS || AS_GAR.G_INS_WINNERS || AS_GAR.G_N_ROWS_PROCESSED || SQL%ROWCOUNT);
495: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_TEAMS || AS_GAR.G_INS_WINNERS || AS_GAR.G_END);
496:
497:
498: COMMIT;
499:

Line 503: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_TEAMS, SQLERRM, TO_CHAR(SQLCODE));

499:
500: END IF; /* if l_res_type_count > 0 */
501: EXCEPTION
502: WHEN OTHERS THEN
503: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_TEAMS, SQLERRM, TO_CHAR(SQLCODE));
504: x_errbuf := SQLERRM;
505: x_retcode := SQLCODE;
506: x_return_status := FND_API.G_RET_STS_ERROR;
507: RAISE;

Line 515: p_terr_globals IN AS_GAR.TERR_GLOBALS,

511: /************************** Start Explode Groups Quotes ******************/
512: PROCEDURE EXPLODE_GROUPS_QOT(
513: x_errbuf OUT NOCOPY VARCHAR2,
514: x_retcode OUT NOCOPY VARCHAR2,
515: p_terr_globals IN AS_GAR.TERR_GLOBALS,
516: x_return_status OUT NOCOPY VARCHAR2)
517: IS
518: -------------RS_GROUP---------
519: /*-------------------------------------------------------------------------+

Line 572: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_GROUPS || AS_GAR.G_N_ROWS_PROCESSED || l_res_type_count);

568: FETCH c_get_res_type_count INTO l_res_type_count;
569: CLOSE c_get_res_type_count;
570: END IF;
571:
572: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_GROUPS || AS_GAR.G_N_ROWS_PROCESSED || l_res_type_count);
573: IF l_res_type_count > 0 THEN
574: /* Get resources within a resource group */
575: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_GROUPS || AS_GAR.G_INS_WINNERS || AS_GAR.G_START);
576: /** Note

Line 575: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_GROUPS || AS_GAR.G_INS_WINNERS || AS_GAR.G_START);

571:
572: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_GROUPS || AS_GAR.G_N_ROWS_PROCESSED || l_res_type_count);
573: IF l_res_type_count > 0 THEN
574: /* Get resources within a resource group */
575: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_GROUPS || AS_GAR.G_INS_WINNERS || AS_GAR.G_START);
576: /** Note
577: Hard coding RS_EMPLOYEE INSTEAD OF resource_category IN following SQL
578: because JTA returns RS_EMPLOYEE AND NOT EMPLOYEE
579: **/

Line 679: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_GROUPS || AS_GAR.G_INS_WINNERS || AS_GAR.G_N_ROWS_PROCESSED || SQL%ROWCOUNT);

675: AND rt1.worker_id = t.worker_id
676: AND rt1.trans_object_id = t.trans_object_id
677: AND NVL(rt1.trans_detail_object_id,-1) = NVL(t.trans_detail_object_id,-1));
678:
679: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_GROUPS || AS_GAR.G_INS_WINNERS || AS_GAR.G_N_ROWS_PROCESSED || SQL%ROWCOUNT);
680: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_GROUPS || AS_GAR.G_INS_WINNERS || AS_GAR.G_END);
681:
682: COMMIT;
683: END IF; /* if l_res_type_count > 0 */

Line 680: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_GROUPS || AS_GAR.G_INS_WINNERS || AS_GAR.G_END);

676: AND rt1.trans_object_id = t.trans_object_id
677: AND NVL(rt1.trans_detail_object_id,-1) = NVL(t.trans_detail_object_id,-1));
678:
679: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_GROUPS || AS_GAR.G_INS_WINNERS || AS_GAR.G_N_ROWS_PROCESSED || SQL%ROWCOUNT);
680: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_GROUPS || AS_GAR.G_INS_WINNERS || AS_GAR.G_END);
681:
682: COMMIT;
683: END IF; /* if l_res_type_count > 0 */
684:

Line 687: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_GROUPS, SQLERRM, TO_CHAR(SQLCODE));

683: END IF; /* if l_res_type_count > 0 */
684:
685: EXCEPTION
686: WHEN OTHERS THEN
687: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_GROUPS, SQLERRM, TO_CHAR(SQLCODE));
688: x_errbuf := SQLERRM;
689: x_retcode := SQLCODE;
690: x_return_status := FND_API.G_RET_STS_ERROR;
691: RAISE;

Line 715: p_terr_globals IN AS_GAR.TERR_GLOBALS,

711:
712: PROCEDURE SET_TEAM_LEAD_QOT(
713: x_errbuf OUT NOCOPY VARCHAR2,
714: x_retcode OUT NOCOPY VARCHAR2,
715: p_terr_globals IN AS_GAR.TERR_GLOBALS,
716: x_return_status OUT NOCOPY VARCHAR2)
717: IS
718:
719: TYPE num_list is TABLE of NUMBER INDEX BY BINARY_INTEGER;

Line 762: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || AS_GAR.G_START);

758: AND NVL(WIN1.role_id,-777) = NVL(A.role_id,-777))
759: ORDER BY quote_number;
760:
761: BEGIN
762: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || AS_GAR.G_START);
763: x_return_status := FND_API.G_RET_STS_SUCCESS;
764: l_worker_id:=p_terr_globals.worker_id;
765: l_var :=p_terr_globals.bulk_size;
766: l_MAX_fetches := p_terr_globals.cursor_limit;

Line 772: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || 'LOOPCOUNT :- ' || l_loop_count);

768: IF (l_limit_flag) THEN EXIT; END IF;
769: l_resource_id.DELETE;
770: l_quote_number_id.DELETE;
771: l_loop_count := l_loop_count + 1;
772: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || 'LOOPCOUNT :- ' || l_loop_count);
773:
774: --------------------------------
775: OPEN merge_records(l_worker_id);
776: FETCH merge_records BULK COLLECT INTO

Line 789: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || AS_GAR.G_BULK_UPD || AS_GAR.G_START);

785:
786: IF l_quote_number_id.COUNT < l_MAX_fetches THEN
787: l_limit_flag := TRUE;
788: END IF;
789: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || AS_GAR.G_BULK_UPD || AS_GAR.G_START);
790:
791: IF l_quote_number_id.COUNT > 0 THEN
792: l_flag := TRUE;
793: l_first := l_quote_number_id.FIRST;

Line 818: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS ||AS_GAR.G_STLEAD || AS_GAR.G_BULK_UPD || AS_GAR.G_N_ROWS_PROCESSED || l_first || '-'|| l_last);

814: WHERE quote_number = l_quote_number_id(I)
815: AND resource_id = l_resource_id(i) ;
816: COMMIT;
817: l_attempts := 3;
818: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS ||AS_GAR.G_STLEAD || AS_GAR.G_BULK_UPD || AS_GAR.G_N_ROWS_PROCESSED || l_first || '-'|| l_last);
819: EXCEPTION
820: WHEN DEADLOCK_DETECTED THEN
821: BEGIN
822: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || AS_GAR.G_DEADLOCK ||l_attempts);

Line 822: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || AS_GAR.G_DEADLOCK ||l_attempts);

818: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS ||AS_GAR.G_STLEAD || AS_GAR.G_BULK_UPD || AS_GAR.G_N_ROWS_PROCESSED || l_first || '-'|| l_last);
819: EXCEPTION
820: WHEN DEADLOCK_DETECTED THEN
821: BEGIN
822: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || AS_GAR.G_DEADLOCK ||l_attempts);
823: ROLLBACK;
824: l_attempts := l_attempts +1;
825: IF l_attempts = 3 THEN
826: FOR i IN l_first .. l_last

Line 845: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || AS_GAR.G_IND_UPD || AS_GAR.G_GENERAL_EXCEPTION);

841: WHERE quote_number = l_quote_number_id(I)
842: AND resource_id = l_resource_id(i) ;
843: EXCEPTION
844: WHEN OTHERS THEN
845: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || AS_GAR.G_IND_UPD || AS_GAR.G_GENERAL_EXCEPTION);
846: AS_GAR.LOG('QUOTE_NUMBER/RESOURCE_ID - ' || l_quote_number_id(i) || '/' || l_resource_id(i));
847: END;
848: END LOOP; -- for each record individually
849: COMMIT;

Line 846: AS_GAR.LOG('QUOTE_NUMBER/RESOURCE_ID - ' || l_quote_number_id(i) || '/' || l_resource_id(i));

842: AND resource_id = l_resource_id(i) ;
843: EXCEPTION
844: WHEN OTHERS THEN
845: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || AS_GAR.G_IND_UPD || AS_GAR.G_GENERAL_EXCEPTION);
846: AS_GAR.LOG('QUOTE_NUMBER/RESOURCE_ID - ' || l_quote_number_id(i) || '/' || l_resource_id(i));
847: END;
848: END LOOP; -- for each record individually
849: COMMIT;
850: END IF;

Line 853: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || AS_GAR.G_BULK_UPD, SQLERRM, TO_CHAR(SQLCODE));

849: COMMIT;
850: END IF;
851: END; -- end of deadlock exception
852: WHEN OTHERS THEN
853: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || AS_GAR.G_BULK_UPD, SQLERRM, TO_CHAR(SQLCODE));
854: x_errbuf := SQLERRM;
855: x_retcode := SQLCODE;
856: x_return_status := FND_API.G_RET_STS_ERROR;
857: RAISE;

Line 868: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || AS_GAR.G_END);

864: l_flag := FALSE;
865: END IF;
866: END LOOP; -- loop for more records within the bulk_size
867: END IF; --l_quote_number_id.count > 0
868: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || AS_GAR.G_END);
869: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || AS_GAR.G_N_ROWS_PROCESSED || l_quote_number_id.COUNT);
870: END LOOP; -- loop for more bulk_size fetches
871: l_quote_number_id.DELETE;
872: l_resource_id.DELETE;

Line 869: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || AS_GAR.G_N_ROWS_PROCESSED || l_quote_number_id.COUNT);

865: END IF;
866: END LOOP; -- loop for more records within the bulk_size
867: END IF; --l_quote_number_id.count > 0
868: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || AS_GAR.G_END);
869: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || AS_GAR.G_N_ROWS_PROCESSED || l_quote_number_id.COUNT);
870: END LOOP; -- loop for more bulk_size fetches
871: l_quote_number_id.DELETE;
872: l_resource_id.DELETE;
873: EXCEPTION

Line 875: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD, SQLERRM, TO_CHAR(SQLCODE));

871: l_quote_number_id.DELETE;
872: l_resource_id.DELETE;
873: EXCEPTION
874: WHEN OTHERS THEN
875: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD, SQLERRM, TO_CHAR(SQLCODE));
876: x_errbuf := SQLERRM;
877: x_retcode := SQLCODE;
878: x_return_status := FND_API.G_RET_STS_ERROR;
879: RAISE;

Line 887: p_terr_globals IN AS_GAR.TERR_GLOBALS,

883: /************************** Start Set Full Access Flag *****************/
884: PROCEDURE SET_FAF_QOT(
885: x_errbuf OUT NOCOPY VARCHAR2,
886: x_retcode OUT NOCOPY VARCHAR2,
887: p_terr_globals IN AS_GAR.TERR_GLOBALS,
888: x_return_status OUT NOCOPY VARCHAR2)
889: IS
890:
891: TYPE num_list is TABLE of NUMBER INDEX BY BINARY_INTEGER;

Line 925: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::' || AS_GAR.G_START);

921: OR WIN.terr_id <> A.territory_id)
922: ORDER BY access_id;
923:
924: BEGIN
925: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::' || AS_GAR.G_START);
926: x_return_status := FND_API.G_RET_STS_SUCCESS;
927: l_worker_id:=p_terr_globals.worker_id;
928: l_var :=p_terr_globals.bulk_size;
929: l_MAX_fetches := p_terr_globals.cursor_limit;

Line 936: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::' || 'LOOPCOUNT :- ' || l_loop_count);

932: l_access_id.DELETE;
933: l_terr_id.DELETE;
934: l_faf.DELETE;
935: l_loop_count := l_loop_count + 1;
936: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::' || 'LOOPCOUNT :- ' || l_loop_count);
937:
938: --------------------------------
939: OPEN merge_records(l_worker_id);
940: FETCH merge_records BULK COLLECT INTO

Line 953: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::' || AS_GAR.G_BULK_UPD || AS_GAR.G_START);

949:
950: IF l_access_id.COUNT < l_MAX_fetches THEN
951: l_limit_flag := TRUE;
952: END IF;
953: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::' || AS_GAR.G_BULK_UPD || AS_GAR.G_START);
954:
955: IF l_access_id.COUNT > 0 THEN
956: l_flag := TRUE;
957: l_first := l_access_id.FIRST;

Line 972: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::' || AS_GAR.G_BULK_UPD || AS_GAR.G_N_ROWS_PROCESSED || l_first || '-'|| l_last);

968: territory_id = l_terr_id(i)
969: WHERE access_id = l_access_id(i);
970: COMMIT;
971: l_attempts := 3;
972: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::' || AS_GAR.G_BULK_UPD || AS_GAR.G_N_ROWS_PROCESSED || l_first || '-'|| l_last);
973: EXCEPTION
974: WHEN DEADLOCK_DETECTED THEN
975: BEGIN
976: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::' || AS_GAR.G_DEADLOCK ||l_attempts);

Line 976: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::' || AS_GAR.G_DEADLOCK ||l_attempts);

972: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::' || AS_GAR.G_BULK_UPD || AS_GAR.G_N_ROWS_PROCESSED || l_first || '-'|| l_last);
973: EXCEPTION
974: WHEN DEADLOCK_DETECTED THEN
975: BEGIN
976: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::' || AS_GAR.G_DEADLOCK ||l_attempts);
977: ROLLBACK;
978: l_attempts := l_attempts +1;
979: IF l_attempts = 3 THEN
980: FOR i IN l_first .. l_last

Line 989: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::' || AS_GAR.G_IND_UPD || AS_GAR.G_GENERAL_EXCEPTION);

985: territory_id = l_terr_id(i)
986: WHERE access_id = l_access_id(i);
987: EXCEPTION
988: WHEN OTHERS THEN
989: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::' || AS_GAR.G_IND_UPD || AS_GAR.G_GENERAL_EXCEPTION);
990: AS_GAR.LOG('ACCESS_ID - ' || l_access_id(i));
991: END;
992: END LOOP; -- for each record individually
993: COMMIT;

Line 990: AS_GAR.LOG('ACCESS_ID - ' || l_access_id(i));

986: WHERE access_id = l_access_id(i);
987: EXCEPTION
988: WHEN OTHERS THEN
989: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::' || AS_GAR.G_IND_UPD || AS_GAR.G_GENERAL_EXCEPTION);
990: AS_GAR.LOG('ACCESS_ID - ' || l_access_id(i));
991: END;
992: END LOOP; -- for each record individually
993: COMMIT;
994: END IF;

Line 997: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::' || AS_GAR.G_BULK_UPD, SQLERRM, TO_CHAR(SQLCODE));

993: COMMIT;
994: END IF;
995: END; -- end of deadlock exception
996: WHEN OTHERS THEN
997: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::' || AS_GAR.G_BULK_UPD, SQLERRM, TO_CHAR(SQLCODE));
998: x_errbuf := SQLERRM;
999: x_retcode := SQLCODE;
1000: x_return_status := FND_API.G_RET_STS_ERROR;
1001: RAISE;

Line 1012: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::' || AS_GAR.G_END);

1008: l_flag := FALSE;
1009: END IF;
1010: END LOOP; -- loop for more records within the bulk_size
1011: END IF; --l_quote_number_id.count > 0
1012: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::' || AS_GAR.G_END);
1013: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::' || AS_GAR.G_N_ROWS_PROCESSED || l_access_id.COUNT);
1014: END LOOP; -- loop for more bulk_size fetches
1015: l_access_id.DELETE;
1016: l_terr_id.DELETE;

Line 1013: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::' || AS_GAR.G_N_ROWS_PROCESSED || l_access_id.COUNT);

1009: END IF;
1010: END LOOP; -- loop for more records within the bulk_size
1011: END IF; --l_quote_number_id.count > 0
1012: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::' || AS_GAR.G_END);
1013: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::' || AS_GAR.G_N_ROWS_PROCESSED || l_access_id.COUNT);
1014: END LOOP; -- loop for more bulk_size fetches
1015: l_access_id.DELETE;
1016: l_terr_id.DELETE;
1017: l_faf.DELETE;

Line 1020: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::', SQLERRM, TO_CHAR(SQLCODE));

1016: l_terr_id.DELETE;
1017: l_faf.DELETE;
1018: EXCEPTION
1019: WHEN OTHERS THEN
1020: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || 'UPDATE FAF::', SQLERRM, TO_CHAR(SQLCODE));
1021: x_errbuf := SQLERRM;
1022: x_retcode := SQLCODE;
1023: x_return_status := FND_API.G_RET_STS_ERROR;
1024: RAISE;

Line 1032: p_terr_globals IN AS_GAR.TERR_GLOBALS,

1028:
1029: PROCEDURE INSERT_ACCESSES_QOT(
1030: x_errbuf OUT NOCOPY VARCHAR2,
1031: x_retcode OUT NOCOPY VARCHAR2,
1032: p_terr_globals IN AS_GAR.TERR_GLOBALS,
1033: x_return_status OUT NOCOPY VARCHAR2)
1034: IS
1035:
1036: TYPE num_list IS TABLE of NUMBER INDEX BY BINARY_INTEGER;

Line 1089: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSACC || AS_GAR.G_START);

1085: | Re-Initialize variables and null out if necessary.
1086: | Try bulk inserting into accesses. If this fails, insert records one by one.
1087: |
1088: +-------------------------------------------------------------------------*/
1089: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSACC || AS_GAR.G_START);
1090: x_return_status := FND_API.G_RET_STS_SUCCESS;
1091: l_worker_id:=p_terr_globals.worker_id;
1092: l_var :=p_terr_globals.bulk_size;
1093: OPEN ins_acc(l_worker_id);

Line 1108: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSACC || 'LOOPCOUNT :- ' || l_loop_count);

1104:
1105: EXIT WHEN ins_acc%NOTFOUND;
1106:
1107: l_loop_count := l_loop_count + 1;
1108: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSACC || 'LOOPCOUNT :- ' || l_loop_count);
1109:
1110: FETCH ins_acc BULK COLLECT INTO
1111: l_quote_number_id,l_resource_id, l_person_id,l_sales_group_id, l_role_id,l_faf,l_terr_id
1112: LIMIT l_MAX_fetches;

Line 1132: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSACC || AS_GAR.G_BULK_INS || AS_GAR.G_N_ROWS_PROCESSED ||l_first||' to '||l_last);

1128: IF l_last > l_quote_number_id.LAST THEN
1129: l_last := l_quote_number_id.LAST;
1130: END IF;
1131: BEGIN
1132: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSACC || AS_GAR.G_BULK_INS || AS_GAR.G_N_ROWS_PROCESSED ||l_first||' to '||l_last);
1133: FORALL i IN l_first .. l_last
1134: INSERT INTO ASO_QUOTE_ACCESSES (
1135: ACCESS_ID,
1136: QUOTE_NUMBER,

Line 1175: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSACC || AS_GAR.G_BULK_INS || AS_GAR.G_N_ROWS_PROCESSED || SQL%ROWCOUNT);

1171: l_terr_id(i),
1172: 'Y',
1173: l_role_id(i)
1174: );
1175: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSACC || AS_GAR.G_BULK_INS || AS_GAR.G_N_ROWS_PROCESSED || SQL%ROWCOUNT);
1176: COMMIT;
1177: EXCEPTION
1178: WHEN DUP_VAL_ON_INDEX THEN
1179: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSACC || AS_GAR.G_IND_INS || AS_GAR.G_N_ROWS_PROCESSED ||l_first||' - '||l_last);

Line 1179: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSACC || AS_GAR.G_IND_INS || AS_GAR.G_N_ROWS_PROCESSED ||l_first||' - '||l_last);

1175: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSACC || AS_GAR.G_BULK_INS || AS_GAR.G_N_ROWS_PROCESSED || SQL%ROWCOUNT);
1176: COMMIT;
1177: EXCEPTION
1178: WHEN DUP_VAL_ON_INDEX THEN
1179: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSACC || AS_GAR.G_IND_INS || AS_GAR.G_N_ROWS_PROCESSED ||l_first||' - '||l_last);
1180: FOR i IN l_first .. l_last LOOP
1181: BEGIN
1182: INSERT INTO ASO_QUOTE_ACCESSES (
1183: access_id,

Line 1230: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSACC || AS_GAR.G_BULK_INS, SQLERRM, TO_CHAR(SQLCODE));

1226: END;
1227: END LOOP; /* loop for DUP_VAL_ON_INDEX individual insert */
1228: COMMIT;
1229: WHEN OTHERS THEN
1230: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSACC || AS_GAR.G_BULK_INS, SQLERRM, TO_CHAR(SQLCODE));
1231: x_errbuf := SQLERRM;
1232: x_retcode := SQLCODE;
1233: x_return_status := FND_API.G_RET_STS_ERROR;
1234: RAISE;

Line 1254: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSACC, SQLERRM, TO_CHAR(SQLCODE));

1250: l_terr_id.DELETE;
1251: IF ins_acc%ISOPEN THEN CLOSE ins_acc; END IF;
1252: EXCEPTION
1253: WHEN others THEN
1254: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSACC, SQLERRM, TO_CHAR(SQLCODE));
1255: x_errbuf := SQLERRM;
1256: x_retcode := SQLCODE;
1257: x_return_status := FND_API.G_RET_STS_ERROR;
1258: IF ins_acc%ISOPEN THEN CLOSE ins_acc; END IF;

Line 1268: p_terr_globals IN AS_GAR.TERR_GLOBALS,

1264:
1265: PROCEDURE INSERT_TERR_ACCESSES_QOT(
1266: x_errbuf OUT NOCOPY VARCHAR2,
1267: x_retcode OUT NOCOPY VARCHAR2,
1268: p_terr_globals IN AS_GAR.TERR_GLOBALS,
1269: x_return_status OUT NOCOPY VARCHAR2)
1270: IS
1271: TYPE num_list IS TABLE of NUMBER INDEX BY BINARY_INTEGER;
1272: l_terr_id num_list;

Line 1306: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_START);

1302: | Almost the same as accesses, except the insertion is into as_territory_accesses
1303: | and there is no involvement of role.
1304: |
1305: +-------------------------------------------------------------------------*/
1306: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_START);
1307: x_return_status := FND_API.G_RET_STS_SUCCESS;
1308: l_worker_id := p_terr_globals.worker_id;
1309: l_var := p_terr_globals.bulk_size;
1310: OPEN ins_tacc(l_worker_id);

Line 1318: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || 'LOOPCOUNT :- ' || l_loop_count);

1314: l_loop_count := l_loop_count + 1;
1315: l_quote_number_id.DELETE;
1316: l_resource_id.DELETE;
1317: l_terr_id.DELETE;
1318: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || 'LOOPCOUNT :- ' || l_loop_count);
1319: BEGIN
1320:
1321: FETCH ins_tacc BULK COLLECT INTO l_terr_id,l_quote_number_id, l_resource_id
1322: LIMIT l_MAX_fetches;

Line 1338: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_BULK_INS || AS_GAR.G_N_ROWS_PROCESSED ||l_first||' - '||l_last);

1334: IF l_last > l_quote_number_id.LAST THEN
1335: l_last := l_quote_number_id.LAST;
1336: END IF;
1337: BEGIN
1338: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_BULK_INS || AS_GAR.G_N_ROWS_PROCESSED ||l_first||' - '||l_last);
1339: FORALL i IN l_first .. l_last
1340: INSERT INTO ASO_TERRITORY_ACCESSES
1341: ( access_id,
1342: territory_id,

Line 1380: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_BULK_INS || AS_GAR.G_N_ROWS_PROCESSED || SQL%ROWCOUNT);

1376: WHERE AST.access_id = AA.acc_id
1377: AND AST.territory_id = l_terr_id(i))
1378: ) V
1379: );
1380: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_BULK_INS || AS_GAR.G_N_ROWS_PROCESSED || SQL%ROWCOUNT);
1381: COMMIT;
1382: EXCEPTION
1383: WHEN DUP_VAL_ON_INDEX THEN
1384: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_IND_INS || AS_GAR.G_N_ROWS_PROCESSED ||l_first||' - '||l_last);

Line 1384: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_IND_INS || AS_GAR.G_N_ROWS_PROCESSED ||l_first||' - '||l_last);

1380: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_BULK_INS || AS_GAR.G_N_ROWS_PROCESSED || SQL%ROWCOUNT);
1381: COMMIT;
1382: EXCEPTION
1383: WHEN DUP_VAL_ON_INDEX THEN
1384: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_IND_INS || AS_GAR.G_N_ROWS_PROCESSED ||l_first||' - '||l_last);
1385: FOR i IN l_first .. l_last LOOP
1386: BEGIN
1387: INSERT INTO AS_TERRITORY_ACCESSES
1388: ( access_id,

Line 1434: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_IND_INS || AS_GAR.G_N_ROWS_PROCESSED || SQL%ROWCOUNT);

1430: WHEN Others THEN
1431: NULL;
1432: END;
1433: END LOOP;
1434: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_IND_INS || AS_GAR.G_N_ROWS_PROCESSED || SQL%ROWCOUNT);
1435: COMMIT;
1436: WHEN Others THEN
1437: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_BULK_INS, SQLERRM, TO_CHAR(SQLCODE));
1438: x_errbuf := SQLERRM;

Line 1437: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_BULK_INS, SQLERRM, TO_CHAR(SQLCODE));

1433: END LOOP;
1434: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_IND_INS || AS_GAR.G_N_ROWS_PROCESSED || SQL%ROWCOUNT);
1435: COMMIT;
1436: WHEN Others THEN
1437: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_BULK_INS, SQLERRM, TO_CHAR(SQLCODE));
1438: x_errbuf := SQLERRM;
1439: x_retcode := SQLCODE;
1440: x_return_status := FND_API.G_RET_STS_ERROR;
1441: IF ins_tacc%ISOPEN THEN CLOSE ins_tacc; END IF;

Line 1453: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC , SQLERRM, TO_CHAR(SQLCODE));

1449: END LOOP;
1450: END IF; --l_quote_number_id.COUNT > 0
1451: EXCEPTION
1452: WHEN Others THEN
1453: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC , SQLERRM, TO_CHAR(SQLCODE));
1454: IF ins_tacc%ISOPEN THEN CLOSE ins_tacc; END IF;
1455: x_errbuf := SQLERRM;
1456: x_retcode := SQLCODE;
1457: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1465: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_END);

1461: l_quote_number_id.DELETE;
1462: l_resource_id.DELETE;
1463: l_terr_id.DELETE;
1464: IF ins_tacc%ISOPEN THEN CLOSE ins_tacc; END IF;
1465: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_END);
1466: EXCEPTION
1467: WHEN others THEN
1468: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC, SQLERRM, TO_CHAR(SQLCODE));
1469: x_errbuf := SQLERRM;

Line 1468: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC, SQLERRM, TO_CHAR(SQLCODE));

1464: IF ins_tacc%ISOPEN THEN CLOSE ins_tacc; END IF;
1465: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_END);
1466: EXCEPTION
1467: WHEN others THEN
1468: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC, SQLERRM, TO_CHAR(SQLCODE));
1469: x_errbuf := SQLERRM;
1470: x_retcode := SQLCODE;
1471: x_return_status := FND_API.G_RET_STS_ERROR;
1472: IF ins_tacc%ISOPEN THEN CLOSE ins_tacc; END IF;

Line 1481: p_terr_globals IN AS_GAR.TERR_GLOBALS,

1477: /**************************** Start Assign Quote Owner ********************/
1478: PROCEDURE ASSIGN_QOT_OWNER(
1479: x_errbuf OUT NOCOPY VARCHAR2,
1480: x_retcode OUT NOCOPY VARCHAR2,
1481: p_terr_globals IN AS_GAR.TERR_GLOBALS,
1482: x_return_status OUT NOCOPY VARCHAR2)
1483: IS
1484: l_return_status VARCHAR2(1);
1485: l_msg_count NUMBER;

Line 1625: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_START);

1621: NOT_NULL EXCEPTION;
1622: PRAGMA EXCEPTION_INIT(NOT_NULL, -1400);
1623:
1624: BEGIN
1625: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_START);
1626:
1627: x_return_status := FND_API.G_RET_STS_SUCCESS;
1628: l_worker_id:=p_terr_globals.worker_id;
1629: l_var :=p_terr_globals.bulk_size;

Line 1635: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'SCENARIO # 1' || AS_GAR.G_START);

1631: /*-------------------------------------------------------------------+
1632: | SCENARIO # 1
1633: | ------------
1634: +--------------------------------------------------------------------*/
1635: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'SCENARIO # 1' || AS_GAR.G_START);
1636: LOOP
1637: IF (l_limit_flag) THEN EXIT; END IF;
1638: l_loop_count := l_loop_count + 1;
1639: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'LOOPCOUNT:- '|| l_loop_count);

Line 1639: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'LOOPCOUNT:- '|| l_loop_count);

1635: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'SCENARIO # 1' || AS_GAR.G_START);
1636: LOOP
1637: IF (l_limit_flag) THEN EXIT; END IF;
1638: l_loop_count := l_loop_count + 1;
1639: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'LOOPCOUNT:- '|| l_loop_count);
1640: IF p_terr_globals.run_mode = AS_GAR.G_TOTAL_MODE THEN
1641: OPEN set_primary_srep_sc1_total(l_worker_id);
1642: FETCH set_primary_srep_sc1_total BULK COLLECT INTO l_quote_number_id,l_access_id LIMIT l_MAX_fetches;
1643: CLOSE set_primary_srep_sc1_total;

Line 1640: IF p_terr_globals.run_mode = AS_GAR.G_TOTAL_MODE THEN

1636: LOOP
1637: IF (l_limit_flag) THEN EXIT; END IF;
1638: l_loop_count := l_loop_count + 1;
1639: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'LOOPCOUNT:- '|| l_loop_count);
1640: IF p_terr_globals.run_mode = AS_GAR.G_TOTAL_MODE THEN
1641: OPEN set_primary_srep_sc1_total(l_worker_id);
1642: FETCH set_primary_srep_sc1_total BULK COLLECT INTO l_quote_number_id,l_access_id LIMIT l_MAX_fetches;
1643: CLOSE set_primary_srep_sc1_total;
1644: ELSE

Line 1667: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'UPDATE ASO_QUOTE_HEADERS_ALL');

1663: IF l_last > l_quote_number_id.LAST THEN
1664: l_last := l_quote_number_id.LAST;
1665: END IF;
1666: WHILE l_attempts < 3 LOOP
1667: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'UPDATE ASO_QUOTE_HEADERS_ALL');
1668: BEGIN
1669: FORALL i in l_first .. l_last
1670: UPDATE ASO_QUOTE_HEADERS_ALL AQH
1671: SET last_update_date = SYSDATE,

Line 1682: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_N_ROWS_PROCESSED || l_first || ' - '|| l_last);

1678: )
1679: WHERE quote_number = l_quote_number_id(I);
1680: COMMIT;
1681: l_attempts := 3;
1682: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_N_ROWS_PROCESSED || l_first || ' - '|| l_last);
1683: EXCEPTION
1684: WHEN deadlock_detected THEN
1685: BEGIN
1686: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_DEADLOCK ||l_attempts);

Line 1686: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_DEADLOCK ||l_attempts);

1682: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_N_ROWS_PROCESSED || l_first || ' - '|| l_last);
1683: EXCEPTION
1684: WHEN deadlock_detected THEN
1685: BEGIN
1686: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_DEADLOCK ||l_attempts);
1687: ROLLBACK;
1688: l_attempts := l_attempts +1;
1689: IF l_attempts = 3 THEN
1690: FOR i IN l_first .. l_last LOOP

Line 1704: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'ROW-BY-ROW UPDATE OF ASO_QUOTE_HEADERS', SQLERRM, TO_CHAR(SQLCODE));

1700: )
1701: WHERE quote_number = l_quote_number_id(I);
1702: EXCEPTION
1703: WHEN OTHERS THEN
1704: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'ROW-BY-ROW UPDATE OF ASO_QUOTE_HEADERS', SQLERRM, TO_CHAR(SQLCODE));
1705: AS_GAR.LOG('QUOTE NUMBER:- ' || l_quote_number_id(I));
1706: END;
1707: END LOOP;
1708: COMMIT;

Line 1705: AS_GAR.LOG('QUOTE NUMBER:- ' || l_quote_number_id(I));

1701: WHERE quote_number = l_quote_number_id(I);
1702: EXCEPTION
1703: WHEN OTHERS THEN
1704: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'ROW-BY-ROW UPDATE OF ASO_QUOTE_HEADERS', SQLERRM, TO_CHAR(SQLCODE));
1705: AS_GAR.LOG('QUOTE NUMBER:- ' || l_quote_number_id(I));
1706: END;
1707: END LOOP;
1708: COMMIT;
1709: END IF;

Line 1712: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'UPDATE ASO_QUOTE_HEADERS', SQLERRM, TO_CHAR(SQLCODE));

1708: COMMIT;
1709: END IF;
1710: END; -- end of deadlock exception
1711: WHEN OTHERS THEN
1712: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'UPDATE ASO_QUOTE_HEADERS', SQLERRM, TO_CHAR(SQLCODE));
1713: x_errbuf := SQLERRM;
1714: x_retcode := SQLCODE;
1715: x_return_status := FND_API.G_RET_STS_ERROR;
1716: RAISE;

Line 1726: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_N_ROWS_PROCESSED || l_quote_number_id.COUNT);

1722: l_flag := FALSE;
1723: END IF;
1724: END LOOP;
1725: END IF; --l_quote_number_id.count > 0
1726: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_N_ROWS_PROCESSED || l_quote_number_id.COUNT);
1727: END LOOP;
1728: l_access_id.delete;
1729: l_quote_number_id.delete;
1730: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'SCENARIO # 1' || AS_GAR.G_END);

Line 1730: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'SCENARIO # 1' || AS_GAR.G_END);

1726: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_N_ROWS_PROCESSED || l_quote_number_id.COUNT);
1727: END LOOP;
1728: l_access_id.delete;
1729: l_quote_number_id.delete;
1730: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'SCENARIO # 1' || AS_GAR.G_END);
1731: l_limit_flag := FALSE;
1732: /*-------------------------------------------------------------------+
1733: | SCENARIO # 2
1734: | ------------

Line 1736: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'SCENARIO # 2' || AS_GAR.G_START);

1732: /*-------------------------------------------------------------------+
1733: | SCENARIO # 2
1734: | ------------
1735: +--------------------------------------------------------------------*/
1736: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'SCENARIO # 2' || AS_GAR.G_START);
1737: LOOP
1738: IF (l_limit_flag) THEN EXIT; END IF;
1739: l_loop_count := l_loop_count + 1;
1740: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'LOOPCOUNT:- '|| l_loop_count);

Line 1740: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'LOOPCOUNT:- '|| l_loop_count);

1736: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'SCENARIO # 2' || AS_GAR.G_START);
1737: LOOP
1738: IF (l_limit_flag) THEN EXIT; END IF;
1739: l_loop_count := l_loop_count + 1;
1740: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'LOOPCOUNT:- '|| l_loop_count);
1741: IF p_terr_globals.run_mode = AS_GAR.G_TOTAL_MODE THEN
1742: OPEN set_primary_srep_sc2_total(l_worker_id);
1743: FETCH set_primary_srep_sc2_total BULK COLLECT INTO l_quote_number_id LIMIT l_MAX_fetches;
1744: CLOSE set_primary_srep_sc2_total;

Line 1741: IF p_terr_globals.run_mode = AS_GAR.G_TOTAL_MODE THEN

1737: LOOP
1738: IF (l_limit_flag) THEN EXIT; END IF;
1739: l_loop_count := l_loop_count + 1;
1740: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'LOOPCOUNT:- '|| l_loop_count);
1741: IF p_terr_globals.run_mode = AS_GAR.G_TOTAL_MODE THEN
1742: OPEN set_primary_srep_sc2_total(l_worker_id);
1743: FETCH set_primary_srep_sc2_total BULK COLLECT INTO l_quote_number_id LIMIT l_MAX_fetches;
1744: CLOSE set_primary_srep_sc2_total;
1745: ELSE

Line 1781: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'UPDATE ASO_QUOTE_HEADERS_ALL');

1777: IF l_last > l_quote_number_id.LAST THEN
1778: l_last := l_quote_number_id.LAST;
1779: END IF;
1780: WHILE l_attempts < 3 LOOP
1781: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'UPDATE ASO_QUOTE_HEADERS_ALL');
1782: BEGIN
1783: FORALL i in l_first .. l_last
1784: UPDATE ASO_QUOTE_HEADERS_ALL AQH
1785: SET last_update_date = SYSDATE,

Line 1844: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_N_ROWS_PROCESSED || l_first || ' - '|| l_last);

1840: where org_information_context = 'ASO_ORG_INFO'
1841: and organization_id = l_org_id(i);
1842: COMMIT;
1843: l_attempts := 3;
1844: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_N_ROWS_PROCESSED || l_first || ' - '|| l_last);
1845: EXCEPTION
1846: WHEN DUP_VAL_ON_INDEX THEN
1847: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_IND_INS || AS_GAR.G_N_ROWS_PROCESSED ||l_first||' - '||l_last);
1848: FOR i IN l_first .. l_last LOOP

Line 1847: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_IND_INS || AS_GAR.G_N_ROWS_PROCESSED ||l_first||' - '||l_last);

1843: l_attempts := 3;
1844: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_N_ROWS_PROCESSED || l_first || ' - '|| l_last);
1845: EXCEPTION
1846: WHEN DUP_VAL_ON_INDEX THEN
1847: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_IND_INS || AS_GAR.G_N_ROWS_PROCESSED ||l_first||' - '||l_last);
1848: FOR i IN l_first .. l_last LOOP
1849: BEGIN
1850: INSERT INTO ASO_QUOTE_ACCESSES (
1851: ACCESS_ID,

Line 1898: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_IND_INS || AS_GAR.G_N_ROWS_PROCESSED || SQL%ROWCOUNT);

1894: WHEN Others THEN
1895: NULL;
1896: END;
1897: END LOOP;
1898: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_IND_INS || AS_GAR.G_N_ROWS_PROCESSED || SQL%ROWCOUNT);
1899: COMMIT;
1900: l_attempts := 3;
1901: WHEN DEADLOCK_DETECTED THEN
1902: BEGIN

Line 1903: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_DEADLOCK ||l_attempts);

1899: COMMIT;
1900: l_attempts := 3;
1901: WHEN DEADLOCK_DETECTED THEN
1902: BEGIN
1903: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_DEADLOCK ||l_attempts);
1904: ROLLBACK;
1905: l_attempts := l_attempts +1;
1906: IF l_attempts = 3 THEN
1907: FOR i IN l_first .. l_last LOOP

Line 1968: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'ROW-BY-ROW UPDATE OF ASO_QUOTE_HEADERS', SQLERRM, TO_CHAR(SQLCODE));

1964: where org_information_context = 'ASO_ORG_INFO'
1965: and organization_id = l_org_id(i);
1966: EXCEPTION
1967: WHEN OTHERS THEN
1968: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'ROW-BY-ROW UPDATE OF ASO_QUOTE_HEADERS', SQLERRM, TO_CHAR(SQLCODE));
1969: AS_GAR.LOG('QUOTE NUMBER:- ' || l_quote_number_id(I));
1970: END;
1971: END LOOP;
1972: COMMIT;

Line 1969: AS_GAR.LOG('QUOTE NUMBER:- ' || l_quote_number_id(I));

1965: and organization_id = l_org_id(i);
1966: EXCEPTION
1967: WHEN OTHERS THEN
1968: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'ROW-BY-ROW UPDATE OF ASO_QUOTE_HEADERS', SQLERRM, TO_CHAR(SQLCODE));
1969: AS_GAR.LOG('QUOTE NUMBER:- ' || l_quote_number_id(I));
1970: END;
1971: END LOOP;
1972: COMMIT;
1973: END IF;

Line 1977: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_PROCESS || 'NOT NULL Condition Exception');

1973: END IF;
1974: END; -- end of deadlock exception
1975: WHEN NOT_NULL THEN
1976: BEGIN
1977: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_PROCESS || 'NOT NULL Condition Exception');
1978: ROLLBACK;
1979: FOR i IN l_first .. l_last LOOP
1980: BEGIN
1981: IF aso_utility_pvt.get_ou_attribute_value(aso_utility_pvt.G_DEFAULT_SALESREP,l_org_id(i)) IS NOT NULL THEN

Line 2028: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'ROW-BY-ROW UPDATE OF ASO_QUOTE_HEADERS', SQLERRM, TO_CHAR(SQLCODE));

2024: and organization_id = l_org_id(i);
2025: END IF;
2026: EXCEPTION
2027: WHEN OTHERS THEN
2028: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'ROW-BY-ROW UPDATE OF ASO_QUOTE_HEADERS', SQLERRM, TO_CHAR(SQLCODE));
2029: AS_GAR.LOG('QUOTE NUMBER:- ' || l_quote_number_id(I));
2030: END;
2031: END LOOP;
2032: COMMIT;

Line 2029: AS_GAR.LOG('QUOTE NUMBER:- ' || l_quote_number_id(I));

2025: END IF;
2026: EXCEPTION
2027: WHEN OTHERS THEN
2028: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'ROW-BY-ROW UPDATE OF ASO_QUOTE_HEADERS', SQLERRM, TO_CHAR(SQLCODE));
2029: AS_GAR.LOG('QUOTE NUMBER:- ' || l_quote_number_id(I));
2030: END;
2031: END LOOP;
2032: COMMIT;
2033: l_attempts := 3;

Line 2036: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'UPDATE ASO_QUOTE_HEADERS', SQLERRM, TO_CHAR(SQLCODE));

2032: COMMIT;
2033: l_attempts := 3;
2034: END; -- NOT NULL CONDITION
2035: WHEN OTHERS THEN
2036: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'UPDATE ASO_QUOTE_HEADERS', SQLERRM, TO_CHAR(SQLCODE));
2037: x_errbuf := SQLERRM;
2038: x_retcode := SQLCODE;
2039: x_return_status := FND_API.G_RET_STS_ERROR;
2040: RAISE;

Line 2050: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_N_ROWS_PROCESSED || l_quote_number_id.COUNT);

2046: l_flag := FALSE;
2047: END IF;
2048: END LOOP; -- l_Flag
2049: END IF; --l_quote_number_id.count > 0
2050: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_N_ROWS_PROCESSED || l_quote_number_id.COUNT);
2051: END LOOP;
2052:
2053: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'SCENARIO # 2' || AS_GAR.G_END);
2054: l_limit_flag := FALSE;

Line 2053: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'SCENARIO # 2' || AS_GAR.G_END);

2049: END IF; --l_quote_number_id.count > 0
2050: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_N_ROWS_PROCESSED || l_quote_number_id.COUNT);
2051: END LOOP;
2052:
2053: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'SCENARIO # 2' || AS_GAR.G_END);
2054: l_limit_flag := FALSE;
2055: l_loop_count := 0;
2056: l_access_id.delete;
2057: l_quote_number_id.delete;

Line 2062: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_GENERAL_EXCEPTION, SQLERRM, TO_CHAR(SQLCODE));

2058: l_attempts := 1;
2059:
2060: EXCEPTION
2061: WHEN OTHERS THEN
2062: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_GENERAL_EXCEPTION, SQLERRM, TO_CHAR(SQLCODE));
2063: x_errbuf := SQLERRM;
2064: x_retcode := SQLCODE;
2065: x_return_status := FND_API.G_RET_STS_ERROR;
2066: RAISE;

Line 2075: p_terr_globals IN AS_GAR.TERR_GLOBALS,

2071:
2072: PROCEDURE PERFORM_QOT_CLEANUP(
2073: x_errbuf OUT NOCOPY VARCHAR2,
2074: x_retcode OUT NOCOPY VARCHAR2,
2075: p_terr_globals IN AS_GAR.TERR_GLOBALS,
2076: x_return_status OUT NOCOPY VARCHAR2)
2077: IS
2078:
2079: TYPE num_list is TABLE of NUMBER INDEX BY BINARY_INTEGER;

Line 2109: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_START);

2105: FROM JTF_TAE_1001_QUOTE_WINNERS
2106: WHERE worker_id=c_worker_id;
2107:
2108: BEGIN
2109: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_START);
2110: x_return_status := FND_API.G_RET_STS_SUCCESS;
2111: l_worker_id := p_terr_globals.worker_id;
2112: l_var := p_terr_globals.bulk_size;
2113: l_MAX_fetches := p_terr_globals.cursor_limit;

Line 2119: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || 'LOOPCOUNT :- ' ||l_loop_count);

2115: LOOP --{L1
2116: IF (l_limit_flag) THEN EXIT; END IF;
2117:
2118: l_loop_count := l_loop_count + 1;
2119: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || 'LOOPCOUNT :- ' ||l_loop_count);
2120: BEGIN
2121: EXIT WHEN del_quote_totalmode%NOTFOUND;
2122: FETCH del_quote_totalmode BULK COLLECT INTO l_quote_number_id
2123: LIMIT l_MAX_fetches;

Line 2134: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_UPD_ACCESSES || AS_GAR.G_START);

2130: IF l_quote_number_id.COUNT < l_MAX_fetches THEN
2131: l_limit_flag := TRUE;
2132: END IF;
2133:
2134: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_UPD_ACCESSES || AS_GAR.G_START);
2135: IF l_quote_number_id.count > 0 THEN --{I1
2136: l_flag := TRUE;
2137: l_first := l_quote_number_id.FIRST;
2138: l_last := l_first + l_var;

Line 2139: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_UPD_ACCESSES || AS_GAR.G_N_ROWS_PROCESSED ||

2135: IF l_quote_number_id.count > 0 THEN --{I1
2136: l_flag := TRUE;
2137: l_first := l_quote_number_id.FIRST;
2138: l_last := l_first + l_var;
2139: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_UPD_ACCESSES || AS_GAR.G_N_ROWS_PROCESSED ||
2140: l_quote_number_id.FIRST || '-' ||
2141: l_quote_number_id.LAST);
2142: WHILE l_flag LOOP --{L2 10K cust loop
2143: IF l_last > l_quote_number_id.LAST THEN

Line 2153: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_UPD_ACCESSES || AS_GAR.G_BULK_UPD || AS_GAR.G_START);

2149: IF (l_del_flag) THEN EXIT; END IF;
2150: l_del_flag := FALSE;
2151: WHILE l_attempts < 3 LOOP --{L4
2152: BEGIN
2153: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_UPD_ACCESSES || AS_GAR.G_BULK_UPD || AS_GAR.G_START);
2154: FORALL i in l_first..l_last
2155: DELETE FROM ASO_QUOTE_ACCESSES ACC
2156: WHERE ACC.QUOTE_NUMBER =l_quote_number_id(i)
2157: AND NVL(ACC.KEEP_FLAG,'N') <> 'Y'

Line 2170: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_UPD_ACCESSES || AS_GAR.G_BULK_UPD || AS_GAR.G_DEADLOCK || l_attempts);

2166: IF l_access_id.COUNT < G_NUM_REC THEN l_del_flag := TRUE; END IF;
2167: EXCEPTION
2168: WHEN deadlock_detected THEN
2169: BEGIN --{I2
2170: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_UPD_ACCESSES || AS_GAR.G_BULK_UPD || AS_GAR.G_DEADLOCK || l_attempts);
2171: ROLLBACK;
2172: l_attempts := l_attempts +1;
2173: IF l_attempts = 3 THEN
2174: FOR i IN l_first .. l_last LOOP --{L5

Line 2176: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_UPD_ACCESSES || AS_GAR.G_IND_UPD || AS_GAR.G_START);

2172: l_attempts := l_attempts +1;
2173: IF l_attempts = 3 THEN
2174: FOR i IN l_first .. l_last LOOP --{L5
2175: BEGIN
2176: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_UPD_ACCESSES || AS_GAR.G_IND_UPD || AS_GAR.G_START);
2177: DELETE FROM ASO_QUOTE_ACCESSES ACC
2178: WHERE ACC.QUOTE_NUMBER =l_quote_number_id(i)
2179: AND NVL(ACC.KEEP_FLAG,'N') <> 'Y'
2180: AND NOT EXISTS (SELECT 'X'

Line 2188: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_UPD_ACCESSES || AS_GAR.G_IND_DEL || AS_GAR.G_GENERAL_EXCEPTION);

2184: AND W.RESOURCE_ID = ACC.RESOURCE_ID);
2185: COMMIT;
2186: EXCEPTION
2187: WHEN OTHERS THEN
2188: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_UPD_ACCESSES || AS_GAR.G_IND_DEL || AS_GAR.G_GENERAL_EXCEPTION);
2189: AS_GAR.LOG('QUOTE id - ' || l_quote_number_id(i));
2190: END;
2191: END LOOP; --}L5
2192: COMMIT;

Line 2189: AS_GAR.LOG('QUOTE id - ' || l_quote_number_id(i));

2185: COMMIT;
2186: EXCEPTION
2187: WHEN OTHERS THEN
2188: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_UPD_ACCESSES || AS_GAR.G_IND_DEL || AS_GAR.G_GENERAL_EXCEPTION);
2189: AS_GAR.LOG('QUOTE id - ' || l_quote_number_id(i));
2190: END;
2191: END LOOP; --}L5
2192: COMMIT;
2193: l_del_flag := TRUE;

Line 2197: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_GENERAL_EXCEPTION, SQLERRM, TO_CHAR(SQLCODE));

2193: l_del_flag := TRUE;
2194: END IF;
2195: END; --}I2 end of deadlock exception
2196: WHEN OTHERS THEN
2197: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_GENERAL_EXCEPTION, SQLERRM, TO_CHAR(SQLCODE));
2198: IF del_quote_totalmode%ISOPEN THEN CLOSE del_quote_totalmode; END IF;
2199: x_errbuf := SQLERRM;
2200: x_retcode := SQLCODE;
2201: x_return_status := FND_API.G_RET_STS_ERROR;

Line 2205: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_UPD_ACCESSES || AS_GAR.G_N_ROWS_PROCESSED || l_first || '-' || l_last);

2201: x_return_status := FND_API.G_RET_STS_ERROR;
2202: RAISE;
2203: END;
2204: END LOOP; --}L4 l_attempts loop 3 trys
2205: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_UPD_ACCESSES || AS_GAR.G_N_ROWS_PROCESSED || l_first || '-' || l_last);
2206: END LOOP; --}L3 -- to update only 10k record at a time on accesses
2207: l_first := l_last + 1;
2208: l_last := l_first + l_var;
2209: IF l_first > l_quote_number_id.LAST THEN

Line 2214: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_END);

2210: l_flag := FALSE;
2211: END IF;
2212: END LOOP; --}L2 while l_flag loop (10K cust loop)
2213: END IF;--}I1
2214: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_END);
2215: COMMIT;
2216: EXCEPTION
2217: WHEN Others THEN
2218: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_GENERAL_EXCEPTION, SQLERRM, TO_CHAR(SQLCODE));

Line 2218: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_GENERAL_EXCEPTION, SQLERRM, TO_CHAR(SQLCODE));

2214: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_END);
2215: COMMIT;
2216: EXCEPTION
2217: WHEN Others THEN
2218: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_GENERAL_EXCEPTION, SQLERRM, TO_CHAR(SQLCODE));
2219: IF del_quote_totalmode%ISOPEN THEN CLOSE del_quote_totalmode; END IF;
2220: x_errbuf := SQLERRM;
2221: x_retcode := SQLCODE;
2222: x_return_status := FND_API.G_RET_STS_ERROR;

Line 2229: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_GENERAL_EXCEPTION, SQLERRM, TO_CHAR(SQLCODE));

2225: END LOOP;--}L1
2226: IF del_quote_totalmode%ISOPEN THEN CLOSE del_quote_totalmode; END IF;
2227: EXCEPTION
2228: WHEN OTHERS THEN
2229: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_GENERAL_EXCEPTION, SQLERRM, TO_CHAR(SQLCODE));
2230: x_errbuf := SQLERRM;
2231: x_retcode := SQLCODE;
2232: x_return_status := FND_API.G_RET_STS_ERROR;
2233: RAISE;

Line 2239: END AS_GAR_QOT_PUB;

2235:
2236: /************************** End Quote Cleanup ***********************/
2237:
2238:
2239: END AS_GAR_QOT_PUB;