Đây là kèo chấp bóng đá hôm nayOracle PL/SQLchức kèo chấp bóng đá hôm nay:

Tạo hoặc thay thế chức kèo chấp bóng đá hôm nay CS_FMT_BROWSER_VESTER (V_NAME VARCHAR2,
                                                  v_version varchar2)
Trả về Varchar2 là
BẮT ĐẦU
    Nếu v_version là null thì
        Trả lại v_name;
    Kết thúc nếu;
    Trả lại v_name || '/' || v_version;
KẾT THÚC;
/
Hiển thị lỗi;

Hãy xem qua chức kèo chấp bóng đá hôm nay này và xem sự khác biệt so vớiPL/PGSQL:

Đây là cách chức kèo chấp bóng đá hôm nay này trông như thế nào khi được chuyển sangPostgreSQL:

19174_19470

Quy trình sau lấy hàng từ AChọnCâu lệnh và xây dựng kèo chấp bóng đá hôm nay hàm lớn với kết quả trongnếuCâu lệnh, vì lợi ích của hiệu quả.

Đây là phiên bản Oracle:

Tạo hoặc thay thế thủ tục CS_UPDATE_REFERRER_TYPE_PROC IS
    Giới thiệu con trỏ_Keys là
        Chọn * Từ CS_Referrer_Keys
        Đặt hàng bởi try_order;
    func_cmd varchar (4000);
BẮT ĐẦU
    func_cmd: = 'tạo hoặc thay thế chức kèo chấp bóng đá hôm nay cs_find_referrer_type (v_host trong varchar2,
                 v_domain trong varchar2, v_url trong varchar2) return varchar2 bắt đầu ';

    Cho người giới thiệu_key trong giới thiệu_keys vòng lặp
        func_cmd: = func_cmd ||
          'Nếu v_' || giới thiệu_key.kind
          || 'Thích' '' || giới thiệu_key.key_string
          || '' 'Sau đó trả về' '' || giới thiệu_key.referrer_type
          || '' '; Kết thúc nếu; ';
    Kết thúc vòng lặp;

    func_cmd: = func_cmd || 'Trả lại null; KẾT THÚC;';

    Thực hiện func_cmd ngay lập tức;
KẾT THÚC;
/
Hiển thị lỗi;

Đây là cách chức kèo chấp bóng đá hôm nay này kết thúc trongPostgreSQL:

Tạo hoặc thay thế thủ tục CS_UPDATE_REFERRER_TYPE_PROC () như $ func $
TUYÊN BỐ
    Giới thiệu_Keys con trỏ là
        Chọn * Từ CS_Referrer_Keys
        Đặt hàng bởi try_order;
    văn bản func_body;
    văn bản func_cmd;
BẮT ĐẦU
    func_body: = 'bắt đầu';

    Cho người giới thiệu_key trong giới thiệu_keys vòng lặp
        func_body: = func_body ||
          'Nếu v_' || giới thiệu_key.kind
          || 'Thích' || QUOTE_LITHER (giới thiệu_key.key_string)
          || 'Sau đó trả lại' || QUOTE_LITHER (giới thiệu_key.referrer_type)
          || '; Kết thúc nếu; ' ;
    Kết thúc vòng lặp;

    func_body: = func_body || 'Trả lại null; KẾT THÚC;';

    func_cmd: =
      'Tạo hoặc thay thế chức kèo chấp bóng đá hôm nay cs_find_referrer_type (v_host varchar,
                                                        v_domain varchar,
                                                        v_url varchar)
        Trả về varchar là '
      || quote_literal (func_body)
      || 'Ngôn ngữ plpgsql;' ;

    Thực thi func_cmd;
KẾT THÚC;
$ func $ ngôn ngữ plpgsql;

Lưu ý cách cơ thể của chức kèo chấp bóng đá hôm nay được xây dựng riêng biệt và được truyền quaquote_literalĐể tăng gấp đôi bất kỳ dấu nào trong đó. Kỹ thuật này là cần thiết bởi vì chúng tôi không thể sử dụng báo giá đô la một cách an toàn để xác định chức kèo chấp bóng đá hôm nay mới: Chúng tôi không biết chắc chắn những chuỗi nào sẽ được nội suy từgiới thiệu_key.key_stringTrường. (Chúng tôi đang giả sử ở đây rằnggiới thiệu_key.kindcó thể được tin tưởng để luôn luônmáy chủ, DOMAINhoặcurl, nhưnggiới thiệu_key.key_string22969_23148giới thiệu_key.key_stringhoặc23232_23260chứa dấu ngoặc kép.

sau đâyOracleQuy trình PL/SQL được sử dụng để phân tích URL và trả về kèo chấp bóng đá hôm nay số phần tử (máy chủ, đường dẫn và truy vấn).

Đây là phiên bản Oracle:

Tạo hoặc thay thế thủ tục CS_PARSE_URL (
    v_url trong varchar2,
    v_host out varchar2, - điều này sẽ được truyền lại
    v_path out varchar2, - cái này cũng vậy
    v_query out varchar2) - và cái này
LÀ
    Số nguyên A_POS1;
    Số nguyên A_POS2;
BẮT ĐẦU
    v_host: = null;
    v_path: = null;
    V_Query: = null;
    a_pos1: = uster (v_url, '//');

    Nếu a_pos1 = 0 thì
        TRỞ LẠI;
    Kết thúc nếu;
    a_pos2: = uster (v_url, '/', a_pos1 + 2);
    Nếu a_pos2 = 0 thì
        V_host: = Subrtr (V_URL, A_POS1 + 2);
        v_path: = '/';
        TRỞ LẠI;
    Kết thúc nếu;

    V_host: = Subrtr (V_URL, A_POS1 + 2, A_POS2 - A_POS1 - 2);
    a_pos1: = uster (v_url, '?', a_pos2 + 1);

    Nếu a_pos1 = 0 thì
        v_path: = Subrtr (V_URL, A_POS2);
        TRỞ LẠI;
    Kết thúc nếu;

    V_Path: = Subrtr (V_URL, A_POS2, A_POS1 - A_POS2);
    V_Query: = Subrtr (V_URL, A_POS1 + 1);
KẾT THÚC;
/
Hiển thị lỗi;

Đây là bản dịch có thể thànhPL/PGSQL:

Tạo hoặc thay thế chức kèo chấp bóng đá hôm nay cs_parse_url (
    v_url trong varchar,
    v_host out varchar, - điều này sẽ được truyền lại
    v_path out varchar, - cái này cũng vậy
    v_query out varchar) - và cái này
Như $$
TUYÊN BỐ
    Số nguyên A_POS1;
    Số nguyên A_POS2;
BẮT ĐẦU
    v_host: = null;
    v_path: = null;
    V_Query: = null;
    a_pos1: = uster (v_url, '//');

    Nếu a_pos1 = 0 thì
        TRỞ LẠI;
    Kết thúc nếu;
    a_pos2: = uster (v_url, '/', a_pos1 + 2);
    Nếu a_pos2 = 0 thì
        V_host: = Subrtr (V_URL, A_POS1 + 2);
        v_path: = '/';
        TRỞ LẠI;
    Kết thúc nếu;

    V_host: = Subrtr (V_URL, A_POS1 + 2, A_POS2 - A_POS1 - 2);
    a_pos1: = uster (v_url, '?', a_pos2 + 1);

    Nếu a_pos1 = 0 thì
        v_path: = Subrtr (V_URL, A_POS2);
        TRỞ LẠI;
    Kết thúc nếu;

    V_Path: = Subrtr (V_URL, A_POS2, A_POS1 - A_POS2);
    V_Query: = Subrtr (V_URL, A_POS1 + 1);
KẾT THÚC;
$$ ngôn ngữ plpgsql;

Hàm này có thể được sử dụng như thế này:

Chọn * từ cs_parse_url ('http://foobar.com/query.cgi?baz');

Phiên bản Oracle:

27438_28177

Đây là cách chúng tôi có thể chuyển thủ tục này đếnPL/PGSQL:

Tạo hoặc thay thế thủ tục CS_CREATE_JOB (V_JOB_ID Integer) AS $$
TUYÊN BỐ
    A_Rasty_Job_Count Integer;
BẮT ĐẦU
    Bảng khóa CS_JOBS ở chế độ độc quyền;

    Chọn Đếm (*) vào a_rasty_job_count từ cs_jobs trong đó end_stamp là null;

    Nếu a_rasty_job_count 0 thì
        LÀM; - Khóa miễn phí
        Tăng ngoại lệ 'Không thể tạo kèo chấp bóng đá hôm nay công việc mới: kèo chấp bóng đá hôm nay công việc hiện đang chạy'; -(1)
    Kết thúc nếu;

    Xóa khỏi CS_Active_Job;
    Chèn vào các giá trị CS_Active_Job (Job_id) (v_job_id);

    BẮT ĐẦU
        Chèn vào các giá trị CS_JOBS (JOB_ID, start_stamp) (v_job_id, now ());
    NGOẠI LỆ
        Khi độc đáo_violation thì -(2)
            - Đừng lo lắng nếu nó đã tồn tại
    KẾT THÚC;
    LÀM;
KẾT THÚC;
$$ ngôn ngữ plpgsql;