다음은오라클 토토 꽁 머니/SQL기능:

함수 생성 또는 교체 cs_fmt_browser_version(v_name varchar2,
                                                  v_버전 varchar2)
varchar2 IS 반환
시작
    v_version이 NULL인 경우
        RETURN v_name;
    종료하면;
    RETURN v_name || '/' || v_version;
끝;
/
오류 표시;

이 기능을 살펴보고 다음과 비교하여 차이점을 살펴보겠습니다.토토 꽁 머니/pgSQL:

이 기능을 다음으로 이식하면 다음과 같습니다.PostgreSQL:

함수 생성 또는 교체 cs_fmt_browser_version(v_name varchar,
                                                  v_version varchar)
varchar를 $$로 반환합니다.
시작
    v_version이 NULL인 경우
        RETURN v_name;
    종료하면;
    RETURN v_name || '/' || v_version;
끝;
$$ 언어 plpgsql;

다음 절차는 a에서 행을 가져옵니다.선택문을 작성하고 그 결과를 사용하여 큰 함수를 빌드합니다.IF문, 효율성을 위해.

이것은 Oracle 버전입니다:

프로시저 생성 또는 교체 cs_update_referrer_type_proc IS
    커서 Referrer_keys IS
        SELECT * cs_referrer_keys에서
        ORDER BY try_order;
    func_cmd VARCHAR(4000);
시작
    func_cmd := '함수 생성 또는 교체 cs_find_referrer_type(v_host IN VARCHAR2,
                 v_domain IN VARCHAR2, v_url IN VARCHAR2) RETURN VARCHAR2 IS BEGIN';

    FOR Referrer_key IN Referrer_keys LOOP
        func_cmd := func_cmd ||
          ' IF v_' || Referrer_key.kind
          || '좋아요''' || Referrer_key.key_string
          || ''' 그런 다음 '''를 반환합니다 || Referrer_key.referrer_type
          || '''; 종료 IF;';
    엔드 루프;

    func_cmd := func_cmd || ' NULL을 반환합니다. 끝;';

    즉시 실행 func_cmd;
끝;
/
오류 표시;

이 기능은 다음과 같이 종료됩니다.PostgreSQL:

프로시저 cs_update_referrer_type_proc()를 $func$로 생성 또는 교체
선언
    Referrer_keys 커서는 IS입니다.
        SELECT * cs_referrer_keys에서
        ORDER BY try_order;
    func_body 텍스트;
    func_cmd 텍스트;
시작
    func_body := '시작';

    FOR Referrer_key IN Referrer_keys LOOP
        func_body := func_body ||
          ' IF v_' || Referrer_key.kind
          || '좋아요' || quote_literal(referrer_key.key_string)
          || ' 그런 다음 반환 ' || quote_literal(referrer_key.referrer_type)
          || '; END IF;' ;
    엔드 루프;

    func_body := func_body || ' NULL을 반환합니다. 종료;';

    func_cmd :=
      '함수 생성 또는 교체 cs_find_referrer_type(v_host varchar,
                                                        v_domain varchar,
                                                        v_url varchar)
        varchar AS '를 반환합니다.
      || quote_literal(func_body)
      || ' 언어 plpgsql;' ;

    실행 func_cmd;
끝;
$func$ 언어 plpgsql;

함수 본문이 어떻게 별도로 구축되고 전달되는지 주목quote_literal따옴표 안에 있는 따옴표를 두 배로 늘립니다. 이 기술은 새 함수를 정의하기 위해 달러 인용을 안전하게 사용할 수 없기 때문에 필요합니다. 우리는 어떤 문자열이referrer_key.key_string필드. (여기서는 다음과 같이 가정합니다.referrer_key.kind항상 신뢰할 수 있음호스트, 도메인또는url하지만referrer_key.key_string무엇이든 가능하며 특히 달러 기호가 포함될 수 있습니다.) 이 함수는 실제로 Oracle 원본보다 향상된 기능입니다. 왜냐하면 다음과 같은 경우 깨진 코드를 생성하지 않기 때문입니다.referrer_key.key_string또는referrer_key.referrer_type따옴표가 포함되어 있습니다.

다음오라클토토 꽁 머니/SQL 프로시저는 URL을 구문 분석하고 여러 요소(호스트, 경로 및 쿼리)를 반환하는 데 사용됩니다.

이것은 Oracle 버전입니다:

프로시저 생성 또는 교체 cs_parse_url(
    VARCHAR2의 v_url,
    v_host OUT VARCHAR2, -- 이것은 다시 전달됩니다.
    v_path OUT VARCHAR2, -- 이것도 마찬가지입니다.
    v_query OUT VARCHAR2) -- 그리고 이건
IS
    a_pos1 INTEGER;
    a_pos2 INTEGER;
시작
    v_host := NULL;
    v_path := NULL;
    v_query := NULL;
    a_pos1 := instr(v_url, '//');

    만약 a_pos1 = 0이면
        반환;
    종료하면;
    a_pos2 := instr(v_url, '/', a_pos1 + 2);
    만약 a_pos2 = 0이면
        v_host := substr(v_url, a_pos1 + 2);
        v_path := '/';
        반품;
    종료하면;

    v_host := substr(v_url, a_pos1 + 2, a_pos2 - a_pos1 - 2);
    a_pos1 := instr(v_url, '?', a_pos2 + 1);

    만약 a_pos1 = 0이면
        v_path := substr(v_url, a_pos2);
        반품;
    종료하면;

    v_path := substr(v_url, a_pos2, a_pos1 - a_pos2);
    v_query := substr(v_url, a_pos1 + 1);
끝;
/
오류 표시;

다음에 가능한 번역이 있습니다.토토 꽁 머니/pgSQL:

함수 생성 또는 교체 cs_parse_url(
    v_url IN VARCHAR,
    v_host OUT VARCHAR, -- 다시 전달됩니다.
    v_path OUT VARCHAR, -- 이것도 마찬가지입니다.
    v_query OUT VARCHAR) -- 그리고 이건
AS $$
선언
    a_pos1 INTEGER;
    a_pos2 INTEGER;
시작
    v_host := NULL;
    v_path := NULL;
    v_query := NULL;
    a_pos1 := instr(v_url, '//');

    만약 a_pos1 = 0이면
        반환;
    종료하면;
    a_pos2 := instr(v_url, '/', a_pos1 + 2);
    만약 a_pos2 = 0이면
        v_host := substr(v_url, a_pos1 + 2);
        v_path := '/';
        반품;
    종료하면;

    v_host := substr(v_url, a_pos1 + 2, a_pos2 - a_pos1 - 2);
    a_pos1 := instr(v_url, '?', a_pos2 + 1);

    만약 a_pos1 = 0이면
        v_path := substr(v_url, a_pos2);
        반품;
    종료하면;

    v_path := substr(v_url, a_pos2, a_pos1 - a_pos2);
    v_query := substr(v_url, a_pos1 + 1);
끝;
$$ 언어 plpgsql;

이 함수는 다음과 같이 사용될 수 있습니다:

SELECT * FROM cs_parse_url('http://foobar.com/query.cgi?baz');

오라클 버전:

프로시저 생성 또는 교체 cs_create_job(v_job_id IN INTEGER) IS
    a_running_job_count INTEGER;
시작
    독점 모드에서 LOCK TABLE cs_jobs;

    SELECT 개수(*) INTO a_running_job_count FROM cs_jobs WHERE end_stamp가 NULL입니다.

    IF a_running_job_count  0 그러면
        커밋; -- 무료 잠금
        raise_application_error(-20000,
                 '새 작업을 생성할 수 없습니다. 작업이 현재 실행 중입니다.');
    종료하면;

    cs_active_job에서 삭제;
    cs_active_job(job_id) 값(v_job_id)에 삽입;

    시작
        INSERT INTO cs_jobs(job_id, start_stamp) VALUES(v_job_id, now());
    예외
        dup_val_on_index가 NULL일 때; -- 이미 존재하더라도 걱정하지 마세요.
    끝;
    저지르다;
끝;
/
오류 표시

이것이 우리가 이 절차를 다음으로 포팅할 수 있는 방법입니다.토토 꽁 머니/pgSQL:

프로시저 cs_create_job(v_job_id 정수)을 $$로 생성 또는 교체
선언
    a_running_job_count 정수;
시작
    독점 모드에서 LOCK TABLE cs_jobs;

    SELECT 개수(*) INTO a_running_job_count FROM cs_jobs WHERE end_stamp가 NULL입니다.

    IF a_running_job_count  0 그러면
        커밋; -- 무료 잠금
        RAISE EXCEPTION '새 작업을 생성할 수 없습니다. 작업이 현재 실행 중입니다.'; --(1)
    종료하면;

    cs_active_job에서 삭제;
    cs_active_job(job_id) 값(v_job_id)에 삽입;

    시작
        INSERT INTO cs_jobs(job_id, start_stamp) VALUES(v_job_id, now());
    예외
        고유한 위반이 있을 때 --(2)
            -- 이미 존재하더라도 걱정하지 마세요.
    끝;
    저지르다;
끝;
$$ 언어 plpgsql;