DBA Data[Home] [Help]

APPS.IBY_SCHED dependencies on IBY_DEBUG_PUB

Line 308: iby_debug_pub.add('l_ecappTab.COUNT:' || l_ecappTab.COUNT,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);

304: updatedt_Tab := JTF_DATE_TABLE();
305: refcode_Tab := JTF_VARCHAR2_TABLE_100();
306: o_statusindiv_Tab := JTF_VARCHAR2_TABLE_100();
307:
308: iby_debug_pub.add('l_ecappTab.COUNT:' || l_ecappTab.COUNT,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
309:
310: IF(l_ecappTab.COUNT>0) THEN
311: FOR j in l_ecappTab.FIRST..l_ecappTab.LAST LOOP
312: l_ecapp_rec:=l_ecappTab(j);

Line 314: iby_debug_pub.add('Fetching records for ECAPPID:' ||

310: IF(l_ecappTab.COUNT>0) THEN
311: FOR j in l_ecappTab.FIRST..l_ecappTab.LAST LOOP
312: l_ecapp_rec:=l_ecappTab(j);
313:
314: iby_debug_pub.add('Fetching records for ECAPPID:' ||
315: l_ecapp_rec.ecappid,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
316:
317: FOR r_trans_core IN c_trans_core(l_ecapp_rec.ecappid) LOOP
318: l_recordCounter := l_recordCounter + 1;

Line 315: l_ecapp_rec.ecappid,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);

311: FOR j in l_ecappTab.FIRST..l_ecappTab.LAST LOOP
312: l_ecapp_rec:=l_ecappTab(j);
313:
314: iby_debug_pub.add('Fetching records for ECAPPID:' ||
315: l_ecapp_rec.ecappid,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
316:
317: FOR r_trans_core IN c_trans_core(l_ecapp_rec.ecappid) LOOP
318: l_recordCounter := l_recordCounter + 1;
319: txn_id_Tab.extend(extendRows);

Line 388: iby_debug_pub.add('application_short_name:' || l_ecapp_rec.app_short_name,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);

384: */
385: IF(l_ecappTab.COUNT>0) THEN
386: FOR j in l_ecappTab.FIRST..l_ecappTab.LAST LOOP
387: l_ecapp_rec:=l_ecappTab(j);
388: iby_debug_pub.add('application_short_name:' || l_ecapp_rec.app_short_name,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
389: IF (l_recordCounter <> 0) then
390: -- Now dynamically construct the procedure name and invoke it
391:
392: -- The procedure string

Line 397: iby_debug_pub.add('Invoking update_status Procedure for the application:' ||

393: v_procString := 'BEGIN '|| l_ecapp_rec.app_short_name || '_ecapp_pkg.update_status( :1, :2, :3, :4, :5, :6, :7, :8, :9, :10); END; ';
394:
395: -- dbms_output.put_line('Proc call: ' || v_procString);
396: if(l_ecapp_rec.app_short_name = 'AR') then
397: iby_debug_pub.add('Invoking update_status Procedure for the application:' ||
398: l_ecapp_rec.app_short_name,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
399: end if;
400: iby_debug_pub.add('record counter:' || l_recordCounter,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
401:

Line 398: l_ecapp_rec.app_short_name,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);

394:
395: -- dbms_output.put_line('Proc call: ' || v_procString);
396: if(l_ecapp_rec.app_short_name = 'AR') then
397: iby_debug_pub.add('Invoking update_status Procedure for the application:' ||
398: l_ecapp_rec.app_short_name,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
399: end if;
400: iby_debug_pub.add('record counter:' || l_recordCounter,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
401:
402: BEGIN

Line 400: iby_debug_pub.add('record counter:' || l_recordCounter,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);

396: if(l_ecapp_rec.app_short_name = 'AR') then
397: iby_debug_pub.add('Invoking update_status Procedure for the application:' ||
398: l_ecapp_rec.app_short_name,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
399: end if;
400: iby_debug_pub.add('record counter:' || l_recordCounter,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
401:
402: BEGIN
403: l_updapp_success := FALSE;
404: EXECUTE IMMEDIATE v_procString USING IN l_recordCounter,

Line 423: --iby_debug_pub.add('Exception Occurred: Either the ecapp name does not exist ||

419: * exist in iby_ecapp_v, or that the procedure ecapp_pkg.update_status
420: * does not exist. Both these are ok. Swallow the exception and
421: * all procedure to exit gracefully. Fix for bug 3883880.
422: */
423: --iby_debug_pub.add('Exception Occurred: Either the ecapp name does not exist ||
424: --|| in iby_ecapp_v, or that the procedure ecapp_pkg.update_status does not exist'|| sqlerrm ,
425: --iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
426: iby_debug_pub.add('Crash in inner exception block=' || sqlerrm,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
427: l_updapp_success := FALSE;

Line 425: --iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);

421: * all procedure to exit gracefully. Fix for bug 3883880.
422: */
423: --iby_debug_pub.add('Exception Occurred: Either the ecapp name does not exist ||
424: --|| in iby_ecapp_v, or that the procedure ecapp_pkg.update_status does not exist'|| sqlerrm ,
425: --iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
426: iby_debug_pub.add('Crash in inner exception block=' || sqlerrm,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
427: l_updapp_success := FALSE;
428: END;
429:

Line 426: iby_debug_pub.add('Crash in inner exception block=' || sqlerrm,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);

422: */
423: --iby_debug_pub.add('Exception Occurred: Either the ecapp name does not exist ||
424: --|| in iby_ecapp_v, or that the procedure ecapp_pkg.update_status does not exist'|| sqlerrm ,
425: --iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
426: iby_debug_pub.add('Crash in inner exception block=' || sqlerrm,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
427: l_updapp_success := FALSE;
428: END;
429:
430: iby_debug_pub.add('update_status has been executed for :'||

Line 430: iby_debug_pub.add('update_status has been executed for :'||

426: iby_debug_pub.add('Crash in inner exception block=' || sqlerrm,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
427: l_updapp_success := FALSE;
428: END;
429:
430: iby_debug_pub.add('update_status has been executed for :'||
431: l_ecapp_rec.app_short_name ,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
432:
433: -- Doing the bulk update instead of Row-by-Row
434: IF l_updapp_success THEN

Line 431: l_ecapp_rec.app_short_name ,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);

427: l_updapp_success := FALSE;
428: END;
429:
430: iby_debug_pub.add('update_status has been executed for :'||
431: l_ecapp_rec.app_short_name ,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
432:
433: -- Doing the bulk update instead of Row-by-Row
434: IF l_updapp_success THEN
435: FORALL j IN 1..l_recordCounter

Line 439: iby_debug_pub.add('Updation of iby_trxn_summaries_all successful' ,

435: FORALL j IN 1..l_recordCounter
436: UPDATE iby_trxn_summaries_all
437: SET NeedsUpdt = DECODE(upper(o_statusindiv_Tab(j)), 'TRUE', 'N', 'F')
438: WHERE trxnmid = txn_mid_Tab(j);
439: iby_debug_pub.add('Updation of iby_trxn_summaries_all successful' ,
440: iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
441: END IF;
442: END IF;
443: END LOOP;

Line 440: iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);

436: UPDATE iby_trxn_summaries_all
437: SET NeedsUpdt = DECODE(upper(o_statusindiv_Tab(j)), 'TRUE', 'N', 'F')
438: WHERE trxnmid = txn_mid_Tab(j);
439: iby_debug_pub.add('Updation of iby_trxn_summaries_all successful' ,
440: iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
441: END IF;
442: END IF;
443: END LOOP;
444: END IF;

Line 572: --iby_debug_pub.add('Total Rows:' || totalRows,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);

568:
569: --IF( totalRows < 1 ) THEN
570: --RETURN;
571: --else
572: --iby_debug_pub.add('Total Rows:' || totalRows,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
573: --iby_debug_pub.add('ecappid:' || in_ecappid,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
574: --END IF;
575:
576: --allocation number of elements based on count

Line 573: --iby_debug_pub.add('ecappid:' || in_ecappid,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);

569: --IF( totalRows < 1 ) THEN
570: --RETURN;
571: --else
572: --iby_debug_pub.add('Total Rows:' || totalRows,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
573: --iby_debug_pub.add('ecappid:' || in_ecappid,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
574: --END IF;
575:
576: --allocation number of elements based on count
577: --dbms_output.put_line('Total Rows: ' || totalRows);

Line 662: iby_debug_pub.add('Enter update_ecapp:',iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);

658: */
659: BEGIN
660:
661: -- Now getting the application short name
662: iby_debug_pub.add('Enter update_ecapp:',iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
663: -- The view iby_ecapp_v has two records for each of the ecappid's. To avoid
664: -- the possible exception, using distinct function
665: SELECT distinct(application_short_name)
666: INTO ecapp_name

Line 669: iby_debug_pub.add('application_short_name:' || ecapp_name,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);

665: SELECT distinct(application_short_name)
666: INTO ecapp_name
667: FROM iby_ecapp_v
668: WHERE ecappid = in_ecappid;
669: iby_debug_pub.add('application_short_name:' || ecapp_name,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
670: -- dbms_output.put_line('Total count for inner loop : ' || i);
671: --dbms_output.put_line('Sending in : ' || txn_id_Tab(1) ||'** ' ||Status_Tab(1) ||'** '|| updatedt_Tab(1) || '** '|| refcode_Tab(1) ||'** '|| txn_mid_Tab(1));
672: --iby_debug_pub.add('I value:' || i,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
673: IF (i <> 0) then

Line 672: --iby_debug_pub.add('I value:' || i,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);

668: WHERE ecappid = in_ecappid;
669: iby_debug_pub.add('application_short_name:' || ecapp_name,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
670: -- dbms_output.put_line('Total count for inner loop : ' || i);
671: --dbms_output.put_line('Sending in : ' || txn_id_Tab(1) ||'** ' ||Status_Tab(1) ||'** '|| updatedt_Tab(1) || '** '|| refcode_Tab(1) ||'** '|| txn_mid_Tab(1));
672: --iby_debug_pub.add('I value:' || i,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
673: IF (i <> 0) then
674:
675: -- Now dynamically construct the procedure name and invoke it
676:

Line 682: iby_debug_pub.add('Invoking update_status Procedure for the application:' ||

678: v_procString := 'BEGIN '|| ecapp_name || '_ecapp_pkg.update_status( :1, :2, :3, :4, :5, :6, :7, :8, :9, :10); END; ';
679:
680: -- dbms_output.put_line('Proc call: ' || v_procString);
681: if(ecapp_name = 'AR') then
682: iby_debug_pub.add('Invoking update_status Procedure for the application:' ||
683: ecapp_name,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
684: end if;
685: EXECUTE IMMEDIATE v_procString USING IN i,
686: IN txn_id_Tab,

Line 683: ecapp_name,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);

679:
680: -- dbms_output.put_line('Proc call: ' || v_procString);
681: if(ecapp_name = 'AR') then
682: iby_debug_pub.add('Invoking update_status Procedure for the application:' ||
683: ecapp_name,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
684: end if;
685: EXECUTE IMMEDIATE v_procString USING IN i,
686: IN txn_id_Tab,
687: IN reqtype_Tab,

Line 695: iby_debug_pub.add('update_status has been executed for :'||

691: OUT o_status,
692: OUT o_errcode,
693: OUT o_errmsg,
694: IN OUT o_statusindiv_Tab;
695: iby_debug_pub.add('update_status has been executed for :'||
696: ecapp_name ,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
697:
698: -- Doing the bulk update instead of Row-by-Row
699: FORALL j IN 1..i

Line 696: ecapp_name ,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);

692: OUT o_errcode,
693: OUT o_errmsg,
694: IN OUT o_statusindiv_Tab;
695: iby_debug_pub.add('update_status has been executed for :'||
696: ecapp_name ,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
697:
698: -- Doing the bulk update instead of Row-by-Row
699: FORALL j IN 1..i
700: --if (o_statusindiv_Tab(j) = 'TRUE') then

Line 710: iby_debug_pub.add('Updation of iby_trxn_summaries_all successful' ,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);

706: -- SET NeedsUpdt = 'F'
707: -- WHERE trxnmid = txn_mid_Tab(j);
708: --end if;
709: --END LOOP;
710: iby_debug_pub.add('Updation of iby_trxn_summaries_all successful' ,iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
711:
712: END IF;
713:
714: EXCEPTION

Line 723: --iby_debug_pub.add('Exception Occurred: Either the ecapp name does not exist ||

719: * exist in iby_ecapp_v, or that the procedure ecapp_pkg.update_status
720: * does not exist. Both these are ok. Swallow the exception and
721: * all procedure to exit gracefully. Fix for bug 3883880.
722: */
723: --iby_debug_pub.add('Exception Occurred: Either the ecapp name does not exist ||
724: --|| in iby_ecapp_v, or that the procedure ecapp_pkg.update_status does not exist'|| sqlerrm ,
725: --iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
726: NULL;
727:

Line 725: --iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);

721: * all procedure to exit gracefully. Fix for bug 3883880.
722: */
723: --iby_debug_pub.add('Exception Occurred: Either the ecapp name does not exist ||
724: --|| in iby_ecapp_v, or that the procedure ecapp_pkg.update_status does not exist'|| sqlerrm ,
725: --iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
726: NULL;
727:
728: END;
729: