235:
236: -- Location within the program before the error was encountered.
237: l_loc VARCHAR2(200) ;
238:
239: rec_l_tactk_by_org_csr oki_utl_pvt.g_tactk_by_org_csr_row ;
240: rec_l_rnwl_oppty_by_org_csr oki_utl_pvt.g_rnwl_oppty_by_org_csr_row ;
241: rec_l_k_exp_in_qtr_by_org_csr oki_utl_pvt.g_k_exp_in_qtr_by_org_csr_row ;
242: rec_l_bin_disp_lkup_csr oki_utl_pvt.g_bin_disp_lkup_csr_row ;
243:
236: -- Location within the program before the error was encountered.
237: l_loc VARCHAR2(200) ;
238:
239: rec_l_tactk_by_org_csr oki_utl_pvt.g_tactk_by_org_csr_row ;
240: rec_l_rnwl_oppty_by_org_csr oki_utl_pvt.g_rnwl_oppty_by_org_csr_row ;
241: rec_l_k_exp_in_qtr_by_org_csr oki_utl_pvt.g_k_exp_in_qtr_by_org_csr_row ;
242: rec_l_bin_disp_lkup_csr oki_utl_pvt.g_bin_disp_lkup_csr_row ;
243:
244: -- Current and previous total active contract amount
237: l_loc VARCHAR2(200) ;
238:
239: rec_l_tactk_by_org_csr oki_utl_pvt.g_tactk_by_org_csr_row ;
240: rec_l_rnwl_oppty_by_org_csr oki_utl_pvt.g_rnwl_oppty_by_org_csr_row ;
241: rec_l_k_exp_in_qtr_by_org_csr oki_utl_pvt.g_k_exp_in_qtr_by_org_csr_row ;
242: rec_l_bin_disp_lkup_csr oki_utl_pvt.g_bin_disp_lkup_csr_row ;
243:
244: -- Current and previous total active contract amount
245: l_curr_tactk_value NUMBER := 0 ;
238:
239: rec_l_tactk_by_org_csr oki_utl_pvt.g_tactk_by_org_csr_row ;
240: rec_l_rnwl_oppty_by_org_csr oki_utl_pvt.g_rnwl_oppty_by_org_csr_row ;
241: rec_l_k_exp_in_qtr_by_org_csr oki_utl_pvt.g_k_exp_in_qtr_by_org_csr_row ;
242: rec_l_bin_disp_lkup_csr oki_utl_pvt.g_bin_disp_lkup_csr_row ;
243:
244: -- Current and previous total active contract amount
245: l_curr_tactk_value NUMBER := 0 ;
246: l_prev_tactk_value NUMBER := 0 ;
374:
375: << g_org_csr_loop >>
376: -- Loop through all the organizations to calculate the
377: -- appropriate amounts
378: FOR rec_g_org_csr IN oki_utl_pvt.g_org_csr LOOP
379:
380: --
381: -- Process Total Active Contracts record
382: --
390:
391: -- Get the bin display lookup values
392: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
393: l_measure_type || '.' ;
394: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
395: , oki_load_etr_pvt.g_tactk_code ) ;
396: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
397: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
398: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
392: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
393: l_measure_type || '.' ;
394: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
395: , oki_load_etr_pvt.g_tactk_code ) ;
396: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
397: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
398: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
399: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
400: ELSE
393: l_measure_type || '.' ;
394: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
395: , oki_load_etr_pvt.g_tactk_code ) ;
396: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
397: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
398: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
399: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
400: ELSE
401: RAISE NO_DATA_FOUND ;
399: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
400: ELSE
401: RAISE NO_DATA_FOUND ;
402: END IF ;
403: CLOSE oki_utl_pvt.g_bin_disp_lkup_csr ;
404:
405: -- Get the current value
406: l_loc := 'Opening cursor to determine current ' ||
407: l_measure_type || '.' ;
404:
405: -- Get the current value
406: l_loc := 'Opening cursor to determine current ' ||
407: l_measure_type || '.' ;
408: OPEN oki_utl_pvt.g_tactk_by_org_csr (
409: oki_utl_pub.g_summary_build_date
410: , rec_g_org_csr.authoring_org_id ) ;
411: FETCH oki_utl_pvt.g_tactk_by_org_csr INTO rec_l_tactk_by_org_csr ;
412: IF oki_utl_pvt.g_tactk_by_org_csr%FOUND THEN
407: l_measure_type || '.' ;
408: OPEN oki_utl_pvt.g_tactk_by_org_csr (
409: oki_utl_pub.g_summary_build_date
410: , rec_g_org_csr.authoring_org_id ) ;
411: FETCH oki_utl_pvt.g_tactk_by_org_csr INTO rec_l_tactk_by_org_csr ;
412: IF oki_utl_pvt.g_tactk_by_org_csr%FOUND THEN
413: l_curr_tactk_value := rec_l_tactk_by_org_csr.value ;
414: l_curr_value := rec_l_tactk_by_org_csr.value ;
415: END IF ;
408: OPEN oki_utl_pvt.g_tactk_by_org_csr (
409: oki_utl_pub.g_summary_build_date
410: , rec_g_org_csr.authoring_org_id ) ;
411: FETCH oki_utl_pvt.g_tactk_by_org_csr INTO rec_l_tactk_by_org_csr ;
412: IF oki_utl_pvt.g_tactk_by_org_csr%FOUND THEN
413: l_curr_tactk_value := rec_l_tactk_by_org_csr.value ;
414: l_curr_value := rec_l_tactk_by_org_csr.value ;
415: END IF ;
416: CLOSE oki_utl_pvt.g_tactk_by_org_csr ;
412: IF oki_utl_pvt.g_tactk_by_org_csr%FOUND THEN
413: l_curr_tactk_value := rec_l_tactk_by_org_csr.value ;
414: l_curr_value := rec_l_tactk_by_org_csr.value ;
415: END IF ;
416: CLOSE oki_utl_pvt.g_tactk_by_org_csr ;
417:
418: -- Get the previous value
419: l_loc := 'Opening Cursor to determine previous ' ||
420: l_measure_type || '.' ;
417:
418: -- Get the previous value
419: l_loc := 'Opening Cursor to determine previous ' ||
420: l_measure_type || '.' ;
421: OPEN oki_utl_pvt.g_tactk_by_org_csr (
422: oki_utl_pub.g_py_summary_build_date
423: , rec_g_org_csr.authoring_org_id ) ;
424: FETCH oki_utl_pvt.g_tactk_by_org_csr INTO rec_l_tactk_by_org_csr ;
425: IF oki_utl_pvt.g_tactk_by_org_csr%FOUND THEN
420: l_measure_type || '.' ;
421: OPEN oki_utl_pvt.g_tactk_by_org_csr (
422: oki_utl_pub.g_py_summary_build_date
423: , rec_g_org_csr.authoring_org_id ) ;
424: FETCH oki_utl_pvt.g_tactk_by_org_csr INTO rec_l_tactk_by_org_csr ;
425: IF oki_utl_pvt.g_tactk_by_org_csr%FOUND THEN
426: l_prev_tactk_value := rec_l_tactk_by_org_csr.value ;
427: l_prev_value := rec_l_tactk_by_org_csr.value ;
428: END IF ;
421: OPEN oki_utl_pvt.g_tactk_by_org_csr (
422: oki_utl_pub.g_py_summary_build_date
423: , rec_g_org_csr.authoring_org_id ) ;
424: FETCH oki_utl_pvt.g_tactk_by_org_csr INTO rec_l_tactk_by_org_csr ;
425: IF oki_utl_pvt.g_tactk_by_org_csr%FOUND THEN
426: l_prev_tactk_value := rec_l_tactk_by_org_csr.value ;
427: l_prev_value := rec_l_tactk_by_org_csr.value ;
428: END IF ;
429: CLOSE oki_utl_pvt.g_tactk_by_org_csr ;
425: IF oki_utl_pvt.g_tactk_by_org_csr%FOUND THEN
426: l_prev_tactk_value := rec_l_tactk_by_org_csr.value ;
427: l_prev_value := rec_l_tactk_by_org_csr.value ;
428: END IF ;
429: CLOSE oki_utl_pvt.g_tactk_by_org_csr ;
430:
431: l_loc := 'Setting the percent change ' || l_measure_type || '.' ;
432: IF l_prev_value = 0 THEN
433: l_pct_change := 100 ;
507:
508: -- Get the bin display lookup values
509: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
510: l_measure_type || '.' ;
511: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
512: , oki_load_etr_pvt.g_rnwl_rate_code ) ;
513: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
514: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
515: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
509: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
510: l_measure_type || '.' ;
511: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
512: , oki_load_etr_pvt.g_rnwl_rate_code ) ;
513: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
514: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
515: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
516: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
517: ELSE
510: l_measure_type || '.' ;
511: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
512: , oki_load_etr_pvt.g_rnwl_rate_code ) ;
513: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
514: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
515: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
516: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
517: ELSE
518: RAISE NO_DATA_FOUND ;
516: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
517: ELSE
518: RAISE NO_DATA_FOUND ;
519: END IF ;
520: CLOSE oki_utl_pvt.g_bin_disp_lkup_csr ;
521:
522: -- Get the current value
523: l_loc := 'Opening cursor to determine current ' ||
524: l_measure_type || '.' ;
622:
623: -- Get the bin display lookup values
624: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
625: l_measure_type || '.' ;
626: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
627: , oki_load_etr_pvt.g_seq_grw_rate_code ) ;
628: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
629: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
630: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
624: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
625: l_measure_type || '.' ;
626: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
627: , oki_load_etr_pvt.g_seq_grw_rate_code ) ;
628: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
629: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
630: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
631: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
632: ELSE
625: l_measure_type || '.' ;
626: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
627: , oki_load_etr_pvt.g_seq_grw_rate_code ) ;
628: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
629: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
630: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
631: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
632: ELSE
633: RAISE NO_DATA_FOUND ;
631: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
632: ELSE
633: RAISE NO_DATA_FOUND ;
634: END IF ;
635: CLOSE oki_utl_pvt.g_bin_disp_lkup_csr ;
636:
637: -- Get the current value
638: l_loc := 'Opening cursor to determine current' ||
639: l_measure_type || '.' ;
637: -- Get the current value
638: l_loc := 'Opening cursor to determine current' ||
639: l_measure_type || '.' ;
640: -- Get the active contracts as of the start of the quarter
641: OPEN oki_utl_pvt.g_tactk_by_org_csr (
642: oki_utl_pub.g_glpr_qtr_start_date
643: , rec_g_org_csr.authoring_org_id ) ;
644: FETCH oki_utl_pvt.g_tactk_by_org_csr INTO rec_l_tactk_by_org_csr ;
645: IF oki_utl_pvt.g_tactk_by_org_csr%FOUND THEN
640: -- Get the active contracts as of the start of the quarter
641: OPEN oki_utl_pvt.g_tactk_by_org_csr (
642: oki_utl_pub.g_glpr_qtr_start_date
643: , rec_g_org_csr.authoring_org_id ) ;
644: FETCH oki_utl_pvt.g_tactk_by_org_csr INTO rec_l_tactk_by_org_csr ;
645: IF oki_utl_pvt.g_tactk_by_org_csr%FOUND THEN
646: l_qsd_tactk_value := rec_l_tactk_by_org_csr.value ;
647: END IF ;
648: CLOSE oki_utl_pvt.g_tactk_by_org_csr ;
641: OPEN oki_utl_pvt.g_tactk_by_org_csr (
642: oki_utl_pub.g_glpr_qtr_start_date
643: , rec_g_org_csr.authoring_org_id ) ;
644: FETCH oki_utl_pvt.g_tactk_by_org_csr INTO rec_l_tactk_by_org_csr ;
645: IF oki_utl_pvt.g_tactk_by_org_csr%FOUND THEN
646: l_qsd_tactk_value := rec_l_tactk_by_org_csr.value ;
647: END IF ;
648: CLOSE oki_utl_pvt.g_tactk_by_org_csr ;
649:
644: FETCH oki_utl_pvt.g_tactk_by_org_csr INTO rec_l_tactk_by_org_csr ;
645: IF oki_utl_pvt.g_tactk_by_org_csr%FOUND THEN
646: l_qsd_tactk_value := rec_l_tactk_by_org_csr.value ;
647: END IF ;
648: CLOSE oki_utl_pvt.g_tactk_by_org_csr ;
649:
650: l_loc := 'Setting the current percent value ' ||
651: l_measure_type || '.' ;
652: -- NOTE: l_qsd_tactk_value is the value as of the start of the quarter
661: -- Get the previous value
662: l_loc := 'Opening cursor to determine previous ' ||
663: l_measure_type || '.' ;
664: -- Get the active contracts as of the start of the quarter
665: OPEN oki_utl_pvt.g_tactk_by_org_csr (
666: oki_utl_pub.g_py_glpr_qtr_start_date
667: , rec_g_org_csr.authoring_org_id ) ;
668: FETCH oki_utl_pvt.g_tactk_by_org_csr INTO rec_l_tactk_by_org_csr ;
669: IF oki_utl_pvt.g_tactk_by_org_csr%FOUND THEN
664: -- Get the active contracts as of the start of the quarter
665: OPEN oki_utl_pvt.g_tactk_by_org_csr (
666: oki_utl_pub.g_py_glpr_qtr_start_date
667: , rec_g_org_csr.authoring_org_id ) ;
668: FETCH oki_utl_pvt.g_tactk_by_org_csr INTO rec_l_tactk_by_org_csr ;
669: IF oki_utl_pvt.g_tactk_by_org_csr%FOUND THEN
670: l_py_qsd_tactk_value := rec_l_tactk_by_org_csr.value ;
671: END IF ;
672: CLOSE oki_utl_pvt.g_tactk_by_org_csr ;
665: OPEN oki_utl_pvt.g_tactk_by_org_csr (
666: oki_utl_pub.g_py_glpr_qtr_start_date
667: , rec_g_org_csr.authoring_org_id ) ;
668: FETCH oki_utl_pvt.g_tactk_by_org_csr INTO rec_l_tactk_by_org_csr ;
669: IF oki_utl_pvt.g_tactk_by_org_csr%FOUND THEN
670: l_py_qsd_tactk_value := rec_l_tactk_by_org_csr.value ;
671: END IF ;
672: CLOSE oki_utl_pvt.g_tactk_by_org_csr ;
673:
668: FETCH oki_utl_pvt.g_tactk_by_org_csr INTO rec_l_tactk_by_org_csr ;
669: IF oki_utl_pvt.g_tactk_by_org_csr%FOUND THEN
670: l_py_qsd_tactk_value := rec_l_tactk_by_org_csr.value ;
671: END IF ;
672: CLOSE oki_utl_pvt.g_tactk_by_org_csr ;
673:
674: l_loc := 'Setting the previous percent value ' ||
675: l_measure_type || '.' ;
676: -- NOTE: l_py_qsd_tactk_value is the value as of the prevoius year
761:
762: -- Get the bin display lookup values
763: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
764: l_measure_type || '.' ;
765: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
766: , oki_load_etr_pvt.g_rnwl_oppty_code ) ;
767: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
768: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
769: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
763: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
764: l_measure_type || '.' ;
765: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
766: , oki_load_etr_pvt.g_rnwl_oppty_code ) ;
767: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
768: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
769: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
770: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
771: ELSE
764: l_measure_type || '.' ;
765: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
766: , oki_load_etr_pvt.g_rnwl_oppty_code ) ;
767: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
768: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
769: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
770: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
771: ELSE
772: RAISE NO_DATA_FOUND ;
770: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
771: ELSE
772: RAISE NO_DATA_FOUND ;
773: END IF ;
774: CLOSE oki_utl_pvt.g_bin_disp_lkup_csr ;
775:
776: -- Get the current value
777: l_loc := 'Opening cursor to determine current ' ||
778: l_measure_type || '.' ;
775:
776: -- Get the current value
777: l_loc := 'Opening cursor to determine current ' ||
778: l_measure_type || '.' ;
779: OPEN oki_utl_pvt.g_rnwl_oppty_by_org_csr (
780: oki_utl_pub.g_glpr_qtr_end_date
781: , rec_g_org_csr.authoring_org_id ) ;
782: FETCH oki_utl_pvt.g_rnwl_oppty_by_org_csr INTO
783: rec_l_rnwl_oppty_by_org_csr ;
778: l_measure_type || '.' ;
779: OPEN oki_utl_pvt.g_rnwl_oppty_by_org_csr (
780: oki_utl_pub.g_glpr_qtr_end_date
781: , rec_g_org_csr.authoring_org_id ) ;
782: FETCH oki_utl_pvt.g_rnwl_oppty_by_org_csr INTO
783: rec_l_rnwl_oppty_by_org_csr ;
784: IF oki_utl_pvt.g_rnwl_oppty_by_org_csr%FOUND THEN
785: l_curr_value := rec_l_rnwl_oppty_by_org_csr.value ;
786: END IF ;
780: oki_utl_pub.g_glpr_qtr_end_date
781: , rec_g_org_csr.authoring_org_id ) ;
782: FETCH oki_utl_pvt.g_rnwl_oppty_by_org_csr INTO
783: rec_l_rnwl_oppty_by_org_csr ;
784: IF oki_utl_pvt.g_rnwl_oppty_by_org_csr%FOUND THEN
785: l_curr_value := rec_l_rnwl_oppty_by_org_csr.value ;
786: END IF ;
787: CLOSE oki_utl_pvt.g_rnwl_oppty_by_org_csr ;
788:
783: rec_l_rnwl_oppty_by_org_csr ;
784: IF oki_utl_pvt.g_rnwl_oppty_by_org_csr%FOUND THEN
785: l_curr_value := rec_l_rnwl_oppty_by_org_csr.value ;
786: END IF ;
787: CLOSE oki_utl_pvt.g_rnwl_oppty_by_org_csr ;
788:
789: -- Get the previous value
790: l_loc := 'Opening cursor to determine previous ' ||
791: l_measure_type || '.' ;
788:
789: -- Get the previous value
790: l_loc := 'Opening cursor to determine previous ' ||
791: l_measure_type || '.' ;
792: OPEN oki_utl_pvt.g_rnwl_oppty_by_org_csr (
793: oki_utl_pub.g_py_glpr_qtr_end_date
794: , rec_g_org_csr.authoring_org_id ) ;
795: FETCH oki_utl_pvt.g_rnwl_oppty_by_org_csr INTO
796: rec_l_rnwl_oppty_by_org_csr ;
791: l_measure_type || '.' ;
792: OPEN oki_utl_pvt.g_rnwl_oppty_by_org_csr (
793: oki_utl_pub.g_py_glpr_qtr_end_date
794: , rec_g_org_csr.authoring_org_id ) ;
795: FETCH oki_utl_pvt.g_rnwl_oppty_by_org_csr INTO
796: rec_l_rnwl_oppty_by_org_csr ;
797: IF oki_utl_pvt.g_rnwl_oppty_by_org_csr%FOUND THEN
798: l_prev_value := rec_l_rnwl_oppty_by_org_csr.value ;
799: END IF ;
793: oki_utl_pub.g_py_glpr_qtr_end_date
794: , rec_g_org_csr.authoring_org_id ) ;
795: FETCH oki_utl_pvt.g_rnwl_oppty_by_org_csr INTO
796: rec_l_rnwl_oppty_by_org_csr ;
797: IF oki_utl_pvt.g_rnwl_oppty_by_org_csr%FOUND THEN
798: l_prev_value := rec_l_rnwl_oppty_by_org_csr.value ;
799: END IF ;
800: CLOSE oki_utl_pvt.g_rnwl_oppty_by_org_csr ;
801:
796: rec_l_rnwl_oppty_by_org_csr ;
797: IF oki_utl_pvt.g_rnwl_oppty_by_org_csr%FOUND THEN
798: l_prev_value := rec_l_rnwl_oppty_by_org_csr.value ;
799: END IF ;
800: CLOSE oki_utl_pvt.g_rnwl_oppty_by_org_csr ;
801:
802: l_loc := 'Setting the percent change ' || l_measure_type || '.' ;
803: IF l_prev_value = 0 THEN
804: l_pct_change := 100 ;
878:
879: -- Get the bin display lookup values
880: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
881: l_measure_type || '.' ;
882: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
883: , oki_load_etr_pvt.g_auto_rnwl_vol_code ) ;
884: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
885: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
886: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
880: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
881: l_measure_type || '.' ;
882: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
883: , oki_load_etr_pvt.g_auto_rnwl_vol_code ) ;
884: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
885: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
886: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
887: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
888: ELSE
881: l_measure_type || '.' ;
882: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
883: , oki_load_etr_pvt.g_auto_rnwl_vol_code ) ;
884: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
885: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
886: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
887: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
888: ELSE
889: RAISE NO_DATA_FOUND ;
887: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
888: ELSE
889: RAISE NO_DATA_FOUND ;
890: END IF ;
891: CLOSE oki_utl_pvt.g_bin_disp_lkup_csr ;
892:
893:
894: l_curr_value := NULL ;
895:
957:
958: -- Get the bin display lookup values
959: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
960: l_measure_type || '.' ;
961: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
962: , oki_load_etr_pvt.g_auto_rnwl_rate_code ) ;
963: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
964: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
965: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
959: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
960: l_measure_type || '.' ;
961: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
962: , oki_load_etr_pvt.g_auto_rnwl_rate_code ) ;
963: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
964: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
965: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
966: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
967: ELSE
960: l_measure_type || '.' ;
961: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
962: , oki_load_etr_pvt.g_auto_rnwl_rate_code ) ;
963: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
964: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
965: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
966: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
967: ELSE
968: RAISE NO_DATA_FOUND ;
966: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
967: ELSE
968: RAISE NO_DATA_FOUND ;
969: END IF ;
970: CLOSE oki_utl_pvt.g_bin_disp_lkup_csr ;
971:
972:
973: l_curr_value := NULL ;
974:
1036:
1037: -- Get the bin display lookup values
1038: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
1039: l_measure_type || '.' ;
1040: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1041: , oki_load_etr_pvt.g_rnwl_prc_uplft_code ) ;
1042: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1043: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1044: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1038: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
1039: l_measure_type || '.' ;
1040: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1041: , oki_load_etr_pvt.g_rnwl_prc_uplft_code ) ;
1042: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1043: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1044: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1045: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1046: ELSE
1039: l_measure_type || '.' ;
1040: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1041: , oki_load_etr_pvt.g_rnwl_prc_uplft_code ) ;
1042: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1043: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1044: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1045: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1046: ELSE
1047: RAISE NO_DATA_FOUND ;
1045: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1046: ELSE
1047: RAISE NO_DATA_FOUND ;
1048: END IF ;
1049: CLOSE oki_utl_pvt.g_bin_disp_lkup_csr ;
1050:
1051:
1052: l_curr_value := NULL ;
1053:
1182:
1183: -- Location within the program before the error was encountered.
1184: l_loc VARCHAR2(200) ;
1185:
1186: rec_l_tactk_all_csr oki_utl_pvt.g_tactk_all_csr_row ;
1187: rec_l_rnwl_oppty_all_csr oki_utl_pvt.g_rnwl_oppty_all_csr_row ;
1188: rec_l_k_exp_in_qtr_all_csr oki_utl_pvt.g_k_exp_in_qtr_all_csr_row ;
1189: rec_l_bin_disp_lkup_csr oki_utl_pvt.g_bin_disp_lkup_csr_row ;
1190:
1183: -- Location within the program before the error was encountered.
1184: l_loc VARCHAR2(200) ;
1185:
1186: rec_l_tactk_all_csr oki_utl_pvt.g_tactk_all_csr_row ;
1187: rec_l_rnwl_oppty_all_csr oki_utl_pvt.g_rnwl_oppty_all_csr_row ;
1188: rec_l_k_exp_in_qtr_all_csr oki_utl_pvt.g_k_exp_in_qtr_all_csr_row ;
1189: rec_l_bin_disp_lkup_csr oki_utl_pvt.g_bin_disp_lkup_csr_row ;
1190:
1191: -- Current and previous total active contract amount
1184: l_loc VARCHAR2(200) ;
1185:
1186: rec_l_tactk_all_csr oki_utl_pvt.g_tactk_all_csr_row ;
1187: rec_l_rnwl_oppty_all_csr oki_utl_pvt.g_rnwl_oppty_all_csr_row ;
1188: rec_l_k_exp_in_qtr_all_csr oki_utl_pvt.g_k_exp_in_qtr_all_csr_row ;
1189: rec_l_bin_disp_lkup_csr oki_utl_pvt.g_bin_disp_lkup_csr_row ;
1190:
1191: -- Current and previous total active contract amount
1192: l_curr_tactk_value NUMBER := 0 ;
1185:
1186: rec_l_tactk_all_csr oki_utl_pvt.g_tactk_all_csr_row ;
1187: rec_l_rnwl_oppty_all_csr oki_utl_pvt.g_rnwl_oppty_all_csr_row ;
1188: rec_l_k_exp_in_qtr_all_csr oki_utl_pvt.g_k_exp_in_qtr_all_csr_row ;
1189: rec_l_bin_disp_lkup_csr oki_utl_pvt.g_bin_disp_lkup_csr_row ;
1190:
1191: -- Current and previous total active contract amount
1192: l_curr_tactk_value NUMBER := 0 ;
1193: l_prev_tactk_value NUMBER := 0 ;
1327:
1328: -- Get the bin display lookup values
1329: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
1330: l_measure_type || '.' ;
1331: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1332: , oki_load_etr_pvt.g_tactk_code ) ;
1333: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1334: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1335: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1329: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
1330: l_measure_type || '.' ;
1331: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1332: , oki_load_etr_pvt.g_tactk_code ) ;
1333: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1334: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1335: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1336: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1337: ELSE
1330: l_measure_type || '.' ;
1331: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1332: , oki_load_etr_pvt.g_tactk_code ) ;
1333: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1334: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1335: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1336: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1337: ELSE
1338: RAISE NO_DATA_FOUND ;
1336: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1337: ELSE
1338: RAISE NO_DATA_FOUND ;
1339: END IF ;
1340: CLOSE oki_utl_pvt.g_bin_disp_lkup_csr ;
1341:
1342: -- Get the current value
1343: l_loc := 'Opening cursor to determine current ' ||
1344: l_measure_type || '.' ;
1341:
1342: -- Get the current value
1343: l_loc := 'Opening cursor to determine current ' ||
1344: l_measure_type || '.' ;
1345: OPEN oki_utl_pvt.g_tactk_all_csr ( oki_utl_pub.g_summary_build_date ) ;
1346: FETCH oki_utl_pvt.g_tactk_all_csr INTO rec_l_tactk_all_csr ;
1347: IF oki_utl_pvt.g_tactk_all_csr%FOUND THEN
1348: l_curr_tactk_value := rec_l_tactk_all_csr.value ;
1349: l_curr_value := rec_l_tactk_all_csr.value ;
1342: -- Get the current value
1343: l_loc := 'Opening cursor to determine current ' ||
1344: l_measure_type || '.' ;
1345: OPEN oki_utl_pvt.g_tactk_all_csr ( oki_utl_pub.g_summary_build_date ) ;
1346: FETCH oki_utl_pvt.g_tactk_all_csr INTO rec_l_tactk_all_csr ;
1347: IF oki_utl_pvt.g_tactk_all_csr%FOUND THEN
1348: l_curr_tactk_value := rec_l_tactk_all_csr.value ;
1349: l_curr_value := rec_l_tactk_all_csr.value ;
1350: END IF ;
1343: l_loc := 'Opening cursor to determine current ' ||
1344: l_measure_type || '.' ;
1345: OPEN oki_utl_pvt.g_tactk_all_csr ( oki_utl_pub.g_summary_build_date ) ;
1346: FETCH oki_utl_pvt.g_tactk_all_csr INTO rec_l_tactk_all_csr ;
1347: IF oki_utl_pvt.g_tactk_all_csr%FOUND THEN
1348: l_curr_tactk_value := rec_l_tactk_all_csr.value ;
1349: l_curr_value := rec_l_tactk_all_csr.value ;
1350: END IF ;
1351: CLOSE oki_utl_pvt.g_tactk_all_csr ;
1347: IF oki_utl_pvt.g_tactk_all_csr%FOUND THEN
1348: l_curr_tactk_value := rec_l_tactk_all_csr.value ;
1349: l_curr_value := rec_l_tactk_all_csr.value ;
1350: END IF ;
1351: CLOSE oki_utl_pvt.g_tactk_all_csr ;
1352:
1353: -- Get the previous value
1354: l_loc := 'Opening Cursor to determine previous ' ||
1355: l_measure_type || '.' ;
1352:
1353: -- Get the previous value
1354: l_loc := 'Opening Cursor to determine previous ' ||
1355: l_measure_type || '.' ;
1356: OPEN oki_utl_pvt.g_tactk_all_csr ( oki_utl_pub.g_py_summary_build_date ) ;
1357: FETCH oki_utl_pvt.g_tactk_all_csr INTO rec_l_tactk_all_csr ;
1358: IF oki_utl_pvt.g_tactk_all_csr%FOUND THEN
1359: l_prev_tactk_value := rec_l_tactk_all_csr.value ;
1360: l_prev_value := rec_l_tactk_all_csr.value ;
1353: -- Get the previous value
1354: l_loc := 'Opening Cursor to determine previous ' ||
1355: l_measure_type || '.' ;
1356: OPEN oki_utl_pvt.g_tactk_all_csr ( oki_utl_pub.g_py_summary_build_date ) ;
1357: FETCH oki_utl_pvt.g_tactk_all_csr INTO rec_l_tactk_all_csr ;
1358: IF oki_utl_pvt.g_tactk_all_csr%FOUND THEN
1359: l_prev_tactk_value := rec_l_tactk_all_csr.value ;
1360: l_prev_value := rec_l_tactk_all_csr.value ;
1361: END IF ;
1354: l_loc := 'Opening Cursor to determine previous ' ||
1355: l_measure_type || '.' ;
1356: OPEN oki_utl_pvt.g_tactk_all_csr ( oki_utl_pub.g_py_summary_build_date ) ;
1357: FETCH oki_utl_pvt.g_tactk_all_csr INTO rec_l_tactk_all_csr ;
1358: IF oki_utl_pvt.g_tactk_all_csr%FOUND THEN
1359: l_prev_tactk_value := rec_l_tactk_all_csr.value ;
1360: l_prev_value := rec_l_tactk_all_csr.value ;
1361: END IF ;
1362: CLOSE oki_utl_pvt.g_tactk_all_csr ;
1358: IF oki_utl_pvt.g_tactk_all_csr%FOUND THEN
1359: l_prev_tactk_value := rec_l_tactk_all_csr.value ;
1360: l_prev_value := rec_l_tactk_all_csr.value ;
1361: END IF ;
1362: CLOSE oki_utl_pvt.g_tactk_all_csr ;
1363:
1364: l_loc := 'Setting the percent change.' || l_measure_type || '.' ;
1365: IF l_prev_value = 0 THEN
1366: l_pct_change := 100 ;
1438:
1439: -- Get the bin display lookup values
1440: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
1441: l_measure_type || '.' ;
1442: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1443: , oki_load_etr_pvt.g_rnwl_rate_code ) ;
1444: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1445: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1446: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1440: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
1441: l_measure_type || '.' ;
1442: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1443: , oki_load_etr_pvt.g_rnwl_rate_code ) ;
1444: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1445: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1446: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1447: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1448: ELSE
1441: l_measure_type || '.' ;
1442: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1443: , oki_load_etr_pvt.g_rnwl_rate_code ) ;
1444: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1445: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1446: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1447: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1448: ELSE
1449: RAISE NO_DATA_FOUND ;
1447: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1448: ELSE
1449: RAISE NO_DATA_FOUND ;
1450: END IF ;
1451: CLOSE oki_utl_pvt.g_bin_disp_lkup_csr ;
1452:
1453: /*
1454: l_loc := 'Opening cursor to determine current ' || l_measure_type ;
1455: l_loc := l_loc || ' for exp in Qtr.' ;
1452:
1453: /*
1454: l_loc := 'Opening cursor to determine current ' || l_measure_type ;
1455: l_loc := l_loc || ' for exp in Qtr.' ;
1456: OPEN oki_utl_pvt.g_k_exp_in_qtr_all_csr (
1457: oki_utl_pub.g_glpr_qtr_start_date,
1458: oki_utl_pub.g_glpr_qtr_end_date ) ;
1459: FETCH oki_utl_pvt.g_k_exp_in_qtr_all_csr INTO rec_l_k_exp_in_qtr_all_csr ;
1460: IF oki_utl_pvt.g_k_exp_in_qtr_all_csr%FOUND THEN
1455: l_loc := l_loc || ' for exp in Qtr.' ;
1456: OPEN oki_utl_pvt.g_k_exp_in_qtr_all_csr (
1457: oki_utl_pub.g_glpr_qtr_start_date,
1458: oki_utl_pub.g_glpr_qtr_end_date ) ;
1459: FETCH oki_utl_pvt.g_k_exp_in_qtr_all_csr INTO rec_l_k_exp_in_qtr_all_csr ;
1460: IF oki_utl_pvt.g_k_exp_in_qtr_all_csr%FOUND THEN
1461: l_exp_in_qtr_count := rec_l_k_exp_in_qtr_all_csr.contract_count ;
1462: END IF ;
1463: CLOSE oki_utl_pvt.g_k_exp_in_qtr_all_csr ;
1456: OPEN oki_utl_pvt.g_k_exp_in_qtr_all_csr (
1457: oki_utl_pub.g_glpr_qtr_start_date,
1458: oki_utl_pub.g_glpr_qtr_end_date ) ;
1459: FETCH oki_utl_pvt.g_k_exp_in_qtr_all_csr INTO rec_l_k_exp_in_qtr_all_csr ;
1460: IF oki_utl_pvt.g_k_exp_in_qtr_all_csr%FOUND THEN
1461: l_exp_in_qtr_count := rec_l_k_exp_in_qtr_all_csr.contract_count ;
1462: END IF ;
1463: CLOSE oki_utl_pvt.g_k_exp_in_qtr_all_csr ;
1464: */
1459: FETCH oki_utl_pvt.g_k_exp_in_qtr_all_csr INTO rec_l_k_exp_in_qtr_all_csr ;
1460: IF oki_utl_pvt.g_k_exp_in_qtr_all_csr%FOUND THEN
1461: l_exp_in_qtr_count := rec_l_k_exp_in_qtr_all_csr.contract_count ;
1462: END IF ;
1463: CLOSE oki_utl_pvt.g_k_exp_in_qtr_all_csr ;
1464: */
1465:
1466: -- Get the current value
1467: l_loc := 'Opening cursor to determine current ' || l_measure_type || '.' ;
1580:
1581: -- Get the bin display lookup values
1582: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
1583: l_measure_type || '.' ;
1584: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1585: , oki_load_etr_pvt.g_seq_grw_rate_code ) ;
1586: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1587: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1588: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1582: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
1583: l_measure_type || '.' ;
1584: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1585: , oki_load_etr_pvt.g_seq_grw_rate_code ) ;
1586: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1587: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1588: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1589: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1590: ELSE
1583: l_measure_type || '.' ;
1584: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1585: , oki_load_etr_pvt.g_seq_grw_rate_code ) ;
1586: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1587: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1588: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1589: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1590: ELSE
1591: RAISE NO_DATA_FOUND ;
1589: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1590: ELSE
1591: RAISE NO_DATA_FOUND ;
1592: END IF ;
1593: CLOSE oki_utl_pvt.g_bin_disp_lkup_csr ;
1594:
1595: l_loc := 'Opening cursor to determine current' || l_measure_type || '.' ;
1596: -- Get the active contracts as of the start of the quarter
1597: OPEN oki_utl_pvt.g_tactk_all_csr ( oki_utl_pub.g_glpr_qtr_start_date ) ;
1593: CLOSE oki_utl_pvt.g_bin_disp_lkup_csr ;
1594:
1595: l_loc := 'Opening cursor to determine current' || l_measure_type || '.' ;
1596: -- Get the active contracts as of the start of the quarter
1597: OPEN oki_utl_pvt.g_tactk_all_csr ( oki_utl_pub.g_glpr_qtr_start_date ) ;
1598: FETCH oki_utl_pvt.g_tactk_all_csr INTO rec_l_tactk_all_csr ;
1599: IF oki_utl_pvt.g_tactk_all_csr%FOUND THEN
1600: l_qsd_tactk_value := rec_l_tactk_all_csr.value ;
1601: END IF ;
1594:
1595: l_loc := 'Opening cursor to determine current' || l_measure_type || '.' ;
1596: -- Get the active contracts as of the start of the quarter
1597: OPEN oki_utl_pvt.g_tactk_all_csr ( oki_utl_pub.g_glpr_qtr_start_date ) ;
1598: FETCH oki_utl_pvt.g_tactk_all_csr INTO rec_l_tactk_all_csr ;
1599: IF oki_utl_pvt.g_tactk_all_csr%FOUND THEN
1600: l_qsd_tactk_value := rec_l_tactk_all_csr.value ;
1601: END IF ;
1602: CLOSE oki_utl_pvt.g_tactk_all_csr ;
1595: l_loc := 'Opening cursor to determine current' || l_measure_type || '.' ;
1596: -- Get the active contracts as of the start of the quarter
1597: OPEN oki_utl_pvt.g_tactk_all_csr ( oki_utl_pub.g_glpr_qtr_start_date ) ;
1598: FETCH oki_utl_pvt.g_tactk_all_csr INTO rec_l_tactk_all_csr ;
1599: IF oki_utl_pvt.g_tactk_all_csr%FOUND THEN
1600: l_qsd_tactk_value := rec_l_tactk_all_csr.value ;
1601: END IF ;
1602: CLOSE oki_utl_pvt.g_tactk_all_csr ;
1603:
1598: FETCH oki_utl_pvt.g_tactk_all_csr INTO rec_l_tactk_all_csr ;
1599: IF oki_utl_pvt.g_tactk_all_csr%FOUND THEN
1600: l_qsd_tactk_value := rec_l_tactk_all_csr.value ;
1601: END IF ;
1602: CLOSE oki_utl_pvt.g_tactk_all_csr ;
1603:
1604: l_loc := 'Setting the current percent value ' || l_measure_type || '.' ;
1605: -- NOTE: l_qsd_tactk_value is the value as of the start of the quarter
1606: -- l_curr_tactk_value is the value as of the summary build date
1613:
1614: -- Get the current value
1615: l_loc := 'Opening cursor to determine previous ' || l_measure_type || '.' ;
1616: -- Get the active contracts as of the start of the quarter
1617: OPEN oki_utl_pvt.g_tactk_all_csr ( oki_utl_pub.g_py_glpr_qtr_start_date ) ;
1618: FETCH oki_utl_pvt.g_tactk_all_csr INTO rec_l_tactk_all_csr ;
1619: IF oki_utl_pvt.g_tactk_all_csr%FOUND THEN
1620: l_py_qsd_tactk_value := rec_l_tactk_all_csr.value ;
1621: END IF ;
1614: -- Get the current value
1615: l_loc := 'Opening cursor to determine previous ' || l_measure_type || '.' ;
1616: -- Get the active contracts as of the start of the quarter
1617: OPEN oki_utl_pvt.g_tactk_all_csr ( oki_utl_pub.g_py_glpr_qtr_start_date ) ;
1618: FETCH oki_utl_pvt.g_tactk_all_csr INTO rec_l_tactk_all_csr ;
1619: IF oki_utl_pvt.g_tactk_all_csr%FOUND THEN
1620: l_py_qsd_tactk_value := rec_l_tactk_all_csr.value ;
1621: END IF ;
1622: CLOSE oki_utl_pvt.g_tactk_all_csr ;
1615: l_loc := 'Opening cursor to determine previous ' || l_measure_type || '.' ;
1616: -- Get the active contracts as of the start of the quarter
1617: OPEN oki_utl_pvt.g_tactk_all_csr ( oki_utl_pub.g_py_glpr_qtr_start_date ) ;
1618: FETCH oki_utl_pvt.g_tactk_all_csr INTO rec_l_tactk_all_csr ;
1619: IF oki_utl_pvt.g_tactk_all_csr%FOUND THEN
1620: l_py_qsd_tactk_value := rec_l_tactk_all_csr.value ;
1621: END IF ;
1622: CLOSE oki_utl_pvt.g_tactk_all_csr ;
1623:
1618: FETCH oki_utl_pvt.g_tactk_all_csr INTO rec_l_tactk_all_csr ;
1619: IF oki_utl_pvt.g_tactk_all_csr%FOUND THEN
1620: l_py_qsd_tactk_value := rec_l_tactk_all_csr.value ;
1621: END IF ;
1622: CLOSE oki_utl_pvt.g_tactk_all_csr ;
1623:
1624: -- Get the previous value
1625: l_loc := 'Setting the previous percent value ' || l_measure_type || '.' ;
1626: -- NOTE: l_qsd_tactk_value is the value as of the start of the quarter
1709:
1710: -- Get the bin display lookup values
1711: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
1712: l_measure_type || '.' ;
1713: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1714: , oki_load_etr_pvt.g_rnwl_oppty_code ) ;
1715: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1716: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1717: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1711: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
1712: l_measure_type || '.' ;
1713: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1714: , oki_load_etr_pvt.g_rnwl_oppty_code ) ;
1715: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1716: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1717: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1718: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1719: ELSE
1712: l_measure_type || '.' ;
1713: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1714: , oki_load_etr_pvt.g_rnwl_oppty_code ) ;
1715: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1716: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1717: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1718: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1719: ELSE
1720: RAISE NO_DATA_FOUND ;
1718: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1719: ELSE
1720: RAISE NO_DATA_FOUND ;
1721: END IF ;
1722: CLOSE oki_utl_pvt.g_bin_disp_lkup_csr ;
1723:
1724: -- Get the current value
1725: l_loc := 'Opening cursor to determine ' || l_measure_type || '.' ;
1726: OPEN oki_utl_pvt.g_rnwl_oppty_all_csr ( oki_utl_pub.g_glpr_qtr_end_date ) ;
1722: CLOSE oki_utl_pvt.g_bin_disp_lkup_csr ;
1723:
1724: -- Get the current value
1725: l_loc := 'Opening cursor to determine ' || l_measure_type || '.' ;
1726: OPEN oki_utl_pvt.g_rnwl_oppty_all_csr ( oki_utl_pub.g_glpr_qtr_end_date ) ;
1727: FETCH oki_utl_pvt.g_rnwl_oppty_all_csr INTO rec_l_rnwl_oppty_all_csr ;
1728: IF oki_utl_pvt.g_rnwl_oppty_all_csr%FOUND THEN
1729: l_curr_value := rec_l_rnwl_oppty_all_csr.value ;
1730: END IF ;
1723:
1724: -- Get the current value
1725: l_loc := 'Opening cursor to determine ' || l_measure_type || '.' ;
1726: OPEN oki_utl_pvt.g_rnwl_oppty_all_csr ( oki_utl_pub.g_glpr_qtr_end_date ) ;
1727: FETCH oki_utl_pvt.g_rnwl_oppty_all_csr INTO rec_l_rnwl_oppty_all_csr ;
1728: IF oki_utl_pvt.g_rnwl_oppty_all_csr%FOUND THEN
1729: l_curr_value := rec_l_rnwl_oppty_all_csr.value ;
1730: END IF ;
1731: CLOSE oki_utl_pvt.g_rnwl_oppty_all_csr ;
1724: -- Get the current value
1725: l_loc := 'Opening cursor to determine ' || l_measure_type || '.' ;
1726: OPEN oki_utl_pvt.g_rnwl_oppty_all_csr ( oki_utl_pub.g_glpr_qtr_end_date ) ;
1727: FETCH oki_utl_pvt.g_rnwl_oppty_all_csr INTO rec_l_rnwl_oppty_all_csr ;
1728: IF oki_utl_pvt.g_rnwl_oppty_all_csr%FOUND THEN
1729: l_curr_value := rec_l_rnwl_oppty_all_csr.value ;
1730: END IF ;
1731: CLOSE oki_utl_pvt.g_rnwl_oppty_all_csr ;
1732:
1727: FETCH oki_utl_pvt.g_rnwl_oppty_all_csr INTO rec_l_rnwl_oppty_all_csr ;
1728: IF oki_utl_pvt.g_rnwl_oppty_all_csr%FOUND THEN
1729: l_curr_value := rec_l_rnwl_oppty_all_csr.value ;
1730: END IF ;
1731: CLOSE oki_utl_pvt.g_rnwl_oppty_all_csr ;
1732:
1733: -- Get the previous value
1734: l_loc := 'Opening cursor to determine ' || l_measure_type || '.' ;
1735: OPEN oki_utl_pvt.g_rnwl_oppty_all_csr ( oki_utl_pub.g_py_glpr_qtr_end_date ) ;
1731: CLOSE oki_utl_pvt.g_rnwl_oppty_all_csr ;
1732:
1733: -- Get the previous value
1734: l_loc := 'Opening cursor to determine ' || l_measure_type || '.' ;
1735: OPEN oki_utl_pvt.g_rnwl_oppty_all_csr ( oki_utl_pub.g_py_glpr_qtr_end_date ) ;
1736: FETCH oki_utl_pvt.g_rnwl_oppty_all_csr INTO rec_l_rnwl_oppty_all_csr ;
1737: IF oki_utl_pvt.g_rnwl_oppty_all_csr%FOUND THEN
1738: l_prev_value := rec_l_rnwl_oppty_all_csr.value ;
1739: END IF ;
1732:
1733: -- Get the previous value
1734: l_loc := 'Opening cursor to determine ' || l_measure_type || '.' ;
1735: OPEN oki_utl_pvt.g_rnwl_oppty_all_csr ( oki_utl_pub.g_py_glpr_qtr_end_date ) ;
1736: FETCH oki_utl_pvt.g_rnwl_oppty_all_csr INTO rec_l_rnwl_oppty_all_csr ;
1737: IF oki_utl_pvt.g_rnwl_oppty_all_csr%FOUND THEN
1738: l_prev_value := rec_l_rnwl_oppty_all_csr.value ;
1739: END IF ;
1740: CLOSE oki_utl_pvt.g_rnwl_oppty_all_csr ;
1733: -- Get the previous value
1734: l_loc := 'Opening cursor to determine ' || l_measure_type || '.' ;
1735: OPEN oki_utl_pvt.g_rnwl_oppty_all_csr ( oki_utl_pub.g_py_glpr_qtr_end_date ) ;
1736: FETCH oki_utl_pvt.g_rnwl_oppty_all_csr INTO rec_l_rnwl_oppty_all_csr ;
1737: IF oki_utl_pvt.g_rnwl_oppty_all_csr%FOUND THEN
1738: l_prev_value := rec_l_rnwl_oppty_all_csr.value ;
1739: END IF ;
1740: CLOSE oki_utl_pvt.g_rnwl_oppty_all_csr ;
1741:
1736: FETCH oki_utl_pvt.g_rnwl_oppty_all_csr INTO rec_l_rnwl_oppty_all_csr ;
1737: IF oki_utl_pvt.g_rnwl_oppty_all_csr%FOUND THEN
1738: l_prev_value := rec_l_rnwl_oppty_all_csr.value ;
1739: END IF ;
1740: CLOSE oki_utl_pvt.g_rnwl_oppty_all_csr ;
1741:
1742: l_loc := 'Setting the percent change ' || l_measure_type || '.' ;
1743: IF l_prev_value = 0 THEN
1744: l_pct_change := 100 ;
1816:
1817: -- Get the bin display lookup values
1818: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
1819: l_measure_type || '.' ;
1820: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1821: , oki_load_etr_pvt.g_auto_rnwl_vol_code ) ;
1822: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1823: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1824: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1818: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
1819: l_measure_type || '.' ;
1820: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1821: , oki_load_etr_pvt.g_auto_rnwl_vol_code ) ;
1822: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1823: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1824: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1825: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1826: ELSE
1819: l_measure_type || '.' ;
1820: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1821: , oki_load_etr_pvt.g_auto_rnwl_vol_code ) ;
1822: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1823: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1824: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1825: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1826: ELSE
1827: RAISE NO_DATA_FOUND ;
1825: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1826: ELSE
1827: RAISE NO_DATA_FOUND ;
1828: END IF ;
1829: CLOSE oki_utl_pvt.g_bin_disp_lkup_csr ;
1830:
1831: l_curr_value := NULL ;
1832:
1833:
1893:
1894: -- Get the bin display lookup values
1895: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
1896: l_measure_type || '.' ;
1897: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1898: , oki_load_etr_pvt.g_auto_rnwl_rate_code ) ;
1899: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1900: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1901: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1895: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
1896: l_measure_type || '.' ;
1897: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1898: , oki_load_etr_pvt.g_auto_rnwl_rate_code ) ;
1899: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1900: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1901: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1902: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1903: ELSE
1896: l_measure_type || '.' ;
1897: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1898: , oki_load_etr_pvt.g_auto_rnwl_rate_code ) ;
1899: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1900: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1901: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1902: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1903: ELSE
1904: RAISE NO_DATA_FOUND ;
1902: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1903: ELSE
1904: RAISE NO_DATA_FOUND ;
1905: END IF ;
1906: CLOSE oki_utl_pvt.g_bin_disp_lkup_csr ;
1907:
1908: l_curr_value := NULL ;
1909:
1910: l_loc := 'Inserting / updating total ' || l_measure_type || '.' ;
1968:
1969: -- Get the bin display lookup values
1970: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
1971: l_measure_type || '.' ;
1972: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1973: , oki_load_etr_pvt.g_rnwl_prc_uplft_code ) ;
1974: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1975: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1976: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1970: l_loc := 'Opening cursor to retrieve bin display lookup values for ' ||
1971: l_measure_type || '.' ;
1972: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1973: , oki_load_etr_pvt.g_rnwl_prc_uplft_code ) ;
1974: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1975: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1976: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1977: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1978: ELSE
1971: l_measure_type || '.' ;
1972: OPEN oki_utl_pvt.g_bin_disp_lkup_csr ( oki_load_etr_pvt.g_bin_id
1973: , oki_load_etr_pvt.g_rnwl_prc_uplft_code ) ;
1974: FETCH oki_utl_pvt.g_bin_disp_lkup_csr INTO rec_l_bin_disp_lkup_csr ;
1975: IF oki_utl_pvt.g_bin_disp_lkup_csr%FOUND THEN
1976: l_bin_code_meaning := rec_l_bin_disp_lkup_csr.bin_code_meaning ;
1977: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1978: ELSE
1979: RAISE NO_DATA_FOUND ;
1977: l_bin_code_seq := rec_l_bin_disp_lkup_csr.bin_code_seq ;
1978: ELSE
1979: RAISE NO_DATA_FOUND ;
1980: END IF ;
1981: CLOSE oki_utl_pvt.g_bin_disp_lkup_csr ;
1982:
1983:
1984: l_curr_value := NULL ;
1985:
2146:
2147: oki_utl_pub.g_summary_build_date := l_summary_build_date ;
2148:
2149: -- Get the GL periods start / end date
2150: oki_utl_pvt.get_gl_period_date (
2151: x_retcode => l_retcode ) ;
2152:
2153: IF l_retcode = '2' THEN
2154: -- Load failed, exit immediately.