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

Line 6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;

2: /* $Header: jlbrpacb.pls 120.4.12020000.3 2012/11/19 17:51:05 abuissa ship $ */
3:
4: -- Logging Infra
5: G_CURRENT_RUNTIME_LEVEL NUMBER;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

Line 7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;

3:
4: -- Logging Infra
5: G_CURRENT_RUNTIME_LEVEL NUMBER;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

Line 8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;

4: -- Logging Infra
5: G_CURRENT_RUNTIME_LEVEL NUMBER;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
12: G_MODULE_NAME CONSTANT VARCHAR2(50) :=

Line 9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;

5: G_CURRENT_RUNTIME_LEVEL NUMBER;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
12: G_MODULE_NAME CONSTANT VARCHAR2(50) :=
13: 'JL.PLSQL.JL_BR_AP_ASSOCIATE_COLLECTION.';

Line 10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
12: G_MODULE_NAME CONSTANT VARCHAR2(50) :=
13: 'JL.PLSQL.JL_BR_AP_ASSOCIATE_COLLECTION.';
14:

Line 11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
12: G_MODULE_NAME CONSTANT VARCHAR2(50) :=
13: 'JL.PLSQL.JL_BR_AP_ASSOCIATE_COLLECTION.';
14:
15:

Line 32: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

28: x_enable_bank_coll VARCHAR2(1);
29: x_enable_association VARCHAR2(1);
30: -- Logging Infra:
31: l_procedure_name CONSTANT VARCHAR2(30) := 'jl_br_ap_associate_coll_doc';
32: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
33: -- Logging Infra:
34:
35: /*-----------------------------------------------------------*/
36: /* ASSOCIATE_COLL_DOC */

Line 48: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

44: IS
45: x_selected VARCHAR2(1);
46: -- Logging
47: l_procedure_name CONSTANT VARCHAR2(30) := 'associate_coll_doc';
48: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
49: -- Logging
50:
51: BEGIN
52: x_selected := 'Y';

Line 55: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);

51: BEGIN
52: x_selected := 'Y';
53: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
54: l_log_msg := l_procedure_name||'(+)';
55: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
56: l_log_msg := 'Parameters : bank_collection_id_e ' || bank_collection_id_e ||
57: ' Association_method ' || association_method_e;
58: END IF;
59: BEGIN

Line 63: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

59: BEGIN
60: IF (association_method_e = 'METHOD1') THEN
61: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
62: l_log_msg := 'METHOD1';
63: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
64: END IF;
65: /* Invoice number AND Due date */
66: SELECT apps.invoice_id, apps.payment_num
67: INTO invoice_id_s, payment_num_s

Line 86: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

82:
83: ELSIF (association_method_e = 'METHOD2') THEN
84: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
85: l_log_msg := 'Method2 ';
86: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
87: END IF;
88: /* Supplier Site AND Supplier Name */
89: SELECT apps.invoice_id, apps.payment_num
90: INTO invoice_id_s, payment_num_s

Line 115: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

111:
112: ELSIF (association_method_e = 'METHOD3') THEN
113: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
114: l_log_msg := 'METHOD3';
115: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
116: END IF;
117: /* Supplier Site OR Supplier Name */
118: BEGIN
119: SELECT apps.invoice_id, apps.payment_num

Line 139: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

135: WHEN NO_DATA_FOUND OR TOO_MANY_ROWS THEN
136: x_selected := 'N';
137: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
138: l_log_msg := 'Exception, x_selected set to N';
139: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
140: END IF;
141:
142: END;
143: IF x_selected = 'N' THEN

Line 167: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

163: AND apinv.invoice_currency_code = jlbl.currency_code;
164: x_selected:='Y';
165: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
166: l_log_msg := 'Next select executed and x_selected is set to Y';
167: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
168: END IF;
169: END IF;
170: ELSIF (association_method_e = 'METHOD4') THEN
171: /* Invoice Number AND Due date AND Supplier Site */

Line 174: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

170: ELSIF (association_method_e = 'METHOD4') THEN
171: /* Invoice Number AND Due date AND Supplier Site */
172: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
173: l_log_msg := 'METHOD4';
174: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
175: END IF;
176: SELECT apps.invoice_id, apps.payment_num
177: INTO invoice_id_s, payment_num_s
178: FROM ap_payment_schedules_ALL apps,

Line 198: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

194:
195: ELSIF (association_method_e = 'METHOD5') THEN
196: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
197: l_log_msg := 'METHOD5 ';
198: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
199: END IF;
200: /* Invoice Number AND Due date AND Supplier Name */
201: SELECT apps.invoice_id, apps.payment_num
202: INTO invoice_id_s, payment_num_s

Line 228: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

224:
225: ELSIF (association_method_e = 'METHOD6') THEN
226: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
227: l_log_msg := 'METHOD6';
228: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
229: END IF;
230: /* Invoice number AND Gross Amount AND Due Date */
231: SELECT apps.invoice_id, apps.payment_num
232: INTO invoice_id_s, payment_num_s

Line 254: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

250:
251: ELSIF (association_method_e = 'METHOD7') THEN
252: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
253: l_log_msg := 'METHOD7';
254: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
255: END IF;
256: /* Invoice number AND Gross Amount AND Due Date AND Supplier Site */
257: SELECT apps.invoice_id, apps.payment_num
258: INTO invoice_id_s, payment_num_s

Line 282: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

278:
279: ELSIF (association_method_e = 'METHOD8') THEN
280: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
281: l_log_msg := 'METHOD8';
282: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
283: END IF;
284: /* Invoice number AND Gross Amount AND Due Date AND Supplier Name */
285: SELECT apps.invoice_id, apps.payment_num
286: INTO invoice_id_s, payment_num_s

Line 315: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

311:
312: ELSIF (association_method_e = 'METHOD9') THEN
313: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
314: l_log_msg := 'METHOD9';
315: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
316: END IF;
317: /* Invoice number AND Gross Amount AND Due Date AND Supplier Site */
318: /* AND Supplier Name */
319: SELECT apps.invoice_id, apps.payment_num

Line 351: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

347:
348: ELSIF (association_method_e = 'METHOD10') THEN
349: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
350: l_log_msg := 'METHOD10';
351: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
352: END IF;
353: /* Invoice number AND Gross Amount AND Due Date OR Supplier Site */
354: /* AND Supplier Name */
355: BEGIN

Line 380: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

376: WHEN NO_DATA_FOUND OR TOO_MANY_ROWS THEN
377: x_selected := 'N';
378: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
379: l_log_msg := 'Exception, x_selected set to N';
380: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
381: END IF;
382:
383: END;
384: IF x_selected = 'N' THEN

Line 410: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

406: AND apinv.invoice_currency_code = jlbl.currency_code;
407: x_selected:= 'Y';
408: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
409: l_log_msg := 'Next select executed and x_selected is set to Y';
410: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
411: END IF;
412: END IF;
413:
414: ELSIF (association_method_e = 'METHOD11') THEN

Line 417: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

413:
414: ELSIF (association_method_e = 'METHOD11') THEN
415: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
416: l_log_msg := 'METHOD11';
417: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
418: END IF;
419: /* Invoice number OR Gross Amount AND Due Date AND Supplier Site */
420: BEGIN
421: SELECT apps.invoice_id, apps.payment_num

Line 441: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

437: WHEN NO_DATA_FOUND OR TOO_MANY_ROWS THEN
438: x_selected := 'N';
439: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
440: l_log_msg := 'Exception, x_selected set to N';
441: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
442: END IF;
443:
444: END;
445: IF x_selected = 'N' THEN

Line 468: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

464: AND apinv.invoice_currency_code = jlbl.currency_code;
465: x_selected:= 'Y';
466: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
467: l_log_msg := 'Next select executed and x_selected is set to Y';
468: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
469: END IF;
470: END IF;
471: ELSIF (association_method_e = 'METHOD12') THEN
472: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 474: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

470: END IF;
471: ELSIF (association_method_e = 'METHOD12') THEN
472: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
473: l_log_msg := 'METHOD12';
474: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
475: END IF;
476: /* Gross Amount AND Due Date AND Supplier Site */
477: SELECT apps.invoice_id, apps.payment_num
478: INTO invoice_id_s, payment_num_s

Line 500: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

496:
497: ELSIF (association_method_e = 'METHOD13') THEN
498: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
499: l_log_msg := 'METHOD13';
500: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
501: END IF;
502: /* Gross Amount AND Due Date AND Supplier Name */
503: SELECT apps.invoice_id, apps.payment_num
504: INTO invoice_id_s, payment_num_s

Line 535: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

531: WHEN NO_DATA_FOUND THEN
532: x_selected := 'N';
533: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
534: l_log_msg := 'Exception NO_DATA_FOUND, x_selected set to N';
535: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
536: END IF;
537: -- Added for debugging
538: WHEN TOO_MANY_ROWS THEN
539: x_selected := 'N';

Line 542: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

538: WHEN TOO_MANY_ROWS THEN
539: x_selected := 'N';
540: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
541: l_log_msg := 'Exception TOO_MANY_ROWS, x_selected set to N';
542: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
543: END IF;
544: END;
545: IF x_selected = 'Y' THEN /* Create the link with two tables */
546: UPDATE jl_br_ap_collection_docs

Line 553: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

549: WHERE bank_collection_id = bank_collection_id_e;
550: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
551: l_log_msg := 'Updated jl_br_ap_collection_docs invoice_id ' ||
552: invoice_id_s || ' payment_num' || payment_num_s;
553: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
554: END IF;
555:
556: -- Bug Number 659227 / R11 Patch / May 98 (Copying Y to GA8)
557: UPDATE ap_payment_schedules

Line 564: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

560: WHERE invoice_id = invoice_id_s
561: AND payment_num = payment_num_s;
562: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
563: l_log_msg := 'Updated ap_payment_schedules global_attribute11 ' || bank_collection_id_e;
564: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
565: END IF;
566: associate_flag_s := 'Y';
567: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
568: l_log_msg := 'associate_flag_s is set to Y';

Line 569: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

565: END IF;
566: associate_flag_s := 'Y';
567: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
568: l_log_msg := 'associate_flag_s is set to Y';
569: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
570: END IF;
571: ELSE
572: associate_flag_s := 'N';
573: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 575: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

571: ELSE
572: associate_flag_s := 'N';
573: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
574: l_log_msg := 'associate_flag_s is set to N';
575: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
576: END IF;
577: END IF;
578: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
579: l_log_msg := l_procedure_name||'(-)';

Line 580: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.end', l_log_msg);

576: END IF;
577: END IF;
578: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
579: l_log_msg := l_procedure_name||'(-)';
580: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.end', l_log_msg);
581: END IF;
582: END associate_coll_doc;
583:
584: BEGIN

Line 587: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);

583:
584: BEGIN
585: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
586: l_log_msg := l_procedure_name||'(+)';
587: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
588: END IF;
589: SELECT global_attribute1,
590: global_attribute2
591: INTO x_enable_bank_coll,

Line 597: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

593: FROM ap_system_parameters;
594: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
595: l_log_msg := 'Value of x_enable_bank_coll ' || x_enable_bank_coll
596: || ' x_enable_association ' || x_enable_association;
597: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
598: END IF;
599:
600: IF x_enable_bank_coll = 'Y' THEN
601: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 603: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

599:
600: IF x_enable_bank_coll = 'Y' THEN
601: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
602: l_log_msg := 'x_enable_bank_coll is Y';
603: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
604: END IF;
605: IF x_enable_association = 'Y' THEN
606: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
607: l_log_msg := 'x_enable_association is Y callined associate_coll_doc';

Line 608: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

604: END IF;
605: IF x_enable_association = 'Y' THEN
606: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
607: l_log_msg := 'x_enable_association is Y callined associate_coll_doc';
608: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
609: END IF;
610: associate_coll_doc( bank_collection_id_e, association_method_e,
611: invoice_id_s, payment_num_s, associate_flag_s );
612: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 617: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

613: l_log_msg := 'After calling associate_coll_doc returned values ';
614: l_log_msg :=l_log_msg || 'invoice_id_s ' || invoice_id_s;
615: l_log_msg :=l_log_msg || 'payment_num_s ' || payment_num_s;
616: l_log_msg :=l_log_msg || 'associate_flag_s ' || associate_flag_s;
617: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
618: END IF;
619: IF associate_flag_s = 'Y' THEN /* If associated, release both*/
620: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
621: l_log_msg := 'associate_flag_s is Y';

Line 622: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

618: END IF;
619: IF associate_flag_s = 'Y' THEN /* If associated, release both*/
620: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
621: l_log_msg := 'associate_flag_s is Y';
622: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
623: END IF;
624: UPDATE ap_payment_schedules
625: SET hold_flag = 'N'
626: WHERE invoice_id = invoice_id_s

Line 630: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

626: WHERE invoice_id = invoice_id_s
627: AND payment_num = payment_num_s;
628: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
629: l_log_msg := 'updated hold flag to N in ap_payment_schedules';
630: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
631: END IF;
632:
633: UPDATE jl_br_ap_collection_docs
634: SET hold_flag = 'N'

Line 638: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

634: SET hold_flag = 'N'
635: WHERE bank_collection_id = bank_collection_id_e;
636: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
637: l_log_msg := 'updated hold flag to N in jl_br_ap_collection_docs';
638: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
639: END IF;
640:
641: ELSE /* If not associated, hold the collection document */
642: UPDATE jl_br_ap_collection_docs

Line 647: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

643: SET hold_flag = 'Y'
644: WHERE bank_collection_id = bank_collection_id_e;
645: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
646: l_log_msg := 'associate_flag_s is N updated hold_flag to Y in jl_br_ap_collection_docs';
647: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
648: END IF;
649:
650: END IF;
651: ELSE /* If association is not enabled, hold the collection document */

Line 657: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

653: SET hold_flag = 'Y'
654: WHERE bank_collection_id = bank_collection_id_e;
655: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
656: l_log_msg := 'x_enable_association is N update hold flag to Y in jl_br_ap_collection_docs';
657: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
658: END IF;
659:
660: END IF;
661: ELSE /* If bank collection is not enabled, release the collection document*/

Line 668: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

664: WHERE bank_collection_id = bank_collection_id_e;
665:
666: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
667: l_log_msg := 'x_enable_bank_coll is N update hold flag to N in jl_br_ap_collection_docs';
668: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
669: END IF;
670:
671: END IF;
672: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 674: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.end', l_log_msg);

670:
671: END IF;
672: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
673: l_log_msg := l_procedure_name||'(-)';
674: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.end', l_log_msg);
675: END IF;
676: END jl_br_ap_associate_coll_doc;
677: /*-----------------------------------------------------------*/
678: /*<<<<< JL_BR_AP_ASSOCIATE_TRADE_NOTE >>>>>*/

Line 692: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

688: x_enable_association ap_system_parameters.global_attribute2%TYPE;
689: x_payment_status_flag ap_payment_schedules.payment_status_flag%TYPE;
690: -- Logging Infra:
691: l_procedure_name CONSTANT VARCHAR2(30) := 'jl_br_ap_associate_trade_note';
692: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
693: -- Logging Infra:
694: /*-----------------------------------------------------------*/
695: /* ASSOCIATE_TRADE_NOTE */
696: /*-----------------------------------------------------------*/

Line 707: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

703: IS
704: x_selected VARCHAR2(1);
705: -- Logging Infra:
706: l_procedure_name CONSTANT VARCHAR2(30) := 'associate_trade_note';
707: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
708: -- Logging Infra:
709:
710: BEGIN
711: x_selected := 'Y';

Line 714: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);

710: BEGIN
711: x_selected := 'Y';
712: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
713: l_log_msg := l_procedure_name||'(+)';
714: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
715: END IF;
716: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
717: l_log_msg := 'Parameters : invoice_id_e ' || invoice_id_e || ' payment_num_e ' || payment_num_e ||
718: ' Association_method_e ' || association_method_e;

Line 719: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

715: END IF;
716: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
717: l_log_msg := 'Parameters : invoice_id_e ' || invoice_id_e || ' payment_num_e ' || payment_num_e ||
718: ' Association_method_e ' || association_method_e;
719: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
720: END IF;
721: BEGIN
722: IF (association_method_e = 'METHOD1') THEN
723: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 725: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

721: BEGIN
722: IF (association_method_e = 'METHOD1') THEN
723: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
724: l_log_msg := 'METHOD1 ';
725: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
726: END IF;
727: /* Invoice number AND Due date */
728: SELECT bank_collection_id
729: INTO bank_collection_id_s

Line 748: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

744:
745: ELSIF (association_method_e = 'METHOD2') THEN
746: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
747: l_log_msg := 'METHOD2 ';
748: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
749: END IF;
750: /* Supplier Site and Supplier Name */
751: SELECT bank_collection_id
752: INTO bank_collection_id_s

Line 777: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

773:
774: ELSIF (association_method_e = 'METHOD3') THEN
775: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
776: l_log_msg := 'METHOD3 ';
777: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
778: END IF;
779: /* Supplier Site OR Supplier Name */
780: BEGIN
781: SELECT bank_collection_id

Line 801: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

797: WHEN NO_DATA_FOUND OR TOO_MANY_ROWS THEN
798: x_selected := 'N';
799: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
800: l_log_msg := 'Exception, x_selected set to N';
801: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
802: END IF;
803:
804: END;
805: IF x_selected = 'N' THEN

Line 829: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

825: AND apinv.invoice_currency_code = jlbl.currency_code;
826: x_selected:= 'Y';
827: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
828: l_log_msg := 'Next select executed and x_selected is set to Y';
829: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
830: END IF;
831: END IF;
832: ELSIF (association_method_e = 'METHOD4') THEN
833: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 835: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

831: END IF;
832: ELSIF (association_method_e = 'METHOD4') THEN
833: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
834: l_log_msg := 'METHOD4 ';
835: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
836: END IF;
837: /* Invoice Number AND Due date AND Supplier Site */
838: SELECT bank_collection_id
839: INTO bank_collection_id_s

Line 860: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

856:
857: ELSIF (association_method_e = 'METHOD5') THEN
858: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
859: l_log_msg := 'METHOD5 ';
860: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
861: END IF;
862: /* Invoice Number AND Due date AND Supplier Name */
863: SELECT bank_collection_id
864: INTO bank_collection_id_s

Line 890: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

886:
887: ELSIF (association_method_e = 'METHOD6') THEN
888: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
889: l_log_msg := 'METHOD6 ';
890: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
891: END IF;
892: /* Invoice number AND Gross Amount AND Due Date */
893: SELECT bank_collection_id
894: INTO bank_collection_id_s

Line 916: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

912:
913: ELSIF (association_method_e = 'METHOD7') THEN
914: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
915: l_log_msg := 'METHOD7 ';
916: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
917: END IF;
918: /* Invoice number AND Gross Amount AND Due Date AND Supplier Site */
919: SELECT bank_collection_id
920: INTO bank_collection_id_s

Line 944: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

940:
941: ELSIF (association_method_e = 'METHOD8') THEN
942: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
943: l_log_msg := 'METHOD8 ';
944: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
945: END IF;
946: /* Invoice number AND Gross Amount AND Due Date AND Supplier Name */
947: SELECT bank_collection_id
948: INTO bank_collection_id_s

Line 977: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

973:
974: ELSIF (association_method_e = 'METHOD9') THEN
975: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
976: l_log_msg := 'METHOD9 ';
977: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
978: END IF;
979: /* Invoice number AND Gross Amount AND Due Date AND Supplier Site */
980: /* AND Supplier Name */
981: SELECT bank_collection_id

Line 1013: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1009:
1010: ELSIF (association_method_e = 'METHOD10') THEN
1011: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1012: l_log_msg := 'METHOD10';
1013: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1014: END IF;
1015: /* Invoice number AND Gross Amount AND Due Date OR Supplier Site */
1016: /* AND Supplier Name */
1017: BEGIN

Line 1042: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1038: WHEN NO_DATA_FOUND OR TOO_MANY_ROWS THEN
1039: x_selected := 'N';
1040: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1041: l_log_msg := 'Exception, x_selected set to N';
1042: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1043: END IF;
1044:
1045: END;
1046: IF x_selected = 'N' THEN

Line 1072: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1068: AND apinv.invoice_currency_code = jlbl.currency_code;
1069: x_selected:= 'Y';
1070: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1071: l_log_msg := 'Next select executed and x_selected is set to Y';
1072: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1073: END IF;
1074: END IF;
1075:
1076: ELSIF (association_method_e = 'METHOD11') THEN

Line 1079: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1075:
1076: ELSIF (association_method_e = 'METHOD11') THEN
1077: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1078: l_log_msg := 'METHOD11';
1079: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1080: END IF;
1081: /* Invoice number OR Gross Amount AND Due Date AND Supplier Site */
1082: BEGIN
1083: SELECT bank_collection_id

Line 1103: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1099: WHEN NO_DATA_FOUND OR TOO_MANY_ROWS THEN
1100: x_selected := 'N';
1101: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1102: l_log_msg := 'Exception, x_selected set to N';
1103: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1104: END IF;
1105:
1106: END;
1107: IF x_selected = 'N' THEN

Line 1130: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1126: AND apinv.invoice_currency_code = jlbl.currency_code;
1127: x_selected:= 'Y';
1128: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1129: l_log_msg := 'Next select executed and x_selected is set to Y';
1130: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1131: END IF;
1132: END IF;
1133: ELSIF (association_method_e = 'METHOD12') THEN
1134: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 1136: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1132: END IF;
1133: ELSIF (association_method_e = 'METHOD12') THEN
1134: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1135: l_log_msg := 'METHOD12';
1136: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1137: END IF;
1138: /* Gross Amount AND Due Date AND Supplier Site */
1139: SELECT bank_collection_id
1140: INTO bank_collection_id_s

Line 1162: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1158:
1159: ELSIF (association_method_e = 'METHOD13') THEN
1160: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1161: l_log_msg := 'METHOD13';
1162: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1163: END IF;
1164: /* Gross Amount AND Due Date AND Supplier Name */
1165: SELECT bank_collection_id
1166: INTO bank_collection_id_s

Line 1196: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1192: WHEN NO_DATA_FOUND OR TOO_MANY_ROWS THEN
1193: x_selected := 'N';
1194: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1195: l_log_msg := 'Exception, x_selected set to N';
1196: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1197: END IF;
1198: END;
1199: IF x_selected = 'Y' THEN /* Create the link with two tables */
1200: -- Bug Number 659227 / R11 Patch / May 98 (Copying Y to GA8)

Line 1208: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1204: WHERE invoice_id = invoice_id_e AND
1205: payment_num = payment_num_e;
1206: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1207: l_log_msg := 'Updated ap_payment_schedules global_attribute11 ' || bank_collection_id_s;
1208: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1209: END IF;
1210: UPDATE jl_br_ap_collection_docs
1211: SET invoice_id = invoice_id_e,
1212: payment_num = payment_num_e

Line 1216: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1212: payment_num = payment_num_e
1213: WHERE bank_collection_id = bank_collection_id_s;
1214: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1215: l_log_msg := 'Updated jl_br_ap~_collection_docs invoice_id ' || invoice_id_e;
1216: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1217: END IF;
1218: associate_flag_s := 'Y';
1219: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1220: l_log_msg := 'associate_flag_s set to Y updated values';

Line 1221: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1217: END IF;
1218: associate_flag_s := 'Y';
1219: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1220: l_log_msg := 'associate_flag_s set to Y updated values';
1221: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1222: END IF;
1223:
1224: ELSE
1225: associate_flag_s := 'N';

Line 1228: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1224: ELSE
1225: associate_flag_s := 'N';
1226: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1227: l_log_msg := 'associate_flag_s set to N';
1228: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1229: END IF;
1230: END IF;
1231: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1232: l_log_msg := l_procedure_name||'(-)';

Line 1233: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.end', l_log_msg);

1229: END IF;
1230: END IF;
1231: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1232: l_log_msg := l_procedure_name||'(-)';
1233: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.end', l_log_msg);
1234: END IF;
1235: END associate_trade_note;
1236:
1237: BEGIN

Line 1240: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);

1236:
1237: BEGIN
1238: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1239: l_log_msg := l_procedure_name||'(+)';
1240: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
1241: END IF;
1242: SELECT global_attribute1
1243: INTO x_enable_bank_coll
1244: FROM ap_system_parameters;

Line 1247: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1243: INTO x_enable_bank_coll
1244: FROM ap_system_parameters;
1245: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1246: l_log_msg := 'Value of x_enable_bank_coll ' || x_enable_bank_coll;
1247: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1248: END IF;
1249:
1250: SELECT global_attribute1
1251: INTO x_enable_association

Line 1256: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1252: FROM ap_invoices
1253: WHERE invoice_id = invoice_id_e;
1254: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1255: l_log_msg := 'Value of x_enable_association ' || x_enable_association;
1256: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1257: END IF;
1258:
1259: IF x_enable_bank_coll = 'Y' THEN
1260: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 1262: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1258:
1259: IF x_enable_bank_coll = 'Y' THEN
1260: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1261: l_log_msg := 'x_enable_bank_coll is Y';
1262: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1263: END IF;
1264: IF x_enable_association = 'Y' THEN
1265: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1266: l_log_msg := 'x_enable_association is Y calling associate_trade_note';

Line 1267: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1263: END IF;
1264: IF x_enable_association = 'Y' THEN
1265: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1266: l_log_msg := 'x_enable_association is Y calling associate_trade_note';
1267: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1268: END IF;
1269: associate_trade_note( invoice_id_e, payment_num_e,
1270: association_method_e, bank_collection_id_s,
1271: associate_flag_s );

Line 1276: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1272: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1273: l_log_msg := 'After calling associate_trade_note returned values ';
1274: l_log_msg :=l_log_msg || 'bank_collection_id_s ' || bank_collection_id_s;
1275: l_log_msg :=l_log_msg || 'associate_flag_s ' || associate_flag_s;
1276: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1277: END IF;
1278:
1279: IF associate_flag_s = 'Y' THEN /* Se associou, */
1280: /* libera os dois */

Line 1283: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1279: IF associate_flag_s = 'Y' THEN /* Se associou, */
1280: /* libera os dois */
1281: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1282: l_log_msg := 'associate_flag_s is Y';
1283: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1284: END IF;
1285:
1286: UPDATE ap_payment_schedules
1287: SET hold_flag = 'N'

Line 1296: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1292: SET hold_flag = 'N'
1293: WHERE bank_collection_id = bank_collection_id_s;
1294: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1295: l_log_msg := 'Updated hold to N in ar_payment_schedules, jl_br_ap_collection_docs';
1296: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1297: END IF;
1298:
1299: ELSE /* If not associated and payment schedule not paid */
1300: /* then hold the payment schedule */

Line 1303: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1299: ELSE /* If not associated and payment schedule not paid */
1300: /* then hold the payment schedule */
1301: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1302: l_log_msg := 'associate_flag_s is N';
1303: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1304: END IF;
1305: SELECT payment_status_flag
1306: INTO x_payment_status_flag
1307: FROM ap_payment_schedules

Line 1313: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1309: AND payment_num = payment_num_e;
1310:
1311: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1312: l_log_msg := 'x_payment_status_flag is || x_payment_status_flag';
1313: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1314: END IF;
1315:
1316: IF (x_payment_status_flag = 'N') THEN
1317: UPDATE ap_payment_schedules

Line 1323: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1319: WHERE invoice_id = invoice_id_e
1320: AND payment_num = payment_num_e;
1321: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1322: l_log_msg := 'x_payment_status_flag N, Updated hold_flag_s Y in ap_payment_schedules';
1323: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1324: END IF;
1325: END IF;
1326: END IF;
1327: ELSE /* If association not enabled, hold the payment schedule */

Line 1334: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1330: WHERE invoice_id = invoice_id_e
1331: AND payment_num = payment_num_e;
1332: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1333: l_log_msg := 'x_enable_association is N updated ap_payment_schedules hold flag to Y';
1334: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1335: END IF;
1336:
1337: END IF;
1338: ELSE /* If bank collection is not enabled, release the payment schedule */

Line 1345: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1341: WHERE invoice_id = invoice_id_e
1342: AND payment_num = payment_num_e;
1343: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1344: l_log_msg := 'x_enable_bank_coll is N, updated ap_payment_schedules to N';
1345: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1346: END IF;
1347:
1348: END IF;
1349: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 1351: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.end', l_log_msg);

1347:
1348: END IF;
1349: IF ( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1350: l_log_msg := l_procedure_name||'(-)';
1351: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.end', l_log_msg);
1352: END IF;
1353: END jl_br_ap_associate_trade_note;
1354:
1355: END JL_BR_AP_ASSOCIATE_COLLECTION;