DBA Data[Home] [Help]

APPS.IEX_STRATEGY_WORK_PUB dependencies on FND_LOG

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

132: l_org_id := mo_global.get_current_org_id;
133:
134:
135: -- IF PG_DEBUG < 10 THEN
136: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
137: iex_debug_pub.logmessage ('send_mail: ' || ' in send mail, funcmode = ' || funcmode);
138: END IF;
139:
140: if funcmode <> 'RUN' then

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

142: return;
143: end if;
144:
145: -- IF PG_DEBUG < 10 THEN
146: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
147: iex_debug_pub.logmessage ('send_mail: ' || 'itemtype = ' || itemtype);
148: END IF;
149: -- IF PG_DEBUG < 10 THEN
150: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

146: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
147: iex_debug_pub.logmessage ('send_mail: ' || 'itemtype = ' || itemtype);
148: END IF;
149: -- IF PG_DEBUG < 10 THEN
150: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
151: iex_debug_pub.logmessage ('send_mail: ' || 'itemtkey = ' || itemkey);
152: END IF;
153: l_party_id := wf_engine.GetItemAttrNumber(
154: itemtype => itemtype,

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

157:
158: if (l_party_id <> 0) then
159:
160: -- IF PG_DEBUG < 10 THEN
161: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
162: iex_debug_pub.logmessage ('send_mail: ' || ' in send mail, after PARTY_ID ='|| l_PARTY_ID );
163: END IF;
164:
165: l_count := l_count +1;

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

175: itemkey => itemkey,
176: aname => 'STRATEGY_ID');
177: if (l_strategy_id <> 0) then
178: -- IF PG_DEBUG < 10 THEN
179: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
180: iex_debug_pub.logmessage ('send_mail: ' || ' in send mail, strategy_id ' );
181: END IF;
182: l_count := l_count +1;
183: l_fulfillment_bind_tbl(l_count).key_name := 'strategy_id';

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

190: itemkey => itemkey,
191: aname => 'DELINQUENCY_ID');
192: if (l_delinquency_id <> 0) then
193: -- IF PG_DEBUG < 10 THEN
194: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
195: iex_debug_pub.logmessage ('send_mail: ' || ' in send mail, delinquency_id ' );
196: END IF;
197: l_count := l_count +1;
198: l_fulfillment_bind_tbl(l_count).key_name := 'delinquency_id';

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

205: itemkey => itemkey,
206: aname => 'CUST_ACCOUNT_ID');
207: if (l_cust_account_id <> 0) then
208: -- IF PG_DEBUG < 10 THEN
209: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
210: iex_debug_pub.logmessage ('send_mail: ' || ' in send mail, cust_account_id ' );
211: END IF;
212: l_count := l_count +1;
213: l_fulfillment_bind_tbl(l_count).key_name := 'cust_account_id';

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

228: itemkey => itemkey,
229: aname => 'OVERDUE_AMOUNT');
230: if (l_overdue_amount <> 0) then
231: -- IF PG_DEBUG < 10 THEN
232: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
233: iex_debug_pub.logmessage ('send_mail: ' || ' in send mail, overdue_amount ');
234: END IF;
235: l_count := l_count +1;
236: l_fulfillment_bind_tbl(l_count).key_name := 'overdue_amount';

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

245: itemkey => itemkey,
246: aname => 'DELINQUENCY_STATUS');
247: if (l_delinquency_status is not null) then
248: -- IF PG_DEBUG < 10 THEN
249: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
250: iex_debug_pub.logmessage ('send_mail: ' || ' in send mail, delinquency_status ' );
251: END IF;
252: l_count := l_count +1;
253: l_fulfillment_bind_tbl(l_count).key_name := 'delinquency_status';

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

264: aname => 'AGING_BUCKET_LINE_ID');
265: /* not pass the l_aging_bucket_line_id - pass customer_site_use_id instead
266: if (l_aging_bucket_line_id <> 0) then
267: --IF PG_DEBUG < 10 THEN
268: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
269: iex_debug_pub.logmessage ('send_mail: ' || ' in send mail, aging_bucket_line_id ' );
270: END IF;
271: l_count := l_count +1;
272: l_fulfillment_bind_tbl(l_count).key_name := 'aging_bucket_line_id';

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

280: itemkey => itemkey,
281: aname => 'CUSTOMER_SITE_USE_ID');
282: if (l_customer_site_use_id <> 0) then
283: -- IF PG_DEBUG < 10 THEN
284: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
285: iex_debug_pub.logmessage ('send_mail: ' || ' in send mail, customer_site_use_id ' );
286: END IF;
287: l_count := l_count +1;
288: l_fulfillment_bind_tbl(l_count).key_name := 'customer_site_use_id';

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

298: -- end
299:
300: if (v_org_id is not null) then
301: -- IF PG_DEBUG < 10 THEN
302: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
303: iex_debug_pub.logmessage ('send_mail: ' || ' in send mail, org_id ' );
304: END IF;
305: --Begin Bug 10401991 20-Jan-2011 barathsr
306: l_count := l_count +1;

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

309: l_fulfillment_bind_tbl(l_count).key_value := v_org_id;
310: ELSE
311:
312: -- bug 12363991 PNAVEENK
313: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
314: iex_debug_pub.logmessage ('send_mail: ' || ' in send mail, v_org_id is null ' );
315: END IF;
316: IF l_delinquency_id > 0 THEN
317: select org_id

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

348: END IF;
349: END IF;
350: END IF;
351: END IF;
352: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
353: iex_debug_pub.logmessage ('send_mail: ' || ' in send mail, v_org_id '||v_org_id );
354: END IF;
355: -- bug 12363991
356: l_count := l_count +1;

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

364: itemkey => itemkey,
365: aname => 'PAYMENT_SCHEDULE_ID');
366: if (l_payment_schedule_id <> 0) then
367: -- IF PG_DEBUG < 10 THEN
368: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
369: iex_debug_pub.logmessage ('send_mail: ' || ' in send mail, payment_schedule_id ');
370: END IF;
371: l_count := l_count +1;
372: l_fulfillment_bind_tbl(l_count).key_name := 'payment_schedule_id';

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

382: itemtype => itemtype,
383: itemkey => itemkey,
384: aname => 'XDO_TEMPLATE_ID');
385: if (l_template_id <> 0) then
386: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
387: iex_debug_pub.logmessage ('send_mail: ' || ' in send mail, template_id ' );
388: END IF;
389: end if;
390:

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

388: END IF;
389: end if;
390:
391: if (l_xdo_template_id <> 0) then
392: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
393: iex_debug_pub.logmessage ('send_mail: ' || ' in send mail, xdo_template_id ' );
394: END IF;
395: end if;
396: /*

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

412: itemkey => itemkey,
413: aname => 'WORKITEM_ID');
414: if (l_workitem_id <> 0) then
415: -- IF PG_DEBUG < 10 THEN
416: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
417: iex_debug_pub.logmessage ('send_mail: ' || ' in send mail, workitem_id => '||l_workitem_id );
418: END IF;
419: /*
420: l_count := l_count +1;

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

427: return;
428: end if;
429:
430: -- IF PG_DEBUG < 10 THEN
431: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
432: iex_debug_pub.logmessage ('send_mail: ' || ' in send mail, l_count ='|| l_count );
433: END IF;
434:
435: -- ctlee - check the hz_customer_profiles.dunning_letter

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

457: EXCEPTION
458: WHEN OTHERS THEN
459: NULL;
460: END;
461: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
462: iex_debug_pub.logmessage ('send_mail: ' || ' check fail dunning profile check ' );
463: END IF;
464: return;
465: end if;

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

503: EXCEPTION
504: WHEN OTHERS THEN
505: NULL;
506: END;
507: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
508: iex_debug_pub.logmessage ('send_mail: ' || ' check fail dunning min amount check ' );
509: END IF;
510: return;
511: elsif l_dun_yn = 'E' then -- start for bug 15933013

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

526: EXCEPTION
527: WHEN OTHERS THEN
528: NULL;
529: END;
530: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
531: iex_debug_pub.logmessage ('send_mail: ' || 'When strategy level is Account,value of profile "IEX: Minimum Dunning Amount Profile Check" can''t be "Bill To" or "Bill To and Account".' );
532: END IF;
533: return; --end for bug 15933013
534: end if;

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

561: EXCEPTION
562: WHEN OTHERS THEN
563: NULL;
564: END;
565: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
566: iex_debug_pub.logmessage ('send_mail: ' || ' bankruptcy exist for this customer, so will skip send dunning ' );
567: END IF;
568: return;
569:

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

605: -- start for bug 9151851 PNAVEENK
606: l_dunning_rec.org_id := v_org_id;
607: -- end
608: -- IF PG_DEBUG < 10 THEN
609: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
610: iex_debug_pub.logmessage ('send_mail: ' || ' after fulfil method');
611: END IF;
612: iex_debug_pub.logmessage(' Org_id value ' || l_dunning_rec.org_id);
613: -- ctlee - 5/20 create dunning record; 11/21/2002 remove checking profile error when update a non-existing record

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

632: into l_DefaultStrategyLevel
633: from iex_strategies
634: where strategy_id = l_strategy_id;
635:
636: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
637: iex_debug_pub.logmessage('Default StrategyLevel ' || l_DefaultStrategyLevel);
638: END IF;
639: EXCEPTION
640: WHEN OTHERS THEN

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

637: iex_debug_pub.logmessage('Default StrategyLevel ' || l_DefaultStrategyLevel);
638: END IF;
639: EXCEPTION
640: WHEN OTHERS THEN
641: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
642: iex_debug_pub.logmessage('Strategy Level Rised Exception ');
643: END IF;
644: l_DefaultStrategyLevel := 'DELINQUENCY';
645: END;

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

701: , x_msg_data => l_msg_data
702: );
703: exception
704: when others then
705: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
706: iex_debug_pub.logmessage ('close dunning before fulfillment exception');
707: END IF;
708: end;
709: END LOOP;

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

708: end;
709: END LOOP;
710:
711: -- IF PG_DEBUG < 10 THEN
712: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
713: iex_debug_pub.logmessage ('send_mail: ' || ' in send mail, before create dunning ' );
714: END IF;
715: -- Start Added by gnramasa for bug 5661324 14-Mar-07
716: l_dunning_rec.template_id:= l_template_id;

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

754: l_fulfillment_bind_tbl(l_count).key_type := 'NUMBER';
755: l_fulfillment_bind_tbl(l_count).key_value := to_char(l_dunning_id);
756: -- End Added by gnramasa for bug 5661324 14-Mar-07
757: -- IF PG_DEBUG < 10 THEN
758: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
759: iex_debug_pub.logmessage ('send_mail: ' || ' in send mail, before send_fulfillment ' );
760: END IF;
761: -- call fulfilment function with multiple bind variables.
762: -- ctlee - 6/18 fulfillment printer method available

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

779: x_contact_party_id => l_contact_party_id); -- bug 3955222
780: else
781: --Added for bug#8490070 by SNUTHALA on 29-May-2009
782: BEGIN
783: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
784: iex_debug_pub.logmessage ('send_mail: cancelling all xml requests for this workitem: ' || SQLERRM );
785: END IF;
786: update iex_xml_request_histories
787: set status='CANCELLED'

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

792: where object_type='IEX_STRATEGY'
793: and object_id=l_workitem_id);
794: EXCEPTION
795: WHEN NO_DATA_FOUND THEN
796: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
797: iex_debug_pub.logmessage ('send_mail: ' || ' no active previous xml request exists for this workitem ' );
798: END IF;
799: WHEN OTHERS THEN
800: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

796: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
797: iex_debug_pub.logmessage ('send_mail: ' || ' no active previous xml request exists for this workitem ' );
798: END IF;
799: WHEN OTHERS THEN
800: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
801: iex_debug_pub.logmessage ('send_mail: error while checking for previous active xml requests for this workitem: ' || SQLERRM );
802: END IF;
803: END;
804: iex_dunning_pvt.send_xml(

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

826: x_contact_destination => l_contact_destination, -- bug 3955222
827: x_contact_party_id => l_contact_party_id); -- bug 3955222
828: end if;
829: -- Start Change by gnramasa for bug 5661324 14-Mar-07
830: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
831: iex_debug_pub.logmessage ('send_mail: ' || ' in send mail, after send_fulfillment ' );
832: iex_debug_pub.logmessage ('send_mail: ' || 'request_id =>'|| l_request_id);
833: iex_debug_pub.logmessage ('send_mail: ' || 'return_status =>'|| l_return_status);
834: iex_debug_pub.logmessage ('send_mail: ' || 'msg_count =>' || l_msg_count);

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

864: all_message := null;
865: FOR l_index IN 1..l_msg_count LOOP
866: my_message := FND_MSG_PUB.Get(p_msg_index => l_index,
867: p_encoded => 'F');
868: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
869: iex_debug_pub.logmessage ('send_mail: ' || my_message);
870: END IF;
871: if all_message is null then
872: all_message := my_message;

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

929: , x_msg_count => l_msg_count
930: , x_msg_data => l_msg_data
931: );
932:
933: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
934: iex_debug_pub.logmessage ('update dunning l_status =>' || l_return_status);
935: iex_debug_pub.logmessage ('send_mail: ' || 'result =>' || result);
936: END IF;
937:

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

952: where resource_id =p_resource_id;
953:
954: BEGIN
955: -- IF PG_DEBUG < 10 THEN
956: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
957: iex_debug_pub.logmessage ('**** BEGIN get_username ************');
958: END IF;
959: OPEN c_getname(p_resource_id);
960: FETCH c_getname INTO x_username;

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

959: OPEN c_getname(p_resource_id);
960: FETCH c_getname INTO x_username;
961: CLOSE c_getname;
962: -- IF PG_DEBUG < 10 THEN
963: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
964: iex_debug_pub.logmessage ('**** END get_username ************');
965: END IF;
966: END get_username;
967: -- End Change by gnramasa for bug 5661324 14-Mar-07

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

1016: l_SkipFlag NUMBER;
1017: --End bug#5502077 schekuri 02-May-2007
1018: BEGIN
1019: -- IF PG_DEBUG < 10 THEN
1020: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1021: iex_debug_pub.logmessage('populate_fulfillment_wait: ' || 'DEL ID = ' ||p_delinquency_id);
1022: END IF;
1023:
1024: -- IF PG_DEBUG < 10 THEN

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

1021: iex_debug_pub.logmessage('populate_fulfillment_wait: ' || 'DEL ID = ' ||p_delinquency_id);
1022: END IF;
1023:
1024: -- IF PG_DEBUG < 10 THEN
1025: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1026: iex_debug_pub.logmessage('populate_fulfillment_wait: ' || 'work item id = ' ||p_work_item_id);
1027: END IF;
1028: begin
1029: select a.strategy_level,b.resource_id,a.strategy_id --Added strategy_id for bug#5502077 schekuri 02-May-2007

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

1051: aname => 'NOTIFICATION_USERNAME',
1052: avalue => l_username);
1053:
1054: -- IF PG_DEBUG < 10 THEN
1055: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1056: iex_debug_pub.logmessage('populate_fulfillment_wait: ' || 'strategy_level = ' ||l_strategy_level);
1057: END IF;
1058:
1059: if l_strategy_level = 10 or l_strategy_level = 20 or l_strategy_level = 30 then

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

1059: if l_strategy_level = 10 or l_strategy_level = 20 or l_strategy_level = 30 then
1060: FOR party_rec in c_get_party(p_work_item_id)
1061: LOOP
1062: -- IF PG_DEBUG < 10 THEN
1063: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1064: iex_debug_pub.logmessage('populate_fulfillment_wait: ' || 'INSIDE THE LOOP ' ||party_rec.party_id);
1065: iex_debug_pub.logmessage('populate_fulfillment_wait: ' || 'INSIDE THE LOOP ' ||party_rec.cust_account_id);
1066: END IF;
1067: wf_engine.SetItemAttrNumber(itemtype => itemtype,

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

1097: else
1098: FOR d_rec in c_get_del(p_delinquency_id)
1099: LOOP
1100: -- IF PG_DEBUG < 10 THEN
1101: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1102: iex_debug_pub.logmessage('populate_fulfillment_wait: ' || 'INSIDE THE LOOP ' ||d_rec.party_id);
1103: END IF;
1104: wf_engine.SetItemAttrNumber(itemtype => itemtype,
1105: itemkey => itemkey,

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

1180: EXCEPTION
1181: WHEN OTHERS THEN NULL;
1182: END;
1183:
1184: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1185: iex_debug_pub.logmessage ('populate_fulfillment_wait: check for skip ' || ' SKIP FLAG = ' ||
1186: l_SkipFlag);
1187: END IF;
1188:

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

1203: l_UOM =>c_rec.schedule_uom,
1204: l_UNIT =>c_rec.schedule_wait);*/
1205: --End bug#5502077 schekuri 02-May-2007
1206: -- IF PG_DEBUG < 10 THEN
1207: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1208: iex_debug_pub.logmessage ('populate_fulfillment_wait: ' || ' SCHEDULE TIME WAIT = ' ||
1209: to_char(l_fulfillment_schedule, 'ss:mi:hh24 mm/dd/yyyy'));
1210: END IF;
1211:

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

1225: l_fulfillment_wait:= sysdate;
1226: --end bug#5502077 schekuri 30-Apr-2007
1227:
1228: -- IF PG_DEBUG < 10 THEN
1229: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1230: iex_debug_pub.logmessage ('populate_fulfillment_wait: ' || ' EXECUTION TIME WAIT = ' ||
1231: to_char(l_fulfillment_wait, 'ss:mi:hh24 mm/dd/yyyy'));
1232: END IF;
1233:

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

1282: l_api_name := 'STRATEGY_MAILER';
1283:
1284:
1285: --IF PG_DEBUG < 10 THEN
1286: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1287: iex_debug_pub.logmessage ('in strategy_mailer');
1288: END IF;
1289: -- Standard Start of API savepoint
1290: -- SAVEPOINT STRATEGY_MAILER; -- Standard call to check for call compatibility.

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

1288: END IF;
1289: -- Standard Start of API savepoint
1290: -- SAVEPOINT STRATEGY_MAILER; -- Standard call to check for call compatibility.
1291: --IF PG_DEBUG < 10 THEN
1292: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1293: iex_debug_pub.logmessage ('in strategy_mailer 1');
1294: END IF;
1295: IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version, l_api_name, G_PKG_NAME) THEN
1296: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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

1295: IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version, l_api_name, G_PKG_NAME) THEN
1296: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1297: END IF;
1298: --IF PG_DEBUG < 10 THEN
1299: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1300: iex_debug_pub.logmessage ('in strategy_mailer 2');
1301: END IF;
1302: -- Initialize message list IF p_init_msg_list is set to TRUE.
1303: IF FND_API.to_Boolean( p_init_msg_list ) THEN

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

1303: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1304: FND_MSG_PUB.initialize;
1305: END IF;
1306: --IF PG_DEBUG < 10 THEN
1307: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1308: iex_debug_pub.logmessage ('in strategy_mailer 3');
1309: END IF;
1310:
1311:

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

1314: l_itemtype := 'IEXSTFFM';
1315: l_workflowprocess := 'IEXSTFFM';
1316: l_itemkey := p_strategy_mailer_rec.workitem_id;
1317: --IF PG_DEBUG < 10 THEN
1318: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1319: iex_debug_pub.logmessage ('in strategy_mailer 4');
1320: END IF;
1321:
1322: wf_engine.createprocess ( itemtype => l_itemtype,

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

1322: wf_engine.createprocess ( itemtype => l_itemtype,
1323: itemkey => l_itemkey,
1324: process => l_workflowprocess);
1325: --IF PG_DEBUG < 10 THEN
1326: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1327: iex_debug_pub.logmessage ('in strategy_mailer 5');
1328: END IF;
1329:
1330: -- start for bug 9668367

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

1402: itemkey => l_itemkey
1403: );
1404:
1405: -- IF PG_DEBUG < 10 THEN
1406: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1407: iex_debug_pub.logmessage ('strategy_mailer: ' || ' before start workflow process');
1408: END IF;
1409:
1410: wf_engine.startprocess(itemtype => l_itemtype, itemkey => l_itemkey);

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

1408: END IF;
1409:
1410: wf_engine.startprocess(itemtype => l_itemtype, itemkey => l_itemkey);
1411: -- IF PG_DEBUG < 10 THEN
1412: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1413: iex_debug_pub.logmessage ('strategy_mailer: ' || ' after start workflow process');
1414: END IF;
1415: wf_engine.ItemStatus(
1416: itemtype => l_itemType,

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

1423: else
1424: x_return_status := 'F';
1425: end if;
1426: -- IF PG_DEBUG < 10 THEN
1427: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1428: iex_debug_pub.logmessage ('strategy_mailer: ' || ' workflow return status = ' || l_return_status);
1429: END IF;
1430:
1431:

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

1430:
1431:
1432: EXCEPTION
1433: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1434: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1435: iex_debug_pub.logmessage('UNEXPECTED ERROR. PUB: ' || l_api_name || ' end');
1436: iex_debug_pub.logmessage('PUB: ' || l_api_name || ' end');
1437: iex_debug_pub.logmessage('End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
1438: END IF;

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

1437: iex_debug_pub.logmessage('End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
1438: END IF;
1439:
1440: WHEN OTHERS THEN
1441: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1442: iex_debug_pub.logmessage('UNHANDLED WORKFLOW EXCEPTION. Strategy ID ' || p_strategy_mailer_rec.strategy_id);
1443: iex_debug_pub.logmessage('PUB: ' || l_api_name || ' end');
1444: iex_debug_pub.logmessage('End time:' || TO_CHAR(SYSDATE, 'HH24:MI:SSSSS'));
1445: END IF;

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

1521: --pass the error message
1522: -- get error message and pass
1523: iex_strategy_wf.Get_Messages(l_msg_count,l_error);
1524: -- IF PG_DEBUG < 10 THEN
1525: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1526: iex_debug_pub.logmessage('wf_send_signal: ' || 'error message is ' || l_error);
1527: END IF;
1528: wf_core.context('IEX_STRATEGY_WORK_PUB','wf_send_signal',itemtype,
1529: itemkey,to_char(actid),funcmode,l_error);

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

1622: itemtype => itemtype,
1623: itemkey => itemkey,
1624: aname => 'CUSTOMER_SITE_USE_ID');
1625: -- IF PG_DEBUG < 10 THEN
1626: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1627: iex_debug_pub.logmessage ('check_dunning: ' || ' check dunning, delinquency_id = ' || l_delinquency_id);
1628: iex_debug_pub.logmessage ('check_dunning: ' || ' check dunning, party_id = ' || l_party_id);
1629: iex_debug_pub.logmessage ('check_dunning: ' || ' check dunning, cust_account_id = ' || l_cust_account_id);
1630: iex_debug_pub.logmessage ('check_dunning: ' || ' check dunning, strategy_id = ' || l_strategy_id);

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

1632: iex_debug_pub.logmessage ('check_dunning: ' || ' check dunning, customer_site_use_id = ' || l_customer_site_use_id);
1633: END IF;
1634:
1635: -- IF PG_DEBUG < 10 THEN
1636: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1637: iex_debug_pub.logmessage ('check_dunning: ' || 'USER_ID' || l_user_id || ' RESP_ID ' || l_resp_id);
1638: END IF;
1639: -- IF PG_DEBUG < 10 THEN
1640: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

1636: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1637: iex_debug_pub.logmessage ('check_dunning: ' || 'USER_ID' || l_user_id || ' RESP_ID ' || l_resp_id);
1638: END IF;
1639: -- IF PG_DEBUG < 10 THEN
1640: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1641: iex_debug_pub.logmessage ('check_dunning: ' || 'RESP_APPL_ID' ||l_resp_appl_id);
1642: END IF;
1643: --set the session
1644: --FND_GLOBAL.Apps_Initialize(l_user_id, l_resp_id, l_resp_appl_id);

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

1648: -- if l_delinquency_id is not null then
1649: if l_strategy_level = 'CUSTOMER' then
1650: begin
1651: -- IF PG_DEBUG < 10 THEN
1652: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1653: iex_debug_pub.logmessage ('check_dunning: level 10' || ' check dunning, party_id = ' || l_party_id);
1654: END IF;
1655: if l_party_id is not null then
1656: select count(*) into l_count from iex_dunnings where dunning_id in (

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

1659: and dun.dunning_level = l_strategy_level
1660: and dun.status = 'CLOSE'
1661: and trunc(sysdate) = trunc(dun.creation_date) );
1662: -- IF PG_DEBUG < 10 THEN
1663: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1664: iex_debug_pub.logmessage ('check_dunning: level 10' || ' check dunning, l_count = ' || l_count);
1665: END IF;
1666: if l_count > 0 and l_unique_fulfillment = 'Y' then
1667: wf_engine.SetItemAttrText(itemtype => itemtype,

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

1677: end;
1678: elsif l_strategy_level = 'ACCOUNT' then
1679: begin
1680: -- IF PG_DEBUG < 10 THEN
1681: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1682: iex_debug_pub.logmessage ('check_dunning: level 20' || ' check dunning, cust_account_id = ' || l_cust_account_id);
1683: END IF;
1684: if l_cust_account_id is not null then
1685: select count(*) into l_count from iex_dunnings where dunning_id in (

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

1688: and dun.dunning_level = l_strategy_level
1689: and dun.status = 'CLOSE'
1690: and trunc(sysdate) = trunc(dun.creation_date) );
1691: -- IF PG_DEBUG < 10 THEN
1692: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1693: iex_debug_pub.logmessage ('check_dunning: level 20' || ' check dunning, l_count = ' || l_count);
1694: END IF;
1695: if l_count > 0 and l_unique_fulfillment = 'Y' then
1696: wf_engine.SetItemAttrText(itemtype => itemtype,

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

1706: end;
1707: elsif l_strategy_level = 'BILL_TO' then
1708: begin
1709: -- IF PG_DEBUG < 10 THEN
1710: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1711: iex_debug_pub.logmessage ('check_dunning: level 30' || ' check dunning, customer_site_use_id = ' || l_customer_site_use_id);
1712: END IF;
1713: if l_customer_site_use_id is not null then
1714: select count(*) into l_count from iex_dunnings where dunning_id in (

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

1717: and dun.dunning_level = l_strategy_level
1718: and dun.status = 'CLOSE'
1719: and trunc(sysdate) = trunc(dun.creation_date) );
1720: -- IF PG_DEBUG < 10 THEN
1721: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1722: iex_debug_pub.logmessage ('check_dunning: level 30' || ' check dunning, l_count = ' || l_count);
1723: END IF;
1724: if l_count > 0 and l_unique_fulfillment = 'Y' then
1725: wf_engine.SetItemAttrText(itemtype => itemtype,

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

1736: else -- default level 40
1737: begin
1738: select cust_account_id into l_cust_account_id from iex_delinquencies_all
1739: where delinquency_id = l_delinquency_id;
1740: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1741: iex_debug_pub.logmessage ('check_dunning: 40 ' || ' check dunning, delinquency_id = ' || l_delinquency_id);
1742: END IF;
1743: if l_cust_account_id is not null then
1744: -- begin bug #4230209 03/09/2005 by ctlee, multiple letters were sent in the same day even unique = 'Y'

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

1756: del.delinquency_id <> l_delinquency_id )
1757: )
1758: and trunc(sysdate) = trunc(dun.creation_date) );
1759: -- end bug #4230209 03/09/2005 by ctlee, multiple letters were sent in the same day even unique = 'Y'
1760: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1761: iex_debug_pub.logmessage ('check_dunning: 40' || ' check dunning, l_count = ' || l_count);
1762: END IF;
1763: if l_count > 0 and l_unique_fulfillment = 'Y' then
1764: wf_engine.SetItemAttrText(itemtype => itemtype,

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

1935: exit;
1936: END LOOP;
1937:
1938: -- IF PG_DEBUG < 10 THEN
1939: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1940: iex_debug_pub.logmessage('resend_fulfillment: ' || 'DEL ID ' ||l_delinquency_id);
1941: END IF;
1942:
1943: FOR x_rec in c_get_xdo_template(p_work_item_id)

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

1963: EXCEPTION WHEN OTHERS THEN
1964: l_strategy_level := 40; -- default to delinquency level
1965: end;
1966: -- IF PG_DEBUG < 10 THEN
1967: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1968: iex_debug_pub.logmessage('resend_fulfillment: ' || 'strategy_level = ' ||l_strategy_level);
1969: END IF;
1970:
1971: if l_strategy_level = 10 or l_strategy_level = 20 or l_strategy_level = 30 then

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

1986: else
1987: FOR d_rec in c_get_del(l_delinquency_id)
1988: LOOP
1989: -- IF PG_DEBUG < 10 THEN
1990: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1991: iex_debug_pub.logmessage('resend_fulfillment: ' || 'INSIDE THE LOOP ' ||d_rec.party_id);
1992: END IF;
1993: l_party_id := d_rec.party_id;
1994: l_party_type := d_rec.party_type;

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

2013:
2014: if (l_party_id <> 0) then
2015:
2016: -- IF PG_DEBUG < 10 THEN
2017: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2018: iex_debug_pub.logmessage ('resend_fulfillment: ' || ' in send mail, after PARTY_ID ='|| l_PARTY_ID );
2019: END IF;
2020:
2021: l_count := l_count +1;

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

2028: end if;
2029:
2030: if (l_strategy_id <> 0) then
2031: -- IF PG_DEBUG < 10 THEN
2032: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2033: iex_debug_pub.logmessage ('resend_fulfillment: ' || ' in send mail, strategy_id ' );
2034: END IF;
2035: l_count := l_count +1;
2036: l_fulfillment_bind_tbl(l_count).key_name := 'strategy_id';

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

2040:
2041:
2042: if (l_delinquency_id <> 0) then
2043: -- IF PG_DEBUG < 10 THEN
2044: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2045: iex_debug_pub.logmessage ('resend_fulfillment: ' || ' in send mail, delinquency_id ' );
2046: END IF;
2047: l_count := l_count +1;
2048: l_fulfillment_bind_tbl(l_count).key_name := 'delinquency_id';

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

2051: end if;
2052:
2053: if (l_cust_account_id <> 0) then
2054: -- IF PG_DEBUG < 10 THEN
2055: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2056: iex_debug_pub.logmessage ('resend_fulfillment: ' || ' in send mail, cust_account_id ' );
2057: END IF;
2058: l_count := l_count +1;
2059: l_fulfillment_bind_tbl(l_count).key_name := 'cust_account_id';

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

2068: end if;
2069:
2070: if (l_customer_site_use_id <> 0) then
2071: -- IF PG_DEBUG < 10 THEN
2072: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2073: iex_debug_pub.logmessage ('resend_fulfillment: ' || ' in send mail, customer_site_use_id ' );
2074: END IF;
2075: l_count := l_count +1;
2076: l_fulfillment_bind_tbl(l_count).key_name := 'customer_site_use_id';

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

2145:
2146: if l_strategy_level = 40 then
2147: if (l_overdue_amount <> 0) then
2148: -- IF PG_DEBUG < 10 THEN
2149: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2150: iex_debug_pub.logmessage ('resend_fulfillment: ' || ' in send mail, overdue_amount ');
2151: END IF;
2152: l_count := l_count +1;
2153: l_fulfillment_bind_tbl(l_count).key_name := 'overdue_amount';

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

2157:
2158:
2159: if (l_status is not null) then
2160: -- IF PG_DEBUG < 10 THEN
2161: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2162: iex_debug_pub.logmessage ('resend_fulfillment: ' || ' in send mail, delinquency_status ' );
2163: END IF;
2164: l_count := l_count +1;
2165: l_fulfillment_bind_tbl(l_count).key_name := 'delinquency_status';

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

2169:
2170: /*
2171: if (l_aging_bucket_line_id <> 0) then
2172: -- IF PG_DEBUG < 10 THEN
2173: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2174: iex_debug_pub.logmessage ('resend_fulfillment: ' || ' in send mail, aging_bucket_line_id ' );
2175: END IF;
2176: l_count := l_count +1;
2177: l_fulfillment_bind_tbl(l_count).key_name := 'aging_bucket_line_id';

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

2182:
2183:
2184: if (l_payment_schedule_id <> 0) then
2185: -- IF PG_DEBUG < 10 THEN
2186: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2187: iex_debug_pub.logmessage ('resend_fulfillment: ' || ' in send mail, payment_schedule_id ');
2188: END IF;
2189: l_count := l_count +1;
2190: l_fulfillment_bind_tbl(l_count).key_name := 'payment_schedule_id';

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

2196:
2197: l_curr_dmethod := iex_send_xml_pvt.getCurrDeliveryMethod();
2198: if (l_curr_dmethod = 'FFM') then
2199: if (l_fulfil_temp_id <> 0) then
2200: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2201: iex_debug_pub.logmessage ('resend_fulfillment: ' || ' in send mail, template_id ' );
2202: END IF;
2203: else -- template_id could not be null
2204: x_error_message := 'No fulfillment template id';

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

2205: return;
2206: end if;
2207: else
2208: if (l_xdo_template_id <> 0) then
2209: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2210: iex_debug_pub.logmessage ('send_mail: ' || ' in send mail, xdo_template_id ' );
2211: END IF;
2212: else -- template_id could not be null
2213: x_error_message := 'No xdo template id';

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

2217:
2218:
2219: if (p_work_item_id <> 0) then
2220: -- IF PG_DEBUG < 10 THEN
2221: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2222: iex_debug_pub.logmessage ('resend_fulfillment: ' || ' in send mail, workitem_id ' );
2223: END IF;
2224: /*
2225: l_count := l_count +1;

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

2232: return;
2233: end if;
2234:
2235: -- IF PG_DEBUG < 10 THEN
2236: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2237: iex_debug_pub.logmessage ('resend_fulfillment: ' || ' in send mail, l_count ='|| l_count );
2238: END IF;
2239:
2240:

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

2245: , p_site_use_id => l_customer_site_use_id
2246: , p_delinquency_id => l_delinquency_id ) = 'N'
2247: ) then
2248: x_error_message := 'Customer profile has set the dunning flag to NO';
2249: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2250: iex_debug_pub.logmessage ('resend_fulfillment: ' || x_error_message);
2251: END IF;
2252: return;
2253: end if;

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

2273: , p_running_level => l_DefaultStrategyLevel
2274: );
2275: if l_dun_yn = 'N' then
2276: x_error_message := 'The dunning amount does not exceed the minimum dunning amount in customer profile';
2277: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2278: iex_debug_pub.logmessage ('resend_fulfillment: ' || x_error_message);
2279: END IF;
2280: return;
2281: elsif l_dun_yn = 'E' then

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

2279: END IF;
2280: return;
2281: elsif l_dun_yn = 'E' then
2282: x_error_message := 'When strategy level is Account,value of profile "IEX: Minimum Dunning Amount Profile Check" can''t be "Bill To" or "Bill To and Account". ';
2283: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2284: iex_debug_pub.logmessage ('resend_fulfillment: ' || x_error_message);
2285: END IF;
2286: return;
2287: end if;

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

2320: l_include_disputed_items := 'Y'; -- bug 14772139
2321: end;
2322:
2323: -- IF PG_DEBUG < 10 THEN
2324: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2325: iex_debug_pub.logmessage ('resend_fulfillment: ' || ' after fulfil method');
2326: END IF;
2327:
2328: select max(dunning_id) into l_parent_dunning_id from iex_dunnings where object_id = p_work_item_id; -- added to fix 16433137 SNUTHALA MAR/08/2013

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

2349: into l_DefaultStrategyLevel
2350: from iex_strategies
2351: where strategy_id = l_strategy_id;
2352:
2353: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2354: iex_debug_pub.logmessage('resend_fulfillment Default StrategyLevel ' || l_DefaultStrategyLevel);
2355: END IF;
2356: EXCEPTION
2357: WHEN OTHERS THEN

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

2354: iex_debug_pub.logmessage('resend_fulfillment Default StrategyLevel ' || l_DefaultStrategyLevel);
2355: END IF;
2356: EXCEPTION
2357: WHEN OTHERS THEN
2358: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2359: iex_debug_pub.logmessage('Strategy Level Rised Exception ');
2360: END IF;
2361: l_DefaultStrategyLevel := 'DELINQUENCY';
2362: END;

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

2417: , x_msg_data => l_msg_data
2418: );
2419: exception
2420: when others then
2421: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2422: iex_debug_pub.logmessage ('close dunning before fulfillment exception');
2423: END IF;
2424: end;
2425: END LOOP;

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

2425: END LOOP;
2426:
2427: -- ctlee - 6/18 fulfillment printer method available
2428: -- IF PG_DEBUG < 10 THEN
2429: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2430: iex_debug_pub.logmessage ('resend_fulfillment: ' || ' in send mail, before create dunning ' );
2431: iex_debug_pub.logmessage ('resend_fulfillment: ' || ' WorkItem Id = '||l_workitem_id );
2432: END IF;
2433: IEX_DUNNING_PVT.CREATE_DUNNING(

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

2465:
2466: -- end if;
2467:
2468: --IF PG_DEBUG < 10 THEN
2469: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2470: iex_debug_pub.logmessage ('resend_fulfillment: ' || ' in send mail, before send_fulfillment ' );
2471: END IF;
2472:
2473:

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

2521: -- IEX_DEBUG_PUB.setDebugFileDir(P_FILEDIR => '/sqlcom/log', P_FILENAME =>'james.IEX');
2522: --IEX_DEBUG_PUB.setDebugFileDir(P_FILEDIR => '/sqlcom/log');
2523:
2524:
2525: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2526: iex_debug_pub.logmessage ('resend_fulfillment: ' || ' in send mail, after send_fulfillment ' );
2527: END IF;
2528:
2529: -- return to workflow

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

2527: END IF;
2528:
2529: -- return to workflow
2530: if (l_request_id is null OR l_return_status <> 'S') then
2531: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2532: iex_debug_pub.logmessage ('resend_fulfillment: ' || 'request_id =>'|| l_request_id);
2533: END IF;
2534: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2535: iex_debug_pub.logmessage ('resend_fulfillment: ' || 'return_status =>'|| l_return_status);

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

2530: if (l_request_id is null OR l_return_status <> 'S') then
2531: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2532: iex_debug_pub.logmessage ('resend_fulfillment: ' || 'request_id =>'|| l_request_id);
2533: END IF;
2534: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2535: iex_debug_pub.logmessage ('resend_fulfillment: ' || 'return_status =>'|| l_return_status);
2536: END IF;
2537: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2538: iex_debug_pub.logmessage ('resend_fulfillment: ' || 'msg_count =>' || l_msg_count);

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

2533: END IF;
2534: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2535: iex_debug_pub.logmessage ('resend_fulfillment: ' || 'return_status =>'|| l_return_status);
2536: END IF;
2537: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2538: iex_debug_pub.logmessage ('resend_fulfillment: ' || 'msg_count =>' || l_msg_count);
2539: END IF;
2540:
2541: -- IF PG_DEBUG < 10 THEN

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

2538: iex_debug_pub.logmessage ('resend_fulfillment: ' || 'msg_count =>' || l_msg_count);
2539: END IF;
2540:
2541: -- IF PG_DEBUG < 10 THEN
2542: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2543: iex_debug_pub.logmessage ('resend_fulfillment: ' || 'msg_data =>');
2544: END IF;
2545: FOR l_index IN 1..l_msg_count LOOP
2546: my_message := FND_MSG_PUB.Get(p_msg_index => l_index,

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

2545: FOR l_index IN 1..l_msg_count LOOP
2546: my_message := FND_MSG_PUB.Get(p_msg_index => l_index,
2547: p_encoded => 'F');
2548: -- IF PG_DEBUG < 10 THEN
2549: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2550: iex_debug_pub.logmessage ('resend_fulfillment: ' || my_message);
2551: END IF;
2552: END LOOP;
2553: x_error_message := my_message;

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

2552: END LOOP;
2553: x_error_message := my_message;
2554: else
2555: -- IF PG_DEBUG < 10 THEN
2556: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2557: iex_debug_pub.logmessage ('resend_fulfillment: ' || 'request_id =>'|| l_request_id);
2558: END IF;
2559: -- IF PG_DEBUG < 10 THEN
2560: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

2556: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2557: iex_debug_pub.logmessage ('resend_fulfillment: ' || 'request_id =>'|| l_request_id);
2558: END IF;
2559: -- IF PG_DEBUG < 10 THEN
2560: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2561: iex_debug_pub.logmessage ('resend_fulfillment: ' || 'return_status =>'|| l_return_status);
2562: END IF;
2563: -- IF PG_DEBUG < 10 THEN
2564: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

2560: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2561: iex_debug_pub.logmessage ('resend_fulfillment: ' || 'return_status =>'|| l_return_status);
2562: END IF;
2563: -- IF PG_DEBUG < 10 THEN
2564: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2565: iex_debug_pub.logmessage ('resend_fulfillment: ' || 'msg_count =>' || l_msg_count);
2566: END IF;
2567:
2568: x_status := 'S';

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

2610: l_result VARCHAR2(1);
2611: l_value VARCHAR2(300);
2612:
2613: BEGIN
2614: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2615: iex_debug_pub.logmessage ('**** START wait_on_hold_signal ************');
2616: END IF;
2617: if funcmode <> wf_engine.eng_run then
2618: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

2614: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2615: iex_debug_pub.logmessage ('**** START wait_on_hold_signal ************');
2616: END IF;
2617: if funcmode <> wf_engine.eng_run then
2618: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2619: iex_debug_pub.logmessage('SECOND TIME FUNCMODE' ||funcmode);
2620: END IF;
2621: result := wf_engine.eng_null;
2622: return;

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

2623: end if;
2624:
2625:
2626:
2627: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2628: iex_debug_pub.logmessage('FUNCMODE' ||funcmode);
2629: END IF;
2630: /* l_value :=wf_engine.GetActivityLabel(actid);
2631: wf_engine.SetItemAttrText(itemtype => itemtype,

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

2631: wf_engine.SetItemAttrText(itemtype => itemtype,
2632: itemkey => itemkey,
2633: aname => 'ACTIVITY_NAME',
2634: avalue => l_value);
2635: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2636: iex_debug_pub.logMessage('ACTIVITYNAME' ||l_value);
2637: END IF;*/
2638:
2639:

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

2638:
2639:
2640: result := wf_engine.eng_notified||':'||wf_engine.eng_null||
2641: ':'||wf_engine.eng_null;
2642: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2643: iex_debug_pub.logmessage ('**** END wait_on_hold_signal ************');
2644: END IF;
2645: exception
2646: when others then

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

2665: l_result VARCHAR2(1);
2666: l_value VARCHAR2(300);
2667:
2668: BEGIN
2669: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2670: iex_debug_pub.logmessage ('**** START wait_delivery_signal ************');
2671: END IF;
2672: if funcmode <> wf_engine.eng_run then
2673: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

2669: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2670: iex_debug_pub.logmessage ('**** START wait_delivery_signal ************');
2671: END IF;
2672: if funcmode <> wf_engine.eng_run then
2673: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2674: iex_debug_pub.logmessage('SECOND TIME FUNCMODE' ||funcmode);
2675: END IF;
2676: result := wf_engine.eng_null;
2677: return;

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

2678: end if;
2679:
2680:
2681:
2682: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2683: iex_debug_pub.logmessage('FUNCMODE' ||funcmode);
2684: END IF;
2685: l_value :=wf_engine.GetActivityLabel(actid);
2686: wf_engine.SetItemAttrText(itemtype => itemtype,

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

2686: wf_engine.SetItemAttrText(itemtype => itemtype,
2687: itemkey => itemkey,
2688: aname => 'ACTIVITY_NAME',
2689: avalue => l_value);
2690: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2691: iex_debug_pub.logMessage('ACTIVITYNAME' ||l_value);
2692: END IF;
2693:
2694:

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

2693:
2694:
2695: result := wf_engine.eng_notified||':'||wf_engine.eng_null||
2696: ':'||wf_engine.eng_null;
2697: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2698: iex_debug_pub.logmessage ('**** END wait_delivery_signal ************');
2699: END IF;
2700: exception
2701: when others then

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

2719: l_value VARCHAR2(300);
2720: l_workitem_status varchar2(300);
2721:
2722: BEGIN
2723: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2724: iex_debug_pub.logmessage ('**** START cal_pre_wait ************');
2725: END IF;
2726: if funcmode <> 'RUN' then
2727: result := wf_engine.eng_null;

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

2739: itemkey => itemkey,
2740: aname => 'ACTIVITY_NAME',
2741: avalue => l_value);
2742:
2743: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2744: iex_debug_pub.logMessage('Number of days to wait after submitting delivery request = ' ||l_wait_days);
2745: END IF;
2746:
2747: if (l_wait_days = 0 or l_workitem_status = 'SKIP') then

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

2751: wf_engine.SetItemAttrDate(itemtype => itemtype,
2752: itemkey => itemkey,
2753: aname => 'DELIVERY_WAIT_TIME',
2754: avalue => l_schedule);
2755: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2756: iex_debug_pub.logMessage('Letter Delivery wait time = ' || to_char(l_schedule, 'hh24:mi:ss mm/dd/yyyy'));
2757: END IF;
2758: l_return := wf_yes;
2759: END IF;

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

2758: l_return := wf_yes;
2759: END IF;
2760:
2761:
2762: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2763: iex_debug_pub.logMessage('Collections cal_delivery_wait result = ' ||l_return);
2764: END IF;
2765:
2766: result := wf_engine.eng_completed ||':'||l_return;

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

2764: END IF;
2765:
2766: result := wf_engine.eng_completed ||':'||l_return;
2767:
2768: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2769: iex_debug_pub.logmessage ('Collections **** END cal_delivery_wait ************');
2770: END IF;
2771: exception
2772: when others then

Line 3006: PG_DEBUG := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

3002:
3003:
3004: begin
3005: -- initialize variables
3006: PG_DEBUG := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3007:
3008: --begin schekuri Bug#4506922 Date:02-Dec-2005
3009: wf_yes := 'Y';
3010: wf_no := 'N';