DBA Data[Home] [Help]

APPS.WSH_ITM_OVERRIDE dependencies on DBMS_SQL

Line 486: l_CursorID := DBMS_SQL.Open_Cursor;

482: WSH_UTIL_CORE.println(l_sub_str);
483: i := i + 80;
484: END LOOP;
485:
486: l_CursorID := DBMS_SQL.Open_Cursor;
487: DBMS_SQL.Parse(l_CursorID, l_sql_string, DBMS_SQL.v7 );
488: DBMS_SQL.Define_Column(l_CursorID, 1, l_request_control_id);
489: DBMS_SQL.Define_Column(l_CursorID, 2, l_request_set_id);
490:

Line 487: DBMS_SQL.Parse(l_CursorID, l_sql_string, DBMS_SQL.v7 );

483: i := i + 80;
484: END LOOP;
485:
486: l_CursorID := DBMS_SQL.Open_Cursor;
487: DBMS_SQL.Parse(l_CursorID, l_sql_string, DBMS_SQL.v7 );
488: DBMS_SQL.Define_Column(l_CursorID, 1, l_request_control_id);
489: DBMS_SQL.Define_Column(l_CursorID, 2, l_request_set_id);
490:
491: IF p_party_type IS NOT NULL THEN

Line 488: DBMS_SQL.Define_Column(l_CursorID, 1, l_request_control_id);

484: END LOOP;
485:
486: l_CursorID := DBMS_SQL.Open_Cursor;
487: DBMS_SQL.Parse(l_CursorID, l_sql_string, DBMS_SQL.v7 );
488: DBMS_SQL.Define_Column(l_CursorID, 1, l_request_control_id);
489: DBMS_SQL.Define_Column(l_CursorID, 2, l_request_set_id);
490:
491: IF p_party_type IS NOT NULL THEN
492: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_type', p_party_type);

Line 489: DBMS_SQL.Define_Column(l_CursorID, 2, l_request_set_id);

485:
486: l_CursorID := DBMS_SQL.Open_Cursor;
487: DBMS_SQL.Parse(l_CursorID, l_sql_string, DBMS_SQL.v7 );
488: DBMS_SQL.Define_Column(l_CursorID, 1, l_request_control_id);
489: DBMS_SQL.Define_Column(l_CursorID, 2, l_request_set_id);
490:
491: IF p_party_type IS NOT NULL THEN
492: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_type', p_party_type);
493: END IF;

Line 492: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_type', p_party_type);

488: DBMS_SQL.Define_Column(l_CursorID, 1, l_request_control_id);
489: DBMS_SQL.Define_Column(l_CursorID, 2, l_request_set_id);
490:
491: IF p_party_type IS NOT NULL THEN
492: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_type', p_party_type);
493: END IF;
494:
495: IF p_party_id IS NOT NULL THEN
496: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_id', p_party_id);

Line 496: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_id', p_party_id);

492: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_type', p_party_type);
493: END IF;
494:
495: IF p_party_id IS NOT NULL THEN
496: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_id', p_party_id);
497: END IF;
498:
499: IF p_reference_id IS NOT NULL THEN
500: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_id', p_reference_id);

Line 500: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_id', p_reference_id);

496: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_id', p_party_id);
497: END IF;
498:
499: IF p_reference_id IS NOT NULL THEN
500: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_id', p_reference_id);
501: END IF;
502:
503: IF p_reference_line_id IS NOT NULL THEN
504: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_line_id', p_reference_line_id);

Line 504: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_line_id', p_reference_line_id);

500: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_id', p_reference_id);
501: END IF;
502:
503: IF p_reference_line_id IS NOT NULL THEN
504: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_line_id', p_reference_line_id);
505: END IF;
506:
507: l_ignore := DBMS_SQL.Execute(l_CursorID);
508: --}

Line 507: l_ignore := DBMS_SQL.Execute(l_CursorID);

503: IF p_reference_line_id IS NOT NULL THEN
504: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_line_id', p_reference_line_id);
505: END IF;
506:
507: l_ignore := DBMS_SQL.Execute(l_CursorID);
508: --}
509: else
510: open Get_Unprocessed_Records_1_ship;
511: WSH_UTIL_CORE.println('Start The processing for Shipping Records :');

Line 569: l_CursorID := DBMS_SQL.Open_Cursor;

565: WSH_UTIL_CORE.println(l_sub_str);
566: i := i + 80;
567: END LOOP;
568:
569: l_CursorID := DBMS_SQL.Open_Cursor;
570: DBMS_SQL.Parse(l_CursorID, l_sql_string, DBMS_SQL.v7 );
571: DBMS_SQL.Define_Column(l_CursorID, 1, l_request_control_id);
572: DBMS_SQL.Define_Column(l_CursorID, 2, l_request_set_id);
573:

Line 570: DBMS_SQL.Parse(l_CursorID, l_sql_string, DBMS_SQL.v7 );

566: i := i + 80;
567: END LOOP;
568:
569: l_CursorID := DBMS_SQL.Open_Cursor;
570: DBMS_SQL.Parse(l_CursorID, l_sql_string, DBMS_SQL.v7 );
571: DBMS_SQL.Define_Column(l_CursorID, 1, l_request_control_id);
572: DBMS_SQL.Define_Column(l_CursorID, 2, l_request_set_id);
573:
574: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_vendor_id', p_vendor_id);

Line 571: DBMS_SQL.Define_Column(l_CursorID, 1, l_request_control_id);

567: END LOOP;
568:
569: l_CursorID := DBMS_SQL.Open_Cursor;
570: DBMS_SQL.Parse(l_CursorID, l_sql_string, DBMS_SQL.v7 );
571: DBMS_SQL.Define_Column(l_CursorID, 1, l_request_control_id);
572: DBMS_SQL.Define_Column(l_CursorID, 2, l_request_set_id);
573:
574: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_vendor_id', p_vendor_id);
575: IF p_party_type IS NOT NULL THEN

Line 572: DBMS_SQL.Define_Column(l_CursorID, 2, l_request_set_id);

568:
569: l_CursorID := DBMS_SQL.Open_Cursor;
570: DBMS_SQL.Parse(l_CursorID, l_sql_string, DBMS_SQL.v7 );
571: DBMS_SQL.Define_Column(l_CursorID, 1, l_request_control_id);
572: DBMS_SQL.Define_Column(l_CursorID, 2, l_request_set_id);
573:
574: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_vendor_id', p_vendor_id);
575: IF p_party_type IS NOT NULL THEN
576: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_type', p_party_type);

Line 574: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_vendor_id', p_vendor_id);

570: DBMS_SQL.Parse(l_CursorID, l_sql_string, DBMS_SQL.v7 );
571: DBMS_SQL.Define_Column(l_CursorID, 1, l_request_control_id);
572: DBMS_SQL.Define_Column(l_CursorID, 2, l_request_set_id);
573:
574: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_vendor_id', p_vendor_id);
575: IF p_party_type IS NOT NULL THEN
576: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_type', p_party_type);
577: END IF;
578:

Line 576: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_type', p_party_type);

572: DBMS_SQL.Define_Column(l_CursorID, 2, l_request_set_id);
573:
574: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_vendor_id', p_vendor_id);
575: IF p_party_type IS NOT NULL THEN
576: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_type', p_party_type);
577: END IF;
578:
579: IF p_party_id IS NOT NULL THEN
580: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_id', p_party_id);

Line 580: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_id', p_party_id);

576: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_type', p_party_type);
577: END IF;
578:
579: IF p_party_id IS NOT NULL THEN
580: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_id', p_party_id);
581: END IF;
582:
583: IF p_reference_id IS NOT NULL THEN
584: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_id', p_reference_id);

Line 584: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_id', p_reference_id);

580: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_id', p_party_id);
581: END IF;
582:
583: IF p_reference_id IS NOT NULL THEN
584: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_id', p_reference_id);
585: END IF;
586:
587: IF p_reference_line_id IS NOT NULL THEN
588: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_line_id', p_reference_line_id);

Line 588: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_line_id', p_reference_line_id);

584: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_id', p_reference_id);
585: END IF;
586:
587: IF p_reference_line_id IS NOT NULL THEN
588: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_line_id', p_reference_line_id);
589: END IF;
590:
591: l_ignore := DBMS_SQL.Execute(l_CursorID);
592: else

Line 591: l_ignore := DBMS_SQL.Execute(l_CursorID);

587: IF p_reference_line_id IS NOT NULL THEN
588: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_line_id', p_reference_line_id);
589: END IF;
590:
591: l_ignore := DBMS_SQL.Execute(l_CursorID);
592: else
593: open Get_UNprocessed_Records_2_ship;
594: if p_override_type= null and p_reference_id is not null then
595: l_flag := 1;

Line 604: IF DBMS_SQL.Fetch_Rows(l_cursorID) = 0 THEN

600:
601: LOOP
602: If p_vendor_id is NULL THEN
603: if p_application_id=660 then
604: IF DBMS_SQL.Fetch_Rows(l_cursorID) = 0 THEN
605: DBMS_SQL.Close_Cursor(l_cursorID);
606: EXIT;
607: ELSE
608: DBMS_SQL.Column_Value(l_CursorID, 1, l_request_control_id);

Line 605: DBMS_SQL.Close_Cursor(l_cursorID);

601: LOOP
602: If p_vendor_id is NULL THEN
603: if p_application_id=660 then
604: IF DBMS_SQL.Fetch_Rows(l_cursorID) = 0 THEN
605: DBMS_SQL.Close_Cursor(l_cursorID);
606: EXIT;
607: ELSE
608: DBMS_SQL.Column_Value(l_CursorID, 1, l_request_control_id);
609: DBMS_SQL.Column_Value(l_CursorID, 2, l_request_set_id);

Line 608: DBMS_SQL.Column_Value(l_CursorID, 1, l_request_control_id);

604: IF DBMS_SQL.Fetch_Rows(l_cursorID) = 0 THEN
605: DBMS_SQL.Close_Cursor(l_cursorID);
606: EXIT;
607: ELSE
608: DBMS_SQL.Column_Value(l_CursorID, 1, l_request_control_id);
609: DBMS_SQL.Column_Value(l_CursorID, 2, l_request_set_id);
610: END IF;
611: else
612:

Line 609: DBMS_SQL.Column_Value(l_CursorID, 2, l_request_set_id);

605: DBMS_SQL.Close_Cursor(l_cursorID);
606: EXIT;
607: ELSE
608: DBMS_SQL.Column_Value(l_CursorID, 1, l_request_control_id);
609: DBMS_SQL.Column_Value(l_CursorID, 2, l_request_set_id);
610: END IF;
611: else
612:
613: EXIT WHEN l_flag=1;

Line 625: IF DBMS_SQL.Fetch_Rows(l_cursorID) = 0 THEN

621:
622: end if;
623: Else
624: if p_application_id=660 then
625: IF DBMS_SQL.Fetch_Rows(l_cursorID) = 0 THEN
626: DBMS_SQL.Close_Cursor(l_cursorID);
627: EXIT;
628: ELSE
629: DBMS_SQL.Column_Value(l_CursorID, 1, l_request_control_id);

Line 626: DBMS_SQL.Close_Cursor(l_cursorID);

622: end if;
623: Else
624: if p_application_id=660 then
625: IF DBMS_SQL.Fetch_Rows(l_cursorID) = 0 THEN
626: DBMS_SQL.Close_Cursor(l_cursorID);
627: EXIT;
628: ELSE
629: DBMS_SQL.Column_Value(l_CursorID, 1, l_request_control_id);
630: DBMS_SQL.Column_Value(l_CursorID, 2, l_request_set_id);

Line 629: DBMS_SQL.Column_Value(l_CursorID, 1, l_request_control_id);

625: IF DBMS_SQL.Fetch_Rows(l_cursorID) = 0 THEN
626: DBMS_SQL.Close_Cursor(l_cursorID);
627: EXIT;
628: ELSE
629: DBMS_SQL.Column_Value(l_CursorID, 1, l_request_control_id);
630: DBMS_SQL.Column_Value(l_CursorID, 2, l_request_set_id);
631: END IF;
632: else
633: EXIT WHEN l_flag=1;

Line 630: DBMS_SQL.Column_Value(l_CursorID, 2, l_request_set_id);

626: DBMS_SQL.Close_Cursor(l_cursorID);
627: EXIT;
628: ELSE
629: DBMS_SQL.Column_Value(l_CursorID, 1, l_request_control_id);
630: DBMS_SQL.Column_Value(l_CursorID, 2, l_request_set_id);
631: END IF;
632: else
633: EXIT WHEN l_flag=1;
634: Fetch Get_Unprocessed_Records_2_ship into

Line 684: IF DBMS_SQL.IS_Open(l_cursorID) THEN

680: END LOOP;
681:
682: If p_vendor_id is NULL THEN
683: if p_application_id=660 then
684: IF DBMS_SQL.IS_Open(l_cursorID) THEN
685: DBMS_SQL.Close_Cursor(l_cursorID);
686: END IF;
687: else
688: close Get_Unprocessed_Records_1_ship;

Line 685: DBMS_SQL.Close_Cursor(l_cursorID);

681:
682: If p_vendor_id is NULL THEN
683: if p_application_id=660 then
684: IF DBMS_SQL.IS_Open(l_cursorID) THEN
685: DBMS_SQL.Close_Cursor(l_cursorID);
686: END IF;
687: else
688: close Get_Unprocessed_Records_1_ship;
689: end if;

Line 692: IF DBMS_SQL.IS_Open(l_cursorID) THEN

688: close Get_Unprocessed_Records_1_ship;
689: end if;
690: ELSE
691: if p_application_id=660 then
692: IF DBMS_SQL.IS_Open(l_cursorID) THEN
693: DBMS_SQL.Close_Cursor(l_cursorID);
694: END IF;
695: else
696: close Get_Unprocessed_Records_2_ship;

Line 693: DBMS_SQL.Close_Cursor(l_cursorID);

689: end if;
690: ELSE
691: if p_application_id=660 then
692: IF DBMS_SQL.IS_Open(l_cursorID) THEN
693: DBMS_SQL.Close_Cursor(l_cursorID);
694: END IF;
695: else
696: close Get_Unprocessed_Records_2_ship;
697: end if;

Line 815: l_CursorID := DBMS_SQL.Open_Cursor;

811: WSH_UTIL_CORE.println(l_sub_str);
812: i := i + 80;
813: END LOOP;
814:
815: l_CursorID := DBMS_SQL.Open_Cursor;
816: DBMS_SQL.Parse(l_CursorID, l_sql_string, DBMS_SQL.v7 );
817: DBMS_SQL.Define_Column(l_CursorID, 1, l_request_control_id);
818: DBMS_SQL.Define_Column(l_CursorID, 2, l_request_set_id);
819:

Line 816: DBMS_SQL.Parse(l_CursorID, l_sql_string, DBMS_SQL.v7 );

812: i := i + 80;
813: END LOOP;
814:
815: l_CursorID := DBMS_SQL.Open_Cursor;
816: DBMS_SQL.Parse(l_CursorID, l_sql_string, DBMS_SQL.v7 );
817: DBMS_SQL.Define_Column(l_CursorID, 1, l_request_control_id);
818: DBMS_SQL.Define_Column(l_CursorID, 2, l_request_set_id);
819:
820: IF p_party_type IS NOT NULL THEN

Line 817: DBMS_SQL.Define_Column(l_CursorID, 1, l_request_control_id);

813: END LOOP;
814:
815: l_CursorID := DBMS_SQL.Open_Cursor;
816: DBMS_SQL.Parse(l_CursorID, l_sql_string, DBMS_SQL.v7 );
817: DBMS_SQL.Define_Column(l_CursorID, 1, l_request_control_id);
818: DBMS_SQL.Define_Column(l_CursorID, 2, l_request_set_id);
819:
820: IF p_party_type IS NOT NULL THEN
821: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_type', p_party_type);

Line 818: DBMS_SQL.Define_Column(l_CursorID, 2, l_request_set_id);

814:
815: l_CursorID := DBMS_SQL.Open_Cursor;
816: DBMS_SQL.Parse(l_CursorID, l_sql_string, DBMS_SQL.v7 );
817: DBMS_SQL.Define_Column(l_CursorID, 1, l_request_control_id);
818: DBMS_SQL.Define_Column(l_CursorID, 2, l_request_set_id);
819:
820: IF p_party_type IS NOT NULL THEN
821: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_type', p_party_type);
822: END IF;

Line 821: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_type', p_party_type);

817: DBMS_SQL.Define_Column(l_CursorID, 1, l_request_control_id);
818: DBMS_SQL.Define_Column(l_CursorID, 2, l_request_set_id);
819:
820: IF p_party_type IS NOT NULL THEN
821: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_type', p_party_type);
822: END IF;
823:
824: IF p_party_id IS NOT NULL THEN
825: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_id', p_party_id);

Line 825: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_id', p_party_id);

821: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_type', p_party_type);
822: END IF;
823:
824: IF p_party_id IS NOT NULL THEN
825: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_id', p_party_id);
826: END IF;
827:
828: IF p_vendor_id IS NOT NULL THEN
829: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_vendor_id', p_vendor_id);

Line 829: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_vendor_id', p_vendor_id);

825: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_party_id', p_party_id);
826: END IF;
827:
828: IF p_vendor_id IS NOT NULL THEN
829: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_vendor_id', p_vendor_id);
830: END IF;
831:
832: IF p_error_type IS NOT NULL THEN
833: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_error_type', p_error_type);

Line 833: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_error_type', p_error_type);

829: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_vendor_id', p_vendor_id);
830: END IF;
831:
832: IF p_error_type IS NOT NULL THEN
833: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_error_type', p_error_type);
834: END IF;
835:
836: IF p_error_code IS NOT NULL THEN
837: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_error_code', p_error_code);

Line 837: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_error_code', p_error_code);

833: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_error_type', p_error_type);
834: END IF;
835:
836: IF p_error_code IS NOT NULL THEN
837: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_error_code', p_error_code);
838: END IF;
839:
840: IF p_reference_id IS NOT NULL THEN
841: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_id', p_reference_id);

Line 841: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_id', p_reference_id);

837: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_error_code', p_error_code);
838: END IF;
839:
840: IF p_reference_id IS NOT NULL THEN
841: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_id', p_reference_id);
842: END IF;
843:
844: IF p_reference_line_id IS NOT NULL THEN
845: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_line_id', p_reference_line_id);

Line 845: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_line_id', p_reference_line_id);

841: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_id', p_reference_id);
842: END IF;
843:
844: IF p_reference_line_id IS NOT NULL THEN
845: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_line_id', p_reference_line_id);
846: END IF;
847:
848: l_ignore := DBMS_SQL.Execute(l_CursorID);
849: -- }

Line 848: l_ignore := DBMS_SQL.Execute(l_CursorID);

844: IF p_reference_line_id IS NOT NULL THEN
845: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':x_reference_line_id', p_reference_line_id);
846: END IF;
847:
848: l_ignore := DBMS_SQL.Execute(l_CursorID);
849: -- }
850: ELSE
851: open Get_Request_Control_ship;
852: END IF;

Line 857: IF DBMS_SQL.Fetch_Rows(l_cursorID) = 0 THEN

853:
854: LOOP
855: IF p_application_id = 660 THEN
856: --{
857: IF DBMS_SQL.Fetch_Rows(l_cursorID) = 0 THEN
858: DBMS_SQL.Close_Cursor(l_cursorID);
859: EXIT;
860: ELSE
861: DBMS_SQL.Column_Value(l_CursorID, 1, l_request_control_id);

Line 858: DBMS_SQL.Close_Cursor(l_cursorID);

854: LOOP
855: IF p_application_id = 660 THEN
856: --{
857: IF DBMS_SQL.Fetch_Rows(l_cursorID) = 0 THEN
858: DBMS_SQL.Close_Cursor(l_cursorID);
859: EXIT;
860: ELSE
861: DBMS_SQL.Column_Value(l_CursorID, 1, l_request_control_id);
862: DBMS_SQL.Column_Value(l_CursorID, 2, l_request_set_id);

Line 861: DBMS_SQL.Column_Value(l_CursorID, 1, l_request_control_id);

857: IF DBMS_SQL.Fetch_Rows(l_cursorID) = 0 THEN
858: DBMS_SQL.Close_Cursor(l_cursorID);
859: EXIT;
860: ELSE
861: DBMS_SQL.Column_Value(l_CursorID, 1, l_request_control_id);
862: DBMS_SQL.Column_Value(l_CursorID, 2, l_request_set_id);
863: END IF;
864: -- }
865: ELSE

Line 862: DBMS_SQL.Column_Value(l_CursorID, 2, l_request_set_id);

858: DBMS_SQL.Close_Cursor(l_cursorID);
859: EXIT;
860: ELSE
861: DBMS_SQL.Column_Value(l_CursorID, 1, l_request_control_id);
862: DBMS_SQL.Column_Value(l_CursorID, 2, l_request_set_id);
863: END IF;
864: -- }
865: ELSE
866: fetch Get_Request_Control_ship into l_request_control_id,l_request_set_id;

Line 959: IF DBMS_SQL.IS_Open(l_cursorID) THEN

955: END;
956: END IF ;
957: END LOOP;
958: IF p_application_id=660 THEN
959: IF DBMS_SQL.IS_Open(l_cursorID) THEN
960: DBMS_SQL.Close_Cursor(l_cursorID);
961: END IF;
962: ELSE
963: close Get_Request_Control_ship;

Line 960: DBMS_SQL.Close_Cursor(l_cursorID);

956: END IF ;
957: END LOOP;
958: IF p_application_id=660 THEN
959: IF DBMS_SQL.IS_Open(l_cursorID) THEN
960: DBMS_SQL.Close_Cursor(l_cursorID);
961: END IF;
962: ELSE
963: close Get_Request_Control_ship;
964: END IF;