DBA Data[Home] [Help]

APPS.IBY_HASH_REGENERATOR dependencies on IBY_DEBUG_PUB

Line 16: iby_debug_pub.add(p_debug_text,iby_debug_pub.G_LEVEL_INFO,p_module);

12: IS
13: BEGIN
14:
15: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
16: iby_debug_pub.add(p_debug_text,iby_debug_pub.G_LEVEL_INFO,p_module);
17: -- FND_FILE.PUT_LINE(FND_FILE.LOG, p_module || ': ' || p_debug_text);
18: END IF;
19:
20: END;

Line 403: iby_debug_pub.add('Enter',iby_debug_pub.G_LEVEL_INFO,l_module_name);

399: IS
400: l_module_name CONSTANT VARCHAR2(200) := G_PKG_NAME || '.Upgrade_Hash_Data_Mgr';
401: l_system_salt_version NUMBER;
402: BEGIN
403: iby_debug_pub.add('Enter',iby_debug_pub.G_LEVEL_INFO,l_module_name);
404:
405: l_system_salt_version := IBY_SECURITY_PKG.Get_Salt_Version;
406: iby_debug_pub.add('Version of existing hash: '||l_system_salt_version,iby_debug_pub.G_LEVEL_INFO,l_module_name);
407:

Line 406: iby_debug_pub.add('Version of existing hash: '||l_system_salt_version,iby_debug_pub.G_LEVEL_INFO,l_module_name);

402: BEGIN
403: iby_debug_pub.add('Enter',iby_debug_pub.G_LEVEL_INFO,l_module_name);
404:
405: l_system_salt_version := IBY_SECURITY_PKG.Get_Salt_Version;
406: iby_debug_pub.add('Version of existing hash: '||l_system_salt_version,iby_debug_pub.G_LEVEL_INFO,l_module_name);
407:
408: IF (l_system_salt_version =3) THEN
409: iby_debug_pub.add('Latest version of hash data already present. Exiting..'
410: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);

Line 409: iby_debug_pub.add('Latest version of hash data already present. Exiting..'

405: l_system_salt_version := IBY_SECURITY_PKG.Get_Salt_Version;
406: iby_debug_pub.add('Version of existing hash: '||l_system_salt_version,iby_debug_pub.G_LEVEL_INFO,l_module_name);
407:
408: IF (l_system_salt_version =3) THEN
409: iby_debug_pub.add('Latest version of hash data already present. Exiting..'
410: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);
411: fnd_file.put_line(fnd_file.OUTPUT,'Latest version of hash data already present. Exiting..');
412: RETURN;
413: END IF;

Line 410: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);

406: iby_debug_pub.add('Version of existing hash: '||l_system_salt_version,iby_debug_pub.G_LEVEL_INFO,l_module_name);
407:
408: IF (l_system_salt_version =3) THEN
409: iby_debug_pub.add('Latest version of hash data already present. Exiting..'
410: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);
411: fnd_file.put_line(fnd_file.OUTPUT,'Latest version of hash data already present. Exiting..');
412: RETURN;
413: END IF;
414:

Line 416: iby_debug_pub.add('Please submit ''Re-Generate Payments Hash Data'' CP first and then submit the Upgrade program. Exiting..'

412: RETURN;
413: END IF;
414:
415: IF (l_system_salt_version <> 2) THEN
416: iby_debug_pub.add('Please submit ''Re-Generate Payments Hash Data'' CP first and then submit the Upgrade program. Exiting..'
417: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);
418: fnd_file.put_line(fnd_file.OUTPUT,'Existing hash data is incompatible. Please '||
419: 'submit ''Re-Generate Payments Hash Data'' CP first and then submit the Upgrade program again.');
420: RETURN;

Line 417: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);

413: END IF;
414:
415: IF (l_system_salt_version <> 2) THEN
416: iby_debug_pub.add('Please submit ''Re-Generate Payments Hash Data'' CP first and then submit the Upgrade program. Exiting..'
417: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);
418: fnd_file.put_line(fnd_file.OUTPUT,'Existing hash data is incompatible. Please '||
419: 'submit ''Re-Generate Payments Hash Data'' CP first and then submit the Upgrade program again.');
420: RETURN;
421: END IF;

Line 432: iby_debug_pub.add('Submitted Workers..',iby_debug_pub.G_LEVEL_INFO,l_module_name);

428: X_batch_size => x_batch_size,
429: X_Num_Workers => x_num_workers
430: );
431:
432: iby_debug_pub.add('Submitted Workers..',iby_debug_pub.G_LEVEL_INFO,l_module_name);
433: iby_debug_pub.add('Removing redundant hash data from iby_trxn_summaries_all..',iby_debug_pub.G_LEVEL_INFO,l_module_name);
434: UPDATE iby_trxn_summaries_all SET instrnum_hash = NULL WHERE instrnum_hash IS NOT NULL;
435: iby_debug_pub.add('Records updated='||SQL%ROWCOUNT,iby_debug_pub.G_LEVEL_INFO,l_module_name);
436: COMMIT ;

Line 433: iby_debug_pub.add('Removing redundant hash data from iby_trxn_summaries_all..',iby_debug_pub.G_LEVEL_INFO,l_module_name);

429: X_Num_Workers => x_num_workers
430: );
431:
432: iby_debug_pub.add('Submitted Workers..',iby_debug_pub.G_LEVEL_INFO,l_module_name);
433: iby_debug_pub.add('Removing redundant hash data from iby_trxn_summaries_all..',iby_debug_pub.G_LEVEL_INFO,l_module_name);
434: UPDATE iby_trxn_summaries_all SET instrnum_hash = NULL WHERE instrnum_hash IS NOT NULL;
435: iby_debug_pub.add('Records updated='||SQL%ROWCOUNT,iby_debug_pub.G_LEVEL_INFO,l_module_name);
436: COMMIT ;
437:

Line 435: iby_debug_pub.add('Records updated='||SQL%ROWCOUNT,iby_debug_pub.G_LEVEL_INFO,l_module_name);

431:
432: iby_debug_pub.add('Submitted Workers..',iby_debug_pub.G_LEVEL_INFO,l_module_name);
433: iby_debug_pub.add('Removing redundant hash data from iby_trxn_summaries_all..',iby_debug_pub.G_LEVEL_INFO,l_module_name);
434: UPDATE iby_trxn_summaries_all SET instrnum_hash = NULL WHERE instrnum_hash IS NOT NULL;
435: iby_debug_pub.add('Records updated='||SQL%ROWCOUNT,iby_debug_pub.G_LEVEL_INFO,l_module_name);
436: COMMIT ;
437:
438: EXCEPTION
439:

Line 441: iby_debug_pub.add('ERROR CODE:='||sqlcode,iby_debug_pub.G_LEVEL_INFO,l_module_name);

437:
438: EXCEPTION
439:
440: WHEN OTHERS THEN
441: iby_debug_pub.add('ERROR CODE:='||sqlcode,iby_debug_pub.G_LEVEL_INFO,l_module_name);
442: iby_debug_pub.add('ERROR:='||sqlerrm,iby_debug_pub.G_LEVEL_INFO,l_module_name);
443: END Upgrade_CC_Hash_Mgr;
444:
445: PROCEDURE Upgrade_CC_Hash_Wkr

Line 442: iby_debug_pub.add('ERROR:='||sqlerrm,iby_debug_pub.G_LEVEL_INFO,l_module_name);

438: EXCEPTION
439:
440: WHEN OTHERS THEN
441: iby_debug_pub.add('ERROR CODE:='||sqlcode,iby_debug_pub.G_LEVEL_INFO,l_module_name);
442: iby_debug_pub.add('ERROR:='||sqlerrm,iby_debug_pub.G_LEVEL_INFO,l_module_name);
443: END Upgrade_CC_Hash_Mgr;
444:
445: PROCEDURE Upgrade_CC_Hash_Wkr
446: (x_errbuf OUT NOCOPY VARCHAR2,

Line 500: iby_debug_pub.add('Enter',iby_debug_pub.G_LEVEL_INFO,l_module_name);

496: FROM iby_creditcard
497: WHERE NVL(salt_version,1) = 2
498: AND (rowid BETWEEN ci_start_rowid AND ci_end_rowid);
499: BEGIN
500: iby_debug_pub.add('Enter',iby_debug_pub.G_LEVEL_INFO,l_module_name);
501: l_num_workers := NVL(x_num_workers,1);
502: l_worker_id := NVL(x_worker_id,1);
503: l_batch_size := NVL(x_batch_size,10000);
504:

Line 518: iby_debug_pub.add('x_worker_id : '||x_worker_id,iby_debug_pub.G_LEVEL_INFO,l_module_name);

514: raise_application_error(-20001,
515: 'Cannot get schema name for product : '||l_product);
516: END IF;
517:
518: iby_debug_pub.add('x_worker_id : '||x_worker_id,iby_debug_pub.G_LEVEL_INFO,l_module_name);
519:
520: x_retcode := AD_CONC_UTILS_PKG.CONC_SUCCESS;
521:
522: -- cache site salt value

Line 549: iby_debug_pub.add('rows fetched:='||l_instrid_tbl.COUNT,iby_debug_pub.G_LEVEL_INFO,l_module_name);

545: FETCH c_cards BULK COLLECT INTO
546: l_instrid_tbl, l_ccnum_hash1_tbl, l_ccnum_hash2_tbl;
547: CLOSE c_cards;
548:
549: iby_debug_pub.add('rows fetched:='||l_instrid_tbl.COUNT,iby_debug_pub.G_LEVEL_INFO,l_module_name);
550: t1 := systimestamp;
551: IF (l_instrid_tbl.count>0) THEN
552: FORALL i IN l_instrid_tbl.first..l_instrid_tbl.last
553: UPDATE iby_creditcard

Line 562: iby_debug_pub.add('No. of credit card records updated = '|| l_rows_processed,

558: END IF;
559:
560: l_rows_processed := SQL%ROWCOUNT;
561: t2 := systimestamp;
562: iby_debug_pub.add('No. of credit card records updated = '|| l_rows_processed,
563: iby_debug_pub.G_LEVEL_INFO,l_module_name);
564: fnd_file.put_line(fnd_file.OUTPUT,'No. of credit card records updated = '|| l_rows_processed);
565: iby_debug_pub.add('Time taken = '|| (t2-t1),
566: iby_debug_pub.G_LEVEL_INFO,l_module_name);

Line 563: iby_debug_pub.G_LEVEL_INFO,l_module_name);

559:
560: l_rows_processed := SQL%ROWCOUNT;
561: t2 := systimestamp;
562: iby_debug_pub.add('No. of credit card records updated = '|| l_rows_processed,
563: iby_debug_pub.G_LEVEL_INFO,l_module_name);
564: fnd_file.put_line(fnd_file.OUTPUT,'No. of credit card records updated = '|| l_rows_processed);
565: iby_debug_pub.add('Time taken = '|| (t2-t1),
566: iby_debug_pub.G_LEVEL_INFO,l_module_name);
567:

Line 565: iby_debug_pub.add('Time taken = '|| (t2-t1),

561: t2 := systimestamp;
562: iby_debug_pub.add('No. of credit card records updated = '|| l_rows_processed,
563: iby_debug_pub.G_LEVEL_INFO,l_module_name);
564: fnd_file.put_line(fnd_file.OUTPUT,'No. of credit card records updated = '|| l_rows_processed);
565: iby_debug_pub.add('Time taken = '|| (t2-t1),
566: iby_debug_pub.G_LEVEL_INFO,l_module_name);
567:
568: ad_parallel_updates_pkg.processed_rowid_range(
569: l_rows_processed,

Line 566: iby_debug_pub.G_LEVEL_INFO,l_module_name);

562: iby_debug_pub.add('No. of credit card records updated = '|| l_rows_processed,
563: iby_debug_pub.G_LEVEL_INFO,l_module_name);
564: fnd_file.put_line(fnd_file.OUTPUT,'No. of credit card records updated = '|| l_rows_processed);
565: iby_debug_pub.add('Time taken = '|| (t2-t1),
566: iby_debug_pub.G_LEVEL_INFO,l_module_name);
567:
568: ad_parallel_updates_pkg.processed_rowid_range(
569: l_rows_processed,
570: l_end_rowid);

Line 583: iby_debug_pub.add('ERROR CODE:='||sqlcode,iby_debug_pub.G_LEVEL_INFO,l_module_name);

579: FALSE);
580: END LOOP;
581: EXCEPTION
582: WHEN OTHERS THEN
583: iby_debug_pub.add('ERROR CODE:='||sqlcode,iby_debug_pub.G_LEVEL_INFO,l_module_name);
584: iby_debug_pub.add('ERROR MESSAGE:='||SUBSTR(sqlerrm,1,150),iby_debug_pub.G_LEVEL_INFO,l_module_name);
585: x_retcode := AD_CONC_UTILS_PKG.CONC_FAIL;
586: x_errbuf := SQLERRM;
587: END;

Line 584: iby_debug_pub.add('ERROR MESSAGE:='||SUBSTR(sqlerrm,1,150),iby_debug_pub.G_LEVEL_INFO,l_module_name);

580: END LOOP;
581: EXCEPTION
582: WHEN OTHERS THEN
583: iby_debug_pub.add('ERROR CODE:='||sqlcode,iby_debug_pub.G_LEVEL_INFO,l_module_name);
584: iby_debug_pub.add('ERROR MESSAGE:='||SUBSTR(sqlerrm,1,150),iby_debug_pub.G_LEVEL_INFO,l_module_name);
585: x_retcode := AD_CONC_UTILS_PKG.CONC_FAIL;
586: x_errbuf := SQLERRM;
587: END;
588: iby_debug_pub.add('Worker Done',iby_debug_pub.G_LEVEL_INFO,l_module_name);

Line 588: iby_debug_pub.add('Worker Done',iby_debug_pub.G_LEVEL_INFO,l_module_name);

584: iby_debug_pub.add('ERROR MESSAGE:='||SUBSTR(sqlerrm,1,150),iby_debug_pub.G_LEVEL_INFO,l_module_name);
585: x_retcode := AD_CONC_UTILS_PKG.CONC_FAIL;
586: x_errbuf := SQLERRM;
587: END;
588: iby_debug_pub.add('Worker Done',iby_debug_pub.G_LEVEL_INFO,l_module_name);
589:
590: -- If entire data has been upgarded then turn on the system switch to use
591: -- new hashing logic
592: iby_debug_pub.add('Verifying if any data is pending before setting system switch',iby_debug_pub.G_LEVEL_INFO,l_module_name);

Line 592: iby_debug_pub.add('Verifying if any data is pending before setting system switch',iby_debug_pub.G_LEVEL_INFO,l_module_name);

588: iby_debug_pub.add('Worker Done',iby_debug_pub.G_LEVEL_INFO,l_module_name);
589:
590: -- If entire data has been upgarded then turn on the system switch to use
591: -- new hashing logic
592: iby_debug_pub.add('Verifying if any data is pending before setting system switch',iby_debug_pub.G_LEVEL_INFO,l_module_name);
593: SELECT COUNT(1) INTO l_pending_cc FROM iby_creditcard WHERE NVL(salt_version,1) <> 3;
594: IF(l_pending_cc = 0) THEN
595: iby_debug_pub.add('All CC hashes generated. Verifying BA..',iby_debug_pub.G_LEVEL_INFO,l_module_name);
596: SELECT COUNT(1) INTO l_pending_ba FROM iby_ext_bank_accounts WHERE NVL(salt_version,1) <> 3;

Line 595: iby_debug_pub.add('All CC hashes generated. Verifying BA..',iby_debug_pub.G_LEVEL_INFO,l_module_name);

591: -- new hashing logic
592: iby_debug_pub.add('Verifying if any data is pending before setting system switch',iby_debug_pub.G_LEVEL_INFO,l_module_name);
593: SELECT COUNT(1) INTO l_pending_cc FROM iby_creditcard WHERE NVL(salt_version,1) <> 3;
594: IF(l_pending_cc = 0) THEN
595: iby_debug_pub.add('All CC hashes generated. Verifying BA..',iby_debug_pub.G_LEVEL_INFO,l_module_name);
596: SELECT COUNT(1) INTO l_pending_ba FROM iby_ext_bank_accounts WHERE NVL(salt_version,1) <> 3;
597: IF(l_pending_ba = 0) THEN
598: iby_debug_pub.add('All BA records re-hashed. Updating system_salt_version..',iby_debug_pub.G_LEVEL_INFO,l_module_name);
599: UPDATE iby_sys_security_options SET system_salt_version=3;

Line 598: iby_debug_pub.add('All BA records re-hashed. Updating system_salt_version..',iby_debug_pub.G_LEVEL_INFO,l_module_name);

594: IF(l_pending_cc = 0) THEN
595: iby_debug_pub.add('All CC hashes generated. Verifying BA..',iby_debug_pub.G_LEVEL_INFO,l_module_name);
596: SELECT COUNT(1) INTO l_pending_ba FROM iby_ext_bank_accounts WHERE NVL(salt_version,1) <> 3;
597: IF(l_pending_ba = 0) THEN
598: iby_debug_pub.add('All BA records re-hashed. Updating system_salt_version..',iby_debug_pub.G_LEVEL_INFO,l_module_name);
599: UPDATE iby_sys_security_options SET system_salt_version=3;
600: COMMIT;
601: ELSE
602: iby_debug_pub.add('There are pending BA records to be processed. Skipping update of system_salt_version.'

Line 602: iby_debug_pub.add('There are pending BA records to be processed. Skipping update of system_salt_version.'

598: iby_debug_pub.add('All BA records re-hashed. Updating system_salt_version..',iby_debug_pub.G_LEVEL_INFO,l_module_name);
599: UPDATE iby_sys_security_options SET system_salt_version=3;
600: COMMIT;
601: ELSE
602: iby_debug_pub.add('There are pending BA records to be processed. Skipping update of system_salt_version.'
603: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);
604: END IF ;
605: ELSE
606: iby_debug_pub.add('There are pending CC records to be processed. Skipping update of system_salt_version.'

Line 603: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);

599: UPDATE iby_sys_security_options SET system_salt_version=3;
600: COMMIT;
601: ELSE
602: iby_debug_pub.add('There are pending BA records to be processed. Skipping update of system_salt_version.'
603: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);
604: END IF ;
605: ELSE
606: iby_debug_pub.add('There are pending CC records to be processed. Skipping update of system_salt_version.'
607: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);

Line 606: iby_debug_pub.add('There are pending CC records to be processed. Skipping update of system_salt_version.'

602: iby_debug_pub.add('There are pending BA records to be processed. Skipping update of system_salt_version.'
603: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);
604: END IF ;
605: ELSE
606: iby_debug_pub.add('There are pending CC records to be processed. Skipping update of system_salt_version.'
607: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);
608: END IF ;
609: x_retcode := NVL(x_retcode,AD_CONC_UTILS_PKG.CONC_SUCCESS);
610: END Upgrade_CC_Hash_Wkr;

Line 607: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);

603: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);
604: END IF ;
605: ELSE
606: iby_debug_pub.add('There are pending CC records to be processed. Skipping update of system_salt_version.'
607: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);
608: END IF ;
609: x_retcode := NVL(x_retcode,AD_CONC_UTILS_PKG.CONC_SUCCESS);
610: END Upgrade_CC_Hash_Wkr;
611:

Line 623: iby_debug_pub.add('Enter',iby_debug_pub.G_LEVEL_INFO,l_module_name);

619: IS
620: l_module_name CONSTANT VARCHAR2(200) := G_PKG_NAME || '.Upgrade_Hash_Data_Mgr';
621: l_system_salt_version NUMBER;
622: BEGIN
623: iby_debug_pub.add('Enter',iby_debug_pub.G_LEVEL_INFO,l_module_name);
624:
625: l_system_salt_version := IBY_SECURITY_PKG.Get_Salt_Version;
626: iby_debug_pub.add('Version of existing hash: '||l_system_salt_version,iby_debug_pub.G_LEVEL_INFO,l_module_name);
627:

Line 626: iby_debug_pub.add('Version of existing hash: '||l_system_salt_version,iby_debug_pub.G_LEVEL_INFO,l_module_name);

622: BEGIN
623: iby_debug_pub.add('Enter',iby_debug_pub.G_LEVEL_INFO,l_module_name);
624:
625: l_system_salt_version := IBY_SECURITY_PKG.Get_Salt_Version;
626: iby_debug_pub.add('Version of existing hash: '||l_system_salt_version,iby_debug_pub.G_LEVEL_INFO,l_module_name);
627:
628: IF (l_system_salt_version =3) THEN
629: iby_debug_pub.add('Latest version of hash data already present. Exiting..'
630: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);

Line 629: iby_debug_pub.add('Latest version of hash data already present. Exiting..'

625: l_system_salt_version := IBY_SECURITY_PKG.Get_Salt_Version;
626: iby_debug_pub.add('Version of existing hash: '||l_system_salt_version,iby_debug_pub.G_LEVEL_INFO,l_module_name);
627:
628: IF (l_system_salt_version =3) THEN
629: iby_debug_pub.add('Latest version of hash data already present. Exiting..'
630: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);
631: fnd_file.put_line(fnd_file.OUTPUT,l_module_name||'=>Latest version of hash data already present. Exiting..');
632: RETURN;
633: END IF;

Line 630: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);

626: iby_debug_pub.add('Version of existing hash: '||l_system_salt_version,iby_debug_pub.G_LEVEL_INFO,l_module_name);
627:
628: IF (l_system_salt_version =3) THEN
629: iby_debug_pub.add('Latest version of hash data already present. Exiting..'
630: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);
631: fnd_file.put_line(fnd_file.OUTPUT,l_module_name||'=>Latest version of hash data already present. Exiting..');
632: RETURN;
633: END IF;
634:

Line 636: iby_debug_pub.add('Please submit ''Re-Generate Payments Hash Data'' CP first and then submit the Upgrade program. Exiting..'

632: RETURN;
633: END IF;
634:
635: IF (l_system_salt_version <> 2) THEN
636: iby_debug_pub.add('Please submit ''Re-Generate Payments Hash Data'' CP first and then submit the Upgrade program. Exiting..'
637: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);
638: fnd_file.put_line(fnd_file.OUTPUT,l_module_name||'=>Existing hash data is incompatible. Please '||
639: 'submit ''Re-Generate Payments Hash Data'' CP first and then submit the Upgrade program again.');
640: RETURN;

Line 637: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);

633: END IF;
634:
635: IF (l_system_salt_version <> 2) THEN
636: iby_debug_pub.add('Please submit ''Re-Generate Payments Hash Data'' CP first and then submit the Upgrade program. Exiting..'
637: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);
638: fnd_file.put_line(fnd_file.OUTPUT,l_module_name||'=>Existing hash data is incompatible. Please '||
639: 'submit ''Re-Generate Payments Hash Data'' CP first and then submit the Upgrade program again.');
640: RETURN;
641: END IF;

Line 652: iby_debug_pub.add('Submitted Workers..',iby_debug_pub.G_LEVEL_INFO,l_module_name);

648: X_batch_size => x_batch_size,
649: X_Num_Workers => x_num_workers
650: );
651:
652: iby_debug_pub.add('Submitted Workers..',iby_debug_pub.G_LEVEL_INFO,l_module_name);
653:
654: EXCEPTION
655: WHEN OTHERS THEN
656: iby_debug_pub.add('ERROR CODE:='||sqlcode,iby_debug_pub.G_LEVEL_INFO,l_module_name);

Line 656: iby_debug_pub.add('ERROR CODE:='||sqlcode,iby_debug_pub.G_LEVEL_INFO,l_module_name);

652: iby_debug_pub.add('Submitted Workers..',iby_debug_pub.G_LEVEL_INFO,l_module_name);
653:
654: EXCEPTION
655: WHEN OTHERS THEN
656: iby_debug_pub.add('ERROR CODE:='||sqlcode,iby_debug_pub.G_LEVEL_INFO,l_module_name);
657: iby_debug_pub.add('ERROR:='||sqlerrm,iby_debug_pub.G_LEVEL_INFO,l_module_name);
658: END Upgrade_BA_Hash_Mgr;
659:
660: PROCEDURE Upgrade_BA_Hash_Wkr

Line 657: iby_debug_pub.add('ERROR:='||sqlerrm,iby_debug_pub.G_LEVEL_INFO,l_module_name);

653:
654: EXCEPTION
655: WHEN OTHERS THEN
656: iby_debug_pub.add('ERROR CODE:='||sqlcode,iby_debug_pub.G_LEVEL_INFO,l_module_name);
657: iby_debug_pub.add('ERROR:='||sqlerrm,iby_debug_pub.G_LEVEL_INFO,l_module_name);
658: END Upgrade_BA_Hash_Mgr;
659:
660: PROCEDURE Upgrade_BA_Hash_Wkr
661: (x_errbuf OUT NOCOPY VARCHAR2,

Line 718: iby_debug_pub.add('Enter',iby_debug_pub.G_LEVEL_INFO,l_module_name);

714: FROM iby_ext_bank_accounts
715: WHERE NVL(salt_version,1) = 2
716: AND (rowid BETWEEN ci_start_rowid AND ci_end_rowid);
717: BEGIN
718: iby_debug_pub.add('Enter',iby_debug_pub.G_LEVEL_INFO,l_module_name);
719: l_num_workers := NVL(x_num_workers,1);
720: l_worker_id := NVL(x_worker_id,1);
721: l_batch_size := NVL(x_batch_size,10000);
722: l_script_name := 'BA_HASH_UPG_'||TO_CHAR(SYSDATE,'DDMMYYHH24MISS');

Line 735: iby_debug_pub.add('x_worker_id : '||x_worker_id,iby_debug_pub.G_LEVEL_INFO,l_module_name);

731: raise_application_error(-20001,
732: 'Cannot get schema name for product : '||l_product);
733: END IF;
734:
735: iby_debug_pub.add('x_worker_id : '||x_worker_id,iby_debug_pub.G_LEVEL_INFO,l_module_name);
736:
737: x_retcode := AD_CONC_UTILS_PKG.CONC_SUCCESS;
738:
739: -- cache site salt value

Line 767: iby_debug_pub.add('rows fetched:='||l_instrid_tbl.COUNT,iby_debug_pub.G_LEVEL_INFO,l_module_name);

763: l_instrid_tbl, l_banum_hash1_tbl, l_banum_hash2_tbl,
764: l_iban_hash1_tbl, l_iban_hash2_tbl;
765: CLOSE c_bank_accts;
766:
767: iby_debug_pub.add('rows fetched:='||l_instrid_tbl.COUNT,iby_debug_pub.G_LEVEL_INFO,l_module_name);
768: t1 := systimestamp;
769: IF (l_instrid_tbl.COUNT>0) THEN
770: FORALL i IN l_instrid_tbl.first..l_instrid_tbl.last
771: UPDATE iby_ext_bank_accounts

Line 782: iby_debug_pub.add('No. of bank account records updated = '|| l_rows_processed,

778: END IF;
779:
780: l_rows_processed := SQL%ROWCOUNT;
781: t2 := systimestamp;
782: iby_debug_pub.add('No. of bank account records updated = '|| l_rows_processed,
783: iby_debug_pub.G_LEVEL_INFO,l_module_name);
784: iby_debug_pub.add('Time taken = '|| (t2-t1),
785: iby_debug_pub.G_LEVEL_INFO,l_module_name);
786: fnd_file.put_line(fnd_file.OUTPUT,'No. of bank account records updated = '|| l_rows_processed);

Line 783: iby_debug_pub.G_LEVEL_INFO,l_module_name);

779:
780: l_rows_processed := SQL%ROWCOUNT;
781: t2 := systimestamp;
782: iby_debug_pub.add('No. of bank account records updated = '|| l_rows_processed,
783: iby_debug_pub.G_LEVEL_INFO,l_module_name);
784: iby_debug_pub.add('Time taken = '|| (t2-t1),
785: iby_debug_pub.G_LEVEL_INFO,l_module_name);
786: fnd_file.put_line(fnd_file.OUTPUT,'No. of bank account records updated = '|| l_rows_processed);
787:

Line 784: iby_debug_pub.add('Time taken = '|| (t2-t1),

780: l_rows_processed := SQL%ROWCOUNT;
781: t2 := systimestamp;
782: iby_debug_pub.add('No. of bank account records updated = '|| l_rows_processed,
783: iby_debug_pub.G_LEVEL_INFO,l_module_name);
784: iby_debug_pub.add('Time taken = '|| (t2-t1),
785: iby_debug_pub.G_LEVEL_INFO,l_module_name);
786: fnd_file.put_line(fnd_file.OUTPUT,'No. of bank account records updated = '|| l_rows_processed);
787:
788: ad_parallel_updates_pkg.processed_rowid_range(

Line 785: iby_debug_pub.G_LEVEL_INFO,l_module_name);

781: t2 := systimestamp;
782: iby_debug_pub.add('No. of bank account records updated = '|| l_rows_processed,
783: iby_debug_pub.G_LEVEL_INFO,l_module_name);
784: iby_debug_pub.add('Time taken = '|| (t2-t1),
785: iby_debug_pub.G_LEVEL_INFO,l_module_name);
786: fnd_file.put_line(fnd_file.OUTPUT,'No. of bank account records updated = '|| l_rows_processed);
787:
788: ad_parallel_updates_pkg.processed_rowid_range(
789: l_rows_processed,

Line 803: iby_debug_pub.add('ERROR CODE:='||sqlcode,iby_debug_pub.G_LEVEL_INFO,l_module_name);

799: FALSE);
800: END LOOP;
801: EXCEPTION
802: WHEN OTHERS THEN
803: iby_debug_pub.add('ERROR CODE:='||sqlcode,iby_debug_pub.G_LEVEL_INFO,l_module_name);
804: iby_debug_pub.add('ERROR MESSAGE:='||SUBSTR(sqlerrm,1,150),iby_debug_pub.G_LEVEL_INFO,l_module_name);
805: x_retcode := AD_CONC_UTILS_PKG.CONC_FAIL;
806: x_errbuf := SQLERRM;
807: END;

Line 804: iby_debug_pub.add('ERROR MESSAGE:='||SUBSTR(sqlerrm,1,150),iby_debug_pub.G_LEVEL_INFO,l_module_name);

800: END LOOP;
801: EXCEPTION
802: WHEN OTHERS THEN
803: iby_debug_pub.add('ERROR CODE:='||sqlcode,iby_debug_pub.G_LEVEL_INFO,l_module_name);
804: iby_debug_pub.add('ERROR MESSAGE:='||SUBSTR(sqlerrm,1,150),iby_debug_pub.G_LEVEL_INFO,l_module_name);
805: x_retcode := AD_CONC_UTILS_PKG.CONC_FAIL;
806: x_errbuf := SQLERRM;
807: END;
808: iby_debug_pub.add('Worker Done',iby_debug_pub.G_LEVEL_INFO,l_module_name);

Line 808: iby_debug_pub.add('Worker Done',iby_debug_pub.G_LEVEL_INFO,l_module_name);

804: iby_debug_pub.add('ERROR MESSAGE:='||SUBSTR(sqlerrm,1,150),iby_debug_pub.G_LEVEL_INFO,l_module_name);
805: x_retcode := AD_CONC_UTILS_PKG.CONC_FAIL;
806: x_errbuf := SQLERRM;
807: END;
808: iby_debug_pub.add('Worker Done',iby_debug_pub.G_LEVEL_INFO,l_module_name);
809:
810: -- If entire data has been upgarded then turn on the system switch to use
811: -- new hashing logic
812: iby_debug_pub.add('Verifying if any data is pending before setting system switch',iby_debug_pub.G_LEVEL_INFO,l_module_name);

Line 812: iby_debug_pub.add('Verifying if any data is pending before setting system switch',iby_debug_pub.G_LEVEL_INFO,l_module_name);

808: iby_debug_pub.add('Worker Done',iby_debug_pub.G_LEVEL_INFO,l_module_name);
809:
810: -- If entire data has been upgarded then turn on the system switch to use
811: -- new hashing logic
812: iby_debug_pub.add('Verifying if any data is pending before setting system switch',iby_debug_pub.G_LEVEL_INFO,l_module_name);
813: SELECT COUNT(1) INTO l_pending_cc FROM iby_creditcard WHERE NVL(salt_version,1) <> 3;
814: IF(l_pending_cc = 0) THEN
815: iby_debug_pub.add('All CC hashes generated. Verifying BA..',iby_debug_pub.G_LEVEL_INFO,l_module_name);
816: SELECT COUNT(1) INTO l_pending_ba FROM iby_ext_bank_accounts WHERE NVL(salt_version,1) <> 3;

Line 815: iby_debug_pub.add('All CC hashes generated. Verifying BA..',iby_debug_pub.G_LEVEL_INFO,l_module_name);

811: -- new hashing logic
812: iby_debug_pub.add('Verifying if any data is pending before setting system switch',iby_debug_pub.G_LEVEL_INFO,l_module_name);
813: SELECT COUNT(1) INTO l_pending_cc FROM iby_creditcard WHERE NVL(salt_version,1) <> 3;
814: IF(l_pending_cc = 0) THEN
815: iby_debug_pub.add('All CC hashes generated. Verifying BA..',iby_debug_pub.G_LEVEL_INFO,l_module_name);
816: SELECT COUNT(1) INTO l_pending_ba FROM iby_ext_bank_accounts WHERE NVL(salt_version,1) <> 3;
817: IF(l_pending_ba = 0) THEN
818: iby_debug_pub.add('All BA records re-hashed. Updating system_salt_version..',iby_debug_pub.G_LEVEL_INFO,l_module_name);
819: UPDATE iby_sys_security_options SET system_salt_version=3;

Line 818: iby_debug_pub.add('All BA records re-hashed. Updating system_salt_version..',iby_debug_pub.G_LEVEL_INFO,l_module_name);

814: IF(l_pending_cc = 0) THEN
815: iby_debug_pub.add('All CC hashes generated. Verifying BA..',iby_debug_pub.G_LEVEL_INFO,l_module_name);
816: SELECT COUNT(1) INTO l_pending_ba FROM iby_ext_bank_accounts WHERE NVL(salt_version,1) <> 3;
817: IF(l_pending_ba = 0) THEN
818: iby_debug_pub.add('All BA records re-hashed. Updating system_salt_version..',iby_debug_pub.G_LEVEL_INFO,l_module_name);
819: UPDATE iby_sys_security_options SET system_salt_version=3;
820: COMMIT;
821: ELSE
822: iby_debug_pub.add('There are pending BA records to be processed. Skipping update of system_salt_version.'

Line 822: iby_debug_pub.add('There are pending BA records to be processed. Skipping update of system_salt_version.'

818: iby_debug_pub.add('All BA records re-hashed. Updating system_salt_version..',iby_debug_pub.G_LEVEL_INFO,l_module_name);
819: UPDATE iby_sys_security_options SET system_salt_version=3;
820: COMMIT;
821: ELSE
822: iby_debug_pub.add('There are pending BA records to be processed. Skipping update of system_salt_version.'
823: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);
824: END IF ;
825: ELSE
826: iby_debug_pub.add('There are pending CC records to be processed. Skipping update of system_salt_version.'

Line 823: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);

819: UPDATE iby_sys_security_options SET system_salt_version=3;
820: COMMIT;
821: ELSE
822: iby_debug_pub.add('There are pending BA records to be processed. Skipping update of system_salt_version.'
823: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);
824: END IF ;
825: ELSE
826: iby_debug_pub.add('There are pending CC records to be processed. Skipping update of system_salt_version.'
827: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);

Line 826: iby_debug_pub.add('There are pending CC records to be processed. Skipping update of system_salt_version.'

822: iby_debug_pub.add('There are pending BA records to be processed. Skipping update of system_salt_version.'
823: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);
824: END IF ;
825: ELSE
826: iby_debug_pub.add('There are pending CC records to be processed. Skipping update of system_salt_version.'
827: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);
828: END IF ;
829: x_retcode := NVL(x_retcode,AD_CONC_UTILS_PKG.CONC_SUCCESS);
830: END Upgrade_BA_Hash_Wkr;

Line 827: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);

823: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);
824: END IF ;
825: ELSE
826: iby_debug_pub.add('There are pending CC records to be processed. Skipping update of system_salt_version.'
827: ,iby_debug_pub.G_LEVEL_INFO,l_module_name);
828: END IF ;
829: x_retcode := NVL(x_retcode,AD_CONC_UTILS_PKG.CONC_SUCCESS);
830: END Upgrade_BA_Hash_Wkr;
831: