DBA Data[Home] [Help]

APPS.DPP_TRANSACTION_PVT dependencies on FND_FILE

Line 49: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update InterfaceErrSts');

45: BEGIN
46: -- Initialize API return status to sucess
47: x_return_status := fnd_api.g_ret_sts_success;
48: IF DPP_DEBUG_HIGH_ON THEN
49: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update InterfaceErrSts');
50: END IF;
51:
52: --Update Interface Header table with error status
53: UPDATE DPP_TXN_HEADERS_INT_ALL dtha

Line 64: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update InterfaceErrSts');

60: WHERE transaction_int_header_id = p_txn_header_rec_type.transaction_int_header_id;
61: COMMIT;
62:
63: IF DPP_DEBUG_HIGH_ON THEN
64: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update InterfaceErrSts');
65: END IF;
66: EXCEPTION
67: WHEN Fnd_Api.G_EXC_ERROR THEN
68: x_return_status := Fnd_Api.g_ret_sts_error ;

Line 79: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||sqlerrm);

75: fnd_message.set_token('ROUTINE', 'DPP_TRANSACTION_PVT');
76: fnd_message.set_token('ERRNO', SQLCODE);
77: fnd_message.set_token('REASON', sqlerrm);
78: END IF;
79: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||sqlerrm);
80: END Update_InterfaceErrSts;
81:
82: PROCEDURE Validate_OperatingUnit(
83: p_txn_header_rec_type IN OUT nocopy txn_header_rec

Line 95: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Operating Unit');

91:
92:
93: BEGIN
94: IF DPP_DEBUG_HIGH_ON THEN
95: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Operating Unit');
96: END IF;
97: -- Initialize API return status to sucess
98: x_return_status := fnd_api.g_ret_sts_success;
99: --BUG 6806974

Line 127: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Operating Unit');

123: AND mo_global.check_access(hr.organization_id) = 'Y' ;
124: --MOAC
125: MO_GLOBAL.set_policy_context('S', p_txn_header_rec_type.org_id);
126: IF DPP_DEBUG_HIGH_ON THEN
127: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Operating Unit');
128: END IF;
129:
130: EXCEPTION
131: WHEN NO_DATA_FOUND THEN

Line 184: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Document Reference Number');

180: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
181: l_valid_doc VARCHAR2(1);
182: BEGIN
183: IF DPP_DEBUG_HIGH_ON THEN
184: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Document Reference Number');
185: END IF;
186: -- Initialize API return status to sucess
187: x_return_status := fnd_api.g_ret_sts_success;
188: IF p_txn_header_rec_type.ref_document_number IS NULL THEN

Line 211: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Document Reference Number');

207: x_msg_data := fnd_message.get();
208: p_txn_header_rec_type.error_code := 'DPP_DOC_REF_NUM_ERR';
209: END IF;
210: IF DPP_DEBUG_HIGH_ON THEN
211: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Document Reference Number');
212: END IF;
213: EXCEPTION
214: WHEN Fnd_Api.G_EXC_ERROR THEN
215: x_return_status := Fnd_Api.g_ret_sts_error ;

Line 239: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Supplier Details');

235: l_trunc_sysdate DATE := TRUNC(SYSDATE);
236:
237: BEGIN
238: IF DPP_DEBUG_HIGH_ON THEN
239: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Supplier Details');
240: END IF;
241: -- Initialize API return status to sucess
242: x_return_status := fnd_api.g_ret_sts_success;
243: --BUG 6806974

Line 317: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Supplier Details Vendor Id: '||p_txn_header_rec_type.vendor_id);

313: p_txn_header_rec_type.error_code := 'DPP_TXN_SUPP_SITE_ERR';
314: RAISE Fnd_Api.G_EXC_ERROR;
315: END;
316: IF DPP_DEBUG_HIGH_ON THEN
317: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Supplier Details Vendor Id: '||p_txn_header_rec_type.vendor_id);
318: END IF;
319: EXCEPTION
320: WHEN Fnd_Api.G_EXC_ERROR THEN
321: x_return_status := Fnd_Api.g_ret_sts_error ;

Line 356: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Supplier Trade Profile');

352: AND org_id = p_org_id;
353:
354: BEGIN
355: IF DPP_DEBUG_HIGH_ON THEN
356: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Supplier Trade Profile');
357: END IF;
358: -- Initialize API return status to sucess
359: x_return_status := fnd_api.g_ret_sts_success;
360:

Line 373: FND_FILE.PUT_LINE(FND_FILE.LOG,'Supplier trade profile setup not available');

369: fnd_message.set_name('DPP','DPP_SUPP_TRDPRFLS_MISSING_ERR');
370: x_msg_data :=fnd_message.get();
371: END IF;
372: p_txn_header_rec_type.error_code := 'DPP_SUPP_TRDPRFLS_MISSING_ERR';
373: FND_FILE.PUT_LINE(FND_FILE.LOG,'Supplier trade profile setup not available');
374: FND_FILE.NEW_LINE(FND_FILE.LOG);
375: RAISE FND_API.G_EXC_ERROR;
376: WHEN OTHERS THEN
377: FND_FILE.PUT_LINE(FND_FILE.LOG,'Exception while fetching supp_trade_profile_id: ' || SQLERRM);

Line 374: FND_FILE.NEW_LINE(FND_FILE.LOG);

370: x_msg_data :=fnd_message.get();
371: END IF;
372: p_txn_header_rec_type.error_code := 'DPP_SUPP_TRDPRFLS_MISSING_ERR';
373: FND_FILE.PUT_LINE(FND_FILE.LOG,'Supplier trade profile setup not available');
374: FND_FILE.NEW_LINE(FND_FILE.LOG);
375: RAISE FND_API.G_EXC_ERROR;
376: WHEN OTHERS THEN
377: FND_FILE.PUT_LINE(FND_FILE.LOG,'Exception while fetching supp_trade_profile_id: ' || SQLERRM);
378: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 377: FND_FILE.PUT_LINE(FND_FILE.LOG,'Exception while fetching supp_trade_profile_id: ' || SQLERRM);

373: FND_FILE.PUT_LINE(FND_FILE.LOG,'Supplier trade profile setup not available');
374: FND_FILE.NEW_LINE(FND_FILE.LOG);
375: RAISE FND_API.G_EXC_ERROR;
376: WHEN OTHERS THEN
377: FND_FILE.PUT_LINE(FND_FILE.LOG,'Exception while fetching supp_trade_profile_id: ' || SQLERRM);
378: FND_FILE.NEW_LINE(FND_FILE.LOG);
379: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
380: END;
381:

Line 378: FND_FILE.NEW_LINE(FND_FILE.LOG);

374: FND_FILE.NEW_LINE(FND_FILE.LOG);
375: RAISE FND_API.G_EXC_ERROR;
376: WHEN OTHERS THEN
377: FND_FILE.PUT_LINE(FND_FILE.LOG,'Exception while fetching supp_trade_profile_id: ' || SQLERRM);
378: FND_FILE.NEW_LINE(FND_FILE.LOG);
379: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
380: END;
381:
382: x_supp_trade_profile_id := l_supp_trade_profile_id;

Line 385: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Supplier Trade Profile for Vendor Id: ' || p_txn_header_rec_type.vendor_id);

381:
382: x_supp_trade_profile_id := l_supp_trade_profile_id;
383:
384: IF DPP_DEBUG_HIGH_ON THEN
385: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Supplier Trade Profile for Vendor Id: ' || p_txn_header_rec_type.vendor_id);
386: END IF;
387: EXCEPTION
388: WHEN Fnd_Api.G_EXC_ERROR THEN
389: x_return_status := Fnd_Api.g_ret_sts_error ;

Line 424: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Execution Process Setup');

420: AND org_id = p_org_id;
421:
422: BEGIN
423: IF DPP_DEBUG_HIGH_ON THEN
424: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Execution Process Setup');
425: END IF;
426: -- Initialize API return status to sucess
427: x_return_status := fnd_api.g_ret_sts_success;
428:

Line 443: FND_FILE.PUT_LINE(FND_FILE.LOG,'Exception while fetching from OZF_PROCESS_SETUP_ALL: '||SQLERRM);

439: CLOSE get_process_setup_cnt_csr;
440: END IF;
441: EXCEPTION
442: WHEN OTHERS THEN
443: FND_FILE.PUT_LINE(FND_FILE.LOG,'Exception while fetching from OZF_PROCESS_SETUP_ALL: '||SQLERRM);
444: FND_FILE.NEW_LINE(FND_FILE.LOG);
445: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
446: END;
447:

Line 444: FND_FILE.NEW_LINE(FND_FILE.LOG);

440: END IF;
441: EXCEPTION
442: WHEN OTHERS THEN
443: FND_FILE.PUT_LINE(FND_FILE.LOG,'Exception while fetching from OZF_PROCESS_SETUP_ALL: '||SQLERRM);
444: FND_FILE.NEW_LINE(FND_FILE.LOG);
445: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
446: END;
447:
448: IF l_count = 0 THEN --Process Setup does not exist

Line 455: FND_FILE.PUT_LINE(FND_FILE.LOG,'No Execution processes setup available for this transaction.');

451: fnd_message.set_name( 'DPP','DPP_PROCESS_SETUP_MISSING_ERR');
452: x_msg_data :=fnd_message.get();
453: END IF;
454: p_txn_header_rec_type.error_code := 'DPP_PROCESS_SETUP_MISSING_ERR';
455: FND_FILE.PUT_LINE(FND_FILE.LOG,'No Execution processes setup available for this transaction.');
456: FND_FILE.NEW_LINE(FND_FILE.LOG);
457: RAISE Fnd_Api.G_EXC_ERROR;
458: END IF;
459:

Line 456: FND_FILE.NEW_LINE(FND_FILE.LOG);

452: x_msg_data :=fnd_message.get();
453: END IF;
454: p_txn_header_rec_type.error_code := 'DPP_PROCESS_SETUP_MISSING_ERR';
455: FND_FILE.PUT_LINE(FND_FILE.LOG,'No Execution processes setup available for this transaction.');
456: FND_FILE.NEW_LINE(FND_FILE.LOG);
457: RAISE Fnd_Api.G_EXC_ERROR;
458: END IF;
459:
460: IF DPP_DEBUG_HIGH_ON THEN

Line 461: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Execution Process Setup for Vendor Id: ' || p_txn_header_rec_type.vendor_id);

457: RAISE Fnd_Api.G_EXC_ERROR;
458: END IF;
459:
460: IF DPP_DEBUG_HIGH_ON THEN
461: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Execution Process Setup for Vendor Id: ' || p_txn_header_rec_type.vendor_id);
462: END IF;
463: EXCEPTION
464: WHEN Fnd_Api.G_EXC_ERROR THEN
465: x_return_status := Fnd_Api.g_ret_sts_error ;

Line 492: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Lines Details');

488: l_lines NUMBER;
489:
490: BEGIN
491: IF DPP_DEBUG_HIGH_ON THEN
492: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Lines Details');
493: END IF;
494: -- Initialize API return status to sucess
495: x_return_status := fnd_api.g_ret_sts_success;
496:

Line 625: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Get Days Covered');

621: AS
622: BEGIN
623:
624: IF DPP_DEBUG_HIGH_ON THEN
625: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Get Days Covered');
626: END IF;
627: -- Initialize API return status to sucess
628: x_return_status := fnd_api.g_ret_sts_success;
629: SELECT default_days_covered

Line 636: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Get Days Covered');

632: WHERE ostpa.supplier_id =to_number(p_txn_header_rec_type.vendor_id)
633: AND ostpa.supplier_site_id =to_number(p_txn_header_rec_type.vendor_site_id);
634:
635: IF DPP_DEBUG_HIGH_ON THEN
636: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Get Days Covered');
637: END IF;
638: EXCEPTION
639: WHEN NO_DATA_FOUND THEN
640: x_return_status := fnd_api.g_ret_sts_error;

Line 646: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

642: fnd_message.set_name('DPP', 'DPP_DAYS_COVRD_ERR');
643: fnd_message.set_token('SUPPLIER_NAME', p_txn_header_rec_type.vendor_name);
644: x_msg_data :=fnd_message.get();
645: END IF;
646: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
647: p_txn_header_rec_type.error_code := 'DPP_DAYS_COVRD_ERR';
648: WHEN others THEN
649: x_return_status := fnd_api.g_ret_sts_unexp_error;
650: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 684: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Currency');

680: BEGIN
681: -- Initialize API return status to sucess
682: x_return_status := fnd_api.g_ret_sts_success;
683: IF DPP_DEBUG_HIGH_ON THEN
684: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Currency');
685: END IF;
686: IF p_txn_header_rec_type.trx_currency IS NULL THEN
687: fnd_message.set_name('DPP', 'DPP_TXN_CURR_NULL');
688: x_msg_data :=fnd_message.get();

Line 701: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Currency');

697: WHERE currency_flag = 'Y'
698: AND enabled_flag = 'Y'
699: AND currency_code =p_txn_header_rec_type.trx_currency;
700: IF DPP_DEBUG_HIGH_ON THEN
701: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Currency');
702: END IF;
703: EXCEPTION WHEN no_data_found THEN
704: x_return_status := fnd_api.g_ret_sts_error;
705: fnd_message.set_name('DPP', 'DPP_TXN_CURR_ERR');

Line 709: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

705: fnd_message.set_name('DPP', 'DPP_TXN_CURR_ERR');
706: fnd_message.set_token('CURRENCY_CODE', p_txn_header_rec_type.trx_currency);
707: x_msg_data :=fnd_message.get();
708: l_error_message := l_error_message || x_msg_data;
709: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
710: p_txn_header_rec_type.error_code := 'DPP_TXN_CURR_ERR';
711: END;
712: --for only inbound
713: IF p_txn_header_rec_type.supplier_approved_by is NULL THEN

Line 726: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

722: fnd_message.set_name('DPP', 'DPP_TXN_SEQ_NO_ERR');
723: fnd_message.set_token('SEQ_NUM', 'Transaction Header Id');
724: x_msg_data := fnd_message.get();
725: l_error_message := l_error_message || x_msg_data;
726: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
727: l_error_message :=l_error_message|| x_msg_data;
728: p_txn_header_rec_type.error_code := 'DPP_TXN_SEQ_NO_ERR';
729: --RAISE Fnd_Api.G_EXC_ERROR;
730: END;

Line 747: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

743: fnd_message.set_name('DPP', 'DPP_TXN_SEQ_NO_ERR');
744: fnd_message.set_token('SEQ_NUM', 'Transaction Number');
745: END IF;
746: x_msg_data := fnd_message.get();
747: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
748: p_txn_header_rec_type.error_code := 'DPP_TXN_SEQ_NO_ERR';
749: l_error_message :=l_error_message|| x_msg_data;
750: --RAISE Fnd_Api.G_EXC_ERROR;
751: END;

Line 779: FND_FILE.PUT_LINE(FND_FILE.LOG,'Error while getting the truncated date' || x_msg_data);

775: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
776: fnd_message.set_name('DPP', 'DPP_TXN_STS_ERR');
777: END IF;
778: x_msg_data := fnd_message.get();
779: FND_FILE.PUT_LINE(FND_FILE.LOG,'Error while getting the truncated date' || x_msg_data);
780: p_txn_header_rec_type.error_code := 'DPP_TXN_STS_ERR';
781: l_error_message := l_error_message || x_msg_data;
782: END;
783:

Line 805: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

801: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
802: fnd_message.set_name('DPP', 'DPP_TXN_STS_ERR');
803: END IF;
804: x_msg_data := fnd_message.get();
805: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
806: p_txn_header_rec_type.error_code := 'DPP_TXN_STS_ERR';
807: l_error_message :=l_error_message|| x_msg_data;
808: --RAISE Fnd_Api.G_EXC_ERROR;
809: END;

Line 824: FND_FILE.PUT_LINE(FND_FILE.LOG,'Validating Days Covered');

820: IF x_return_status = Fnd_Api.g_ret_sts_error OR x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
821: l_error_message :=l_error_message|| x_msg_data;
822: END IF;
823: IF DPP_DEBUG_HIGH_ON THEN
824: FND_FILE.PUT_LINE(FND_FILE.LOG,'Validating Days Covered');
825: END IF;
826: --Validate the given days covered should be between 0 and 9999
827: IF p_txn_header_rec_type.days_covered <= 0
828: OR p_txn_header_rec_type.days_covered > 9999

Line 836: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

832: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
833: fnd_message.set_name('DPP', 'DPP_TXN_DAYS_COV_ERR');
834: END IF;
835: x_msg_data := fnd_message.get();
836: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
837: p_txn_header_rec_type.error_code := 'DPP_TXN_DAYS_COV_ERR';
838: l_error_message :=l_error_message|| x_msg_data;
839: --RAISE Fnd_Api.g_exc_error;
840: END IF;

Line 847: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

843: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
844: fnd_message.set_name('DPP', 'DPP_EFF_START_DATE_ERR');
845: END IF;
846: x_msg_data := fnd_message.get();
847: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
848: p_txn_header_rec_type.error_code := 'DPP_EFF_START_DATE_ERR';
849: l_error_message :=l_error_message|| x_msg_data;
850: --RAISE Fnd_Api.g_exc_error;
851: END IF;

Line 859: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

855: RAISE Fnd_Api.g_exc_error;
856: END IF;
857: EXCEPTION
858: WHEN Fnd_Api.G_EXC_ERROR THEN
859: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
860: x_return_status := Fnd_Api.g_ret_sts_error ;
861: WHEN others THEN
862: x_return_status := fnd_api.g_ret_sts_unexp_error;
863: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 870: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

866: fnd_message.set_token('ERRNO', SQLCODE);
867: fnd_message.set_token('REASON', sqlerrm);
868: END IF;
869: x_msg_data :=fnd_message.get();
870: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
871: END Validate_Currency;
872:
873:
874:

Line 888: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Create Header');

884: l_transaction_number VARCHAR2(55);
885: l_error_message VARCHAR2(4000) := NULL;
886: BEGIN
887: IF DPP_DEBUG_HIGH_ON THEN
888: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Create Header');
889: END IF;
890: -- Initialize API return status to sucess
891: x_return_status := fnd_api.g_ret_sts_success;
892: --Get Transaction Header Id from sequence

Line 895: FND_FILE.PUT_LINE(FND_FILE.LOG,' Inserting Transaction Header');

891: x_return_status := fnd_api.g_ret_sts_success;
892: --Get Transaction Header Id from sequence
893:
894: IF DPP_DEBUG_HIGH_ON THEN
895: FND_FILE.PUT_LINE(FND_FILE.LOG,' Inserting Transaction Header');
896: END IF;
897: INSERT INTO DPP_TRANSACTION_HEADERS_ALL(
898: object_version_number
899: ,transaction_header_id

Line 1019: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Create Header');

1015: ,p_txn_header_rec_type.ATTRIBUTE30
1016: ,p_txn_header_rec_type.trx_currency);
1017:
1018: IF DPP_DEBUG_HIGH_ON THEN
1019: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Create Header');
1020: END IF;
1021: EXCEPTION
1022: WHEN Fnd_Api.G_EXC_ERROR THEN
1023: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

Line 1023: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

1019: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Create Header');
1020: END IF;
1021: EXCEPTION
1022: WHEN Fnd_Api.G_EXC_ERROR THEN
1023: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1024: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Create Header G_EXC_ERROR '||x_msg_data);
1025: x_return_status := Fnd_Api.g_ret_sts_error ;
1026: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1027: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

Line 1027: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

1023: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1024: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Create Header G_EXC_ERROR '||x_msg_data);
1025: x_return_status := Fnd_Api.g_ret_sts_error ;
1026: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1027: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1028: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Create Header G_EXC_UNEXPECTED_ERROR' ||x_msg_data||sqlerrm);
1029: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1030: WHEN OTHERS THEN
1031: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Create Header OTHERS'||sqlerrm);

Line 1041: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

1037: fnd_message.set_token('ERRNO', SQLCODE);
1038: fnd_message.set_token('REASON', sqlerrm);
1039: END IF;
1040: x_msg_data := fnd_message.get;
1041: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1042: END Create_Header;
1043: PROCEDURE Validate_SupplierPartNum(
1044: p_txn_header_rec_type IN OUT nocopy txn_header_rec
1045: ,p_txn_lines_tbl_type IN OUT nocopy txn_lines_tbl

Line 1064: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Supplier Part Number');

1060: BEGIN
1061: -- Initialize API return status to sucess
1062: x_return_status := fnd_api.g_ret_sts_success;
1063: IF DPP_DEBUG_HIGH_ON THEN
1064: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Supplier Part Number');
1065: END IF;
1066: FOR i in p_txn_lines_tbl_type.FIRST..p_txn_lines_tbl_type.LAST
1067: LOOP
1068: --Get transaction line id from sequence

Line 1082: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

1078: fnd_message.set_name('DPP', 'DPP_TXN_SEQ_NO_ERR');
1079: fnd_message.set_token('SEQ_NUM', 'Transaction Line Id');
1080: END IF;
1081: x_msg_data := fnd_message.get();
1082: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1083: p_txn_lines_tbl_type(i).error_code := 'DPP_TXN_SEQ_NO_ERR';
1084: IF p_txn_header_rec_type.error_code IS NULL THEN
1085: p_txn_header_rec_type.error_code := 'DPP_TXN_SEQ_NO_ERR';
1086: ELSE

Line 1106: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

1102: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1103: fnd_message.set_name('DPP', 'DPP_TXN_STS_ERR');
1104: END IF;
1105: x_msg_data := fnd_message.get();
1106: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1107: p_txn_lines_tbl_type(i).error_code := 'DPP_TXN_STS_ERR';
1108: IF p_txn_header_rec_type.error_code IS NULL THEN
1109: p_txn_header_rec_type.error_code := 'DPP_TXN_STS_ERR';
1110: ELSE

Line 1124: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

1120: fnd_message.set_name('DPP', 'DPP_TXN_SUP_PART_NO_NULL');
1121: END IF;
1122: x_msg_data := fnd_message.get();
1123: l_error_message :=l_error_message|| x_msg_data;
1124: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1125: p_txn_lines_tbl_type(i).error_code := 'DPP_TXN_SUP_PART_NO_NULL';
1126:
1127: RAISE Fnd_Api.g_exc_error;
1128: END IF;

Line 1262: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

1258: fnd_message.set_token('ITEM_NUMBER', p_txn_lines_tbl_type(i).item_number);
1259: fnd_message.set_token('INVENTORY_ITEM_ID', p_txn_lines_tbl_type(i).inventory_item_id);
1260: x_msg_data := fnd_message.get();
1261: p_txn_header_rec_type.error_code := 'DPP_TXN_DUP_SUP_PART_NUM_ERR';
1262: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1263: IF (l_error_message is null or length(l_error_message) < 2000) and l_msg_exceeded = 'N' THEN
1264: l_error_message :=l_error_message|| x_msg_data;
1265: ELSE
1266: l_msg_exceeded := 'Y';

Line 1289: FND_FILE.PUT_LINE(FND_FILE.LOG,' Supplier Part Number does not exist for Item Number '|| p_txn_lines_tbl_type(i).item_number ||

1285: AND (trunc(sysdate) between occ.start_date_active and occ.end_date_active OR occ.end_date_active is null);
1286: END IF;
1287: EXCEPTION WHEN NO_DATA_FOUND THEN
1288: IF DPP_DEBUG_HIGH_ON THEN
1289: FND_FILE.PUT_LINE(FND_FILE.LOG,' Supplier Part Number does not exist for Item Number '|| p_txn_lines_tbl_type(i).item_number ||
1290: '( Inventory Item ID '|| p_txn_lines_tbl_type(i).inventory_item_id );
1291: END IF;
1292: WHEN TOO_MANY_ROWS THEN
1293: fnd_message.set_name('DPP', 'DPP_TXN_DUP_SUP_PART_NUM_ERR');

Line 1303: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

1299: p_txn_header_rec_type.error_code := 'DPP_TXN_DUP_SUP_PART_NUM_ERR';
1300: ELSE
1301: p_txn_header_rec_type.error_code := 'MULTIPLE_ERRORS';
1302: END IF;
1303: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1304: IF (l_error_message is null or length(l_error_message) < 2000) and l_msg_exceeded = 'N' THEN
1305: l_error_message :=l_error_message|| x_msg_data;
1306: ELSE
1307: l_msg_exceeded := 'Y';

Line 1360: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

1356: fnd_message.set_name('DPP', 'DPP_TXN_DUP_SUP_PART_NUM_ERR');
1357: fnd_message.set_token('ITEM_NUMBER', p_txn_lines_tbl_type(i).item_number);
1358: fnd_message.set_token('INVENTORY_ITEM_ID', p_txn_lines_tbl_type(i).inventory_item_id);
1359: x_msg_data := fnd_message.get();
1360: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1361: p_txn_lines_tbl_type(i).error_code := 'DPP_TXN_DUP_SUP_PART_NUM_ERR';
1362: IF p_txn_header_rec_type.error_code IS NULL THEN
1363: p_txn_header_rec_type.error_code := 'DPP_TXN_DUP_SUP_PART_NUM_ERR';
1364: ELSE

Line 1423: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

1419: p_txn_header_rec_type.error_code := 'MULTIPLE_ERRORS';
1420: END IF;
1421: x_return_status := fnd_api.g_ret_sts_error;
1422: l_error_message :=l_error_message|| x_msg_data;
1423: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1424: END IF;
1425: END IF;
1426: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Prior Price:'||p_txn_lines_tbl_type(i).prior_price);
1427: IF p_txn_lines_tbl_type(i).prior_price IS NULL THEN

Line 1438: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

1434: ELSE
1435: p_txn_header_rec_type.error_code := 'MULTIPLE_ERRORS';
1436: END IF;
1437: x_return_status := fnd_api.g_ret_sts_error;
1438: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1439: IF (l_error_message is null or length(l_error_message) < 2000) and l_msg_exceeded = 'N' THEN
1440: l_error_message :=l_error_message|| x_msg_data;
1441: ELSE
1442: l_msg_exceeded := 'Y';

Line 1462: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

1458: ELSE
1459: p_txn_header_rec_type.error_code := 'MULTIPLE_ERRORS';
1460: END IF;
1461: x_return_status := fnd_api.g_ret_sts_error;
1462: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1463: IF (l_error_message is null or length(l_error_message) < 2000) and l_msg_exceeded = 'N' THEN
1464: l_error_message :=l_error_message|| x_msg_data;
1465: ELSE
1466: l_msg_exceeded := 'Y';

Line 1475: FND_FILE.PUT_LINE(FND_FILE.LOG,' Prior Price is either zero or negative');

1471: END;
1472:
1473: --Validation for Prior Price --ANBBALAS
1474: IF p_txn_lines_tbl_type(i).prior_price <= 0 THEN
1475: FND_FILE.PUT_LINE(FND_FILE.LOG,' Prior Price is either zero or negative');
1476: fnd_message.set_name('DPP', 'DPP_PRIOR_PRICE_ERR');
1477: x_msg_data := fnd_message.get();
1478: p_txn_lines_tbl_type(i).error_code := 'DPP_PRIOR_PRICE_ERR';
1479: IF p_txn_header_rec_type.error_code IS NULL THEN

Line 1496: FND_FILE.PUT_LINE(FND_FILE.LOG,' Change Value is null');

1492: END IF;
1493:
1494: --Validation for Change Value
1495: IF p_txn_lines_tbl_type(i).change_value IS NULL THEN
1496: FND_FILE.PUT_LINE(FND_FILE.LOG,' Change Value is null');
1497: fnd_message.set_name('DPP', 'DPP_CHANGE_VALUE_NULL');
1498: x_msg_data := fnd_message.get();
1499: p_txn_lines_tbl_type(i).error_code := 'DPP_CHANGE_VALUE_NULL';
1500: IF p_txn_header_rec_type.error_code IS NULL THEN

Line 1516: FND_FILE.PUT_LINE(FND_FILE.LOG,' Change type is null');

1512: END IF;
1513: END IF;
1514:
1515: IF p_txn_lines_tbl_type(i).change_type IS NULL THEN
1516: FND_FILE.PUT_LINE(FND_FILE.LOG,' Change type is null');
1517: fnd_message.set_name('DPP', 'DPP_CHANGE_TYPE_NULL');
1518: x_msg_data := fnd_message.get();
1519: p_txn_lines_tbl_type(i).error_code := 'DPP_CHANGE_TYPE_NULL';
1520: IF p_txn_header_rec_type.error_code IS NULL THEN

Line 1541: FND_FILE.PUT_LINE(FND_FILE.LOG,' Negative Price Change Value:' || p_txn_lines_tbl_type(i).change_value ||'. Please enter a valid Change value.');

1537: --Calculate Supplier New Price and Price change columns
1538:
1539: IF p_txn_lines_tbl_type(i).change_type = 'NEW_PRICE' THEN
1540: IF p_txn_lines_tbl_type(i).change_value <= 0 THEN
1541: FND_FILE.PUT_LINE(FND_FILE.LOG,' Negative Price Change Value:' || p_txn_lines_tbl_type(i).change_value ||'. Please enter a valid Change value.');
1542: fnd_message.set_name('DPP', 'DPP_TXN_CHANGE_VALUE_ERR');
1543: fnd_message.set_token('CHANGE_VALUE', p_txn_lines_tbl_type(i).change_value );
1544: x_msg_data := fnd_message.get();
1545: p_txn_lines_tbl_type(i).error_code := 'DPP_TXN_CHANGE_VALUE_ERR';

Line 1564: FND_FILE.PUT_LINE(FND_FILE.LOG,' Invalid Price Change Value:' || p_txn_lines_tbl_type(i).change_value || 'for the change type Percent Decrease. Please enter a valid Change value.');

1560: p_txn_lines_tbl_type(i).supplier_new_price := p_txn_lines_tbl_type(i).change_value;
1561: END IF;
1562: ELSIF p_txn_lines_tbl_type(i).change_type = 'PERCENT_DECREASE' THEN
1563: IF p_txn_lines_tbl_type(i).change_value <= 0 OR p_txn_lines_tbl_type(i).change_value >= 100 THEN
1564: FND_FILE.PUT_LINE(FND_FILE.LOG,' Invalid Price Change Value:' || p_txn_lines_tbl_type(i).change_value || 'for the change type Percent Decrease. Please enter a valid Change value.');
1565: fnd_message.set_name('DPP', 'DPP_TXN_CHANGE_VALUE_ERR');
1566: fnd_message.set_token('CHANGE_VALUE', p_txn_lines_tbl_type(i).change_value );
1567: x_msg_data := fnd_message.get();
1568: p_txn_lines_tbl_type(i).error_code := 'DPP_TXN_CHANGE_VALUE_ERR';

Line 1588: FND_FILE.PUT_LINE(FND_FILE.LOG,' Invalid Price Change Value:' || p_txn_lines_tbl_type(i).change_value || 'for the change type Percent Increase. Please enter a valid Change value.');

1584: END IF;
1585:
1586: ELSIF p_txn_lines_tbl_type(i).change_type = 'PERCENT_INCREASE' THEN
1587: IF p_txn_lines_tbl_type(i).change_value <= 0 THEN
1588: FND_FILE.PUT_LINE(FND_FILE.LOG,' Invalid Price Change Value:' || p_txn_lines_tbl_type(i).change_value || 'for the change type Percent Increase. Please enter a valid Change value.');
1589: fnd_message.set_name('DPP', 'DPP_TXN_CHANGE_VALUE_ERR');
1590: fnd_message.set_token('CHANGE_VALUE', p_txn_lines_tbl_type(i).change_value );
1591: x_msg_data := fnd_message.get();
1592: p_txn_lines_tbl_type(i).error_code := 'DPP_TXN_CHANGE_VALUE_ERR';

Line 1611: FND_FILE.PUT_LINE(FND_FILE.LOG,' Invalid Price Change Value:' || p_txn_lines_tbl_type(i).change_value || 'for the change type Amount Increase. Please enter a valid Change value.');

1607: p_txn_lines_tbl_type(i).supplier_new_price := (p_txn_lines_tbl_type(i).prior_price+(p_txn_lines_tbl_type(i).prior_price*( p_txn_lines_tbl_type(i).change_value) / 100));
1608: END IF;
1609: ELSIF p_txn_lines_tbl_type(i).change_type = 'AMOUNT_INCREASE' THEN
1610: IF p_txn_lines_tbl_type(i).change_value <= 0 THEN
1611: FND_FILE.PUT_LINE(FND_FILE.LOG,' Invalid Price Change Value:' || p_txn_lines_tbl_type(i).change_value || 'for the change type Amount Increase. Please enter a valid Change value.');
1612: fnd_message.set_name('DPP', 'DPP_TXN_CHANGE_VALUE_ERR');
1613: fnd_message.set_token('CHANGE_VALUE', p_txn_lines_tbl_type(i).change_value );
1614: x_msg_data := fnd_message.get();
1615: p_txn_lines_tbl_type(i).error_code := 'DPP_TXN_CHANGE_VALUE_ERR';

Line 1635: FND_FILE.PUT_LINE(FND_FILE.LOG,' Invalid Price Change Value:' || p_txn_lines_tbl_type(i).change_value || 'for the change type Amount Decrease. Please enter a valid Change value.');

1631: END IF;
1632: ELSIF p_txn_lines_tbl_type(i).change_type = 'AMOUNT_DECREASE' THEN
1633: IF (p_txn_lines_tbl_type(i).change_value <= 0 OR
1634: (p_txn_lines_tbl_type(i).prior_price > 0 AND p_txn_lines_tbl_type(i).change_value >= p_txn_lines_tbl_type(i).prior_price) ) THEN
1635: FND_FILE.PUT_LINE(FND_FILE.LOG,' Invalid Price Change Value:' || p_txn_lines_tbl_type(i).change_value || 'for the change type Amount Decrease. Please enter a valid Change value.');
1636: fnd_message.set_name('DPP', 'DPP_TXN_CHANGE_VALUE_ERR');
1637: fnd_message.set_token('CHANGE_VALUE', p_txn_lines_tbl_type(i).change_value );
1638: x_msg_data := fnd_message.get();
1639: p_txn_lines_tbl_type(i).error_code := 'DPP_TXN_CHANGE_VALUE_ERR';

Line 1658: FND_FILE.PUT_LINE(FND_FILE.LOG,' Invalid Price Change type:' || p_txn_lines_tbl_type(i).change_type ||'. Please enter a valid Change type.');

1654: p_txn_lines_tbl_type(i).supplier_new_price := p_txn_lines_tbl_type(i).prior_price - p_txn_lines_tbl_type(i).change_value;
1655: END IF;
1656:
1657: ELSE
1658: FND_FILE.PUT_LINE(FND_FILE.LOG,' Invalid Price Change type:' || p_txn_lines_tbl_type(i).change_type ||'. Please enter a valid Change type.');
1659: fnd_message.set_name('DPP', 'DPP_TXN_CHANGE_TYPE_ERR');
1660: fnd_message.set_token('CHANGE_TYPE', p_txn_lines_tbl_type(i).change_type );
1661: x_msg_data := fnd_message.get();
1662: p_txn_lines_tbl_type(i).error_code := 'DPP_TXN_CHANGE_TYPE_ERR';

Line 1685: FND_FILE.PUT_LINE(FND_FILE.LOG,' Price Change: '||p_txn_lines_tbl_type(i).price_change);

1681: --end if;
1682: END IF;
1683:
1684: IF DPP_DEBUG_HIGH_ON THEN
1685: FND_FILE.PUT_LINE(FND_FILE.LOG,' Price Change: '||p_txn_lines_tbl_type(i).price_change);
1686: END IF;
1687: END LOOP;
1688: IF l_error_message IS NOT NULL THEN
1689: x_msg_data := substr(l_error_message,1,2000);

Line 1694: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Supplier Part Number');

1690: RAISE Fnd_Api.G_EXC_ERROR;
1691: END IF;
1692:
1693: IF DPP_DEBUG_HIGH_ON THEN
1694: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Supplier Part Number');
1695: END IF;
1696: EXCEPTION
1697: WHEN Fnd_Api.G_EXC_ERROR THEN
1698: x_return_status := Fnd_Api.g_ret_sts_error ;

Line 1711: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

1707: fnd_message.set_token('ERRNO', SQLCODE);
1708: fnd_message.set_token('REASON', sqlerrm);
1709: END IF;
1710: x_msg_data := fnd_message.get();
1711: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1712: END Validate_SupplierPartNum;
1713:
1714:
1715: PROCEDURE Create_lines(

Line 1732: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Create Lines');

1728: BEGIN
1729: -- Initialize API return status to sucess
1730: x_return_status := fnd_api.g_ret_sts_success;
1731: IF DPP_DEBUG_HIGH_ON THEN
1732: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Create Lines');
1733: END IF;
1734:
1735:
1736: SELECT fnd_profile.VALUE('DPP_NEW_PRICE_DECIMAL_PRECISION')

Line 1748: FND_FILE.PUT_LINE(FND_FILE.LOG,' Line');

1744:
1745: FOR i in p_txn_lines_tbl_type.FIRST..p_txn_lines_tbl_type.LAST
1746: LOOP
1747: IF DPP_DEBUG_HIGH_ON THEN
1748: FND_FILE.PUT_LINE(FND_FILE.LOG,' Line');
1749: FND_FILE.PUT_LINE(FND_FILE.LOG,' Transaction Header Id'||p_txn_lines_tbl_type(i).transaction_header_id);
1750: FND_FILE.PUT_LINE(FND_FILE.LOG,' Supplier Part Num'||p_txn_lines_tbl_type(i).supplier_part_num);
1751: FND_FILE.PUT_LINE(FND_FILE.LOG,' Inventory Item ID'||p_txn_lines_tbl_type(i).inventory_item_id);
1752: END IF;

Line 1749: FND_FILE.PUT_LINE(FND_FILE.LOG,' Transaction Header Id'||p_txn_lines_tbl_type(i).transaction_header_id);

1745: FOR i in p_txn_lines_tbl_type.FIRST..p_txn_lines_tbl_type.LAST
1746: LOOP
1747: IF DPP_DEBUG_HIGH_ON THEN
1748: FND_FILE.PUT_LINE(FND_FILE.LOG,' Line');
1749: FND_FILE.PUT_LINE(FND_FILE.LOG,' Transaction Header Id'||p_txn_lines_tbl_type(i).transaction_header_id);
1750: FND_FILE.PUT_LINE(FND_FILE.LOG,' Supplier Part Num'||p_txn_lines_tbl_type(i).supplier_part_num);
1751: FND_FILE.PUT_LINE(FND_FILE.LOG,' Inventory Item ID'||p_txn_lines_tbl_type(i).inventory_item_id);
1752: END IF;
1753: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Prior Price Create Lines:'||p_txn_lines_tbl_type(i).prior_price);

Line 1750: FND_FILE.PUT_LINE(FND_FILE.LOG,' Supplier Part Num'||p_txn_lines_tbl_type(i).supplier_part_num);

1746: LOOP
1747: IF DPP_DEBUG_HIGH_ON THEN
1748: FND_FILE.PUT_LINE(FND_FILE.LOG,' Line');
1749: FND_FILE.PUT_LINE(FND_FILE.LOG,' Transaction Header Id'||p_txn_lines_tbl_type(i).transaction_header_id);
1750: FND_FILE.PUT_LINE(FND_FILE.LOG,' Supplier Part Num'||p_txn_lines_tbl_type(i).supplier_part_num);
1751: FND_FILE.PUT_LINE(FND_FILE.LOG,' Inventory Item ID'||p_txn_lines_tbl_type(i).inventory_item_id);
1752: END IF;
1753: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Prior Price Create Lines:'||p_txn_lines_tbl_type(i).prior_price);
1754: -- Insert lines into dpp_transaction_lines_all table

Line 1751: FND_FILE.PUT_LINE(FND_FILE.LOG,' Inventory Item ID'||p_txn_lines_tbl_type(i).inventory_item_id);

1747: IF DPP_DEBUG_HIGH_ON THEN
1748: FND_FILE.PUT_LINE(FND_FILE.LOG,' Line');
1749: FND_FILE.PUT_LINE(FND_FILE.LOG,' Transaction Header Id'||p_txn_lines_tbl_type(i).transaction_header_id);
1750: FND_FILE.PUT_LINE(FND_FILE.LOG,' Supplier Part Num'||p_txn_lines_tbl_type(i).supplier_part_num);
1751: FND_FILE.PUT_LINE(FND_FILE.LOG,' Inventory Item ID'||p_txn_lines_tbl_type(i).inventory_item_id);
1752: END IF;
1753: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Prior Price Create Lines:'||p_txn_lines_tbl_type(i).prior_price);
1754: -- Insert lines into dpp_transaction_lines_all table
1755: INSERT INTO dpp_transaction_lines_all(

Line 1900: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Create Lines');

1896: , 'N'--p_txn_lines_tbl_type(i).notify_promotions_pricelist
1897: );
1898: END LOOP; --FOR i in p_txn_lines_tbl_type.FIRST..p_txn_lines_tbl_type.LAST
1899: IF DPP_DEBUG_HIGH_ON THEN
1900: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Create Lines');
1901: END IF;
1902: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'End Create Lines'|| sqlerrm);
1903: EXCEPTION
1904: WHEN Fnd_Api.G_EXC_ERROR THEN

Line 1918: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

1914: fnd_message.set_token('ERRNO', SQLCODE);
1915: fnd_message.set_token('REASON', sqlerrm);
1916: END IF;
1917: x_msg_data := fnd_message.get();
1918: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1919: END Create_lines;
1920:
1921:
1922: PROCEDURE Update_CoveredInv(

Line 1949: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update Covered Inventory');

1945:
1946: -- Initialize API return status to sucess
1947: x_return_status := fnd_api.g_ret_sts_success;
1948: IF DPP_DEBUG_HIGH_ON THEN
1949: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update Covered Inventory');
1950: END IF;
1951: --Form Header rec to call covered inventory procedure
1952: l_header_rec_type.transaction_header_id :=p_txn_header_rec_type.transaction_header_id;
1953: l_header_rec_type.org_id := p_txn_header_rec_type.org_id;

Line 1963: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv Rec type Transaction Header Id: '||l_header_rec_type.transaction_header_id);

1959: END IF;
1960: l_header_rec_type.effective_end_date :=(p_txn_header_rec_type.effective_start_date);
1961: l_header_rec_type.last_updated_by :=p_txn_header_rec_type.last_updated_by;
1962: IF DPP_DEBUG_HIGH_ON THEN
1963: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv Rec type Transaction Header Id: '||l_header_rec_type.transaction_header_id);
1964: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv Rec type Org_ID'||l_header_rec_type.org_id);
1965: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv Rec type Effective Start Date'|| l_header_rec_type.effective_start_date);
1966: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv Rec type Effective End Date'||l_header_rec_type.effective_end_date);
1967: END IF;

Line 1964: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv Rec type Org_ID'||l_header_rec_type.org_id);

1960: l_header_rec_type.effective_end_date :=(p_txn_header_rec_type.effective_start_date);
1961: l_header_rec_type.last_updated_by :=p_txn_header_rec_type.last_updated_by;
1962: IF DPP_DEBUG_HIGH_ON THEN
1963: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv Rec type Transaction Header Id: '||l_header_rec_type.transaction_header_id);
1964: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv Rec type Org_ID'||l_header_rec_type.org_id);
1965: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv Rec type Effective Start Date'|| l_header_rec_type.effective_start_date);
1966: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv Rec type Effective End Date'||l_header_rec_type.effective_end_date);
1967: END IF;
1968: --Form Line table to to get covered Inventory Details DPP_UTILITY_PVT.Get_CoveredInventory

Line 1965: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv Rec type Effective Start Date'|| l_header_rec_type.effective_start_date);

1961: l_header_rec_type.last_updated_by :=p_txn_header_rec_type.last_updated_by;
1962: IF DPP_DEBUG_HIGH_ON THEN
1963: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv Rec type Transaction Header Id: '||l_header_rec_type.transaction_header_id);
1964: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv Rec type Org_ID'||l_header_rec_type.org_id);
1965: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv Rec type Effective Start Date'|| l_header_rec_type.effective_start_date);
1966: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv Rec type Effective End Date'||l_header_rec_type.effective_end_date);
1967: END IF;
1968: --Form Line table to to get covered Inventory Details DPP_UTILITY_PVT.Get_CoveredInventory
1969: FOR i in p_txn_lines_tbl_type.FIRST..p_txn_lines_tbl_type.LAST

Line 1966: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv Rec type Effective End Date'||l_header_rec_type.effective_end_date);

1962: IF DPP_DEBUG_HIGH_ON THEN
1963: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv Rec type Transaction Header Id: '||l_header_rec_type.transaction_header_id);
1964: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv Rec type Org_ID'||l_header_rec_type.org_id);
1965: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv Rec type Effective Start Date'|| l_header_rec_type.effective_start_date);
1966: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv Rec type Effective End Date'||l_header_rec_type.effective_end_date);
1967: END IF;
1968: --Form Line table to to get covered Inventory Details DPP_UTILITY_PVT.Get_CoveredInventory
1969: FOR i in p_txn_lines_tbl_type.FIRST..p_txn_lines_tbl_type.LAST
1970: LOOP

Line 1978: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv TBL type Transaction Line Id'||l_line_tbl_type(i).transaction_line_id);

1974: l_line_tbl_type(i).uom_code := p_txn_lines_tbl_type(i).uom;
1975: l_line_tbl_type(i).wh_line_tbl := l_inv_cov_wh_tbl_type;
1976:
1977: IF DPP_DEBUG_HIGH_ON THEN
1978: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv TBL type Transaction Line Id'||l_line_tbl_type(i).transaction_line_id);
1979: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv TBL type Inventory Item ID'||l_line_tbl_type(i).inventory_item_id);
1980: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv TBL type UOM Code'||l_line_tbl_type(i).uom_code);
1981: END IF;
1982: END LOOP; -- FOR i in p_txn_lines_tbl_type.FIRST..p_txn_lines_tbl_type.LAST

Line 1979: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv TBL type Inventory Item ID'||l_line_tbl_type(i).inventory_item_id);

1975: l_line_tbl_type(i).wh_line_tbl := l_inv_cov_wh_tbl_type;
1976:
1977: IF DPP_DEBUG_HIGH_ON THEN
1978: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv TBL type Transaction Line Id'||l_line_tbl_type(i).transaction_line_id);
1979: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv TBL type Inventory Item ID'||l_line_tbl_type(i).inventory_item_id);
1980: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv TBL type UOM Code'||l_line_tbl_type(i).uom_code);
1981: END IF;
1982: END LOOP; -- FOR i in p_txn_lines_tbl_type.FIRST..p_txn_lines_tbl_type.LAST
1983: --Update Covered Inventory Value

Line 1980: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv TBL type UOM Code'||l_line_tbl_type(i).uom_code);

1976:
1977: IF DPP_DEBUG_HIGH_ON THEN
1978: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv TBL type Transaction Line Id'||l_line_tbl_type(i).transaction_line_id);
1979: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv TBL type Inventory Item ID'||l_line_tbl_type(i).inventory_item_id);
1980: FND_FILE.PUT_LINE(FND_FILE.LOG,' Update_CoveredInv TBL type UOM Code'||l_line_tbl_type(i).uom_code);
1981: END IF;
1982: END LOOP; -- FOR i in p_txn_lines_tbl_type.FIRST..p_txn_lines_tbl_type.LAST
1983: --Update Covered Inventory Value
1984: DPP_COVEREDINVENTORY_PVT.Select_CoveredInventory(

Line 2024: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update Covered Inventory');

2020: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2021: RAISE Fnd_Api.g_exc_unexpected_error;
2022: END IF;
2023: IF DPP_DEBUG_HIGH_ON THEN
2024: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update Covered Inventory');
2025: END IF;
2026: FOR i in l_line_tbl_type.FIRST..l_line_tbl_type.LAST
2027: LOOP
2028: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'l_line_tbl_type(i).transaction_line_id:'||l_line_tbl_type(i).transaction_line_id);

Line 2033: FND_FILE.PUT_LINE(FND_FILE.LOG,'After get covered Inventory');

2029: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'l_line_tbl_type(i).inventory_item_id:'||l_line_tbl_type(i).inventory_item_id);
2030: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'l_line_tbl_type(i).onhand_quantity:'||l_line_tbl_type(i).onhand_quantity);
2031: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'l_line_tbl_type(i).covered_quantity:'||l_line_tbl_type(i).covered_quantity);
2032: IF DPP_DEBUG_HIGH_ON THEN
2033: FND_FILE.PUT_LINE(FND_FILE.LOG,'After get covered Inventory');
2034: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).transaction_line_id:'||l_line_tbl_type(i).transaction_line_id);
2035: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).inventory_item_id:'||l_line_tbl_type(i).inventory_item_id);
2036: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).uom_code:'||l_line_tbl_type(i).uom_code);
2037: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).onhand_quantity:'||l_line_tbl_type(i).onhand_quantity);

Line 2034: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).transaction_line_id:'||l_line_tbl_type(i).transaction_line_id);

2030: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'l_line_tbl_type(i).onhand_quantity:'||l_line_tbl_type(i).onhand_quantity);
2031: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'l_line_tbl_type(i).covered_quantity:'||l_line_tbl_type(i).covered_quantity);
2032: IF DPP_DEBUG_HIGH_ON THEN
2033: FND_FILE.PUT_LINE(FND_FILE.LOG,'After get covered Inventory');
2034: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).transaction_line_id:'||l_line_tbl_type(i).transaction_line_id);
2035: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).inventory_item_id:'||l_line_tbl_type(i).inventory_item_id);
2036: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).uom_code:'||l_line_tbl_type(i).uom_code);
2037: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).onhand_quantity:'||l_line_tbl_type(i).onhand_quantity);
2038: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).covered_quantity:'||l_line_tbl_type(i).covered_quantity);

Line 2035: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).inventory_item_id:'||l_line_tbl_type(i).inventory_item_id);

2031: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'l_line_tbl_type(i).covered_quantity:'||l_line_tbl_type(i).covered_quantity);
2032: IF DPP_DEBUG_HIGH_ON THEN
2033: FND_FILE.PUT_LINE(FND_FILE.LOG,'After get covered Inventory');
2034: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).transaction_line_id:'||l_line_tbl_type(i).transaction_line_id);
2035: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).inventory_item_id:'||l_line_tbl_type(i).inventory_item_id);
2036: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).uom_code:'||l_line_tbl_type(i).uom_code);
2037: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).onhand_quantity:'||l_line_tbl_type(i).onhand_quantity);
2038: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).covered_quantity:'||l_line_tbl_type(i).covered_quantity);
2039: END IF;

Line 2036: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).uom_code:'||l_line_tbl_type(i).uom_code);

2032: IF DPP_DEBUG_HIGH_ON THEN
2033: FND_FILE.PUT_LINE(FND_FILE.LOG,'After get covered Inventory');
2034: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).transaction_line_id:'||l_line_tbl_type(i).transaction_line_id);
2035: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).inventory_item_id:'||l_line_tbl_type(i).inventory_item_id);
2036: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).uom_code:'||l_line_tbl_type(i).uom_code);
2037: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).onhand_quantity:'||l_line_tbl_type(i).onhand_quantity);
2038: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).covered_quantity:'||l_line_tbl_type(i).covered_quantity);
2039: END IF;
2040: --BUG 6806974

Line 2037: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).onhand_quantity:'||l_line_tbl_type(i).onhand_quantity);

2033: FND_FILE.PUT_LINE(FND_FILE.LOG,'After get covered Inventory');
2034: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).transaction_line_id:'||l_line_tbl_type(i).transaction_line_id);
2035: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).inventory_item_id:'||l_line_tbl_type(i).inventory_item_id);
2036: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).uom_code:'||l_line_tbl_type(i).uom_code);
2037: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).onhand_quantity:'||l_line_tbl_type(i).onhand_quantity);
2038: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).covered_quantity:'||l_line_tbl_type(i).covered_quantity);
2039: END IF;
2040: --BUG 6806974
2041: UPDATE dpp_transaction_lines_all dtla

Line 2038: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).covered_quantity:'||l_line_tbl_type(i).covered_quantity);

2034: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).transaction_line_id:'||l_line_tbl_type(i).transaction_line_id);
2035: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).inventory_item_id:'||l_line_tbl_type(i).inventory_item_id);
2036: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).uom_code:'||l_line_tbl_type(i).uom_code);
2037: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).onhand_quantity:'||l_line_tbl_type(i).onhand_quantity);
2038: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_line_tbl_type(i).covered_quantity:'||l_line_tbl_type(i).covered_quantity);
2039: END IF;
2040: --BUG 6806974
2041: UPDATE dpp_transaction_lines_all dtla
2042: SET dtla.approved_inventory = dtla.covered_inventory,

Line 2132: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

2128: fnd_message.set_token('ERRNO', SQLCODE);
2129: fnd_message.set_token('REASON', sqlerrm);
2130: END IF;
2131: x_msg_data := fnd_message.get();
2132: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
2133: ROLLBACK TO DPP_Update_CoveredInv;
2134: END Update_CoveredInv;
2135:
2136:

Line 2154: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update Approval');

2150: BEGIN
2151: -- Initialize API return status to sucess
2152: x_return_status := fnd_api.g_ret_sts_success;
2153: IF DPP_DEBUG_HIGH_ON THEN
2154: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update Approval');
2155: FND_FILE.PUT_LINE(FND_FILE.LOG,' Values Transaction header id '
2156: ||p_txn_header_rec_type.transaction_header_id
2157: ||'Claim Number'||p_txn_header_rec_type.supp_dist_claim_number);
2158: END IF;

Line 2155: FND_FILE.PUT_LINE(FND_FILE.LOG,' Values Transaction header id '

2151: -- Initialize API return status to sucess
2152: x_return_status := fnd_api.g_ret_sts_success;
2153: IF DPP_DEBUG_HIGH_ON THEN
2154: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update Approval');
2155: FND_FILE.PUT_LINE(FND_FILE.LOG,' Values Transaction header id '
2156: ||p_txn_header_rec_type.transaction_header_id
2157: ||'Claim Number'||p_txn_header_rec_type.supp_dist_claim_number);
2158: END IF;
2159: --Check whether the claim lines belong to the transaction

Line 2169: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

2165: x_msg_data := fnd_message.get();
2166: p_txn_header_rec_type.error_code := 'DPP_CLAIM_NUMBER_NULL';
2167: l_error_message := l_error_message || x_msg_data;
2168: IF DPP_DEBUG_HIGH_ON THEN
2169: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
2170: END IF;
2171: END IF;
2172: x_return_status := fnd_api.g_ret_sts_error;
2173: --RAISE Fnd_Api.G_EXC_ERROR;

Line 2206: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

2202: ELSE
2203: p_txn_header_rec_type.error_code := 'MULTIPLE_ERRORS';
2204: END IF;
2205: l_error_message := l_error_message || x_msg_data;
2206: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
2207: RAISE Fnd_Api.G_EXC_ERROR;
2208:
2209: END;
2210:

Line 2233: FND_FILE.PUT_LINE(FND_FILE.LOG,' The line (Inventory Item ID '

2229: IF l_approved_by IS NOT NULL OR p_txn_lines_tbl_type(i).approved_inventory < 0 THEN
2230: p_txn_lines_tbl_type(i).interface_status := 'E';
2231: p_txn_lines_tbl_type(i).error_code := 'DPP_TXN_APPROVED';
2232: IF DPP_DEBUG_HIGH_ON THEN
2233: FND_FILE.PUT_LINE(FND_FILE.LOG,' The line (Inventory Item ID '
2234: || p_txn_lines_tbl_type(i).inventory_item_id ||'is already approved by '||
2235: l_approved_by);
2236: END IF;
2237: ELSE

Line 2252: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update Approval');

2248: AND dtla.inventory_item_id =p_txn_lines_tbl_type(i).inventory_item_id;
2249: END IF;
2250: END LOOP;--FOR i in p_txn_lines_tbl_type.FIRST..p_txn_lines_tbl_type.LAST
2251: IF DPP_DEBUG_HIGH_ON THEN
2252: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update Approval');
2253: END IF;
2254: EXCEPTION
2255: WHEN Fnd_Api.G_EXC_ERROR THEN
2256: x_return_status := Fnd_Api.g_ret_sts_error ;

Line 2266: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

2262: fnd_message.set_token('ERRNO', SQLCODE);
2263: fnd_message.set_token('REASON', sqlerrm);
2264: END IF;
2265: x_msg_data := fnd_message.get();
2266: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
2267: END Update_Approval;
2268:
2269: PROCEDURE Update_ClaimsApproval(
2270: p_txn_header_rec_type IN OUT nocopy txn_header_rec

Line 2293: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update Claims Approval');

2289: -- Initialize API return status to sucess
2290: x_return_status := fnd_api.g_ret_sts_success;
2291:
2292: IF DPP_DEBUG_HIGH_ON THEN
2293: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update Claims Approval');
2294: END IF;
2295: --Get the Process code for Update Claim and set in the hdr rec type
2296: BEGIN
2297: SELECT fl.lookup_code

Line 2325: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update Claims Approval l_count_approved_lines:'

2321: AND dtla.supp_dist_claim_id = p_txn_lines_tbl_type(i).supp_dist_claim_id
2322: AND dtla.supplier_approved_by IS NOT NULL;
2323:
2324: IF DPP_DEBUG_HIGH_ON THEN
2325: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update Claims Approval l_count_approved_lines:'
2326: ||l_count_approved_lines);
2327: END IF;
2328: --Get the number of lines for the claim
2329: SELECT count(transaction_line_id)

Line 2336: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update Claims Approval l_count_lines:'

2332: WHERE transaction_header_id = p_txn_header_rec_type.transaction_header_id
2333: AND dtla.supp_dist_claim_id = p_txn_lines_tbl_type(i).supp_dist_claim_id;
2334:
2335: IF DPP_DEBUG_HIGH_ON THEN
2336: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update Claims Approval l_count_lines:'
2337: ||l_count_lines);
2338: END IF;
2339:
2340: IF l_count_approved_lines = l_count_lines THEN

Line 2357: FND_FILE.PUT_LINE(FND_FILE.LOG,' Raises Business Event to Update claims:'

2353: l_claim_txn_hdr_rec_type.Transaction_number := p_txn_header_rec_type.Transaction_number;
2354: l_claim_txn_hdr_rec_type.claim_id := p_txn_lines_tbl_type(i).supp_dist_claim_id;
2355:
2356: IF DPP_DEBUG_HIGH_ON THEN
2357: FND_FILE.PUT_LINE(FND_FILE.LOG,' Raises Business Event to Update claims:'
2358: ||l_count_lines);
2359: END IF;
2360: dpp_businessevents_pvt.Raise_Business_Event(
2361: p_api_version => l_api_version

Line 2377: FND_FILE.PUT_LINE(FND_FILE.LOG,' Procedure called to raise business event to'

2373: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2374: RAISE Fnd_Api.g_exc_unexpected_error;
2375: END IF;
2376: IF DPP_DEBUG_HIGH_ON THEN
2377: FND_FILE.PUT_LINE(FND_FILE.LOG,' Procedure called to raise business event to'
2378: ||' update the claim status.');
2379: END IF;
2380: END IF;
2381: END LOOP;

Line 2383: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update Claims Approval');

2379: END IF;
2380: END IF;
2381: END LOOP;
2382: IF DPP_DEBUG_HIGH_ON THEN
2383: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update Claims Approval');
2384: END IF;
2385: EXCEPTION
2386: WHEN Fnd_Api.G_EXC_ERROR THEN
2387: x_return_status := Fnd_Api.g_ret_sts_error ;

Line 2399: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

2395: fnd_message.set_token('ERRNO', SQLCODE);
2396: fnd_message.set_token('REASON', sqlerrm);
2397: END IF;
2398: x_msg_data := fnd_message.get();
2399: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
2400: END Update_ClaimsApproval;
2401:
2402: PROCEDURE form_line_tbl(
2403: p_txn_header_rec_type IN OUT nocopy txn_header_rec

Line 2431: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin form line tbl');

2427: BEGIN
2428: -- Initialize API return status to sucess
2429: x_return_status := fnd_api.g_ret_sts_success;
2430: IF DPP_DEBUG_HIGH_ON THEN
2431: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin form line tbl');
2432: END IF;
2433:
2434:
2435: l_line_number := 0;

Line 2519: FND_FILE.PUT_LINE(FND_FILE.LOG,' End form line tbl');

2515: x_msg_data := l_error_message;
2516: RAISE Fnd_Api.G_EXC_ERROR;
2517: END IF;
2518: IF DPP_DEBUG_HIGH_ON THEN
2519: FND_FILE.PUT_LINE(FND_FILE.LOG,' End form line tbl');
2520: END IF;
2521: EXCEPTION
2522: WHEN Fnd_Api.G_EXC_ERROR THEN
2523: x_return_status := Fnd_Api.g_ret_sts_error ;

Line 2535: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

2531: fnd_message.set_token('ERRNO', SQLCODE);
2532: fnd_message.set_token('REASON', sqlerrm);
2533: END IF;
2534: x_msg_data := fnd_message.get();
2535: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
2536: END form_line_tbl;
2537:
2538: PROCEDURE Update_HeaderLog(
2539: p_txn_header_rec_type IN OUT nocopy txn_header_rec

Line 2560: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update HeaderLog');

2556: -- Initialize API return status to sucess
2557: x_return_status := fnd_api.g_ret_sts_success;
2558:
2559: IF DPP_DEBUG_HIGH_ON THEN
2560: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update HeaderLog');
2561: END IF;
2562:
2563: IF p_txn_header_rec_type.supplier_approved_by IS NULL THEN
2564: l_txn_hdr_hist_rec.log_mode := 'I';

Line 2629: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update HeaderLog');

2625: ,x_msg_data => x_msg_data
2626: ,p_txn_hdr_rec => l_txn_hdr_hist_rec
2627: );
2628: IF DPP_DEBUG_HIGH_ON THEN
2629: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update HeaderLog');
2630: END IF;
2631: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
2632: RAISE Fnd_Api.g_exc_error;
2633: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

Line 2650: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

2646: fnd_message.set_token('ERRNO', SQLCODE);
2647: fnd_message.set_token('REASON', sqlerrm);
2648: END IF;
2649: x_msg_data := fnd_message.get();
2650: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
2651: END Update_HeaderLog;
2652:
2653: PROCEDURE Update_LinesLog(
2654: p_txn_lines_tbl_type IN OUT nocopy txn_lines_tbl

Line 2673: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update LinesLog');

2669: --SAVEPOINT DPP_Update_LinesLog;
2670: -- Initialize API return status to sucess
2671: x_return_status := fnd_api.g_ret_sts_success;
2672: IF DPP_DEBUG_HIGH_ON THEN
2673: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update LinesLog');
2674: END IF;
2675: FOR i in p_txn_lines_tbl_type.FIRST..p_txn_lines_tbl_type.LAST
2676: LOOP
2677: IF p_txn_lines_tbl_type(i).approved_inventory IS NULL THEN

Line 2764: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update LinesLog');

2760: ,p_txn_lines_tbl => l_txn_line_hist_tbl
2761: );
2762:
2763: IF DPP_DEBUG_HIGH_ON THEN
2764: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update LinesLog');
2765: END IF;
2766: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2767: RAISE Fnd_Api.g_exc_error;
2768: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

Line 2785: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

2781: fnd_message.set_token('ERRNO', SQLCODE);
2782: fnd_message.set_token('REASON', sqlerrm);
2783: END IF;
2784: x_msg_data := fnd_message.get();
2785: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
2786: END Update_LinesLog;
2787:
2788: PROCEDURE Update_InterfaceTbl(
2789: p_txn_header_rec_type IN OUT nocopy txn_header_rec

Line 2803: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update InterfaceTbl');

2799: -- Initialize API return status to sucess
2800: x_return_status := fnd_api.g_ret_sts_success;
2801:
2802: IF DPP_DEBUG_HIGH_ON THEN
2803: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update InterfaceTbl');
2804: END IF;
2805: --Update Interface Header table
2806: UPDATE DPP_TXN_HEADERS_INT_ALL dtha
2807: SET

Line 2834: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update InterfaceTbl');

2830: dtla.last_update_login = nvl(l_user_id,0)
2831: WHERE dtla.transaction_int_line_id = p_txn_lines_tbl_type(i).transaction_int_line_id;
2832: END LOOP;--FOR i in p_txn_lines_tbl_type.FIRST..p_txn_lines_tbl_type.LAST
2833: IF DPP_DEBUG_HIGH_ON THEN
2834: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update InterfaceTbl');
2835: END IF;
2836: EXCEPTION
2837: WHEN Fnd_Api.G_EXC_ERROR THEN
2838: x_return_status := Fnd_Api.g_ret_sts_error ;

Line 2851: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

2847: fnd_message.set_token('ERRNO', SQLCODE);
2848: fnd_message.set_token('REASON', sqlerrm);
2849: END IF;
2850: x_msg_data := fnd_message.get();
2851: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
2852: END Update_InterfaceTbl;
2853:
2854:
2855:

Line 2869: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update InterfaceErrSts');

2865: BEGIN
2866: -- Initialize API return status to sucess
2867: x_return_status := fnd_api.g_ret_sts_success;
2868: IF DPP_DEBUG_HIGH_ON THEN
2869: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update InterfaceErrSts');
2870: END IF;
2871:
2872: --Update Interface Header table with error status
2873: UPDATE DPP_TXN_HEADERS_INT_ALL dtha

Line 2898: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update InterfaceErrSts');

2894: END LOOP;
2895: COMMIT;
2896:
2897: IF DPP_DEBUG_HIGH_ON THEN
2898: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update InterfaceErrSts');
2899: END IF;
2900: EXCEPTION
2901: WHEN Fnd_Api.G_EXC_ERROR THEN
2902: x_return_status := Fnd_Api.g_ret_sts_error ;

Line 2913: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||sqlerrm);

2909: fnd_message.set_token('ROUTINE', 'DPP_TRANSACTION_PVT');
2910: fnd_message.set_token('ERRNO', SQLCODE);
2911: fnd_message.set_token('REASON', sqlerrm);
2912: END IF;
2913: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||sqlerrm);
2914: END Update_InterfaceLineErrSts;
2915:
2916: ---------------------------------------------------------------------
2917: -- PROCEDURE

Line 2990: fnd_file.put_line(fnd_file.log, 'Begin Insert Transaction ' );

2986: x_return_status := fnd_api.g_ret_sts_success;
2987:
2988:
2989: IF DPP_DEBUG_HIGH_ON THEN
2990: fnd_file.put_line(fnd_file.log, 'Begin Insert Transaction ' );
2991: END IF;
2992:
2993: SELECT fnd_profile.VALUE('DPP_AUDIT_ENABLED')
2994: INTO l_log_enabled

Line 2998: fnd_file.put_line(fnd_file.log, 'Audit Enabled '||l_log_enabled );

2994: INTO l_log_enabled
2995: FROM dual;
2996:
2997: IF DPP_DEBUG_HIGH_ON THEN
2998: fnd_file.put_line(fnd_file.log, 'Audit Enabled '||l_log_enabled );
2999: END IF;
3000:
3001: --fetch records from dpp_txn_headers_int_all table
3002: FOR fetch_header_rec IN fetch_header_cur

Line 3087: fnd_file.put_line(fnd_file.log, 'Validate Ref Document Number Return Status: '||l_return_status ||'Error Msg: '||x_msg_data);

3083: ,x_return_status => l_return_status
3084: );
3085: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Ref Doc Num Status :'||l_return_status);
3086: IF DPP_DEBUG_HIGH_ON THEN
3087: fnd_file.put_line(fnd_file.log, 'Validate Ref Document Number Return Status: '||l_return_status ||'Error Msg: '||x_msg_data);
3088: END IF;
3089: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3090: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3091: Update_InterfaceErrSts(

Line 3106: fnd_file.put_line(fnd_file.log, 'Validate Operating Unit Return Status: '||l_txn_header_rec_type.org_id ||l_return_status ||'Error Msg: '||x_msg_data);

3102: ,x_return_status => l_return_status
3103: );
3104: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Operating Unit Status :'||l_return_status);
3105: IF DPP_DEBUG_HIGH_ON THEN
3106: fnd_file.put_line(fnd_file.log, 'Validate Operating Unit Return Status: '||l_txn_header_rec_type.org_id ||l_return_status ||'Error Msg: '||x_msg_data);
3107: END IF;
3108:
3109: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3110: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;

Line 3130: fnd_file.put_line(fnd_file.log, 'Validate Supplier Details Return Status:'||l_return_status ||'Error Msg'||x_msg_data);

3126:
3127: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Supplier Details Status :'||l_return_status);
3128:
3129: IF DPP_DEBUG_HIGH_ON THEN
3130: fnd_file.put_line(fnd_file.log, 'Validate Supplier Details Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3131: END IF;
3132: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3133: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3134: ROLLBACK TO DPP_Insert_Transaction;

Line 3154: fnd_file.put_line(fnd_file.log, 'Validate Supplier Trade Profile Return Status:' || l_return_status || 'Error Msg ' || x_msg_data);

3150: );
3151:
3152: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Supplier Trade Profile Status :' || l_return_status);
3153: IF DPP_DEBUG_HIGH_ON THEN
3154: fnd_file.put_line(fnd_file.log, 'Validate Supplier Trade Profile Return Status:' || l_return_status || 'Error Msg ' || x_msg_data);
3155: END IF;
3156: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3157: l_concatenated_error_message := l_concatenated_error_message || x_msg_data;
3158: ROLLBACK TO DPP_Insert_Transaction;

Line 3178: fnd_file.put_line(fnd_file.log, 'Validate Execution Process Setup Status : ' || l_return_status || 'Error Msg ' || x_msg_data);

3174:
3175: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Execution Process Setup Status : ' || l_return_status);
3176:
3177: IF DPP_DEBUG_HIGH_ON THEN
3178: fnd_file.put_line(fnd_file.log, 'Validate Execution Process Setup Status : ' || l_return_status || 'Error Msg ' || x_msg_data);
3179: END IF;
3180: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3181: l_concatenated_error_message :=l_concatenated_error_message || x_msg_data;
3182: ROLLBACK TO DPP_Insert_Transaction;

Line 3201: fnd_file.put_line(fnd_file.log, 'Validate Currency Return Status:'||l_return_status ||'Error Msg'||x_msg_data);

3197:
3198: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Currency Status :'||l_return_status);
3199:
3200: IF DPP_DEBUG_HIGH_ON THEN
3201: fnd_file.put_line(fnd_file.log, 'Validate Currency Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3202: END IF;
3203: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3204: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3205: Update_InterfaceErrSts(

Line 3220: fnd_file.put_line(fnd_file.log, 'Validate Line Details Return Status:'||l_return_status ||'Error Msg'||x_msg_data);

3216: );
3217:
3218: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Validate Lines Status :'||l_return_status);
3219: IF DPP_DEBUG_HIGH_ON THEN
3220: fnd_file.put_line(fnd_file.log, 'Validate Line Details Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3221: END IF;
3222: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3223: ROLLBACK TO DPP_Insert_Transaction;
3224: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;

Line 3287: fnd_file.put_line(fnd_file.log, ' Inbound Price Protection Transaction ' );

3283: --Check transaction type
3284: IF l_transaction_type = 'INB' THEN
3285: IF l_transaction_status IS NULL OR l_transaction_status = l_status_cancelled THEN
3286: IF DPP_DEBUG_HIGH_ON THEN
3287: fnd_file.put_line(fnd_file.log, ' Inbound Price Protection Transaction ' );
3288: END IF;
3289: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'New Transaction');
3290: IF l_concatenated_error_message IS NOT NULL THEN
3291: RAISE Fnd_Api.g_exc_error;

Line 3302: fnd_file.put_line(fnd_file.log, 'Create Header Return Status:'||l_return_status ||'Error Msg'||x_msg_data);

3298: );
3299:
3300: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Create Header Status :'||l_return_status);
3301: IF DPP_DEBUG_HIGH_ON THEN
3302: fnd_file.put_line(fnd_file.log, 'Create Header Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3303: END IF;
3304: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3305: ROLLBACK TO DPP_Insert_Transaction;
3306: Update_InterfaceErrSts(

Line 3321: fnd_file.put_line(fnd_file.log, 'Update Header Log Return Status:'||l_return_status ||'Error Msg'||x_msg_data);

3317: ,x_msg_data => x_msg_data
3318: ,x_return_status => l_return_status
3319: );
3320: IF DPP_DEBUG_HIGH_ON THEN
3321: fnd_file.put_line(fnd_file.log, 'Update Header Log Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3322: END IF;
3323:
3324: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3325: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;

Line 3339: fnd_file.put_line(fnd_file.log, 'Form Line Tbl Return Status:'||l_return_status ||'Error Msg'||x_msg_data);

3335: );
3336:
3337: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Form Line Tbl Status :'||l_return_status);
3338: IF DPP_DEBUG_HIGH_ON THEN
3339: fnd_file.put_line(fnd_file.log, 'Form Line Tbl Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3340: END IF;
3341: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3342: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3343: Update_InterfaceLineErrSts(

Line 3360: fnd_file.put_line(fnd_file.log, 'Validate SupplierPartNum Return Status:'||l_return_status ||'Error Msg'||x_msg_data);

3356: ,x_return_status => l_return_status
3357: );
3358: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Supplier Part Num Status :'||l_return_status);
3359: IF G_DEBUG THEN
3360: fnd_file.put_line(fnd_file.log, 'Validate SupplierPartNum Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3361: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Validate SupplierPartNum Return Status:'||l_return_status ||'Error Msg'||substr(x_msg_data,1,1000));
3362: END IF;
3363:
3364: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

Line 3387: fnd_file.put_line(fnd_file.log, 'Create Lines Return Status:'||l_return_status ||'Error Msg'||x_msg_data);

3383: ,x_return_status => l_return_status
3384: );
3385: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Create Lines Status :'||l_return_status);
3386: IF DPP_DEBUG_HIGH_ON THEN
3387: fnd_file.put_line(fnd_file.log, 'Create Lines Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3388: END IF;
3389: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3390: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3391: ROLLBACK TO DPP_Insert_Transaction;

Line 3408: fnd_file.put_line(fnd_file.log, 'Update Lines Log Return Status:'||l_return_status ||'Error Msg'||x_msg_data);

3404: ,x_msg_data => x_msg_data
3405: ,x_return_status => l_return_status
3406: );
3407: IF DPP_DEBUG_HIGH_ON THEN
3408: fnd_file.put_line(fnd_file.log, 'Update Lines Log Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3409: END IF;
3410: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3411: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3412: Update_InterfaceLineErrSts(

Line 3433: fnd_file.put_line(fnd_file.log, 'Update Covered Inventory Return Status:'||l_return_status);

3429: ,x_return_status => l_return_status
3430: );
3431: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Update CoveredInv Status :'||l_return_status);
3432: IF DPP_DEBUG_HIGH_ON THEN
3433: fnd_file.put_line(fnd_file.log, 'Update Covered Inventory Return Status:'||l_return_status);
3434: END IF;
3435: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3436: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3437: ROLLBACK TO DPP_Insert_Transaction;

Line 3457: fnd_file.put_line(fnd_file.log, 'Error:' || x_msg_data);

3453: x_msg_data := fnd_message.get();
3454: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3455: l_txn_header_rec_type.error_code := 'DPP_TRANSACTION_EXIST';
3456: IF DPP_DEBUG_HIGH_ON THEN
3457: fnd_file.put_line(fnd_file.log, 'Error:' || x_msg_data);
3458: END IF;
3459: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Transaction Exist Status :'||l_return_status);
3460: Update_InterfaceErrSts(
3461: p_txn_header_rec_type => l_txn_header_rec_type

Line 3474: fnd_file.put_line(fnd_file.log, x_msg_data);

3470: fnd_message.set_token('DOC_REF_NO', l_txn_header_rec_type.ref_document_number);
3471: fnd_message.set_token('TRANSACTION_NUMBER', l_txn_header_rec_type.transaction_number);
3472: fnd_message.set_token('OPERATING_UNIT', l_txn_header_rec_type.operating_unit_name);
3473: x_msg_data := fnd_message.get();
3474: fnd_file.put_line(fnd_file.log, x_msg_data);
3475:
3476: IF l_concatenated_error_message IS NOT NULL THEN
3477: x_msg_data := 'The Transaction for the supplier name '||l_txn_header_rec_type.vendor_name ||
3478: ',Supplier site '||l_txn_header_rec_type.vendor_site_code ||' and Operating Unit Name '||l_txn_header_rec_type.operating_unit_name || ' failed.' ||l_concatenated_error_message;

Line 3492: fnd_file.put_line(fnd_file.log, 'Populate Execution Processes based on Supplier Trade Profile or System Parameters Status : ' || l_return_status || 'Error Msg ' || x_msg_data);

3488: ,x_return_status => l_return_status
3489: );
3490: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Insert Execution Processes Status : ' || l_return_status);
3491: IF DPP_DEBUG_HIGH_ON THEN
3492: fnd_file.put_line(fnd_file.log, 'Populate Execution Processes based on Supplier Trade Profile or System Parameters Status : ' || l_return_status || 'Error Msg ' || x_msg_data);
3493: END IF;
3494: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3495: l_concatenated_error_message := l_concatenated_error_message || x_msg_data;
3496: ROLLBACK TO DPP_Insert_Transaction;

Line 3535: fnd_file.put_line(fnd_file.log, 'Inbound Approval Transaction');

3531: );
3532: -- RAISE Fnd_Api.g_exc_error;
3533: END IF;
3534: IF DPP_DEBUG_HIGH_ON THEN
3535: fnd_file.put_line(fnd_file.log, 'Inbound Approval Transaction');
3536: END IF;
3537: IF l_concatenated_error_message IS NOT NULL THEN
3538: x_msg_data:= l_concatenated_error_message;
3539: RAISE Fnd_Api.g_exc_error;

Line 3550: fnd_file.put_line(fnd_file.log, 'Form Line Tbl Return Status:'||l_return_status ||'Error Msg'||x_msg_data);

3546: ,x_msg_data => x_msg_data
3547: ,x_return_status => l_return_status
3548: );
3549: IF DPP_DEBUG_HIGH_ON THEN
3550: fnd_file.put_line(fnd_file.log, 'Form Line Tbl Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3551: END IF;
3552: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3553: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3554: ROLLBACK TO DPP_Insert_Transaction;

Line 3570: fnd_file.put_line(fnd_file.log, 'Validate SupplierPartNum Return Status:'||l_return_status ||'Error Msg'||x_msg_data);

3566: ,x_msg_data => x_msg_data
3567: ,x_return_status => l_return_status
3568: );
3569: IF DPP_DEBUG_HIGH_ON THEN
3570: fnd_file.put_line(fnd_file.log, 'Validate SupplierPartNum Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3571: END IF;
3572:
3573: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3574: IF DPP_DEBUG_HIGH_ON THEN

Line 3575: fnd_file.put_line(fnd_file.log, 'Invalid Supplier part number/Item Number/Inventory Item Id.Status:'||l_return_status ||'Error Msg'||x_msg_data);

3571: END IF;
3572:
3573: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3574: IF DPP_DEBUG_HIGH_ON THEN
3575: fnd_file.put_line(fnd_file.log, 'Invalid Supplier part number/Item Number/Inventory Item Id.Status:'||l_return_status ||'Error Msg'||x_msg_data);
3576: END IF;
3577: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3578: Update_InterfaceLineErrSts(
3579: p_txn_header_rec_type => l_txn_header_rec_type,

Line 3595: fnd_file.put_line(fnd_file.log, 'Update Approval Return Status:'||l_return_status ||'Error Msg'||x_msg_data);

3591: ,x_msg_data => x_msg_data
3592: ,x_return_status => l_return_status
3593: );
3594: IF DPP_DEBUG_HIGH_ON THEN
3595: fnd_file.put_line(fnd_file.log, 'Update Approval Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3596: END IF;
3597: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3598: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3599: ROLLBACK TO DPP_Insert_Transaction;

Line 3624: fnd_file.put_line(fnd_file.log, 'Update Header Log Return Status:'||l_return_status ||'Error Msg'||x_msg_data);

3620: ,x_msg_data => x_msg_data
3621: ,x_return_status => l_return_status
3622: );
3623: IF DPP_DEBUG_HIGH_ON THEN
3624: fnd_file.put_line(fnd_file.log, 'Update Header Log Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3625: END IF;
3626: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3627: --RAISE Fnd_Api.g_exc_error;
3628: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;

Line 3638: fnd_file.put_line(fnd_file.log, 'Update Lines Log Return Status:'||l_return_status ||'Error Msg'||x_msg_data);

3634: ,x_msg_data => x_msg_data
3635: ,x_return_status => l_return_status
3636: );
3637: IF DPP_DEBUG_HIGH_ON THEN
3638: fnd_file.put_line(fnd_file.log, 'Update Lines Log Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3639: END IF;
3640: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3641: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3642: --RAISE Fnd_Api.g_exc_error;

Line 3663: fnd_file.put_line(fnd_file.log, 'Update Claims Approval Return Status:'||l_return_status ||'Error Msg'||x_msg_data);

3659: ,x_msg_data => x_msg_data
3660: ,x_return_status => l_return_status
3661: );
3662: IF DPP_DEBUG_HIGH_ON THEN
3663: fnd_file.put_line(fnd_file.log, 'Update Claims Approval Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3664: END IF;
3665: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3666: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3667: ROLLBACK TO DPP_Insert_Transaction;

Line 3680: fnd_file.put_line(fnd_file.log, x_msg_data);

3676: fnd_message.set_token('SUPPLIER_SITE', l_txn_header_rec_type.vendor_site_code);
3677: fnd_message.set_token('OPERATING_UNIT', l_txn_header_rec_type.operating_unit_name);
3678: fnd_message.set_token('DOC_REF_NO', l_txn_header_rec_type.ref_document_number);
3679: x_msg_data := fnd_message.get();
3680: fnd_file.put_line(fnd_file.log, x_msg_data);
3681: END IF; --l_transaction_type = 'INB'
3682: --Call procedure to update interface tables (header )
3683: Update_InterfaceTbl (
3684: p_txn_header_rec_type =>l_txn_header_rec_type

Line 3691: fnd_file.put_line(fnd_file.log, 'Update Interface Table Return Status: '||l_return_status ||'Error Msg '||x_msg_data);

3687: ,x_msg_data =>x_msg_data
3688: ,x_return_status => l_return_status
3689: );
3690: IF DPP_DEBUG_HIGH_ON THEN
3691: fnd_file.put_line(fnd_file.log, 'Update Interface Table Return Status: '||l_return_status ||'Error Msg '||x_msg_data);
3692: END IF;
3693: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3694: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3695: ROLLBACK TO DPP_Insert_Transaction;

Line 5060: fnd_file.put_line(fnd_file.log,('=================================='));

5056: retcode := 0;
5057: ------------------------------------------
5058: -- Initialization
5059: ------------------------------------------
5060: fnd_file.put_line(fnd_file.log,('=================================='));
5061: fnd_file.put_line(fnd_file.log,('INITIALIZATION'));
5062: fnd_file.put_line(fnd_file.log,('USER : ' || ' (' || l_user_id || ')'));
5063: fnd_file.put_line(fnd_file.log,('ORG : ' || SUBSTR(userenv('CLIENT_INFO'), 1, 10)));
5064: fnd_file.put_line(fnd_file.log,('=================================='));

Line 5061: fnd_file.put_line(fnd_file.log,('INITIALIZATION'));

5057: ------------------------------------------
5058: -- Initialization
5059: ------------------------------------------
5060: fnd_file.put_line(fnd_file.log,('=================================='));
5061: fnd_file.put_line(fnd_file.log,('INITIALIZATION'));
5062: fnd_file.put_line(fnd_file.log,('USER : ' || ' (' || l_user_id || ')'));
5063: fnd_file.put_line(fnd_file.log,('ORG : ' || SUBSTR(userenv('CLIENT_INFO'), 1, 10)));
5064: fnd_file.put_line(fnd_file.log,('=================================='));
5065:

Line 5062: fnd_file.put_line(fnd_file.log,('USER : ' || ' (' || l_user_id || ')'));

5058: -- Initialization
5059: ------------------------------------------
5060: fnd_file.put_line(fnd_file.log,('=================================='));
5061: fnd_file.put_line(fnd_file.log,('INITIALIZATION'));
5062: fnd_file.put_line(fnd_file.log,('USER : ' || ' (' || l_user_id || ')'));
5063: fnd_file.put_line(fnd_file.log,('ORG : ' || SUBSTR(userenv('CLIENT_INFO'), 1, 10)));
5064: fnd_file.put_line(fnd_file.log,('=================================='));
5065:
5066: IF DPP_DEBUG_HIGH_ON THEN

Line 5063: fnd_file.put_line(fnd_file.log,('ORG : ' || SUBSTR(userenv('CLIENT_INFO'), 1, 10)));

5059: ------------------------------------------
5060: fnd_file.put_line(fnd_file.log,('=================================='));
5061: fnd_file.put_line(fnd_file.log,('INITIALIZATION'));
5062: fnd_file.put_line(fnd_file.log,('USER : ' || ' (' || l_user_id || ')'));
5063: fnd_file.put_line(fnd_file.log,('ORG : ' || SUBSTR(userenv('CLIENT_INFO'), 1, 10)));
5064: fnd_file.put_line(fnd_file.log,('=================================='));
5065:
5066: IF DPP_DEBUG_HIGH_ON THEN
5067: fnd_file.put_line(fnd_file.log, 'Begin Create Transaction');

Line 5064: fnd_file.put_line(fnd_file.log,('=================================='));

5060: fnd_file.put_line(fnd_file.log,('=================================='));
5061: fnd_file.put_line(fnd_file.log,('INITIALIZATION'));
5062: fnd_file.put_line(fnd_file.log,('USER : ' || ' (' || l_user_id || ')'));
5063: fnd_file.put_line(fnd_file.log,('ORG : ' || SUBSTR(userenv('CLIENT_INFO'), 1, 10)));
5064: fnd_file.put_line(fnd_file.log,('=================================='));
5065:
5066: IF DPP_DEBUG_HIGH_ON THEN
5067: fnd_file.put_line(fnd_file.log, 'Begin Create Transaction');
5068: fnd_file.put_line(fnd_file.log, '************************');

Line 5067: fnd_file.put_line(fnd_file.log, 'Begin Create Transaction');

5063: fnd_file.put_line(fnd_file.log,('ORG : ' || SUBSTR(userenv('CLIENT_INFO'), 1, 10)));
5064: fnd_file.put_line(fnd_file.log,('=================================='));
5065:
5066: IF DPP_DEBUG_HIGH_ON THEN
5067: fnd_file.put_line(fnd_file.log, 'Begin Create Transaction');
5068: fnd_file.put_line(fnd_file.log, '************************');
5069: fnd_file.put_line(fnd_file.log, ' Supplier Name:' || p_supplier_name
5070: ||' Supplier Site:' || p_supplier_site
5071: ||' Ref Document Number:' || p_document_reference_number

Line 5068: fnd_file.put_line(fnd_file.log, '************************');

5064: fnd_file.put_line(fnd_file.log,('=================================='));
5065:
5066: IF DPP_DEBUG_HIGH_ON THEN
5067: fnd_file.put_line(fnd_file.log, 'Begin Create Transaction');
5068: fnd_file.put_line(fnd_file.log, '************************');
5069: fnd_file.put_line(fnd_file.log, ' Supplier Name:' || p_supplier_name
5070: ||' Supplier Site:' || p_supplier_site
5071: ||' Ref Document Number:' || p_document_reference_number
5072: ||' Operating Unit: ' || p_operating_unit);

Line 5069: fnd_file.put_line(fnd_file.log, ' Supplier Name:' || p_supplier_name

5065:
5066: IF DPP_DEBUG_HIGH_ON THEN
5067: fnd_file.put_line(fnd_file.log, 'Begin Create Transaction');
5068: fnd_file.put_line(fnd_file.log, '************************');
5069: fnd_file.put_line(fnd_file.log, ' Supplier Name:' || p_supplier_name
5070: ||' Supplier Site:' || p_supplier_site
5071: ||' Ref Document Number:' || p_document_reference_number
5072: ||' Operating Unit: ' || p_operating_unit);
5073: END IF;

Line 5108: fnd_file.put_line(fnd_file.log, 'Vendor Id '||l_supplier_id

5104: FROM hr_operating_units
5105: WHERE name = p_operating_unit;
5106: END IF;
5107: IF DPP_DEBUG_HIGH_ON THEN
5108: fnd_file.put_line(fnd_file.log, 'Vendor Id '||l_supplier_id
5109: ||' Supplier Site ID '||l_supplier_site_id
5110: || ' Org ID '||l_org_id);
5111: END IF;
5112:

Line 5114: fnd_file.put_line(fnd_file.log, 'Error in deriving ID for the parameters');

5110: || ' Org ID '||l_org_id);
5111: END IF;
5112:
5113: EXCEPTION WHEN NO_DATA_FOUND THEN
5114: fnd_file.put_line(fnd_file.log, 'Error in deriving ID for the parameters');
5115: RAISE Fnd_Api.G_EXC_ERROR;
5116: END;
5117:
5118: FOR transaction_rec IN transaction_cur(p_document_reference_number,p_supplier_name,l_supplier_id,

Line 5122: fnd_file.put_line(fnd_file.log, 'Call Insert Transaction p_transaction_int_header_id:'||transaction_rec.transaction_int_header_id);

5118: FOR transaction_rec IN transaction_cur(p_document_reference_number,p_supplier_name,l_supplier_id,
5119: p_supplier_site,l_supplier_site_id,p_operating_unit,l_org_id)
5120: LOOP
5121: IF DPP_DEBUG_HIGH_ON THEN
5122: fnd_file.put_line(fnd_file.log, 'Call Insert Transaction p_transaction_int_header_id:'||transaction_rec.transaction_int_header_id);
5123: END IF;
5124: BEGIN
5125: UPDATE dpp_txn_headers_int_all dtha
5126: SET dtha.program_id = l_program_id,

Line 5139: fnd_file.put_line(fnd_file.log, 'Error in updating request id into the table.');

5135: dtla.request_id = l_request_id,
5136: dtla.program_update_date = sysdate
5137: WHERE dtla.transaction_int_header_id = transaction_rec.transaction_int_header_id;
5138: EXCEPTION WHEN OTHERS THEN
5139: fnd_file.put_line(fnd_file.log, 'Error in updating request id into the table.');
5140: RAISE Fnd_Api.G_EXC_ERROR;
5141: END;
5142: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Call Insert Transaction p_transaction_int_header_id:'||transaction_rec.transaction_int_header_id);
5143: DPP_TRANSACTION_PVT.Insert_Transaction(

Line 5156: fnd_file.put_line(fnd_file.log,l_msg_data);

5152: , x_msg_data =>l_msg_data
5153: ) ;
5154:
5155: IF l_return_status IN ('E','U') THEN
5156: fnd_file.put_line(fnd_file.log,l_msg_data);
5157: l_line_count := l_line_count + 1;
5158: /*IF DPP_DEBUG_HIGH_ON THEN
5159: fnd_file.put_line(fnd_file.log, '************************');
5160: fnd_file.put_line(fnd_file.log, ' Message: '||l_msg_data);

Line 5159: fnd_file.put_line(fnd_file.log, '************************');

5155: IF l_return_status IN ('E','U') THEN
5156: fnd_file.put_line(fnd_file.log,l_msg_data);
5157: l_line_count := l_line_count + 1;
5158: /*IF DPP_DEBUG_HIGH_ON THEN
5159: fnd_file.put_line(fnd_file.log, '************************');
5160: fnd_file.put_line(fnd_file.log, ' Message: '||l_msg_data);
5161: fnd_file.put_line(fnd_file.log, '************************');
5162: END IF;*/
5163: END IF;

Line 5160: fnd_file.put_line(fnd_file.log, ' Message: '||l_msg_data);

5156: fnd_file.put_line(fnd_file.log,l_msg_data);
5157: l_line_count := l_line_count + 1;
5158: /*IF DPP_DEBUG_HIGH_ON THEN
5159: fnd_file.put_line(fnd_file.log, '************************');
5160: fnd_file.put_line(fnd_file.log, ' Message: '||l_msg_data);
5161: fnd_file.put_line(fnd_file.log, '************************');
5162: END IF;*/
5163: END IF;
5164: l_row_count := l_row_count +1;

Line 5161: fnd_file.put_line(fnd_file.log, '************************');

5157: l_line_count := l_line_count + 1;
5158: /*IF DPP_DEBUG_HIGH_ON THEN
5159: fnd_file.put_line(fnd_file.log, '************************');
5160: fnd_file.put_line(fnd_file.log, ' Message: '||l_msg_data);
5161: fnd_file.put_line(fnd_file.log, '************************');
5162: END IF;*/
5163: END IF;
5164: l_row_count := l_row_count +1;
5165: END LOOP;

Line 5166: fnd_file.put_line(fnd_file.log, ' No of Records Processed : '||l_row_count);

5162: END IF;*/
5163: END IF;
5164: l_row_count := l_row_count +1;
5165: END LOOP;
5166: fnd_file.put_line(fnd_file.log, ' No of Records Processed : '||l_row_count);
5167: fnd_file.put_line(fnd_file.log, ' No of Error Records : '||l_line_count);
5168: fnd_file.put_line(fnd_file.log, ' No of Success Records : '||(l_row_count-l_line_count));
5169:
5170: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, ' No of Records Processed : '||l_row_count

Line 5167: fnd_file.put_line(fnd_file.log, ' No of Error Records : '||l_line_count);

5163: END IF;
5164: l_row_count := l_row_count +1;
5165: END LOOP;
5166: fnd_file.put_line(fnd_file.log, ' No of Records Processed : '||l_row_count);
5167: fnd_file.put_line(fnd_file.log, ' No of Error Records : '||l_line_count);
5168: fnd_file.put_line(fnd_file.log, ' No of Success Records : '||(l_row_count-l_line_count));
5169:
5170: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, ' No of Records Processed : '||l_row_count
5171: ||' No of Error Records : '||l_line_count

Line 5168: fnd_file.put_line(fnd_file.log, ' No of Success Records : '||(l_row_count-l_line_count));

5164: l_row_count := l_row_count +1;
5165: END LOOP;
5166: fnd_file.put_line(fnd_file.log, ' No of Records Processed : '||l_row_count);
5167: fnd_file.put_line(fnd_file.log, ' No of Error Records : '||l_line_count);
5168: fnd_file.put_line(fnd_file.log, ' No of Success Records : '||(l_row_count-l_line_count));
5169:
5170: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, ' No of Records Processed : '||l_row_count
5171: ||' No of Error Records : '||l_line_count
5172: ||' No of Success Records : '||(l_row_count-l_line_count));

Line 5175: FND_FILE.PUT_LINE(FND_FILE.LOG,'No Records selected for Processing');

5171: ||' No of Error Records : '||l_line_count
5172: ||' No of Success Records : '||(l_row_count-l_line_count));
5173:
5174: IF l_row_count = 0 THEN
5175: FND_FILE.PUT_LINE(FND_FILE.LOG,'No Records selected for Processing');
5176: END IF;
5177: IF l_line_count = 0 OR l_row_count = 0 THEN
5178: retcode := 0;
5179: errbuf :='Normal';

Line 5190: FND_FILE.PUT_LINE(FND_FILE.LOG,'End Create Transaction');

5186: END IF;
5187: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'DPP EXCEPTION l_msg_data:' ||l_msg_data);
5188:
5189: IF DPP_DEBUG_HIGH_ON THEN
5190: FND_FILE.PUT_LINE(FND_FILE.LOG,'End Create Transaction');
5191: END IF;
5192:
5193: EXCEPTION
5194: WHEN Fnd_Api.G_EXC_ERROR THEN