42.1. pl/토토 베이 함수 및 인수

pl/토토 베이 언어에서 함수를 만들려면 표준을 사용하십시오PostgreSQL : 문서 : 9.3 : 젠 토토 생성구문 :

기능 생성funcName(Argument-Types) 반환return-type$$
    # pl/토토 베이 기능 본체
$$ 언어 pl토토 베이;

함수의 본문은 일반적인 토토 베이 코드입니다. 사실, PL/토토 베이 접착제 코드는 토토 베이 서브 루틴 안에 랩핑됩니다. pl/토토 베이 스칼라 컨텍스트에서 기능이 호출되므로 목록을 반환 할 수 없습니다. 비 스칼라 값 (배열, 레코드 및 세트)을 반환 할 수 있습니다. 아래에 설명 된대로 참조 반환.

pl/토토 베이도 호출 된 익명 코드 블록도 지원합니다.스포츠 토토 결과 : 문서 : 9.3 : do진술 :

do $$
    # pl/토토 베이 코드
$$ 언어 plperl;

익명 코드 블록은 아무런 논쟁도받지 않습니다 반환 할 수있는 가치는 폐기됩니다. 그렇지 않으면 그것은처럼 행동합니다 함수.

의 구문함수 만들기명령은 함수 본체를 문자열로 작성해야합니다. 끊임없는. 일반적으로 달러 인용문을 사용하는 것이 가장 편리합니다 (참조섹션 4.1.2.411812_11883e '', 두 배가되어야합니다 단일 견적 마크 (') 및 백 슬래시 (\) 함수 본문에 사용됩니다 (참조섹션 4.1.2.1).

인수와 결과는 다른 토토 베이에서와 같이 처리됩니다. 서브 루틴 : 논쟁이 통과되었습니다@_, 결과 값은로 반환됩니다.return또는 기능에서 마지막 표현식이 평가 된대로.

예를 들어, 두 개의 정수를 더 많이 반환하는 함수 값은 다음과 같이 정의 될 수 있습니다.

함수 생성 토토 베이_max (정수, 정수)는 정수를 $$로 반환합니다
    if ($ _ [0] $ _ [1]) return $ _ [0]; 
    반환 $ _ [1];
$$ 언어 plperl;

SQL NULL 값이 함수로 전달되면 인수 값 로 나타납니다."정의되지 않은"Perl. 그만큼 위의 기능 정의는 Null과 잘 어울리지 않습니다. 입력 (실제로는 제로 인 것처럼 작용합니다). 우리는 할 수 있습니다 추가하다엄격한함수 정의로 만들다PostgreSQL더 많은 일을하십시오 합리적 : 널 값이 전달되면 함수는 전혀 전화를 걸었지만 자동으로 널 결과를 반환합니다. 또는 함수의 정의되지 않은 입력을 확인할 수 있습니다. 몸. 예를 들어, 우리가 원한다고 가정 해토토 베이_max하나의 null과 하나의 unnull 인수가 있습니다 널 값이 아니라 unnull 인수를 반환하려면 :

함수 생성 토토 베이_max (정수, 정수) 정수를 $$로 반환합니다
    내 ($ x, $ y) = @_;
    if ($ x 정의되지 않음) 
        정의되지 않은 경우 undef를 반환하십시오. $ y;
        반품 $ y;

    정의되지 않은 경우 $ x를 반환합니다. $ y;
    $ x $ y 인 경우 $ x를 반환합니다.
    반품 $ y;
$$ 언어 plperl;

위와 같이, pl/토토 베이에서 sql null 값을 반환하려면 함수, 정의되지 않은 값을 반환하십시오. 이것은 할 수 있습니다 기능은 엄격하거나 없어.

참조가 아닌 함수 인수의 모든 것은 표준에있는 문자열PostgreSQL외부 텍스트 표현 관련 데이터 유형. 일반 숫자 또는 텍스트의 경우 유형, 토토 베이은 옳은 일을하고 프로그래머는 일반적으로 그것에 대해 걱정할 필요가 없습니다. 그러나 다른 경우에는 인수는 더 유용한 양식으로 변환해야합니다. 토토 베이에서. 예를 들어,decode_bytea함수를 사용하여 변환 할 수 있습니다 유형의 주장BYTEA이진.

마찬가지로 값이 다시 전달되었습니다postgresql외부 텍스트에 있어야합니다 표현 형식. 예를 들어,encode_bytea함수를 사용하여 탈출 할 수 있습니다 유형의 반환 값에 대한 이진 데이터BYTEA.

토토 베이이 반환 할 수 있습니다postgresql토토 베이 어레이에 대한 참조로 배열. 예는 다음과 같습니다.

함수 생성 또는 교체 반환 _array ()
텍스트 [] []를 $$로 반환합니다
    반환 [[ 'A "B', 'C, D'], [ 'e \\ f', 'g']];
$$ 언어 plperl;

returns_array (); 선택

토토 베이 PassesPostgreSQL배열 축복받은대로postgresql :: inserver :: array개체. 이 개체는 배열 참조 또는 문자열, 토토 베이 코드로 뒤로 호환 할 수 있습니다 을 위한PostgreSQL9.1 미만의 버전 달리기. 예를 들어:

함수 생성 또는 교체 concat_array_elements (text []) 텍스트를 $$로 반환합니다
    내 $ arg = shift;
    내 $ result = "";
    Undef if (! 정의 $ arg);

    # 배열 참조로
    for (@$ arg) 
        $ result. = $ _;

    #도 문자열로 작동합니다
    $ result. = $ arg;

    반환 $ 결과;
$$ 언어 plperl;

concat_array_elements를 선택하십시오 (배열 [ 'pl', '/', 'perl'];

복합 유형 인수는 다음과 같은 함수로 전달됩니다 해시에 대한 참조. 해시의 키는 속성 이름입니다 복합 유형의. 예는 다음과 같습니다.

테이블 직원 만들기 (
    이름 텍스트,
    기본 정수,
    보너스 정수
);

Function Empcomp (Employee)는 정수를 $$로 반환합니다
    내 ($ emp) = @_;
    return $ emp- basesalary + $ emp- 보너스;
$$ 언어 plperl;

직원의 이름, Empcomp (Employee.*)를 선택하십시오.

PL/토토 베이 함수는 동일한 접근법 : 필요한 해시에 대한 참조를 반환합니다. 속성. 예를 들어:

타입 타입 testrowperl 생성 (f1 정수, f2 텍스트, f3 텍스트);

function perl_row ()를 작성하거나 바꾸십시오
    return f2 = 'hello', f1 = 1, f3 = 'world';
$$ 언어 plperl;

perl_row ();에서 *를 선택하십시오.

신고 된 결과 데이터 유형의 모든 열이 아닌 해시에 존재하면 널 값으로 반환됩니다.

pl/토토 베이 함수는 또한 스칼라 세트를 반환 할 수 있습니다. 복합 유형. 일반적으로 한 번에 하나씩 행을 반환하고 싶을 것입니다. 둘 다 시작 시간을 가속화하고 대기하는 것을 막기 위해 전체 결과가 메모리를 설정합니다. 당신은로 이것을 할 수 있습니다.return_next아래 그림과 같이. 후에 주목하십시오 마지막return_next, 당신은 넣어야합니다 어느 하나return또는 (더 나은)return undef.

함수 생성 또는 교체 perl_set_int (int)
정수를 $$로 반환합니다
    foreach (0 .. $ _ [0]) 
        return_next ($ _);

    Undef를 반환하십시오.
$$ 언어 plperl;

perl_set_int (5)에서 *를 선택하십시오.

함수 생성 또는 교체 perl_set ()
setof testrowperl을 $$로 반환합니다
    return_next (f1 = 1, f2 = 'hello', f3 = 'world');
    return_next (f1 = 2, f2 = 'hello', f3 = 'postgresql');
    return_next (f1 = 3, f2 = 'hello', f3 = 'pl/토토 베이');
    Undef를 반환하십시오.
$$ 언어 plperl;

작은 결과 세트의 경우 배열에 대한 참조를 반환 할 수 있습니다. 여기에는 스칼라, 어레이에 대한 참조 또는 참조가 포함되어 있습니다 간단한 유형, 배열 유형 및 복합 유형의 해시. 각기. 다음은 전체를 반환하는 간단한 예입니다 배열 참조로 결과 세트 :

함수 생성 또는 교체 perl_set_int (int) 정수를 $$로 반환합니다.
    반환 [0 .. $ _ [0]];
$$ 언어 plperl;

perl_set_int (5)에서 *를 선택하십시오.

function perl_set ()을 setsof testrowperl로 $$로 반환합니다.
    반품 [
        f1 = 1, f2 = 'hello', f3 = 'world',
        f1 = 2, f2 = 'hello', f3 = 'postgresql',
        f1 = 3, f2 = 'hello', f3 = 'pl/토토 베이'
    ];
$$ 언어 plperl;

perl_set ();에서 *를 선택하십시오.

사용하려면엄격한Pragma 코드에는 몇 가지 옵션이 있습니다. 일시적인 글로벌 사용을 위해 당신을 사용하십시오 할 수 있다set pl토토 베이.use_stricttrue. 이것은 영향을 미칩니다 후속 편집pl/토토 베이함수이지만 이미 전류에서 컴파일되지 않은 함수는 없습니다 세션. 영구적 인 글로벌 사용을 위해 설정할 수 있습니다pl토토 베이.use_strict참으로postgresql.conf파일.

특정 기능에서 영구적으로 사용하려면 간단히 말할 수 있습니다.

Strict 사용;

기능 본문의 상단에 있습니다.

the기능Pragma도 이용 가능합니다use토토 베이이 버전 5.10.0 인 경우 또는 더 높은.