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.IEX_PROMISES_PUB dependencies on FND_LOG

Line 4: PG_DEBUG NUMBER; -- := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

1: PACKAGE BODY IEX_PROMISES_PUB as
2: /* $Header: iexpyprb.pls 120.15.12020000.4 2012/07/23 09:25:36 sunagesh ship $ */
3:
4: PG_DEBUG NUMBER; -- := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
5:
6: G_APP_ID CONSTANT NUMBER := 695;
7: G_PKG_NAME CONSTANT VARCHAR2(30) := 'IEX_PROMISES_PUB';
8: G_FILE_NAME CONSTANT VARCHAR2(12) := 'iexpyprb.pls';

Line 46: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

42: j number;
43: l_uwq_active_date date;
44: l_uwq_complete_date date;
45: begin
46: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
47: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': start');
48: END IF;
49:
50: -- Standard start of API savepoint

Line 70: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

66: -- START OF BODY OF API
67:
68: -- validating uwq status
69: l_validation_item := 'P_STATUS';
70: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
71: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': new uwq status: ' || P_STATUS);
72: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
73: END IF;
74: if P_STATUS is null then

Line 75: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

71: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': new uwq status: ' || P_STATUS);
72: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
73: END IF;
74: if P_STATUS is null then
75: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
76: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');
77: END IF;
78: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
79: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);

Line 87: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

83: end if;
84:
85: -- validating table of promises
86: l_validation_item := 'P_PROMISE_TBL';
87: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
88: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': count of P_PROMISE_TBL: ' || P_PROMISE_TBL.count);
89: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
90: END IF;
91: if P_PROMISE_TBL.count = 0 then

Line 92: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

88: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': count of P_PROMISE_TBL: ' || P_PROMISE_TBL.count);
89: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
90: END IF;
91: if P_PROMISE_TBL.count = 0 then
92: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
93: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');
94: END IF;
95: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
96: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);

Line 104: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

100: end if;
101:
102: -- validating p_days
103: l_validation_item := 'P_DAYS';
104: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
105: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': P_DAYS: ' || P_DAYS);
106: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
107: END IF;
108: if P_DAYS is not null and P_DAYS < 0 then

Line 109: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

105: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': P_DAYS: ' || P_DAYS);
106: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
107: END IF;
108: if P_DAYS is not null and P_DAYS < 0 then
109: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
110: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');
111: END IF;
112: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
113: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);

Line 120: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

116: RAISE FND_API.G_EXC_ERROR;
117: end if;
118:
119: -- filter passed promises; we need only BROKEN_PROMISE promises for update
120: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
121: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': filtering broken promises...');
122: END IF;
123: l_SQL := 'SELECT state ' ||
124: 'FROM IEX_PROMISE_DETAILS ' ||

Line 134: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

130: open l_cursor for l_SQL
131: using P_PROMISE_TBL(i);
132: fetch l_cursor into l_state;
133:
134: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
135: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': promise ' || P_PROMISE_TBL(i));
136: END IF;
137: if l_cursor%NOTFOUND then
138: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 138: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

134: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
135: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': promise ' || P_PROMISE_TBL(i));
136: END IF;
137: if l_cursor%NOTFOUND then
138: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
139: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': invalid promise');
140: END IF;
141: else
142: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 142: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

138: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
139: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': invalid promise');
140: END IF;
141: else
142: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
143: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': state ' || l_state);
144: END IF;
145: if l_state = 'BROKEN_PROMISE' then
146: j := j + 1;

Line 148: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

144: END IF;
145: if l_state = 'BROKEN_PROMISE' then
146: j := j + 1;
147: l_broken_promises(j) := P_PROMISE_TBL(i);
148: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
149: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': promise ' || P_PROMISE_TBL(i) || ' is added to broken promises table');
150: END IF;
151: end if;
152: end if;

Line 154: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

150: END IF;
151: end if;
152: end if;
153: end loop;
154: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
155: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': total broken promises ' || l_broken_promises.count);
156: END IF;
157:
158: -- check for status

Line 169: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

165: l_days := to_number(nvl(fnd_profile.value('IEX_UWQ_DEFAULT_PENDING_DAYS'), '0'));
166: else
167: l_days := P_DAYS;
168: end if;
169: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
170: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': number of days: ' || l_days);
171: END IF;
172: l_uwq_active_date := sysdate + l_days;
173:

Line 183: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

179:
180: -- do updates of broken promises as appropriate
181: nCount := l_broken_promises.count;
182: if nCount > 0 then
183: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
184: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_uwq_active_date: ' || l_uwq_active_date);
185: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_uwq_complete_date: ' || l_uwq_complete_date);
186: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': updating promise details...');
187: END IF;

Line 198: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

194: last_updated_by = G_USER_ID
195: where
196: promise_detail_id = l_broken_promises(i);
197: else
198: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
199: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': nothing to update');
200: END IF;
201: end if;
202:

Line 282: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

278: where party_id= p_party_id
279: and status_code in ('OPEN', 'ONHOLD');
280: -- end for bug 8844974
281: begin
282: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
283: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': start');
284: END IF;
285:
286: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 286: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

282: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
283: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': start');
284: END IF;
285:
286: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
287: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': promise = ' || P_PROMISE_ID);
288: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': status = ' || P_STATUS);
289: END IF;
290:

Line 293: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

289: END IF;
290:
291: -- validation input
292: if P_PROMISE_ID is null then
293: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
294: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Error! P_PROMISE_ID is null');
295: END IF;
296: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
297: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);

Line 304: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

300: RAISE FND_API.G_EXC_ERROR;
301: end if;
302:
303: if P_STATUS is null then
304: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
305: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Error! P_STATUS is null');
306: END IF;
307: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
308: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);

Line 345: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

341: close c_strategy_level;
342:
343: -- end for bug 8844974
344:
345: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
346: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_delinquency_id = ' || l_delinquency_id);
347: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_cust_account_id = ' || l_cust_account_id);
348: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_cnsld_id = ' || l_cnsld_id);
349: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_contract_id = ' || l_contract_id);

Line 353: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

349: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_contract_id = ' || l_contract_id);
350: END IF;
351:
352: if l_delinquency_id is not null and l_cust_account_id is not null and l_cnsld_id is null and l_contract_id is null then --promise on delinquency
353: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
354: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': this is promise on delinquency. Move on with set strategy.');
355: END IF;
356: l_object_type := 'DELINQUENT';
357: l_object_id := l_delinquency_id;

Line 359: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

355: END IF;
356: l_object_type := 'DELINQUENT';
357: l_object_id := l_delinquency_id;
358: else
359: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
360: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': This version does not support set strategy for this kind of promises. Return from the API');
361: END IF;
362: return;
363: end if;

Line 385: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

381: l_object_id := l_delinquency_id;
382: end if;
383: --end bug#2369298 schekuri 24-Feb-2006
384:
385: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
386: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Calling iex_strategy_pub.set_strategy...');
387: END IF;
388: iex_strategy_pub.set_strategy
389: (

Line 403: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

399: p_ObjectID => l_object_id,
400: p_Status => P_STATUS
401: );
402:
403: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
404: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Return status ' || l_return_status);
405: END IF;
406: if l_return_status <> 'S' then
407: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 407: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

403: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
404: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Return status ' || l_return_status);
405: END IF;
406: if l_return_status <> 'S' then
407: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
408: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Failed to set strategy');
409: END IF;
410: end if;
411:

Line 414: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

410: end if;
411:
412: EXCEPTION
413: WHEN OTHERS THEN
414: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
415: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': in exception');
416: END IF;
417: end;
418:

Line 430: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

426: l_msg_data varchar2(200);
427: l_party_id number;
428: l_autofulfill varchar2(1);
429: begin
430: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
431: iex_debug_pub.LogMessage(G_PKG_NAME || '.SEND_FFM: start');
432: END IF;
433: l_autofulfill := fnd_profile.value('IEX_AUTO_FULFILL');
434: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 434: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

430: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
431: iex_debug_pub.LogMessage(G_PKG_NAME || '.SEND_FFM: start');
432: END IF;
433: l_autofulfill := fnd_profile.value('IEX_AUTO_FULFILL');
434: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
435: iex_debug_pub.LogMessage(G_PKG_NAME || '.SEND_FFM: l_autofulfill: ' || l_autofulfill);
436: END IF;
437:
438: if l_autofulfill is not null and l_autofulfill = 'Y' then

Line 440: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

436: END IF;
437:
438: if l_autofulfill is not null and l_autofulfill = 'Y' then
439: l_template_id := to_number(fnd_profile.value('IEX_PROMISE_CONFIRM'));
440: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
441: iex_debug_pub.LogMessage(G_PKG_NAME || '.SEND_FFM: ptp ffm template_id = ' || l_template_id);
442: END IF;
443: if l_template_id is not null then
444: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 444: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

440: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
441: iex_debug_pub.LogMessage(G_PKG_NAME || '.SEND_FFM: ptp ffm template_id = ' || l_template_id);
442: END IF;
443: if l_template_id is not null then
444: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
445: iex_debug_pub.LogMessage(G_PKG_NAME || '.SEND_FFM: Sending ffm ...');
446: END IF;
447: IEX_DUNNING_PVT.CALL_FFM(
448: p_api_version => 1.0,

Line 461: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

457: x_return_status => l_return_status,
458: x_msg_count => l_msg_count,
459: x_msg_data => l_msg_data);
460:
461: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
462: iex_debug_pub.LogMessage(G_PKG_NAME || '.SEND_FFM: request_id ' || l_request_id);
463: iex_debug_pub.LogMessage(G_PKG_NAME || '.SEND_FFM: Return status ' || l_return_status);
464: END IF;
465: IF l_return_status <> 'S' then

Line 473: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

469: end if;
470: end if;
471: EXCEPTION
472: WHEN OTHERS THEN
473: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
474: iex_debug_pub.LogMessage(G_PKG_NAME || '.SET_STRATEGY: in exception');
475: END IF;
476: end;
477:

Line 494: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

490: CURSOR ptp_wf_crs IS
491: select IEX_PTP_WF_S.NEXTVAL from dual;
492: begin
493: l_wf_process := 'PROMISE_WORKFLOW';
494: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
495: iex_debug_pub.LogMessage(G_PKG_NAME || '.start_ptp_wf: start');
496: END IF;
497: l_approval_required := fnd_profile.value('IEX_PTP_APPROVAL');
498: l_wf_item_type := fnd_profile.value('IEX_PTP_WF_ITEM_TYPE');

Line 499: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

495: iex_debug_pub.LogMessage(G_PKG_NAME || '.start_ptp_wf: start');
496: END IF;
497: l_approval_required := fnd_profile.value('IEX_PTP_APPROVAL');
498: l_wf_item_type := fnd_profile.value('IEX_PTP_WF_ITEM_TYPE');
499: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
500: iex_debug_pub.LogMessage(G_PKG_NAME || '.start_ptp_wf: approval required = ' || l_approval_required);
501: iex_debug_pub.LogMessage(G_PKG_NAME || '.start_ptp_wf: item type = ' || l_wf_item_type);
502: END IF;
503:

Line 515: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

511: FETCH ptp_wf_crs INTO l_ptp_wf_item_key;
512: CLOSE ptp_wf_crs;
513:
514: l_item_key := 'IEX_PTP_' || TO_CHAR(l_ptp_wf_item_key);
515: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
516: iex_debug_pub.LogMessage(G_PKG_NAME || '.start_ptp_wf: item key = ' || l_item_key);
517: END IF;
518:
519: wf_engine.createprocess(

Line 523: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

519: wf_engine.createprocess(
520: itemtype => l_wf_item_type,
521: itemkey => l_item_key,
522: process => l_wf_process);
523: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
524: iex_debug_pub.LogMessage(G_PKG_NAME || '.start_ptp_wf: After createprocess');
525: END IF;
526:
527: wf_engine.setitemattrnumber(

Line 532: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

528: itemtype => l_wf_item_type,
529: itemkey => l_item_key,
530: aname => 'PROMISE_ID',
531: avalue => p_promise_id);
532: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
533: iex_debug_pub.LogMessage(G_PKG_NAME || '.start_ptp_wf: After setitemattrnumber');
534: END IF;
535:
536: wf_engine.startprocess(

Line 539: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

535:
536: wf_engine.startprocess(
537: itemtype => l_wf_item_type,
538: itemkey => l_item_key);
539: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
540: iex_debug_pub.LogMessage(G_PKG_NAME || '.start_ptp_wf: After startprocess');
541: END IF;
542:
543: wf_engine.ItemStatus(

Line 549: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

545: itemkey => l_item_key,
546: status => l_return_status,
547: result => l_result);
548:
549: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
550: iex_debug_pub.LogMessage(G_PKG_NAME || '.start_ptp_wf: l_return_status = ' || l_return_status);
551: iex_debug_pub.LogMessage(G_PKG_NAME || '.start_ptp_wf: l_result = ' || l_result);
552: END IF;
553:

Line 555: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

551: iex_debug_pub.LogMessage(G_PKG_NAME || '.start_ptp_wf: l_result = ' || l_result);
552: END IF;
553:
554: if l_return_status = 'COMPLETE' THEN
555: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
556: iex_debug_pub.LogMessage(G_PKG_NAME || '.start_ptp_wf: Set promise status to PENDING');
557: END IF;
558: x_promise_status := 'PENDING';
559: end if;

Line 561: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

557: END IF;
558: x_promise_status := 'PENDING';
559: end if;
560: end if;
561: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
562: iex_debug_pub.LogMessage(G_PKG_NAME || '.start_ptp_wf: return_status = ' || x_promise_status);
563: iex_debug_pub.LogMessage(G_PKG_NAME || '.start_ptp_wf: end');
564: END IF;
565: EXCEPTION

Line 567: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

563: iex_debug_pub.LogMessage(G_PKG_NAME || '.start_ptp_wf: end');
564: END IF;
565: EXCEPTION
566: WHEN OTHERS THEN
567: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
568: iex_debug_pub.LogMessage(G_PKG_NAME || '.start_ptp_wf: In start_ptp_wf exception');
569: END IF;
570: end;
571:

Line 578: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

574: IS
575: l_grace_period number;
576: l_broken_on_date date;
577: begin
578: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
579: iex_debug_pub.LogMessage(G_PKG_NAME || '.get_broken_on_date: start');
580: END IF;
581: l_grace_period := to_number(nvl(fnd_profile.value('IEX_PTP_GRACE_PERIOD'), '0'));
582: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 582: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

578: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
579: iex_debug_pub.LogMessage(G_PKG_NAME || '.get_broken_on_date: start');
580: END IF;
581: l_grace_period := to_number(nvl(fnd_profile.value('IEX_PTP_GRACE_PERIOD'), '0'));
582: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
583: iex_debug_pub.LogMessage(G_PKG_NAME || '.get_broken_on_date: grace period = ' || l_grace_period);
584: END IF;
585: l_broken_on_date := p_promise_date + l_grace_period;
586: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 586: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

582: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
583: iex_debug_pub.LogMessage(G_PKG_NAME || '.get_broken_on_date: grace period = ' || l_grace_period);
584: END IF;
585: l_broken_on_date := p_promise_date + l_grace_period;
586: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
587: iex_debug_pub.LogMessage(G_PKG_NAME || '.get_broken_on_date: broken on date = ' || l_broken_on_date);
588: END IF;
589: x_broken_on_date := l_broken_on_date;
590: end;

Line 611: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

607:
608: begin
609: /* validate promise target */
610: l_validation_item := 'P_PROMISE_REC.PROMISE_TARGET';
611: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
612: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
613: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.PROMISE_TARGET);
614: END IF;
615: if P_PROMISE_REC.PROMISE_TARGET is null or

Line 621: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

617: P_PROMISE_REC.PROMISE_TARGET <> 'INVOICES' and
618: P_PROMISE_REC.PROMISE_TARGET <> 'CNSLD' and
619: P_PROMISE_REC.PROMISE_TARGET <> 'CONTRACTS')
620: then
621: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
622: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');
623: END IF;
624: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
625: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);

Line 633: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

629: end if;
630:
631: /* validate promise_amount */
632: l_validation_item := 'P_PROMISE_REC.PROMISE_AMOUNT';
633: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
634: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
635: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.PROMISE_AMOUNT);
636: END IF;
637: if P_PROMISE_REC.PROMISE_AMOUNT is null or P_PROMISE_REC.PROMISE_AMOUNT <= 0 then

Line 638: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

634: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
635: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.PROMISE_AMOUNT);
636: END IF;
637: if P_PROMISE_REC.PROMISE_AMOUNT is null or P_PROMISE_REC.PROMISE_AMOUNT <= 0 then
638: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
639: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');
640: END IF;
641: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
642: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);

Line 650: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

646: end if;
647:
648: /* validate promise_date */
649: l_validation_item := 'P_PROMISE_REC.PROMISE_DATE';
650: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
651: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
652: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.PROMISE_DATE);
653: END IF;
654: if P_PROMISE_REC.PROMISE_DATE is null or trunc(P_PROMISE_REC.PROMISE_DATE) < trunc(sysdate) then

Line 655: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

651: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
652: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.PROMISE_DATE);
653: END IF;
654: if P_PROMISE_REC.PROMISE_DATE is null or trunc(P_PROMISE_REC.PROMISE_DATE) < trunc(sysdate) then
655: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
656: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');
657: END IF;
658: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
659: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);

Line 667: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

663: end if;
664:
665: /* validate currency */
666: l_validation_item := 'P_PROMISE_REC.CURRENCY_CODE';
667: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
668: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
669: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.CURRENCY_CODE);
670: END IF;
671: if P_PROMISE_REC.CURRENCY_CODE is null then

Line 672: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

668: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
669: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.CURRENCY_CODE);
670: END IF;
671: if P_PROMISE_REC.CURRENCY_CODE is null then
672: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
673: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');
674: END IF;
675: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
676: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);

Line 684: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

680: end if;
681:
682: /* validate resource_id */
683: l_validation_item := 'P_PROMISE_REC.TAKEN_BY_RESOURCE_ID';
684: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
685: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
686: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.TAKEN_BY_RESOURCE_ID);
687: END IF;
688: if P_PROMISE_REC.TAKEN_BY_RESOURCE_ID is null then

Line 689: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

685: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
686: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.TAKEN_BY_RESOURCE_ID);
687: END IF;
688: if P_PROMISE_REC.TAKEN_BY_RESOURCE_ID is null then
689: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
690: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');
691: END IF;
692: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
693: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);

Line 712: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

708: x_functional_currency => l_fun_currency);
709:
710: /* validate payment_method */
711: l_validation_item := 'P_PROMISE_REC.PROMISE_PAYMENT_METHOD';
712: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
713: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
714: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.PROMISE_PAYMENT_METHOD);
715: END IF;
716: if P_PROMISE_REC.PROMISE_PAYMENT_METHOD is not null and rtrim(P_PROMISE_REC.PROMISE_PAYMENT_METHOD) <> '' then

Line 728: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

724: using P_PROMISE_REC.PROMISE_PAYMENT_METHOD;
725: fetch l_cursor into l_result_varchar;
726:
727: if l_cursor%rowcount = 0 or l_result_varchar is null then
728: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
729: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation: wrong payment method');
730: END IF;
731: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
732: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);

Line 738: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

734: FND_MSG_PUB.Add;
735: RAISE FND_API.G_EXC_ERROR;
736: end if;
737: else
738: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
739: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' is null - nothing to validate');
740: END IF;
741: end if;
742:

Line 745: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

741: end if;
742:
743: /* validate cust_account_id */
744: l_validation_item := 'P_PROMISE_REC.CUST_ACCOUNT_ID';
745: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
746: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
747: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.CUST_ACCOUNT_ID);
748: END IF;
749: if P_PROMISE_REC.CUST_ACCOUNT_ID is null then

Line 750: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

746: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
747: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.CUST_ACCOUNT_ID);
748: END IF;
749: if P_PROMISE_REC.CUST_ACCOUNT_ID is null then
750: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
751: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');
752: END IF;
753: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
754: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);

Line 765: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

761: if P_PROMISE_REC.PROMISE_TARGET = 'ACCOUNTS' then
762:
763: /* validate promise date */
764: l_validation_item := 'P_PROMISE_REC.PROMISE_DATE';
765: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
766: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item || ' for dublicates');
767: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.PROMISE_DATE);
768: END IF;
769:

Line 783: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

779: using P_PROMISE_REC.CUST_ACCOUNT_ID, P_PROMISE_REC.PROMISE_DATE;
780: fetch l_cursor into l_result_num;
781:
782: if l_cursor%rowcount = 0 or l_result_num > 0 then
783: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
784: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');
785: END IF;
786: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
787: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);

Line 795: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

791: end if;
792:
793: /* validate promise currency */
794: l_validation_item := 'P_PROMISE_REC.CURRENCY_CODE';
795: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
796: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
797: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.CURRENCY_CODE);
798: END IF;
799: if P_PROMISE_REC.CURRENCY_CODE <> l_fun_currency then

Line 800: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

796: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
797: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.CURRENCY_CODE);
798: END IF;
799: if P_PROMISE_REC.CURRENCY_CODE <> l_fun_currency then
800: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
801: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');
802: END IF;
803: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
804: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);

Line 814: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

810: elsif P_PROMISE_REC.PROMISE_TARGET = 'INVOICES' then
811:
812: /* validate delinquency_id */
813: l_validation_item := 'P_PROMISE_REC.DELINQUENCY_ID';
814: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
815: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
816: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.DELINQUENCY_ID);
817: END IF;
818: if P_PROMISE_REC.DELINQUENCY_ID is null then

Line 819: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

815: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
816: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.DELINQUENCY_ID);
817: END IF;
818: if P_PROMISE_REC.DELINQUENCY_ID is null then
819: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
820: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');
821: END IF;
822: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
823: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);

Line 831: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

827: end if;
828:
829: /* validate promise date */
830: l_validation_item := 'P_PROMISE_REC.PROMISE_DATE';
831: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
832: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item || ' for dublicates');
833: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.PROMISE_DATE);
834: END IF;
835:

Line 852: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

848: P_PROMISE_REC.PROMISE_DATE;
849: fetch l_cursor into l_result_num;
850:
851: if l_cursor%rowcount = 0 or l_result_num > 0 then
852: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
853: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');
854: END IF;
855: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
856: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);

Line 864: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

860: end if;
861:
862: /* validate promise currency */
863: l_validation_item := 'P_PROMISE_REC.CURRENCY_CODE';
864: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
865: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
866: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.CURRENCY_CODE);
867: END IF;
868: l_SQL := 'SELECT PSA.INVOICE_CURRENCY_CODE ' ||

Line 879: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

875: using P_PROMISE_REC.DELINQUENCY_ID;
876: fetch l_cursor into l_result_varchar;
877:
878: if l_cursor%rowcount = 0 or l_result_varchar is null or l_result_varchar <> P_PROMISE_REC.CURRENCY_CODE then
879: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
880: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');
881: END IF;
882: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
883: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);

Line 893: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

889: elsif P_PROMISE_REC.PROMISE_TARGET = 'CNSLD' then
890:
891: /* validate consolidated_invoice_id */
892: l_validation_item := 'P_PROMISE_REC.CNSLD_INVOICE_ID';
893: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
894: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
895: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.CNSLD_INVOICE_ID);
896: END IF;
897: if P_PROMISE_REC.CNSLD_INVOICE_ID is null then

Line 898: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

894: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
895: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.CNSLD_INVOICE_ID);
896: END IF;
897: if P_PROMISE_REC.CNSLD_INVOICE_ID is null then
898: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
899: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');
900: END IF;
901: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
902: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);

Line 910: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

906: end if;
907:
908: /* validate promise date */
909: l_validation_item := 'P_PROMISE_REC.PROMISE_DATE';
910: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
911: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item || ' for dublicates');
912: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.PROMISE_DATE);
913: END IF;
914:

Line 931: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

927: P_PROMISE_REC.PROMISE_DATE;
928: fetch l_cursor into l_result_num;
929:
930: if l_cursor%rowcount = 0 or l_result_num > 0 then
931: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
932: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');
933: END IF;
934: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
935: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);

Line 943: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

939: end if;
940:
941: /* validate promise currency */
942: l_validation_item := 'P_PROMISE_REC.CURRENCY_CODE';
943: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
944: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
945: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.CURRENCY_CODE);
946: END IF;
947:

Line 958: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

954: using P_PROMISE_REC.CNSLD_INVOICE_ID;
955: fetch l_cursor into l_result_varchar;
956:
957: if l_cursor%rowcount = 0 or l_result_varchar is null or l_result_varchar <> P_PROMISE_REC.CURRENCY_CODE then
958: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
959: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');
960: END IF;
961: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
962: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);

Line 972: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

968: elsif P_PROMISE_REC.PROMISE_TARGET = 'CONTRACTS' then
969:
970: /* validate contract_id */
971: l_validation_item := 'P_PROMISE_REC.CONTRACT_ID';
972: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
973: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
974: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.CONTRACT_ID);
975: END IF;
976: if P_PROMISE_REC.CONTRACT_ID is null then

Line 977: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

973: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
974: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.CONTRACT_ID);
975: END IF;
976: if P_PROMISE_REC.CONTRACT_ID is null then
977: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
978: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');
979: END IF;
980: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
981: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);

Line 989: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

985: end if;
986:
987: /* validate promise date */
988: l_validation_item := 'P_PROMISE_REC.PROMISE_DATE';
989: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
990: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item || ' for dublicates');
991: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.PROMISE_DATE);
992: END IF;
993:

Line 1010: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1006: P_PROMISE_REC.PROMISE_DATE;
1007: fetch l_cursor into l_result_num;
1008:
1009: if l_cursor%rowcount = 0 or l_result_num > 0 then
1010: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1011: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');
1012: END IF;
1013: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
1014: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);

Line 1022: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1018: end if;
1019:
1020: /* validate promise currency */
1021: l_validation_item := 'P_PROMISE_REC.CURRENCY_CODE';
1022: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1023: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating ' || l_validation_item);
1024: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.CURRENCY_CODE);
1025: END IF;
1026:

Line 1044: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1040: using P_PROMISE_REC.CONTRACT_ID;
1041: fetch l_cursor into l_result_varchar;
1042:
1043: if l_cursor%rowcount = 0 or l_result_varchar is null or l_result_varchar <> P_PROMISE_REC.CURRENCY_CODE then
1044: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1045: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': ' || l_validation_item || ' failed validation');
1046: END IF;
1047: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
1048: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_api_name);

Line 1122: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1118: -- Initialize API return status to success
1119: l_return_status := FND_API.G_RET_STS_SUCCESS;
1120:
1121: -- START OF BODY OF API
1122: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1123: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Start of body');
1124: END IF;
1125:
1126: /* validate input */

Line 1127: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1123: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Start of body');
1124: END IF;
1125:
1126: /* validate input */
1127: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1128: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating input...');
1129: END IF;
1130:
1131: VALIDATE_INSERT_INPUT(P_PROMISE_REC);

Line 1134: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1130:
1131: VALIDATE_INSERT_INPUT(P_PROMISE_REC);
1132:
1133: /* validate payer info */
1134: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1135: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating parties...');
1136: END IF;
1137:
1138: IEX_PAYMENTS_PUB.GET_PAYER_INFO(

Line 1148: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1144: X_PAYER_NUM_ID => l_payer_num_id,
1145: X_PAYER_ID => l_payer_id,
1146: X_PAYER_NAME => l_payer_name);
1147:
1148: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1149: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Generate new promise_id');
1150: END IF;
1151:
1152: -- generate new promise id

Line 1157: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1153: OPEN prd_genid_crs;
1154: FETCH prd_genid_crs INTO l_promise_id;
1155: CLOSE prd_genid_crs;
1156:
1157: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1158: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': new promise_id = ' || l_promise_id);
1159: END IF;
1160:
1161: -- get broken on date

Line 1172: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1168: open c_org_id(P_PROMISE_REC.DELINQUENCY_ID);
1169: fetch c_org_id into l_org_id;
1170: close c_org_id;
1171:
1172: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1173: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Doing insert...');
1174: END IF;
1175:
1176: INSERT INTO IEX_PROMISE_DETAILS

Line 1273: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1269: X_PRORESP_REC.PROMISE_ID := l_promise_id;
1270: X_PRORESP_REC.STATUS := l_promise_status;
1271: X_PRORESP_REC.STATE := l_promise_state;
1272:
1273: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1274: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Insert OK');
1275: END IF;
1276:
1277: If nvl(fnd_profile.value('IEX_ALLOW_DUN_FULL_PROMISE'),'N')= 'Y' then -- added for bug 14318148

Line 1279: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1275: END IF;
1276:
1277: If nvl(fnd_profile.value('IEX_ALLOW_DUN_FULL_PROMISE'),'N')= 'Y' then -- added for bug 14318148
1278: --start
1279: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1280: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Calling update_del_stage_level');
1281: END IF;
1282: update_del_stage_level (
1283: p_promise_id => l_promise_id,

Line 1288: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1284: X_RETURN_STATUS => l_return_status,
1285: X_MSG_COUNT => l_msg_count,
1286: X_MSG_DATA => l_msg_data);
1287:
1288: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1289: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': After call to update_del_stage_level');
1290: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Status = ' || L_RETURN_STATUS);
1291: END IF;
1292: -- check for errors

Line 1294: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1290: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Status = ' || L_RETURN_STATUS);
1291: END IF;
1292: -- check for errors
1293: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1294: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1295: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': update_del_stage_level failed');
1296: END IF;
1297: RAISE FND_API.G_EXC_ERROR;
1298: END IF;

Line 1304: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1300: End If; -- added for bug 14318148
1301: -- inserting a note
1302: if P_PROMISE_REC.NOTE is not null then
1303:
1304: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1305: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Going to build context for note...');
1306: END IF;
1307:
1308: i := 1;

Line 1329: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1325: l_context_tab(i).context_id := l_promise_id;
1326: i := i + 1;
1327:
1328: FOR i IN 1..l_context_tab.COUNT LOOP
1329: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1330: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_context_tab(' || i || ').context_type = ' || l_context_tab(i).context_type);
1331: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_context_tab(' || i || ').context_id = ' || l_context_tab(i).context_id);
1332: END IF;
1333: END LOOP;

Line 1335: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1331: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_context_tab(' || i || ').context_id = ' || l_context_tab(i).context_id);
1332: END IF;
1333: END LOOP;
1334:
1335: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1336: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Calling IEX_NOTES_PVT.Create_Note...');
1337: END IF;
1338:
1339: IEX_NOTES_PVT.Create_Note(

Line 1356: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1352: x_note_id => l_note_id);
1353:
1354: X_PRORESP_REC.NOTE_ID := l_note_id;
1355:
1356: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1357: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': After call to IEX_NOTES_PVT.Create_Note');
1358: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Status = ' || L_RETURN_STATUS);
1359: END IF;
1360:

Line 1363: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1359: END IF;
1360:
1361: -- check for errors
1362: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1363: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1364: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': IEX_NOTES_PVT.Create_Note failed');
1365: END IF;
1366: RAISE FND_API.G_EXC_ERROR;
1367: END IF;

Line 1369: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1365: END IF;
1366: RAISE FND_API.G_EXC_ERROR;
1367: END IF;
1368: else
1369: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1370: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': no note to save');
1371: END IF;
1372: end if;
1373:

Line 1388: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1384:
1385: -- Standard check of p_commit.
1386: IF FND_API.To_Boolean( p_commit ) THEN
1387: COMMIT WORK;
1388: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1389: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': commited');
1390: END IF;
1391: END IF;
1392:

Line 1400: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1396: p_encoded => FND_API.G_FALSE,
1397: p_count => x_msg_count,
1398: p_data => x_msg_data);
1399:
1400: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1401: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': end of API');
1402: END IF;
1403:
1404: EXCEPTION

Line 1478: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1474: 'PROMISE_DATE = :P_PROMISE_DATE AND ' ||
1475: 'STATUS in (''COLLECTABLE'', ''PENDING'')';
1476: /* validate promise id */
1477: l_validation_item := 'P_PROMISE_REC.PROMISE_ID';
1478: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1479: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
1480: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.PROMISE_ID);
1481: END IF;
1482: if P_PROMISE_REC.PROMISE_ID is null then

Line 1483: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1479: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
1480: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.PROMISE_ID);
1481: END IF;
1482: if P_PROMISE_REC.PROMISE_ID is null then
1483: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1484: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' failed validation');
1485: END IF;
1486: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
1487: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_procedure);

Line 1495: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1491: end if;
1492:
1493: /* validate promise_amount */
1494: l_validation_item := 'P_PROMISE_REC.PROMISE_AMOUNT';
1495: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1496: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
1497: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.PROMISE_AMOUNT);
1498: END IF;
1499: if P_PROMISE_REC.PROMISE_AMOUNT is null or P_PROMISE_REC.PROMISE_AMOUNT <= 0 then

Line 1500: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1496: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
1497: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.PROMISE_AMOUNT);
1498: END IF;
1499: if P_PROMISE_REC.PROMISE_AMOUNT is null or P_PROMISE_REC.PROMISE_AMOUNT <= 0 then
1500: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1501: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' failed validation');
1502: END IF;
1503: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
1504: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_procedure);

Line 1512: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1508: end if;
1509:
1510: /* validate resource_id */
1511: l_validation_item := 'P_PROMISE_REC.TAKEN_BY_RESOURCE_ID';
1512: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1513: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
1514: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.TAKEN_BY_RESOURCE_ID);
1515: END IF;
1516: if P_PROMISE_REC.TAKEN_BY_RESOURCE_ID is null then

Line 1517: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1513: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
1514: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.TAKEN_BY_RESOURCE_ID);
1515: END IF;
1516: if P_PROMISE_REC.TAKEN_BY_RESOURCE_ID is null then
1517: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1518: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' failed validation: resource id must be set');
1519: END IF;
1520: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
1521: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_procedure);

Line 1528: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1524: RAISE FND_API.G_EXC_ERROR;
1525: end if;
1526:
1527: /* pull data from db to do some validation */
1528: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1529: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating db data');
1530: END IF;
1531: l_SQL := 'SELECT CUST_ACCOUNT_ID, DELINQUENCY_ID, CNSLD_INVOICE_ID, CONTRACT_ID, STATUS, STATE, PROMISE_AMOUNT, AMOUNT_DUE_REMAINING ' ||
1532: 'FROM IEX_PROMISE_DETAILS ' ||

Line 1539: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1535:
1536: open l_cursor for l_SQL
1537: using P_PROMISE_REC.PROMISE_ID;
1538: fetch l_cursor into l_cust_id, l_del_id, l_cnsld_id, l_cntr_id, l_promise_status, l_promise_state, l_promise_amount, l_remaining_amount;
1539: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1540: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': From db:');
1541: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Cust_account_id = ' || l_cust_id);
1542: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Delinquency_id = ' || l_promise_status);
1543: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Cnsld_id = ' || l_cnsld_id);

Line 1553: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1549: END IF;
1550:
1551: /* validate promise_status */
1552: l_validation_item := 'STATUS';
1553: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1554: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
1555: END IF;
1556: if l_promise_status <> 'COLLECTABLE' then
1557: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 1557: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1553: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1554: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
1555: END IF;
1556: if l_promise_status <> 'COLLECTABLE' then
1557: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1558: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' failed validation: status is not COLLECTABLE');
1559: END IF;
1560: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
1561: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_procedure);

Line 1569: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1565: end if;
1566:
1567: /* validate promise_state */
1568: l_validation_item := 'STATE';
1569: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1570: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
1571: END IF;
1572: if l_promise_state <> 'PROMISE' then
1573: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 1573: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1569: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1570: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
1571: END IF;
1572: if l_promise_state <> 'PROMISE' then
1573: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1574: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' failed validation: state is not PROMISE');
1575: END IF;
1576: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
1577: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_procedure);

Line 1585: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1581: end if;
1582:
1583: /* validate remaining amount */
1584: l_validation_item := 'AMOUNT_DUE_REMAINING';
1585: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1586: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
1587: END IF;
1588: if l_remaining_amount <> l_promise_amount then
1589: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 1589: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1585: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1586: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
1587: END IF;
1588: if l_remaining_amount <> l_promise_amount then
1589: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1590: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' failed validation: remaining amount <> promise amount');
1591: END IF;
1592: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
1593: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_procedure);

Line 1601: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1597: end if;
1598:
1599: /* validate promise_date */
1600: l_validation_item := 'P_PROMISE_REC.PROMISE_DATE';
1601: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1602: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
1603: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.PROMISE_DATE);
1604: END IF;
1605: if P_PROMISE_REC.PROMISE_DATE is null or trunc(P_PROMISE_REC.PROMISE_DATE) < trunc(sysdate) then

Line 1606: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1602: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
1603: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.PROMISE_DATE);
1604: END IF;
1605: if P_PROMISE_REC.PROMISE_DATE is null or trunc(P_PROMISE_REC.PROMISE_DATE) < trunc(sysdate) then
1606: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1607: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' failed validation: promise_date must be >= current date');
1608: END IF;
1609: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
1610: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_procedure);

Line 1616: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1612: FND_MSG_PUB.Add;
1613: RAISE FND_API.G_EXC_ERROR;
1614: end if;
1615:
1616: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1617: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item || ' for dublicates');
1618: END IF;
1619:
1620: /* building sql stmt to check for duplicates */

Line 1653: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1649: 'PROMISE_DATE = :P_PROMISE_DATE AND ' ||
1650: 'STATUS in (''COLLECTABLE'', ''PENDING'')';
1651: */
1652:
1653: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1654: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': l_SQL = ' || l_SQL);
1655: END IF;
1656:
1657: open l_cursor for l_SQL

Line 1663: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1659: P_PROMISE_REC.PROMISE_DATE;
1660: fetch l_cursor into l_result_num;
1661:
1662: if l_cursor%rowcount = 0 or l_result_num > 0 then
1663: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1664: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' failed validation: found promise date duplication');
1665: END IF;
1666: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
1667: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_procedure);

Line 1675: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1671: end if;
1672:
1673: /* validate payment_method */
1674: l_validation_item := 'P_PROMISE_REC.PROMISE_PAYMENT_METHOD';
1675: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1676: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
1677: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' = ''' || rtrim(P_PROMISE_REC.PROMISE_PAYMENT_METHOD) || '''');
1678: END IF;
1679: if P_PROMISE_REC.PROMISE_PAYMENT_METHOD is not null and rtrim(P_PROMISE_REC.PROMISE_PAYMENT_METHOD) <> '' then

Line 1691: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1687: using P_PROMISE_REC.PROMISE_PAYMENT_METHOD;
1688: fetch l_cursor into l_result_varchar;
1689:
1690: if l_cursor%rowcount = 0 or l_result_varchar is null then
1691: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1692: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' failed validation: wrong payment method');
1693: END IF;
1694: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
1695: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_procedure);

Line 1701: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1697: FND_MSG_PUB.Add;
1698: RAISE FND_API.G_EXC_ERROR;
1699: end if;
1700: else
1701: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1702: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' is null - nothing to validate');
1703: END IF;
1704: end if;
1705:

Line 1760: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1756: -- Initialize API return status to success
1757: l_return_status := FND_API.G_RET_STS_SUCCESS;
1758:
1759: -- START OF BODY OF API
1760: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1761: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Start of body');
1762: END IF;
1763:
1764: /* validate input */

Line 1765: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1761: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Start of body');
1762: END IF;
1763:
1764: /* validate input */
1765: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1766: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating input...');
1767: END IF;
1768: VALIDATE_UPDATE_INPUT(P_PROMISE_REC);
1769:

Line 1771: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1767: END IF;
1768: VALIDATE_UPDATE_INPUT(P_PROMISE_REC);
1769:
1770: /* validate promiser info */
1771: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1772: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating parties...');
1773: END IF;
1774: IEX_PAYMENTS_PUB.GET_PAYER_INFO(
1775: P_PAYER_PARTY_REL_ID => P_PROMISE_REC.PROMISED_BY_PARTY_REL_ID,

Line 1790: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1786: /* start workflow and get new promise status */
1787: START_PTP_WF(P_PROMISE_ID => l_promise_id, X_PROMISE_STATUS => l_promise_status);
1788:
1789: /* do update */
1790: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1791: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Doing update...');
1792: END IF;
1793:
1794: UPDATE iex_promise_details

Line 1828: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1824: last_updated_by = G_USER_ID,
1825: LAST_UPDATE_LOGIN = G_LOGIN_ID
1826: where promise_detail_id = P_PROMISE_REC.PROMISE_ID;
1827:
1828: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1829: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Update OK');
1830: END IF;
1831:
1832: X_PRORESP_REC.PROMISE_ID := P_PROMISE_REC.PROMISE_ID;

Line 1843: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1839: using P_PROMISE_REC.PROMISE_ID;
1840: fetch l_cursor into X_PRORESP_REC.STATE;
1841: If nvl(fnd_profile.value('IEX_ALLOW_DUN_FULL_PROMISE'),'N')= 'Y' then -- added for bug 14318148
1842: --start
1843: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1844: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Calling update_del_stage_level');
1845: END IF;
1846: update_del_stage_level (
1847: p_promise_id => P_PROMISE_REC.PROMISE_ID,

Line 1852: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1848: X_RETURN_STATUS => l_return_status,
1849: X_MSG_COUNT => l_msg_count,
1850: X_MSG_DATA => l_msg_data);
1851:
1852: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1853: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': After call to update_del_stage_level');
1854: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Status = ' || L_RETURN_STATUS);
1855: END IF;
1856: -- check for errors

Line 1858: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1854: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Status = ' || L_RETURN_STATUS);
1855: END IF;
1856: -- check for errors
1857: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1858: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1859: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': update_del_stage_level failed');
1860: END IF;
1861: RAISE FND_API.G_EXC_ERROR;
1862: END IF;

Line 1868: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1864: End If; -- added for bug 14318148
1865: -- inserting a note
1866: if P_PROMISE_REC.NOTE is not null then
1867:
1868: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1869: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Going to build context for note...');
1870: END IF;
1871:
1872: i := 1;

Line 1902: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1898: l_context_tab(i).context_id := P_PROMISE_REC.PROMISE_ID;
1899: i := i + 1;
1900:
1901: FOR i IN 1..l_context_tab.COUNT LOOP
1902: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1903: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_context_tab(' || i || ').context_type = ' || l_context_tab(i).context_type);
1904: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_context_tab(' || i || ').context_id = ' || l_context_tab(i).context_id);
1905: END IF;
1906: END LOOP;

Line 1908: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1904: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_context_tab(' || i || ').context_id = ' || l_context_tab(i).context_id);
1905: END IF;
1906: END LOOP;
1907:
1908: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1909: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Calling IEX_NOTES_PVT.Create_Note...');
1910: END IF;
1911:
1912: IEX_NOTES_PVT.Create_Note(

Line 1929: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1925: x_note_id => l_note_id);
1926:
1927: X_PRORESP_REC.NOTE_ID := l_note_id;
1928:
1929: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1930: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': After call to IEX_NOTES_PVT.Create_Note');
1931: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Status = ' || L_RETURN_STATUS);
1932: END IF;
1933:

Line 1936: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1932: END IF;
1933:
1934: -- check for errors
1935: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1936: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1937: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': IEX_NOTES_PVT.Create_Note failed');
1938: END IF;
1939: RAISE FND_API.G_EXC_ERROR;
1940: END IF;

Line 1942: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1938: END IF;
1939: RAISE FND_API.G_EXC_ERROR;
1940: END IF;
1941: else
1942: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1943: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': no note to save');
1944: END IF;
1945: end if;
1946:

Line 1958: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1954: */
1955: -- commit if promise updated successfully
1956: IF FND_API.To_Boolean( p_commit ) THEN
1957: COMMIT WORK;
1958: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1959: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': commited');
1960: END IF;
1961: END IF;
1962:

Line 1972: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1968: p_encoded => FND_API.G_FALSE,
1969: p_count => x_msg_count,
1970: p_data => x_msg_data);
1971:
1972: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1973: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': end of API');
1974: END IF;
1975:
1976: EXCEPTION

Line 2006: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2002: begin
2003: l_procedure := 'VALIDATE_CANCEL_INPUT';
2004: /* validate promise id */
2005: l_validation_item := 'P_PROMISE_REC.PROMISE_ID';
2006: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2007: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
2008: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.PROMISE_ID);
2009: END IF;
2010: if P_PROMISE_REC.PROMISE_ID is null then

Line 2011: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2007: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
2008: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.PROMISE_ID);
2009: END IF;
2010: if P_PROMISE_REC.PROMISE_ID is null then
2011: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2012: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' failed validation');
2013: END IF;
2014: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
2015: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_procedure);

Line 2023: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2019: end if;
2020:
2021: /* validate resource_id */
2022: l_validation_item := 'P_PROMISE_REC.TAKEN_BY_RESOURCE_ID';
2023: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2024: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
2025: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.TAKEN_BY_RESOURCE_ID);
2026: END IF;
2027: if P_PROMISE_REC.TAKEN_BY_RESOURCE_ID is null then

Line 2028: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2024: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
2025: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.TAKEN_BY_RESOURCE_ID);
2026: END IF;
2027: if P_PROMISE_REC.TAKEN_BY_RESOURCE_ID is null then
2028: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2029: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' failed validation: resource id must be set');
2030: END IF;
2031: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
2032: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_procedure);

Line 2093: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2089: -- Initialize API return status to success
2090: l_return_status := FND_API.G_RET_STS_SUCCESS;
2091:
2092: -- START OF BODY OF API
2093: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2094: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Start of body');
2095: END IF;
2096:
2097: /* validate input */

Line 2098: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2094: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Start of body');
2095: END IF;
2096:
2097: /* validate input */
2098: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2099: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating input...');
2100: END IF;
2101: VALIDATE_CANCEL_INPUT(P_PROMISE_REC);
2102:

Line 2104: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2100: END IF;
2101: VALIDATE_CANCEL_INPUT(P_PROMISE_REC);
2102:
2103: /* validate promiser info */
2104: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2105: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating parties...');
2106: END IF;
2107: IEX_PAYMENTS_PUB.GET_PAYER_INFO(
2108: P_PAYER_PARTY_REL_ID => P_PROMISE_REC.PROMISED_BY_PARTY_REL_ID,

Line 2118: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2114: X_PAYER_ID => l_payer_id,
2115: X_PAYER_NAME => l_payer_name);
2116:
2117: /* do update */
2118: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2119: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Doing update...');
2120: END IF;
2121:
2122: UPDATE iex_promise_details

Line 2148: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2144: ATTRIBUTE14 = P_PROMISE_REC.ATTRIBUTES.ATTRIBUTE14,
2145: ATTRIBUTE15 = P_PROMISE_REC.ATTRIBUTES.ATTRIBUTE15 -- end added by snuthala for bug 10373547 12/16/2010
2146: where promise_detail_id = P_PROMISE_REC.PROMISE_ID;
2147:
2148: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2149: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Update OK');
2150: END IF;
2151: X_PRORESP_REC.PROMISE_ID := P_PROMISE_REC.PROMISE_ID;
2152: X_PRORESP_REC.STATUS := l_promise_status;

Line 2162: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2158: using P_PROMISE_REC.PROMISE_ID;
2159: fetch l_cursor into X_PRORESP_REC.STATE;
2160: If nvl(fnd_profile.value('IEX_ALLOW_DUN_FULL_PROMISE'),'N')= 'Y' then -- added for bug 14318148
2161: --start
2162: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2163: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Calling update_del_stage_level');
2164: END IF;
2165: update_del_stage_level (
2166: p_promise_id => P_PROMISE_REC.PROMISE_ID,

Line 2171: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2167: X_RETURN_STATUS => l_return_status,
2168: X_MSG_COUNT => l_msg_count,
2169: X_MSG_DATA => l_msg_data);
2170:
2171: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2172: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': After call to update_del_stage_level');
2173: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Status = ' || L_RETURN_STATUS);
2174: END IF;
2175: -- check for errors

Line 2177: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2173: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Status = ' || L_RETURN_STATUS);
2174: END IF;
2175: -- check for errors
2176: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2177: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2178: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': update_del_stage_level failed');
2179: END IF;
2180: RAISE FND_API.G_EXC_ERROR;
2181: END IF;

Line 2187: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2183: End If; -- added for bug 14318148
2184: -- inserting a note
2185: if P_PROMISE_REC.NOTE is not null then
2186:
2187: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2188: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Going to build context for note...');
2189: END IF;
2190: i := 1;
2191: /* assigning source_object and adding parties into note context */

Line 2220: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2216: l_context_tab(i).context_id := P_PROMISE_REC.PROMISE_ID;
2217: i := i + 1;
2218:
2219: FOR i IN 1..l_context_tab.COUNT LOOP
2220: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2221: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_context_tab(' || i || ').context_type = ' || l_context_tab(i).context_type);
2222: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_context_tab(' || i || ').context_id = ' || l_context_tab(i).context_id);
2223: END IF;
2224: END LOOP;

Line 2226: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2222: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_context_tab(' || i || ').context_id = ' || l_context_tab(i).context_id);
2223: END IF;
2224: END LOOP;
2225:
2226: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2227: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Calling IEX_NOTES_PVT.Create_Note...');
2228: END IF;
2229:
2230: IEX_NOTES_PVT.Create_Note(

Line 2247: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2243: x_note_id => l_note_id);
2244:
2245: X_PRORESP_REC.NOTE_ID := l_note_id;
2246:
2247: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2248: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': After call to IEX_NOTES_PVT.Create_Note');
2249: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Status = ' || L_RETURN_STATUS);
2250: END IF;
2251:

Line 2254: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2250: END IF;
2251:
2252: -- check for errors
2253: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2254: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2255: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': IEX_NOTES_PVT.Create_Note failed');
2256: END IF;
2257: RAISE FND_API.G_EXC_ERROR;
2258: END IF;

Line 2260: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2256: END IF;
2257: RAISE FND_API.G_EXC_ERROR;
2258: END IF;
2259: else
2260: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2261: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': no note to save');
2262: END IF;
2263: end if;
2264:

Line 2268: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2264:
2265: -- commit if promise updated successfully
2266: IF FND_API.To_Boolean( p_commit ) THEN
2267: COMMIT WORK;
2268: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2269: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': commited');
2270: END IF;
2271: END IF;
2272:

Line 2282: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2278: p_encoded => FND_API.G_FALSE,
2279: p_count => x_msg_count,
2280: p_data => x_msg_data);
2281:
2282: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2283: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': end of API');
2284: END IF;
2285:
2286: EXCEPTION

Line 2325: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2321: begin
2322: l_procedure := 'VALIDATE_MASS_INPUT';
2323: /* validate delinquency table count */
2324: l_validation_item := 'P_MASS_IDS_TBL.COUNT';
2325: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2326: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
2327: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' = ' || P_MASS_IDS_TBL.COUNT);
2328: END IF;
2329: if P_MASS_IDS_TBL.COUNT = 0 then

Line 2330: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2326: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
2327: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' = ' || P_MASS_IDS_TBL.COUNT);
2328: END IF;
2329: if P_MASS_IDS_TBL.COUNT = 0 then
2330: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2331: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' failed validation: no delinquencies were passed');
2332: END IF;
2333: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
2334: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_procedure);

Line 2344: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2340: --commenting begin for bug 6717279 by gnramasa 25th Aug 08
2341: /* validate that all passed delinquencies belong to the same account */
2342: /*
2343: l_validation_item := 'P_MASS_IDS_TBL';
2344: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2345: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
2346: END IF;
2347: */
2348: /* building sql for validating ids */

Line 2359: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2355: l_SQL := l_SQL || ',' || P_MASS_IDS_TBL(i);
2356: end if;
2357: END LOOP;
2358: l_SQL := l_SQL || ')';
2359: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2360: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': sql = ' || l_SQL);
2361: END IF;
2362:
2363: open l_cursor for l_SQL;

Line 2367: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2363: open l_cursor for l_SQL;
2364: fetch l_cursor into l_result_num;
2365:
2366: if l_result_num > 1 then
2367: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2368: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' failed validation: passed delinquencies belong to different accounts');
2369: END IF;
2370: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
2371: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_procedure);

Line 2380: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2376: */
2377: --commenting end for bug 6717279 by gnramasa 25th Aug 08
2378: /* validate promise_date */
2379: l_validation_item := 'P_PROMISE_REC.PROMISE_DATE';
2380: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2381: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
2382: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.PROMISE_DATE);
2383: END IF;
2384: if P_PROMISE_REC.PROMISE_DATE is null or trunc(P_PROMISE_REC.PROMISE_DATE) < trunc(sysdate) then

Line 2385: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2381: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
2382: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.PROMISE_DATE);
2383: END IF;
2384: if P_PROMISE_REC.PROMISE_DATE is null or trunc(P_PROMISE_REC.PROMISE_DATE) < trunc(sysdate) then
2385: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2386: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' failed validation: promise_date must be >= current date');
2387: END IF;
2388: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
2389: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_procedure);

Line 2397: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2393: end if;
2394:
2395: /* validate resource_id */
2396: l_validation_item := 'P_PROMISE_REC.TAKEN_BY_RESOURCE_ID';
2397: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2398: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
2399: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.TAKEN_BY_RESOURCE_ID);
2400: END IF;
2401: if P_PROMISE_REC.TAKEN_BY_RESOURCE_ID is null then

Line 2402: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2398: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
2399: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' = ' || P_PROMISE_REC.TAKEN_BY_RESOURCE_ID);
2400: END IF;
2401: if P_PROMISE_REC.TAKEN_BY_RESOURCE_ID is null then
2402: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2403: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' failed validation: resource id must be set');
2404: END IF;
2405: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
2406: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_procedure);

Line 2414: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2410: end if;
2411:
2412: /* validate payment_method */
2413: l_validation_item := 'P_PROMISE_REC.PROMISE_PAYMENT_METHOD';
2414: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2415: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': Validating ' || l_validation_item);
2416: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' = ''' || rtrim(P_PROMISE_REC.PROMISE_PAYMENT_METHOD) || '''');
2417: END IF;
2418: if P_PROMISE_REC.PROMISE_PAYMENT_METHOD is not null and rtrim(P_PROMISE_REC.PROMISE_PAYMENT_METHOD) <> '' then

Line 2430: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2426: using P_PROMISE_REC.PROMISE_PAYMENT_METHOD;
2427: fetch l_cursor into l_result_varchar;
2428:
2429: if l_cursor%rowcount = 0 or l_result_varchar is null then
2430: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2431: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' failed validation: wrong payment method');
2432: END IF;
2433: FND_MESSAGE.SET_NAME('IEX','IEX_BAD_API_INPUT');
2434: FND_MESSAGE.SET_TOKEN('API_NAME', G_PKG_NAME || '.' || l_procedure);

Line 2440: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2436: FND_MSG_PUB.Add;
2437: RAISE FND_API.G_EXC_ERROR;
2438: end if;
2439: else
2440: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2441: iex_debug_pub.LogMessage(G_PKG_NAME || '.' ||l_procedure || ': ' || l_validation_item || ' is null - nothing to validate');
2442: END IF;
2443: end if;
2444:

Line 2525: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2521: -- Initialize API return status to success
2522: l_return_status := FND_API.G_RET_STS_SUCCESS;
2523:
2524: -- START OF BODY OF API
2525: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2526: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Start of body');
2527: END IF;
2528:
2529: /* validate input */

Line 2530: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2526: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Start of body');
2527: END IF;
2528:
2529: /* validate input */
2530: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2531: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating input...');
2532: END IF;
2533: VALIDATE_MASS_INPUT(P_MASS_IDS_TBL, P_MASS_PROMISE_REC);
2534:

Line 2536: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2532: END IF;
2533: VALIDATE_MASS_INPUT(P_MASS_IDS_TBL, P_MASS_PROMISE_REC);
2534:
2535: /* validate promiser info */
2536: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2537: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Validating parties...');
2538: END IF;
2539: IEX_PAYMENTS_PUB.GET_PAYER_INFO(
2540: P_PAYER_PARTY_REL_ID => P_MASS_PROMISE_REC.PROMISED_BY_PARTY_REL_ID,

Line 2549: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2545: X_PAYER_NUM_ID => l_payer_num_id,
2546: X_PAYER_ID => l_payer_id,
2547: X_PAYER_NAME => l_payer_name);
2548:
2549: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2550: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Looping thru table of ids...');
2551: END IF;
2552: k := 0;
2553: FOR i IN 1..P_MASS_IDS_TBL.COUNT LOOP

Line 2555: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2551: END IF;
2552: k := 0;
2553: FOR i IN 1..P_MASS_IDS_TBL.COUNT LOOP
2554:
2555: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2556: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': record = ' || i || '; delinquency = ' || P_MASS_IDS_TBL(i));
2557: END IF;
2558:
2559: -- fixed a perf bug 4930381

Line 2572: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2568: open l_cursor for l_SQL
2569: using P_MASS_IDS_TBL(i);
2570: fetch l_cursor into l_cust_account_id, l_cust_site_use_id, l_payment_schedule_id;
2571: close l_cursor;
2572: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2573: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_cust_account_id = ' || l_cust_account_id);
2574: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_cust_site_use_id = ' || l_cust_site_use_id);
2575: END IF;
2576:

Line 2577: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2573: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_cust_account_id = ' || l_cust_account_id);
2574: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_cust_site_use_id = ' || l_cust_site_use_id);
2575: END IF;
2576:
2577: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2578: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Getting promises to be canceled...');
2579: END IF;
2580: l_SQL := 'SELECT PROMISE_DETAIL_ID, PROMISE_AMOUNT, CURRENCY_CODE, STATUS, STATE, AMOUNT_DUE_REMAINING ' ||
2581: 'FROM IEX_PROMISE_DETAILS ' ||

Line 2598: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2594: LOOP
2595: fetch l_cursor into l_promise_id, l_promise_amount, l_currency, l_status, l_state, l_remaining_amount;
2596: exit when l_cursor%NOTFOUND;
2597:
2598: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2599: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_promise_id = ' || l_promise_id);
2600: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_promise_amount = ' || l_promise_amount);
2601: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_currency = ' || l_currency);
2602: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_status = ' || l_status);

Line 2619: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2615: X_MASS_PRORESP_TBL(k).STATE := l_state;
2616: X_MASS_PRORESP_TBL(k).COLLECTABLE_AMOUNT := l_remaining_amount;
2617: l_MASS_IDS_TBL(k) := l_payment_schedule_id;
2618:
2619: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2620: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Canceling the promise...');
2621: END IF;
2622: UPDATE iex_promise_details
2623: SET STATUS = 'CANCELLED',

Line 2632: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2628: last_updated_by = G_USER_ID,
2629: LAST_UPDATE_LOGIN = G_LOGIN_ID
2630: where
2631: PROMISE_DETAIL_ID = l_promise_id;
2632: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2633: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Done');
2634: END IF;
2635:
2636: If nvl(fnd_profile.value('IEX_ALLOW_DUN_FULL_PROMISE'),'N')= 'Y' then -- added for bug 14318148

Line 2638: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2634: END IF;
2635:
2636: If nvl(fnd_profile.value('IEX_ALLOW_DUN_FULL_PROMISE'),'N')= 'Y' then -- added for bug 14318148
2637: --start
2638: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2639: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Calling update_del_stage_level');
2640: END IF;
2641: update_del_stage_level (
2642: p_promise_id => l_promise_id,

Line 2646: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2642: p_promise_id => l_promise_id,
2643: X_RETURN_STATUS => l_return_status,
2644: X_MSG_COUNT => l_msg_count,
2645: X_MSG_DATA => l_msg_data);
2646: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2647: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': After call to update_del_stage_level');
2648: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Status = ' || L_RETURN_STATUS);
2649: END IF;
2650:

Line 2653: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2649: END IF;
2650:
2651: -- check for errors
2652: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2653: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2654: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': update_del_stage_level failed');
2655: END IF;
2656: RAISE FND_API.G_EXC_ERROR;
2657: END IF;

Line 2676: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2672: -- generate new promise id
2673: OPEN prd_genid_crs;
2674: FETCH prd_genid_crs INTO l_promise_id;
2675: CLOSE prd_genid_crs;
2676: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2677: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': new promise_id = ' || l_promise_id);
2678: END IF;
2679:
2680: -- get broken on date

Line 2691: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2687: fetch c_org_id into l_org_id;
2688: close c_org_id;
2689:
2690:
2691: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2692: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Inserting new promise...');
2693: END IF;
2694: INSERT INTO IEX_PROMISE_DETAILS
2695: (

Line 2788: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2784:
2785: --End bug 7237026 17-Nov-2008 barathsr
2786:
2787:
2788: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2789: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Insert OK');
2790: END IF;
2791: If nvl(fnd_profile.value('IEX_ALLOW_DUN_FULL_PROMISE'),'N')= 'Y' then -- added for bug 14318148
2792: --start

Line 2793: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2789: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Insert OK');
2790: END IF;
2791: If nvl(fnd_profile.value('IEX_ALLOW_DUN_FULL_PROMISE'),'N')= 'Y' then -- added for bug 14318148
2792: --start
2793: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2794: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Calling update_del_stage_level');
2795: END IF;
2796: update_del_stage_level (
2797: p_promise_id => l_promise_id,

Line 2801: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2797: p_promise_id => l_promise_id,
2798: X_RETURN_STATUS => l_return_status,
2799: X_MSG_COUNT => l_msg_count,
2800: X_MSG_DATA => l_msg_data);
2801: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2802: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': After call to update_del_stage_level');
2803: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Status = ' || L_RETURN_STATUS);
2804: END IF;
2805:

Line 2808: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2804: END IF;
2805:
2806: -- check for errors
2807: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2808: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2809: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': update_del_stage_level failed');
2810: END IF;
2811: RAISE FND_API.G_EXC_ERROR;
2812: END IF;

Line 2829: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2825: l_MASS_IDS_TBL(k) := l_payment_schedule_id;
2826: END LOOP;
2827:
2828: l_note_type := fnd_profile.value('AST_NOTES_DEFAULT_TYPE');
2829: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2830: iex_debug_pub.LogMessage(l_api_name || ': l_note_type = ' || l_note_type);
2831: END IF;
2832:
2833: -- inserting a note

Line 2836: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2832:
2833: -- inserting a note
2834: if P_MASS_PROMISE_REC.NOTE is not null and l_note_type is not null then
2835:
2836: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2837: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Going to build context for note...');
2838: END IF;
2839: i := 1;
2840: /* adding parties into note context */

Line 2895: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2891:
2892: END LOOP;
2893:
2894: -- for debug purpose only
2895: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2896: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_source_object_code = ' || l_source_object_code);
2897: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_source_object_id = ' || l_source_object_id);
2898: END IF;
2899: FOR i IN 1..l_context_tab.COUNT LOOP

Line 2900: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2896: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_source_object_code = ' || l_source_object_code);
2897: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_source_object_id = ' || l_source_object_id);
2898: END IF;
2899: FOR i IN 1..l_context_tab.COUNT LOOP
2900: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2901: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_context_tab(' || i || ').context_type = ' || l_context_tab(i).context_type);
2902: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_context_tab(' || i || ').context_id = ' || l_context_tab(i).context_id);
2903: END IF;
2904: END LOOP;

Line 2906: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2902: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': l_context_tab(' || i || ').context_id = ' || l_context_tab(i).context_id);
2903: END IF;
2904: END LOOP;
2905:
2906: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2907: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Calling IEX_NOTES_PVT.Create_Note...');
2908: END IF;
2909: IEX_NOTES_PVT.Create_Note(
2910: P_API_VERSION => 1.0,

Line 2924: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2920: p_notes => P_MASS_PROMISE_REC.NOTE,
2921: p_contexts_tbl => l_context_tab,
2922: x_note_id => l_note_id);
2923:
2924: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2925: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': After call to IEX_NOTES_PVT.Create_Note');
2926: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': Status = ' || L_RETURN_STATUS);
2927: END IF;
2928:

Line 2931: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2927: END IF;
2928:
2929: -- check for errors
2930: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2931: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2932: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': IEX_NOTES_PVT.Create_Note failed');
2933: END IF;
2934: RAISE FND_API.G_EXC_ERROR;
2935: END IF;

Line 2941: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2937: FOR k IN 1..X_MASS_PRORESP_TBL.count LOOP
2938: X_MASS_PRORESP_TBL(k).note_id := l_note_id;
2939: END LOOP;
2940: else
2941: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2942: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': no note to save');
2943: END IF;
2944: end if;
2945:

Line 2949: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2945:
2946: -- commit if promise updated successfully
2947: IF FND_API.To_Boolean( p_commit ) THEN
2948: COMMIT WORK;
2949: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2950: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': commited');
2951: END IF;
2952: END IF;
2953:

Line 2963: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2959: p_encoded => FND_API.G_FALSE,
2960: p_count => x_msg_count,
2961: p_data => x_msg_data);
2962:
2963: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2964: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': end of API');
2965: END IF;
2966:
2967: EXCEPTION

Line 3005: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

3001: l_stage_number number;
3002: begin
3003: -- Standard start of API savepoint
3004: SAVEPOINT UPDATE_DEL_STAGE_PVT;
3005: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3006: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || ': start');
3007: END IF;
3008: -- Initialize API return status to success
3009: l_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3024: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

3020: Exception
3021: WHEN NO_DATA_FOUND then
3022: l_total_already_pro_amt := 0;
3023: End ;
3024: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3025: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || 'l_total_already_pro_amt: ' || l_total_already_pro_amt);
3026: END IF;
3027: Begin
3028: SELECT amount_due_remaining into l_amt_due_remaining

Line 3038: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

3034: Exception
3035: WHEN NO_DATA_FOUND then
3036: l_amt_due_remaining := 0;
3037: End ;
3038: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3039: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || 'l_amt_due_remaining: ' || l_amt_due_remaining);
3040: end if;
3041: if l_amt_due_remaining <= l_total_already_pro_amt and nvl(fnd_profile.value('IEX_ALLOW_DUN_FULL_PROMISE'),'N')= 'Y' then --modified for bug 14318148
3042: update iex_delinquencies_all

Line 3046: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

3042: update iex_delinquencies_all
3043: set staged_dunning_level = 0
3044: where delinquency_id = l_promised_delinquency_id;
3045:
3046: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3047: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || 'Updated the staged dunning level to 0 for delinquency id: ' || l_promised_delinquency_id);
3048: end if;
3049: else
3050: iex_utilities.MaxStageForanDelinquency (p_delinquency_id => l_promised_delinquency_id

Line 3056: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

3052: update iex_delinquencies_all
3053: set staged_dunning_level = l_stage_number
3054: where delinquency_id = l_promised_delinquency_id
3055: and staged_dunning_level=0; --added for bug 14318148
3056: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3057: iex_debug_pub.LogMessage(G_PKG_NAME || '.' || l_api_name || 'Updated the staged dunning level to ' || l_stage_number || ' for delinquency id: ' || l_promised_delinquency_id);
3058: end if;
3059: end if;
3060: --end

Line 3089: PG_DEBUG := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

3085: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3086: end update_del_stage_level;
3087:
3088: begin
3089: PG_DEBUG := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3090: G_LOGIN_ID := FND_GLOBAL.Conc_Login_Id;
3091: G_PROGRAM_ID := FND_GLOBAL.Conc_Program_Id;
3092: G_USER_ID := FND_GLOBAL.User_Id;
3093: G_REQUEST_ID := FND_GLOBAL.Conc_Request_Id;