eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PO_LOCATIONS_S dependencies on DBMS_SQL

Line 563: cid := dbms_sql.open_cursor;

559: /* dbms_output.put_line(substr(sql_str,1,255));
560: dbms_output.put_line(substr(sql_str,256,255));
561: dbms_output.put_line(substr(sql_str,513,255)); */
562:
563: cid := dbms_sql.open_cursor;
564:
565: dbms_sql.parse(cid, sql_str , dbms_sql.native);
566:
567: dbms_sql.define_column(cid,1,p_loc_record.location_code,25);

Line 565: dbms_sql.parse(cid, sql_str , dbms_sql.native);

561: dbms_output.put_line(substr(sql_str,513,255)); */
562:
563: cid := dbms_sql.open_cursor;
564:
565: dbms_sql.parse(cid, sql_str , dbms_sql.native);
566:
567: dbms_sql.define_column(cid,1,p_loc_record.location_code,25);
568: dbms_sql.define_column(cid,2,p_loc_record.location_id);
569:

Line 567: dbms_sql.define_column(cid,1,p_loc_record.location_code,25);

563: cid := dbms_sql.open_cursor;
564:
565: dbms_sql.parse(cid, sql_str , dbms_sql.native);
566:
567: dbms_sql.define_column(cid,1,p_loc_record.location_code,25);
568: dbms_sql.define_column(cid,2,p_loc_record.location_id);
569:
570: IF not loc_code_null THEN
571:

Line 568: dbms_sql.define_column(cid,2,p_loc_record.location_id);

564:
565: dbms_sql.parse(cid, sql_str , dbms_sql.native);
566:
567: dbms_sql.define_column(cid,1,p_loc_record.location_code,25);
568: dbms_sql.define_column(cid,2,p_loc_record.location_id);
569:
570: IF not loc_code_null THEN
571:
572: dbms_sql.bind_variable(cid,'v_loc_code',p_loc_record.location_code);

Line 572: dbms_sql.bind_variable(cid,'v_loc_code',p_loc_record.location_code);

568: dbms_sql.define_column(cid,2,p_loc_record.location_id);
569:
570: IF not loc_code_null THEN
571:
572: dbms_sql.bind_variable(cid,'v_loc_code',p_loc_record.location_code);
573:
574: END IF;
575:
576: IF NOT loc_id_null THEN

Line 578: dbms_sql.bind_variable(cid,'v_loc_id',p_loc_record.location_id);

574: END IF;
575:
576: IF NOT loc_id_null THEN
577:
578: dbms_sql.bind_variable(cid,'v_loc_id',p_loc_record.location_id);
579:
580: END IF;
581:
582: rows_processed := dbms_sql.execute_and_fetch(cid);

Line 582: rows_processed := dbms_sql.execute_and_fetch(cid);

578: dbms_sql.bind_variable(cid,'v_loc_id',p_loc_record.location_id);
579:
580: END IF;
581:
582: rows_processed := dbms_sql.execute_and_fetch(cid);
583:
584: IF rows_processed = 1 THEN
585: IF loc_code_null THEN
586: dbms_sql.column_value(cid,1,p_loc_record.location_code);

Line 586: dbms_sql.column_value(cid,1,p_loc_record.location_code);

582: rows_processed := dbms_sql.execute_and_fetch(cid);
583:
584: IF rows_processed = 1 THEN
585: IF loc_code_null THEN
586: dbms_sql.column_value(cid,1,p_loc_record.location_code);
587: END IF;
588:
589: IF loc_id_null THEN
590: dbms_sql.column_value(cid,2,p_loc_record.location_id);

Line 590: dbms_sql.column_value(cid,2,p_loc_record.location_id);

586: dbms_sql.column_value(cid,1,p_loc_record.location_code);
587: END IF;
588:
589: IF loc_id_null THEN
590: dbms_sql.column_value(cid,2,p_loc_record.location_id);
591: END IF;
592:
593: p_loc_record.error_record.error_status := 'S';
594:

Line 609: cid := dbms_sql.open_cursor;

605: -- END IF;
606: sql_str := substr(sql_str,1,length(sql_str));
607:
608:
609: cid := dbms_sql.open_cursor;
610:
611: dbms_sql.parse(cid, sql_str , dbms_sql.native);
612: dbms_sql.define_column(cid,1,p_loc_record.location_code,25);
613: dbms_sql.define_column(cid,2,p_loc_record.location_id);

Line 611: dbms_sql.parse(cid, sql_str , dbms_sql.native);

607:
608:
609: cid := dbms_sql.open_cursor;
610:
611: dbms_sql.parse(cid, sql_str , dbms_sql.native);
612: dbms_sql.define_column(cid,1,p_loc_record.location_code,25);
613: dbms_sql.define_column(cid,2,p_loc_record.location_id);
614: /*
615: IF not loc_code_null THEN

Line 612: dbms_sql.define_column(cid,1,p_loc_record.location_code,25);

608:
609: cid := dbms_sql.open_cursor;
610:
611: dbms_sql.parse(cid, sql_str , dbms_sql.native);
612: dbms_sql.define_column(cid,1,p_loc_record.location_code,25);
613: dbms_sql.define_column(cid,2,p_loc_record.location_id);
614: /*
615: IF not loc_code_null THEN
616: dbms_sql.bind_variable(cid,'v_loc_code',p_loc_record.location_code);

Line 613: dbms_sql.define_column(cid,2,p_loc_record.location_id);

609: cid := dbms_sql.open_cursor;
610:
611: dbms_sql.parse(cid, sql_str , dbms_sql.native);
612: dbms_sql.define_column(cid,1,p_loc_record.location_code,25);
613: dbms_sql.define_column(cid,2,p_loc_record.location_id);
614: /*
615: IF not loc_code_null THEN
616: dbms_sql.bind_variable(cid,'v_loc_code',p_loc_record.location_code);
617: END IF;

Line 616: dbms_sql.bind_variable(cid,'v_loc_code',p_loc_record.location_code);

612: dbms_sql.define_column(cid,1,p_loc_record.location_code,25);
613: dbms_sql.define_column(cid,2,p_loc_record.location_id);
614: /*
615: IF not loc_code_null THEN
616: dbms_sql.bind_variable(cid,'v_loc_code',p_loc_record.location_code);
617: END IF;
618: */
619: IF NOT loc_id_null THEN
620: dbms_sql.bind_variable(cid,'v_loc_id',p_loc_record.location_id);

Line 620: dbms_sql.bind_variable(cid,'v_loc_id',p_loc_record.location_id);

616: dbms_sql.bind_variable(cid,'v_loc_code',p_loc_record.location_code);
617: END IF;
618: */
619: IF NOT loc_id_null THEN
620: dbms_sql.bind_variable(cid,'v_loc_id',p_loc_record.location_id);
621: END IF;
622:
623: rows_processed := dbms_sql.execute_and_fetch(cid);
624:

Line 623: rows_processed := dbms_sql.execute_and_fetch(cid);

619: IF NOT loc_id_null THEN
620: dbms_sql.bind_variable(cid,'v_loc_id',p_loc_record.location_id);
621: END IF;
622:
623: rows_processed := dbms_sql.execute_and_fetch(cid);
624:
625: IF rows_processed = 1 THEN
626:
627: IF loc_code_null THEN

Line 628: dbms_sql.column_value(cid,1,p_loc_record.location_code);

624:
625: IF rows_processed = 1 THEN
626:
627: IF loc_code_null THEN
628: dbms_sql.column_value(cid,1,p_loc_record.location_code);
629: END IF;
630:
631: /* IF loc_id_null THEN
632: dbms_sql.column_value(cid,2,p_loc_record.location_id);

Line 632: dbms_sql.column_value(cid,2,p_loc_record.location_id);

628: dbms_sql.column_value(cid,1,p_loc_record.location_code);
629: END IF;
630:
631: /* IF loc_id_null THEN
632: dbms_sql.column_value(cid,2,p_loc_record.location_id);
633: END IF;
634: */
635: p_loc_record.error_record.error_status := 'S';
636:

Line 650: IF dbms_sql.is_open(cid) THEN

646: p_loc_record.error_record.error_status := 'W';
647:
648: END IF;
649:
650: IF dbms_sql.is_open(cid) THEN
651: dbms_sql.close_cursor(cid);
652: END IF;
653:
654: EXCEPTION

Line 651: dbms_sql.close_cursor(cid);

647:
648: END IF;
649:
650: IF dbms_sql.is_open(cid) THEN
651: dbms_sql.close_cursor(cid);
652: END IF;
653:
654: EXCEPTION
655: WHEN others THEN

Line 657: IF dbms_sql.is_open(cid) THEN

653:
654: EXCEPTION
655: WHEN others THEN
656:
657: IF dbms_sql.is_open(cid) THEN
658: dbms_sql.close_cursor(cid);
659: END IF;
660:
661: p_loc_record.error_record.error_status := 'U';

Line 658: dbms_sql.close_cursor(cid);

654: EXCEPTION
655: WHEN others THEN
656:
657: IF dbms_sql.is_open(cid) THEN
658: dbms_sql.close_cursor(cid);
659: END IF;
660:
661: p_loc_record.error_record.error_status := 'U';
662: p_loc_record.error_record.error_message := sqlerrm;

Line 720: X_cid := dbms_sql.open_cursor;

716: /* dbms_output.put_line(substr(X_sql_str,1,255));
717: dbms_output.put_line(substr(X_sql_str,256,255));
718: dbms_output.put_line(substr(X_sql_str,513,255)); */
719:
720: X_cid := dbms_sql.open_cursor;
721:
722: dbms_sql.parse(X_cid, X_sql_str , dbms_sql.native);
723:
724: dbms_sql.define_column(X_cid,1,X_inactive_date);

Line 722: dbms_sql.parse(X_cid, X_sql_str , dbms_sql.native);

718: dbms_output.put_line(substr(X_sql_str,513,255)); */
719:
720: X_cid := dbms_sql.open_cursor;
721:
722: dbms_sql.parse(X_cid, X_sql_str , dbms_sql.native);
723:
724: dbms_sql.define_column(X_cid,1,X_inactive_date);
725: dbms_sql.define_column(X_cid,2,X_receiving_site_flag,1);
726: dbms_sql.define_column(X_cid,3,X_inventory_organization_id);

Line 724: dbms_sql.define_column(X_cid,1,X_inactive_date);

720: X_cid := dbms_sql.open_cursor;
721:
722: dbms_sql.parse(X_cid, X_sql_str , dbms_sql.native);
723:
724: dbms_sql.define_column(X_cid,1,X_inactive_date);
725: dbms_sql.define_column(X_cid,2,X_receiving_site_flag,1);
726: dbms_sql.define_column(X_cid,3,X_inventory_organization_id);
727:
728: IF NOT X_loc_code_null THEN

Line 725: dbms_sql.define_column(X_cid,2,X_receiving_site_flag,1);

721:
722: dbms_sql.parse(X_cid, X_sql_str , dbms_sql.native);
723:
724: dbms_sql.define_column(X_cid,1,X_inactive_date);
725: dbms_sql.define_column(X_cid,2,X_receiving_site_flag,1);
726: dbms_sql.define_column(X_cid,3,X_inventory_organization_id);
727:
728: IF NOT X_loc_code_null THEN
729:

Line 726: dbms_sql.define_column(X_cid,3,X_inventory_organization_id);

722: dbms_sql.parse(X_cid, X_sql_str , dbms_sql.native);
723:
724: dbms_sql.define_column(X_cid,1,X_inactive_date);
725: dbms_sql.define_column(X_cid,2,X_receiving_site_flag,1);
726: dbms_sql.define_column(X_cid,3,X_inventory_organization_id);
727:
728: IF NOT X_loc_code_null THEN
729:
730: dbms_sql.bind_variable(X_cid,'v_loc_code',p_loc_record.location_code);

Line 730: dbms_sql.bind_variable(X_cid,'v_loc_code',p_loc_record.location_code);

726: dbms_sql.define_column(X_cid,3,X_inventory_organization_id);
727:
728: IF NOT X_loc_code_null THEN
729:
730: dbms_sql.bind_variable(X_cid,'v_loc_code',p_loc_record.location_code);
731:
732: END IF;
733:
734: IF NOT X_loc_id_null THEN

Line 736: dbms_sql.bind_variable(X_cid,'v_loc_id',p_loc_record.location_id);

732: END IF;
733:
734: IF NOT X_loc_id_null THEN
735:
736: dbms_sql.bind_variable(X_cid,'v_loc_id',p_loc_record.location_id);
737:
738: END IF;
739:
740: X_rows_processed := dbms_sql.execute_and_fetch(X_cid);

Line 740: X_rows_processed := dbms_sql.execute_and_fetch(X_cid);

736: dbms_sql.bind_variable(X_cid,'v_loc_id',p_loc_record.location_id);
737:
738: END IF;
739:
740: X_rows_processed := dbms_sql.execute_and_fetch(X_cid);
741:
742: IF X_rows_processed = 1 THEN
743:
744: dbms_sql.column_value(X_cid,1,X_inactive_date);

Line 744: dbms_sql.column_value(X_cid,1,X_inactive_date);

740: X_rows_processed := dbms_sql.execute_and_fetch(X_cid);
741:
742: IF X_rows_processed = 1 THEN
743:
744: dbms_sql.column_value(X_cid,1,X_inactive_date);
745: dbms_sql.column_value(X_cid,2,X_receiving_site_flag);
746: dbms_sql.column_value(X_cid,3,X_inventory_organization_id);
747:
748: /* Check whether specified location is active */

Line 745: dbms_sql.column_value(X_cid,2,X_receiving_site_flag);

741:
742: IF X_rows_processed = 1 THEN
743:
744: dbms_sql.column_value(X_cid,1,X_inactive_date);
745: dbms_sql.column_value(X_cid,2,X_receiving_site_flag);
746: dbms_sql.column_value(X_cid,3,X_inventory_organization_id);
747:
748: /* Check whether specified location is active */
749:

Line 746: dbms_sql.column_value(X_cid,3,X_inventory_organization_id);

742: IF X_rows_processed = 1 THEN
743:
744: dbms_sql.column_value(X_cid,1,X_inactive_date);
745: dbms_sql.column_value(X_cid,2,X_receiving_site_flag);
746: dbms_sql.column_value(X_cid,3,X_inventory_organization_id);
747:
748: /* Check whether specified location is active */
749:
750: IF nvl(X_inactive_date,X_sysdate + 1) < X_sysdate THEN

Line 755: IF dbms_sql.is_open(X_cid) THEN

751:
752: p_loc_record.error_record.error_status := 'E';
753: p_loc_record.error_record.error_message := 'LOC_DISABLED';
754:
755: IF dbms_sql.is_open(X_cid) THEN
756: dbms_sql.close_cursor(X_cid);
757: END IF;
758:
759: RETURN;

Line 756: dbms_sql.close_cursor(X_cid);

752: p_loc_record.error_record.error_status := 'E';
753: p_loc_record.error_record.error_message := 'LOC_DISABLED';
754:
755: IF dbms_sql.is_open(X_cid) THEN
756: dbms_sql.close_cursor(X_cid);
757: END IF;
758:
759: RETURN;
760:

Line 771: IF dbms_sql.is_open(X_cid) THEN

767:
768: p_loc_record.error_record.error_status := 'E';
769: p_loc_record.error_record.error_message := 'LOC_NOT_RCV_SITE';
770:
771: IF dbms_sql.is_open(X_cid) THEN
772: dbms_sql.close_cursor(X_cid);
773: END IF;
774:
775: RETURN;

Line 772: dbms_sql.close_cursor(X_cid);

768: p_loc_record.error_record.error_status := 'E';
769: p_loc_record.error_record.error_message := 'LOC_NOT_RCV_SITE';
770:
771: IF dbms_sql.is_open(X_cid) THEN
772: dbms_sql.close_cursor(X_cid);
773: END IF;
774:
775: RETURN;
776:

Line 790: IF dbms_sql.is_open(X_cid) THEN

786:
787: p_loc_record.error_record.error_status := 'E';
788: p_loc_record.error_record.error_message := 'LOC_NOT_IN_ORG';
789:
790: IF dbms_sql.is_open(X_cid) THEN
791: dbms_sql.close_cursor(X_cid);
792: END IF;
793:
794: RETURN;

Line 791: dbms_sql.close_cursor(X_cid);

787: p_loc_record.error_record.error_status := 'E';
788: p_loc_record.error_record.error_message := 'LOC_NOT_IN_ORG';
789:
790: IF dbms_sql.is_open(X_cid) THEN
791: dbms_sql.close_cursor(X_cid);
792: END IF;
793:
794: RETURN;
795:

Line 807: IF dbms_sql.is_open(X_cid) THEN

803: -- fix as part of 2393886
804: -- p_loc_record.error_record.error_status := 'E';
805: p_loc_record.error_record.error_message := 'LOC_ID';
806:
807: IF dbms_sql.is_open(X_cid) THEN
808: dbms_sql.close_cursor(X_cid);
809: END IF;
810: /* validate from hz_locations */
811: IF p_loc_record.location_code IS NULL and

Line 808: dbms_sql.close_cursor(X_cid);

804: -- p_loc_record.error_record.error_status := 'E';
805: p_loc_record.error_record.error_message := 'LOC_ID';
806:
807: IF dbms_sql.is_open(X_cid) THEN
808: dbms_sql.close_cursor(X_cid);
809: END IF;
810: /* validate from hz_locations */
811: IF p_loc_record.location_code IS NULL and
812: p_loc_record.location_id IS NOT NULL THEN

Line 822: IF dbms_sql.is_open(X_cid) THEN

818: ELSE
819:
820: p_loc_record.error_record.error_status := 'E';
821: p_loc_record.error_record.error_message := 'TOOMANYROWS';
822: IF dbms_sql.is_open(X_cid) THEN
823: dbms_sql.close_cursor(X_cid);
824: END IF;
825:
826: RETURN;

Line 823: dbms_sql.close_cursor(X_cid);

819:
820: p_loc_record.error_record.error_status := 'E';
821: p_loc_record.error_record.error_message := 'TOOMANYROWS';
822: IF dbms_sql.is_open(X_cid) THEN
823: dbms_sql.close_cursor(X_cid);
824: END IF;
825:
826: RETURN;
827:

Line 830: IF dbms_sql.is_open(X_cid) THEN

826: RETURN;
827:
828: END IF;
829:
830: IF dbms_sql.is_open(X_cid) THEN
831: dbms_sql.close_cursor(X_cid);
832: END IF;
833:
834: EXCEPTION

Line 831: dbms_sql.close_cursor(X_cid);

827:
828: END IF;
829:
830: IF dbms_sql.is_open(X_cid) THEN
831: dbms_sql.close_cursor(X_cid);
832: END IF;
833:
834: EXCEPTION
835:

Line 837: IF dbms_sql.is_open(X_cid) THEN

833:
834: EXCEPTION
835:
836: WHEN others THEN
837: IF dbms_sql.is_open(X_cid) THEN
838: dbms_sql.close_cursor(X_cid);
839: END IF;
840:
841: p_loc_record.error_record.error_status := 'U';

Line 838: dbms_sql.close_cursor(X_cid);

834: EXCEPTION
835:
836: WHEN others THEN
837: IF dbms_sql.is_open(X_cid) THEN
838: dbms_sql.close_cursor(X_cid);
839: END IF;
840:
841: p_loc_record.error_record.error_status := 'U';
842: p_loc_record.error_record.error_message := sqlerrm;

Line 880: X_cid := dbms_sql.open_cursor;

876: END IF;
877:
878: X_sql_str := substr(X_sql_str,1,length(X_sql_str)-3);
879:
880: X_cid := dbms_sql.open_cursor;
881:
882: dbms_sql.parse(X_cid, X_sql_str , dbms_sql.native);
883:
884: dbms_sql.define_column(X_cid,1,X_add_exp_date);

Line 882: dbms_sql.parse(X_cid, X_sql_str , dbms_sql.native);

878: X_sql_str := substr(X_sql_str,1,length(X_sql_str)-3);
879:
880: X_cid := dbms_sql.open_cursor;
881:
882: dbms_sql.parse(X_cid, X_sql_str , dbms_sql.native);
883:
884: dbms_sql.define_column(X_cid,1,X_add_exp_date);
885:
886:

Line 884: dbms_sql.define_column(X_cid,1,X_add_exp_date);

880: X_cid := dbms_sql.open_cursor;
881:
882: dbms_sql.parse(X_cid, X_sql_str , dbms_sql.native);
883:
884: dbms_sql.define_column(X_cid,1,X_add_exp_date);
885:
886:
887: IF NOT X_loc_id_null THEN
888:

Line 889: dbms_sql.bind_variable(X_cid,'v_loc_id',p_loc_record.location_id);

885:
886:
887: IF NOT X_loc_id_null THEN
888:
889: dbms_sql.bind_variable(X_cid,'v_loc_id',p_loc_record.location_id);
890:
891: END IF;
892:
893: X_rows_processed := dbms_sql.execute_and_fetch(X_cid);

Line 893: X_rows_processed := dbms_sql.execute_and_fetch(X_cid);

889: dbms_sql.bind_variable(X_cid,'v_loc_id',p_loc_record.location_id);
890:
891: END IF;
892:
893: X_rows_processed := dbms_sql.execute_and_fetch(X_cid);
894:
895:
896: IF X_rows_processed = 1 THEN
897:

Line 898: dbms_sql.column_value(X_cid,1,X_add_exp_date);

894:
895:
896: IF X_rows_processed = 1 THEN
897:
898: dbms_sql.column_value(X_cid,1,X_add_exp_date);
899:
900: /* Check whether specified location is active */
901:
902: IF nvl(X_add_exp_date,X_sysdate + 1) < X_sysdate THEN

Line 907: IF dbms_sql.is_open(X_cid) THEN

903:
904: p_loc_record.error_record.error_status := 'E';
905: p_loc_record.error_record.error_message := 'LOC_DISABLED';
906:
907: IF dbms_sql.is_open(X_cid) THEN
908: dbms_sql.close_cursor(X_cid);
909: END IF;
910:
911: RETURN;

Line 908: dbms_sql.close_cursor(X_cid);

904: p_loc_record.error_record.error_status := 'E';
905: p_loc_record.error_record.error_message := 'LOC_DISABLED';
906:
907: IF dbms_sql.is_open(X_cid) THEN
908: dbms_sql.close_cursor(X_cid);
909: END IF;
910:
911: RETURN;
912:

Line 923: IF dbms_sql.is_open(X_cid) THEN

919:
920: p_loc_record.error_record.error_status := 'E';
921: p_loc_record.error_record.error_message := 'LOC_ID';
922:
923: IF dbms_sql.is_open(X_cid) THEN
924: dbms_sql.close_cursor(X_cid);
925: END IF;
926:
927: RETURN;

Line 924: dbms_sql.close_cursor(X_cid);

920: p_loc_record.error_record.error_status := 'E';
921: p_loc_record.error_record.error_message := 'LOC_ID';
922:
923: IF dbms_sql.is_open(X_cid) THEN
924: dbms_sql.close_cursor(X_cid);
925: END IF;
926:
927: RETURN;
928:

Line 934: IF dbms_sql.is_open(X_cid) THEN

930:
931: p_loc_record.error_record.error_status := 'E';
932: p_loc_record.error_record.error_message := 'TOOMANYROWS';
933:
934: IF dbms_sql.is_open(X_cid) THEN
935: dbms_sql.close_cursor(X_cid);
936: END IF;
937:
938: RETURN;

Line 935: dbms_sql.close_cursor(X_cid);

931: p_loc_record.error_record.error_status := 'E';
932: p_loc_record.error_record.error_message := 'TOOMANYROWS';
933:
934: IF dbms_sql.is_open(X_cid) THEN
935: dbms_sql.close_cursor(X_cid);
936: END IF;
937:
938: RETURN;
939:

Line 942: IF dbms_sql.is_open(X_cid) THEN

938: RETURN;
939:
940: END IF;
941:
942: IF dbms_sql.is_open(X_cid) THEN
943: dbms_sql.close_cursor(X_cid);
944: END IF;
945:
946: EXCEPTION

Line 943: dbms_sql.close_cursor(X_cid);

939:
940: END IF;
941:
942: IF dbms_sql.is_open(X_cid) THEN
943: dbms_sql.close_cursor(X_cid);
944: END IF;
945:
946: EXCEPTION
947:

Line 950: IF dbms_sql.is_open(X_cid) THEN

946: EXCEPTION
947:
948: WHEN others THEN
949:
950: IF dbms_sql.is_open(X_cid) THEN
951: dbms_sql.close_cursor(X_cid);
952: END IF;
953:
954: p_loc_record.error_record.error_status := 'U';

Line 951: dbms_sql.close_cursor(X_cid);

947:
948: WHEN others THEN
949:
950: IF dbms_sql.is_open(X_cid) THEN
951: dbms_sql.close_cursor(X_cid);
952: END IF;
953:
954: p_loc_record.error_record.error_status := 'U';
955: p_loc_record.error_record.error_message := sqlerrm;