eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.AS_GAR_LEADS_PUB dependencies on AS_GAR

Line 1: PACKAGE BODY AS_GAR_LEADS_PUB AS

1: PACKAGE BODY AS_GAR_LEADS_PUB AS
2: /* $Header: asxgrldb.pls 120.8 2006/02/02 21:24 amagupta noship $ */
3:
4: ---------------------------------------------------------------------------
5: -- Start of Comments

Line 7: -- PACKAGE NAME: AS_GAR_LEADS_PUB

3:
4: ---------------------------------------------------------------------------
5: -- Start of Comments
6: ---------------------------------------------------------------------------
7: -- PACKAGE NAME: AS_GAR_LEADS_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 Lead 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 92: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CW || AS_GAR.G_END);

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

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

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

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

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

Line 103: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_GROUPS || AS_GAR.G_START);

99:
100: COMMIT;
101:
102: -- Explode GROUPS if any inside winners
103: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_GROUPS || AS_GAR.G_START);
104: AS_GAR_LEADS_PUB.EXPLODE_GROUPS_LEADS(
105: x_errbuf => l_errbuf,
106: x_retcode => l_retcode,
107: p_terr_globals => l_terr_globals,

Line 104: AS_GAR_LEADS_PUB.EXPLODE_GROUPS_LEADS(

100: COMMIT;
101:
102: -- Explode GROUPS if any inside winners
103: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CEX_GROUPS || AS_GAR.G_START);
104: AS_GAR_LEADS_PUB.EXPLODE_GROUPS_LEADS(
105: x_errbuf => l_errbuf,
106: x_retcode => l_retcode,
107: p_terr_globals => l_terr_globals,
108: x_return_status => l_return_status);

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

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

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

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

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

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

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

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

Line 122: AS_GAR_LEADS_PUB.EXPLODE_TEAMS_LEADS(

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

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

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

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

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

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

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

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

135:
136: COMMIT;
137:
138: -- Set team leader for Leads
139: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_STLEAD || AS_GAR.G_START);
140: AS_GAR_LEADS_PUB.SET_TEAM_LEAD_LEADS(
141: x_errbuf => l_errbuf,
142: x_retcode => l_retcode,
143: p_terr_globals => l_terr_globals,

Line 140: AS_GAR_LEADS_PUB.SET_TEAM_LEAD_LEADS(

136: COMMIT;
137:
138: -- Set team leader for Leads
139: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_STLEAD || AS_GAR.G_START);
140: AS_GAR_LEADS_PUB.SET_TEAM_LEAD_LEADS(
141: x_errbuf => l_errbuf,
142: x_retcode => l_retcode,
143: p_terr_globals => l_terr_globals,
144: x_return_status => l_return_status);

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

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

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

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

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

146: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_STLEAD || AS_GAR.G_END);
147: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_STLEAD || AS_GAR.G_RETURN_STATUS || l_return_status);
148:
149: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
150: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_STLEAD, l_errbuf, l_retcode);
151: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
152: End If;
153:
154: -- Insert into Lead Accesses from Winners

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

151: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
152: End If;
153:
154: -- Insert into Lead Accesses from Winners
155: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSACC || AS_GAR.G_START);
156: AS_GAR_LEADS_PUB.INSERT_ACCESSES_LEADS(
157: x_errbuf => l_errbuf,
158: x_retcode => l_retcode,
159: p_terr_globals => l_terr_globals,

Line 156: AS_GAR_LEADS_PUB.INSERT_ACCESSES_LEADS(

152: End If;
153:
154: -- Insert into Lead Accesses from Winners
155: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSACC || AS_GAR.G_START);
156: AS_GAR_LEADS_PUB.INSERT_ACCESSES_LEADS(
157: x_errbuf => l_errbuf,
158: x_retcode => l_retcode,
159: p_terr_globals => l_terr_globals,
160: x_return_status => l_return_status);

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

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

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

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

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

162: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSACC || AS_GAR.G_END);
163: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSACC || AS_GAR.G_RETURN_STATUS || l_return_status);
164:
165: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
166: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSACC, l_errbuf, l_retcode);
167: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
168: End If;
169:
170: -- Insert into territory Accesses

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

167: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
168: End If;
169:
170: -- Insert into territory Accesses
171: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSTERRACC || AS_GAR.G_START);
172: AS_GAR_LEADS_PUB.INSERT_TERR_ACCESSES_LEADS(
173: x_errbuf => l_errbuf,
174: x_retcode => l_retcode,
175: p_terr_globals => l_terr_globals,

Line 172: AS_GAR_LEADS_PUB.INSERT_TERR_ACCESSES_LEADS(

168: End If;
169:
170: -- Insert into territory Accesses
171: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSTERRACC || AS_GAR.G_START);
172: AS_GAR_LEADS_PUB.INSERT_TERR_ACCESSES_LEADS(
173: x_errbuf => l_errbuf,
174: x_retcode => l_retcode,
175: p_terr_globals => l_terr_globals,
176: x_return_status => l_return_status);

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

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

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

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

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

178: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSTERRACC || AS_GAR.G_END);
179: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSTERRACC || AS_GAR.G_RETURN_STATUS || l_return_status);
180:
181: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
182: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_INSTERRACC, l_errbuf, l_retcode);
183: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
184: End If;
185:
186: -- Remove (soft delete) records in access table that are not qualified

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

183: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
184: End If;
185:
186: -- Remove (soft delete) records in access table that are not qualified
187: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CC || AS_GAR.G_START);
188: AS_GAR_LEADS_PUB.PERFORM_LEAD_CLEANUP(
189: x_errbuf => l_errbuf,
190: x_retcode => l_retcode,
191: p_terr_globals => l_terr_globals,

Line 188: AS_GAR_LEADS_PUB.PERFORM_LEAD_CLEANUP(

184: End If;
185:
186: -- Remove (soft delete) records in access table that are not qualified
187: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CC || AS_GAR.G_START);
188: AS_GAR_LEADS_PUB.PERFORM_LEAD_CLEANUP(
189: x_errbuf => l_errbuf,
190: x_retcode => l_retcode,
191: p_terr_globals => l_terr_globals,
192: x_return_status => l_return_status);

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

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

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

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

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

194: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CC || AS_GAR.G_END);
195: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CC || AS_GAR.G_RETURN_STATUS || l_return_status);
196:
197: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
198: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CC, l_errbuf, l_retcode);
199: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
200: End If;
201:
202: -- LEAD Owner assignment

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

199: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
200: End If;
201:
202: -- LEAD Owner assignment
203: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CO || AS_GAR.G_START);
204: AS_GAR_LEADS_PUB.ASSIGN_LEAD_OWNER(
205: x_errbuf => l_errbuf,
206: x_retcode => l_retcode,
207: p_terr_globals => l_terr_globals,

Line 204: AS_GAR_LEADS_PUB.ASSIGN_LEAD_OWNER(

200: End If;
201:
202: -- LEAD Owner assignment
203: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CO || AS_GAR.G_START);
204: AS_GAR_LEADS_PUB.ASSIGN_LEAD_OWNER(
205: x_errbuf => l_errbuf,
206: x_retcode => l_retcode,
207: p_terr_globals => l_terr_globals,
208: x_return_status => l_return_status);

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

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

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

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

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

210: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CO || AS_GAR.G_END);
211: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CO || AS_GAR.G_RETURN_STATUS || l_return_status);
212:
213: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
214: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_CALL_TO || AS_GAR.G_CO, l_errbuf, l_retcode);
215: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
216: End If;
217:
218: -- BES enhancement

Line 220: l_sub_exist := AS_GAR.exist_subscription(G_BUSINESS_EVENT);

216: End If;
217:
218: -- BES enhancement
219:
220: l_sub_exist := AS_GAR.exist_subscription(G_BUSINESS_EVENT);
221: IF l_sub_exist = 'Y' THEN
222: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CBE_EXISTS);
223: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CBE_RAISE);
224: AS_GAR.Raise_BE(l_terr_globals);

Line 222: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CBE_EXISTS);

218: -- BES enhancement
219:
220: l_sub_exist := AS_GAR.exist_subscription(G_BUSINESS_EVENT);
221: IF l_sub_exist = 'Y' THEN
222: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CBE_EXISTS);
223: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CBE_RAISE);
224: AS_GAR.Raise_BE(l_terr_globals);
225: END If;
226:

Line 223: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CBE_RAISE);

219:
220: l_sub_exist := AS_GAR.exist_subscription(G_BUSINESS_EVENT);
221: IF l_sub_exist = 'Y' THEN
222: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CBE_EXISTS);
223: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CBE_RAISE);
224: AS_GAR.Raise_BE(l_terr_globals);
225: END If;
226:
227: AS_GAR.LOG(G_ENTITY || l_proc || AS_GAR.G_END);

Line 224: AS_GAR.Raise_BE(l_terr_globals);

220: l_sub_exist := AS_GAR.exist_subscription(G_BUSINESS_EVENT);
221: IF l_sub_exist = 'Y' THEN
222: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CBE_EXISTS);
223: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CBE_RAISE);
224: AS_GAR.Raise_BE(l_terr_globals);
225: END If;
226:
227: AS_GAR.LOG(G_ENTITY || l_proc || AS_GAR.G_END);
228: EXCEPTION

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

223: AS_GAR.LOG(G_ENTITY || AS_GAR.G_CBE_RAISE);
224: AS_GAR.Raise_BE(l_terr_globals);
225: END If;
226:
227: AS_GAR.LOG(G_ENTITY || l_proc || AS_GAR.G_END);
228: EXCEPTION
229: WHEN OTHERS THEN
230: AS_GAR.LOG_EXCEPTION(G_ENTITY, SQLERRM, TO_CHAR(SQLCODE));
231: l_status := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR', SQLERRM);

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

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

Line 240: p_terr_globals IN AS_GAR.TERR_GLOBALS,

236: /************************** Start Explode Teams Leads ******************/
237: PROCEDURE EXPLODE_TEAMS_LEADS(
238: x_errbuf OUT NOCOPY VARCHAR2,
239: x_retcode OUT NOCOPY VARCHAR2,
240: p_terr_globals IN AS_GAR.TERR_GLOBALS,
241: x_return_status OUT NOCOPY VARCHAR2)
242: IS
243:
244: /*-------------------------------------------------------------------------+

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

284: AND rules.source_id = -1001
285: AND rsc.terr_rsc_id = acc.terr_rsc_id;
286:
287: BEGIN
288: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_TEAMS || AS_GAR.G_START);
289: x_return_status := FND_API.G_RET_STS_SUCCESS;
290: l_request_id := p_terr_globals.request_id;
291: l_worker_id := p_terr_globals.worker_id;
292: 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 492: 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);

488: AND rt1.worker_id = t.worker_id
489: AND rt1.trans_object_id = t.trans_object_id
490: AND NVL(rt1.trans_detail_object_id,-1) = NVL(t.trans_detail_object_id,-1));
491:
492: 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);
493: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_TEAMS || AS_GAR.G_INS_WINNERS || AS_GAR.G_END);
494:
495:
496: COMMIT;

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

489: AND rt1.trans_object_id = t.trans_object_id
490: AND NVL(rt1.trans_detail_object_id,-1) = NVL(t.trans_detail_object_id,-1));
491:
492: 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);
493: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_TEAMS || AS_GAR.G_INS_WINNERS || AS_GAR.G_END);
494:
495:
496: COMMIT;
497:

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

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

Line 513: p_terr_globals IN AS_GAR.TERR_GLOBALS,

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

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

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

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

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

Line 674: 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);

670: AND rt1.worker_id = t.worker_id
671: AND rt1.trans_object_id = t.trans_object_id
672: AND NVL(rt1.trans_detail_object_id,-1) = NVL(t.trans_detail_object_id,-1));
673:
674: 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: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_GROUPS || AS_GAR.G_INS_WINNERS || AS_GAR.G_END);
676:
677: COMMIT;
678: END IF; /* if l_res_type_count > 0 */

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

671: AND rt1.trans_object_id = t.trans_object_id
672: AND NVL(rt1.trans_detail_object_id,-1) = NVL(t.trans_detail_object_id,-1));
673:
674: 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: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_GROUPS || AS_GAR.G_INS_WINNERS || AS_GAR.G_END);
676:
677: COMMIT;
678: END IF; /* if l_res_type_count > 0 */
679:

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

678: END IF; /* if l_res_type_count > 0 */
679:
680: EXCEPTION
681: WHEN OTHERS THEN
682: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CEX_GROUPS, SQLERRM, TO_CHAR(SQLCODE));
683: x_errbuf := SQLERRM;
684: x_retcode := SQLCODE;
685: x_return_status := FND_API.G_RET_STS_ERROR;
686: RAISE;

Line 711: p_terr_globals IN AS_GAR.TERR_GLOBALS,

707:
708: PROCEDURE SET_TEAM_LEAD_LEADS(
709: x_errbuf OUT NOCOPY VARCHAR2,
710: x_retcode OUT NOCOPY VARCHAR2,
711: p_terr_globals IN AS_GAR.TERR_GLOBALS,
712: x_return_status OUT NOCOPY VARCHAR2)
713: IS
714:
715: TYPE num_list is TABLE of NUMBER INDEX BY BINARY_INTEGER;

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

752: WIN.full_access_flag;
753:
754:
755: BEGIN
756: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || AS_GAR.G_START);
757: x_return_status := FND_API.G_RET_STS_SUCCESS;
758: l_worker_id:=p_terr_globals.worker_id;
759: l_var :=p_terr_globals.bulk_size;
760: l_max_fetches := p_terr_globals.cursor_limit;

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

765: l_salesforce_id.DELETE;
766: l_sales_group_id.DELETE;
767: l_faf.DELETE;
768: l_loop_count := l_loop_count + 1;
769: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || 'LOOPCOUNT :- ' || l_loop_count);
770:
771: --------------------------------
772: OPEN team_leader(l_worker_id);
773: FETCH team_leader BULK COLLECT INTO

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

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

Line 817: 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);

813: AND ACC.salesforce_id = l_salesforce_id(i)
814: AND ACC.sales_group_id = l_sales_group_id(i);
815: COMMIT;
816: l_attempts := 3;
817: 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);
818: EXCEPTION
819: WHEN DEADLOCK_DETECTED THEN
820: BEGIN
821: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || AS_GAR.G_DEADLOCK ||l_attempts);

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

817: 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);
818: EXCEPTION
819: WHEN DEADLOCK_DETECTED THEN
820: BEGIN
821: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_STLEAD || AS_GAR.G_DEADLOCK ||l_attempts);
822: ROLLBACK;
823: l_attempts := l_attempts +1;
824: IF l_attempts = 3 THEN
825: 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: AND ACC.salesforce_id = l_salesforce_id(i)
842: AND ACC.sales_group_id = l_sales_group_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('SALES_LEAD_ID/SALESFORCE_ID/SALESGROUP_ID/ORG_ID - ' || l_sales_lead_id(i) || '/' || l_salesforce_id(i) || '/' || l_sales_group_id(i) );
847: END;
848: END LOOP; -- for each record individually
849: COMMIT;

Line 846: AS_GAR.LOG('SALES_LEAD_ID/SALESFORCE_ID/SALESGROUP_ID/ORG_ID - ' || l_sales_lead_id(i) || '/' || l_salesforce_id(i) || '/' || l_sales_group_id(i) );

842: AND ACC.sales_group_id = l_sales_group_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('SALES_LEAD_ID/SALESFORCE_ID/SALESGROUP_ID/ORG_ID - ' || l_sales_lead_id(i) || '/' || l_salesforce_id(i) || '/' || l_sales_group_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_sales_lead_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_sales_lead_id.COUNT);
870: END LOOP; -- loop for more bulk_size fetches
871: l_sales_lead_id.DELETE;
872: l_faf.DELETE;

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

865: END IF;
866: END LOOP; -- loop for more records within the bulk_size
867: END IF; --l_sales_lead_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_sales_lead_id.COUNT);
870: END LOOP; -- loop for more bulk_size fetches
871: l_sales_lead_id.DELETE;
872: l_faf.DELETE;
873: l_salesforce_id.DELETE;

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

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

Line 891: p_terr_globals IN AS_GAR.TERR_GLOBALS,

887:
888: PROCEDURE INSERT_ACCESSES_LEADS(
889: x_errbuf OUT NOCOPY VARCHAR2,
890: x_retcode OUT NOCOPY VARCHAR2,
891: p_terr_globals IN AS_GAR.TERR_GLOBALS,
892: x_return_status OUT NOCOPY VARCHAR2)
893: IS
894: TYPE num_list is TABLE of NUMBER INDEX BY BINARY_INTEGER;
895: TYPE faf_list is TABLE of VARCHAR2(1) INDEX BY BINARY_INTEGER;

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

939: | Re-Initialize variables and null out if necessary.
940: | Try bulk inserting into accesses. If this fails, insert records one by one.
941: |
942: +-------------------------------------------------------------------------*/
943: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSACC || AS_GAR.G_START);
944: x_return_status := FND_API.G_RET_STS_SUCCESS;
945: l_worker_id:=p_terr_globals.worker_id;
946: l_var :=p_terr_globals.bulk_size;
947: OPEN ins_acc(l_worker_id);

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

957:
958: EXIT WHEN ins_acc%NOTFOUND;
959:
960: l_loop_count := l_loop_count + 1;
961: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSACC || 'LOOPCOUNT :- ' || l_loop_count);
962:
963: FETCH ins_acc BULK COLLECT INTO
964: l_salesforce_id, l_sales_group_id, l_person_id,
965: l_sales_lead_id,l_faf,l_org_id

Line 986: 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);

982: IF l_last > l_sales_lead_id.LAST THEN
983: l_last := l_sales_lead_id.LAST;
984: END IF;
985: BEGIN
986: 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);
987: FORALL i IN l_first .. l_last
988: INSERT INTO AS_ACCESSES_ALL_ALL
989: ( access_id
990: ,access_type

Line 1056: 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);

1052: AND AA.salesforce_id = l_salesforce_id(i)
1053: AND AA.sales_group_id = l_sales_group_id(i)
1054: )
1055: );
1056: 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);
1057: COMMIT;
1058: EXCEPTION
1059: WHEN DUP_VAL_ON_INDEX THEN
1060: 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 1060: 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);

1056: 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);
1057: COMMIT;
1058: EXCEPTION
1059: WHEN DUP_VAL_ON_INDEX THEN
1060: 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);
1061: FOR i IN l_first .. l_last LOOP
1062: BEGIN
1063: INSERT INTO AS_ACCESSES_ALL_ALL
1064: ( access_id

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

1134: END;
1135: END LOOP; /* loop for DUP_VAL_ON_INDEX individual insert */
1136: COMMIT;
1137: WHEN OTHERS THEN
1138: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSACC || AS_GAR.G_BULK_INS, SQLERRM, TO_CHAR(SQLCODE));
1139: x_errbuf := SQLERRM;
1140: x_retcode := SQLCODE;
1141: x_return_status := FND_API.G_RET_STS_ERROR;
1142: RAISE;

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

1158: IF ins_acc%ISOPEN THEN CLOSE ins_acc; END IF;
1159:
1160: EXCEPTION
1161: WHEN others THEN
1162: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSACC, SQLERRM, TO_CHAR(SQLCODE));
1163: x_errbuf := SQLERRM;
1164: x_retcode := SQLCODE;
1165: x_return_status := FND_API.G_RET_STS_ERROR;
1166: IF ins_acc%ISOPEN THEN CLOSE ins_acc; END IF;

Line 1177: p_terr_globals IN AS_GAR.TERR_GLOBALS,

1173:
1174: PROCEDURE INSERT_TERR_ACCESSES_LEADS(
1175: x_errbuf OUT NOCOPY VARCHAR2,
1176: x_retcode OUT NOCOPY VARCHAR2,
1177: p_terr_globals IN AS_GAR.TERR_GLOBALS,
1178: x_return_status OUT NOCOPY VARCHAR2)
1179: IS
1180: TYPE num_list IS TABLE of NUMBER INDEX BY BINARY_INTEGER;
1181:

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

1217: | Almost the same as accesses, except the insertion is into as_territory_accesses
1218: | and there is no involvement of role.
1219: |
1220: +-------------------------------------------------------------------------*/
1221: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_START);
1222: x_return_status := FND_API.G_RET_STS_SUCCESS;
1223: l_worker_id := p_terr_globals.worker_id;
1224: l_var := p_terr_globals.bulk_size;
1225: OPEN ins_tacc(l_worker_id);

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

1230: l_sales_lead_id.DELETE;
1231: l_salesforce_id.DELETE;
1232: l_sales_group_id.DELETE;
1233: l_terr_id.DELETE;
1234: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || 'LOOPCOUNT :- ' || l_loop_count);
1235: BEGIN
1236:
1237: FETCH ins_tacc BULK COLLECT INTO l_terr_id,
1238: l_sales_lead_id, l_salesforce_id, l_sales_group_id

Line 1255: 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);

1251: IF l_last > l_sales_lead_id.last THEN
1252: l_last := l_sales_lead_id.last;
1253: END IF;
1254: BEGIN
1255: 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);
1256: FORALL i IN l_first .. l_last
1257: INSERT INTO AS_TERRITORY_ACCESSES
1258: ( access_id,
1259: territory_id,

Line 1301: 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);

1297: WHERE AST.access_id = A.access_id
1298: AND AST.territory_id = l_terr_id(i))
1299: ) V
1300: );
1301: 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);
1302: COMMIT;
1303: EXCEPTION
1304: WHEN DUP_VAL_ON_INDEX THEN
1305: 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 1305: 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);

1301: 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);
1302: COMMIT;
1303: EXCEPTION
1304: WHEN DUP_VAL_ON_INDEX THEN
1305: 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);
1306: FOR i IN l_first .. l_last LOOP
1307: BEGIN
1308: INSERT INTO AS_TERRITORY_ACCESSES
1309: ( access_id,

Line 1357: 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);

1353: WHEN Others THEN
1354: NULL;
1355: END;
1356: END LOOP;
1357: 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);
1358: COMMIT;
1359: WHEN Others THEN
1360: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_BULK_INS, SQLERRM, TO_CHAR(SQLCODE));
1361: x_errbuf := SQLERRM;

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

1356: END LOOP;
1357: 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);
1358: COMMIT;
1359: WHEN Others THEN
1360: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_BULK_INS, SQLERRM, TO_CHAR(SQLCODE));
1361: x_errbuf := SQLERRM;
1362: x_retcode := SQLCODE;
1363: x_return_status := FND_API.G_RET_STS_ERROR;
1364: IF ins_tacc%ISOPEN THEN CLOSE ins_tacc; END IF;

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

1372: END LOOP;
1373: END IF; --l_sales_lead_id.count > 0
1374: EXCEPTION
1375: WHEN Others THEN
1376: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC , SQLERRM, TO_CHAR(SQLCODE));
1377: IF ins_tacc%ISOPEN THEN CLOSE ins_tacc; END IF;
1378: x_errbuf := SQLERRM;
1379: x_retcode := SQLCODE;
1380: x_return_status := FND_API.G_RET_STS_ERROR;

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

1385: l_salesforce_id.DELETE;
1386: l_sales_group_id.DELETE;
1387: l_terr_id.DELETE;
1388: IF ins_tacc%ISOPEN THEN CLOSE ins_tacc; END IF;
1389: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_END);
1390: EXCEPTION
1391: WHEN others THEN
1392: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC, SQLERRM, TO_CHAR(SQLCODE));
1393: x_errbuf := SQLERRM;

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

1388: IF ins_tacc%ISOPEN THEN CLOSE ins_tacc; END IF;
1389: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_END);
1390: EXCEPTION
1391: WHEN others THEN
1392: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC, SQLERRM, TO_CHAR(SQLCODE));
1393: x_errbuf := SQLERRM;
1394: x_retcode := SQLCODE;
1395: x_return_status := FND_API.G_RET_STS_ERROR;
1396: IF ins_tacc%ISOPEN THEN CLOSE ins_tacc; END IF;

Line 1408: p_terr_globals IN AS_GAR.TERR_GLOBALS,

1404:
1405: PROCEDURE Perform_Lead_Cleanup(
1406: x_errbuf OUT NOCOPY VARCHAR2,
1407: x_retcode OUT NOCOPY VARCHAR2,
1408: p_terr_globals IN AS_GAR.TERR_GLOBALS,
1409: x_return_status OUT NOCOPY VARCHAR2)
1410: IS
1411:
1412: TYPE num_list is TABLE of NUMBER INDEX BY BINARY_INTEGER;

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

1441: FROM JTF_TAE_1001_LEAD_NM_TRANS
1442: WHERE worker_id=c_worker_id;
1443:
1444: BEGIN
1445: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_START);
1446: x_return_status := FND_API.G_RET_STS_SUCCESS;
1447: l_worker_id := p_terr_globals.worker_id;
1448: l_var := p_terr_globals.bulk_size;
1449: l_max_fetches := p_terr_globals.cursor_limit;

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

1447: l_worker_id := p_terr_globals.worker_id;
1448: l_var := p_terr_globals.bulk_size;
1449: l_max_fetches := p_terr_globals.cursor_limit;
1450:
1451: IF p_terr_globals.run_mode = AS_GAR.G_TOTAL_MODE THEN
1452: OPEN del_lead_totalmode(l_worker_id);
1453: ELSE
1454: OPEN del_lead_newmode(l_worker_id);
1455: END IF;

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

1456: LOOP --{L1
1457: IF (l_limit_flag) THEN EXIT; END IF;
1458:
1459: l_loop_count := l_loop_count + 1;
1460: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || 'LOOPCOUNT :- ' ||l_loop_count);
1461: BEGIN
1462: IF p_terr_globals.run_mode = AS_GAR.G_TOTAL_MODE THEN
1463: EXIT WHEN del_lead_totalmode%NOTFOUND;
1464: FETCH del_lead_totalmode BULK COLLECT INTO l_sales_lead_id

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

1458:
1459: l_loop_count := l_loop_count + 1;
1460: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || 'LOOPCOUNT :- ' ||l_loop_count);
1461: BEGIN
1462: IF p_terr_globals.run_mode = AS_GAR.G_TOTAL_MODE THEN
1463: EXIT WHEN del_lead_totalmode%NOTFOUND;
1464: FETCH del_lead_totalmode BULK COLLECT INTO l_sales_lead_id
1465: LIMIT l_max_fetches;
1466: ELSE

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

1477: IF l_sales_lead_id.COUNT < l_max_fetches THEN
1478: l_limit_flag := TRUE;
1479: END IF;
1480:
1481: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_UPD_ACCESSES || AS_GAR.G_START);
1482: IF l_sales_lead_id.count > 0 THEN --{I1
1483: l_flag := TRUE;
1484: l_first := l_sales_lead_id.first;
1485: l_last := l_first + l_var;

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

1482: IF l_sales_lead_id.count > 0 THEN --{I1
1483: l_flag := TRUE;
1484: l_first := l_sales_lead_id.first;
1485: l_last := l_first + l_var;
1486: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_UPD_ACCESSES || AS_GAR.G_N_ROWS_PROCESSED ||
1487: l_sales_lead_id.FIRST || '-' ||
1488: l_sales_lead_id.LAST);
1489: WHILE l_flag LOOP --{L2 10K cust loop
1490: IF l_last > l_sales_lead_id.LAST THEN

Line 1500: 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);

1496: IF (l_del_flag) THEN EXIT; END IF;
1497: l_del_flag := FALSE;
1498: WHILE l_attempts < 3 LOOP --{L4
1499: BEGIN
1500: 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);
1501: FORALL i in l_first..l_last
1502: UPDATE AS_ACCESSES_ALL_ALL ACC
1503: SET object_version_number = NVL(object_version_number,0) + 1, ACC.DELETE_FLAG='Y'
1504: WHERE ACC.sales_lead_id=l_sales_lead_id(i)

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

1518: IF l_access_id.COUNT < G_NUM_REC THEN l_del_flag := TRUE; END IF;
1519: EXCEPTION
1520: WHEN DUP_VAL_ON_INDEX THEN
1521: BEGIN
1522: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_UPD_ACCESSES || AS_GAR.G_BULK_DEL || AS_GAR.G_START);
1523: FORALL i in l_first..l_last
1524: DELETE FROM AS_ACCESSES_ALL_ALL ACC
1525: WHERE ACC.sales_lead_id=l_sales_lead_id(i)
1526: AND ACC.freeze_flag = 'N'

Line 1541: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_UPD_ACCESSES || AS_GAR.G_BULK_DEL, SQLERRM, TO_CHAR(SQLCODE));

1537: l_attempts := 3;
1538: IF l_access_id.COUNT < G_NUM_REC THEN l_del_flag := TRUE; END IF;
1539: EXCEPTION
1540: WHEN OTHERS THEN
1541: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_UPD_ACCESSES || AS_GAR.G_BULK_DEL, SQLERRM, TO_CHAR(SQLCODE));
1542: END;
1543: WHEN deadlock_detected THEN
1544: BEGIN --{I2
1545: 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);

Line 1545: 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);

1541: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_UPD_ACCESSES || AS_GAR.G_BULK_DEL, SQLERRM, TO_CHAR(SQLCODE));
1542: END;
1543: WHEN deadlock_detected THEN
1544: BEGIN --{I2
1545: 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);
1546: ROLLBACK;
1547: l_attempts := l_attempts +1;
1548: IF l_attempts = 3 THEN
1549: FOR i IN l_first .. l_last LOOP --{L5

Line 1551: 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);

1547: l_attempts := l_attempts +1;
1548: IF l_attempts = 3 THEN
1549: FOR i IN l_first .. l_last LOOP --{L5
1550: BEGIN
1551: 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);
1552: UPDATE AS_ACCESSES_ALL_ALL ACC
1553: SET object_version_number = NVL(object_version_number,0) + 1, ACC.DELETE_FLAG='Y'
1554: WHERE ACC.sales_lead_id = l_sales_lead_id(i)
1555: AND ACC.freeze_flag = 'N'

Line 1569: 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_START);

1565: COMMIT;
1566: EXCEPTION
1567: WHEN DUP_VAL_ON_INDEX THEN
1568: BEGIN
1569: 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_START);
1570: DELETE FROM AS_ACCESSES_ALL_ALL ACC
1571: WHERE ACC.sales_lead_id=l_sales_lead_id(i)
1572: AND ACC.freeze_flag = 'N'
1573: AND ACC.lead_id IS NULL

Line 1583: 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);

1579: AND W.worker_id = l_worker_id
1580: AND W.group_id = ACC.sales_group_id);
1581: EXCEPTION
1582: WHEN OTHERS THEN
1583: 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);
1584: AS_GAR.LOG('SALES_LEAD_ID - ' || l_sales_lead_id(i));
1585: END;
1586: END;
1587: END LOOP; --}L5

Line 1584: AS_GAR.LOG('SALES_LEAD_ID - ' || l_sales_lead_id(i));

1580: AND W.group_id = ACC.sales_group_id);
1581: EXCEPTION
1582: WHEN OTHERS THEN
1583: 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);
1584: AS_GAR.LOG('SALES_LEAD_ID - ' || l_sales_lead_id(i));
1585: END;
1586: END;
1587: END LOOP; --}L5
1588: COMMIT;

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

1589: l_del_flag := TRUE;
1590: END IF;
1591: END; --}I2 end of deadlock exception
1592: WHEN OTHERS THEN
1593: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_GENERAL_EXCEPTION, SQLERRM, TO_CHAR(SQLCODE));
1594: IF del_lead_totalmode%ISOPEN THEN CLOSE del_lead_totalmode; END IF;
1595: IF del_lead_newmode%ISOPEN THEN CLOSE del_lead_newmode; END IF;
1596: x_errbuf := SQLERRM;
1597: x_retcode := SQLCODE;

Line 1602: 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);

1598: x_return_status := FND_API.G_RET_STS_ERROR;
1599: RAISE;
1600: END;
1601: END LOOP; --}L4 l_attempts loop 3 trys
1602: 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);
1603: END LOOP; --}L3 -- to update only 10k record at a time on accesses
1604: l_first := l_last + 1;
1605: l_last := l_first + l_var;
1606: IF l_first > l_sales_lead_id.LAST THEN

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

1607: l_flag := FALSE;
1608: END IF;
1609: END LOOP; --}L2 while l_flag loop (10K cust loop)
1610: END IF;--}I1
1611: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_END);
1612: COMMIT;
1613: EXCEPTION
1614: WHEN Others THEN
1615: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_GENERAL_EXCEPTION, SQLERRM, TO_CHAR(SQLCODE));

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

1611: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_END);
1612: COMMIT;
1613: EXCEPTION
1614: WHEN Others THEN
1615: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_GENERAL_EXCEPTION, SQLERRM, TO_CHAR(SQLCODE));
1616: IF del_lead_totalmode%ISOPEN THEN CLOSE del_lead_totalmode; END IF;
1617: IF del_lead_newmode%ISOPEN THEN CLOSE del_lead_newmode; END IF;
1618: x_errbuf := SQLERRM;
1619: x_retcode := SQLCODE;

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

1624: IF del_lead_totalmode%ISOPEN THEN CLOSE del_lead_totalmode; END IF;
1625: IF del_lead_newmode%ISOPEN THEN CLOSE del_lead_newmode; END IF;
1626: EXCEPTION
1627: WHEN OTHERS THEN
1628: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_GENERAL_EXCEPTION, SQLERRM, TO_CHAR(SQLCODE));
1629: x_errbuf := SQLERRM;
1630: x_retcode := SQLCODE;
1631: x_return_status := FND_API.G_RET_STS_ERROR;
1632: RAISE;

Line 1640: p_terr_globals IN AS_GAR.TERR_GLOBALS,

1636: /**************************** Start Assign Lead Owner ********************/
1637: PROCEDURE ASSIGN_LEAD_OWNER(
1638: x_errbuf OUT NOCOPY VARCHAR2,
1639: x_retcode OUT NOCOPY VARCHAR2,
1640: p_terr_globals IN AS_GAR.TERR_GLOBALS,
1641: x_return_status OUT NOCOPY VARCHAR2)
1642: IS
1643: l_return_status VARCHAR2(1);
1644: l_msg_count NUMBER;

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

1718:
1719:
1720:
1721: BEGIN
1722: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_START);
1723:
1724: x_return_status := FND_API.G_RET_STS_SUCCESS;
1725: l_worker_id:=p_terr_globals.worker_id;
1726: l_var :=p_terr_globals.bulk_size;

Line 1730: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'CUSTOM AS PER PROFILE---AS_LEAD_ASSIGNMENT_UHK:- Y---');

1726: l_var :=p_terr_globals.bulk_size;
1727: l_max_fetches := p_terr_globals.cursor_limit;
1728: IF fnd_profile.value('AS_LEAD_ASSIGNMENT_UHK') = 'Y'
1729: THEN
1730: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'CUSTOM AS PER PROFILE---AS_LEAD_ASSIGNMENT_UHK:- Y---');
1731: AS_CUSTOM_HOOKS_UHK.Lead_TOTTAP_Owner_Assignment(
1732: p_request_id => p_terr_globals.request_id,
1733: p_worker_id => p_terr_globals.worker_id,
1734: x_return_status => l_return_status,

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

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

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

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

Line 1769: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'UPDATE AS_SALES_LEADS');

1765: IF l_last > l_sales_lead_id.LAST THEN
1766: l_last := l_sales_lead_id.LAST;
1767: END IF;
1768: WHILE l_attempts < 3 LOOP
1769: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'UPDATE AS_SALES_LEADS');
1770: BEGIN
1771: FORALL i in l_first .. l_last
1772: UPDATE AS_SALES_LEADS sl
1773: SET sl.last_update_date = SYSDATE,

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

1787: )
1788: WHERE sl.sales_lead_id = l_sales_lead_id(i) ;
1789: COMMIT;
1790: l_attempts := 3;
1791: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_N_ROWS_PROCESSED || l_first || ' - '|| l_last);
1792: EXCEPTION
1793: WHEN deadlock_detected THEN
1794: BEGIN
1795: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_DEADLOCK ||l_attempts);

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

1791: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_N_ROWS_PROCESSED || l_first || ' - '|| l_last);
1792: EXCEPTION
1793: WHEN deadlock_detected THEN
1794: BEGIN
1795: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_DEADLOCK ||l_attempts);
1796: ROLLBACK;
1797: l_attempts := l_attempts +1;
1798: IF l_attempts = 3 THEN
1799: FOR i IN l_first .. l_last LOOP

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

1816: )
1817: WHERE sl.sales_lead_id = l_sales_lead_id(i) ;
1818: EXCEPTION
1819: WHEN OTHERS THEN
1820: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'ROW-BY-ROW UPDATE OF SALES LEADS', SQLERRM, TO_CHAR(SQLCODE));
1821: END;
1822: END LOOP;
1823: COMMIT;
1824: END IF;

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

1823: COMMIT;
1824: END IF;
1825: END; -- end of deadlock exception
1826: WHEN OTHERS THEN
1827: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'UPDATE AS_SALES_LEADS', SQLERRM, TO_CHAR(SQLCODE));
1828: x_errbuf := SQLERRM;
1829: x_retcode := SQLCODE;
1830: x_return_status := FND_API.G_RET_STS_ERROR;
1831: RAISE;

Line 1835: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'UPDATE AS_ACCESSES');

1831: RAISE;
1832: END;
1833: END LOOP;
1834:
1835: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'UPDATE AS_ACCESSES');
1836: l_attempts := 1;
1837: WHILE l_attempts < 3 LOOP
1838: BEGIN
1839: FORALL i in l_first .. l_last

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

1848: ACC.owner_flag = 'Y'
1849: WHERE ACC.access_id = l_access_id(i);
1850: COMMIT;
1851: l_attempts := 3;
1852: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'UPDATE AS_ACCESSES::' || AS_GAR.G_N_ROWS_PROCESSED || l_first || ' - '|| l_last);
1853: EXCEPTION
1854: WHEN deadlock_detected THEN
1855: BEGIN
1856: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'UPDATE AS_ACCESSES::' || AS_GAR.G_DEADLOCK ||l_attempts );

Line 1856: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'UPDATE AS_ACCESSES::' || AS_GAR.G_DEADLOCK ||l_attempts );

1852: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'UPDATE AS_ACCESSES::' || AS_GAR.G_N_ROWS_PROCESSED || l_first || ' - '|| l_last);
1853: EXCEPTION
1854: WHEN deadlock_detected THEN
1855: BEGIN
1856: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'UPDATE AS_ACCESSES::' || AS_GAR.G_DEADLOCK ||l_attempts );
1857: l_attempts := l_attempts +1;
1858: ROLLBACK;
1859: IF l_attempts = 3 THEN
1860: FOR i IN l_first .. l_last LOOP

Line 1874: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'ROW-BY-ROW UPDATE OF SALES LEADS ACCESSES', SQLERRM, TO_CHAR(SQLCODE));

1870: ACC.owner_flag = 'Y'
1871: WHERE ACC.access_id = l_access_id(i);
1872: EXCEPTION
1873: WHEN OTHERS THEN
1874: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'ROW-BY-ROW UPDATE OF SALES LEADS ACCESSES', SQLERRM, TO_CHAR(SQLCODE));
1875: END;
1876: END LOOP;
1877: COMMIT;
1878: END IF;

Line 1881: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'UPDATE SALES_LEADS ACCESSES', SQLERRM, TO_CHAR(SQLCODE));

1877: COMMIT;
1878: END IF;
1879: END; -- end of deadlock exception
1880: WHEN OTHERS THEN
1881: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || 'UPDATE SALES_LEADS ACCESSES', SQLERRM, TO_CHAR(SQLCODE));
1882: x_errbuf := SQLERRM;
1883: x_retcode := SQLCODE;
1884: x_return_status := FND_API.G_RET_STS_ERROR;
1885: RAISE;

Line 1895: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_N_ROWS_PROCESSED || l_sales_lead_id.COUNT);

1891: l_flag := FALSE;
1892: END IF;
1893: END LOOP;
1894: END IF; --l_sales_lead_id.count > 0
1895: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_N_ROWS_PROCESSED || l_sales_lead_id.COUNT);
1896: END LOOP;
1897: l_limit_flag := FALSE;
1898: l_loop_count := 0;
1899: l_access_id.delete;

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

1902: END IF; -- (Custom or Non Custom)
1903:
1904: EXCEPTION
1905: WHEN OTHERS THEN
1906: AS_GAR.LOG_EXCEPTION(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CO || AS_GAR.G_GENERAL_EXCEPTION, SQLERRM, TO_CHAR(SQLCODE));
1907: x_errbuf := SQLERRM;
1908: x_retcode := SQLCODE;
1909: x_return_status := FND_API.G_RET_STS_ERROR;
1910: RAISE;

Line 1917: END AS_GAR_LEADS_PUB;

1913: /**************************** End Assign Lead Owner ********************/
1914:
1915:
1916:
1917: END AS_GAR_LEADS_PUB;
1918: