| PostgreSQL 8.3.3문서 | ||||
|---|---|---|---|---|
| Prev | Fast Backward | Chapter 38. PL/Tcl - Tcl 수속형 언어 | Fast Forward | Next |
PL/Tcl언어로 함수를 작성하려면 , 이하의 표준적인 CREATE FUNCTION 구문을 사용해 주세요.
CREATE FUNCTION funcname ( argument-types ) RETURNS return-type AS $$ # PL/Tcl 함수 본체 $$ LANGUAGE pltcl;
PL/TclU에서도, 언어에 pltclu를 지정해야 하는 점 이외는 같습니다.
함수 본체는, 단순한 작은 Tcl 스크립트입니다. 함수가 불려 갔을 때, 인자의 값은 Tcl 스크립트에 $1 ... $ n 라고 하는 변수로 건네받습니다. 결과는 통상 대로 return문을 사용해 Tcl의 코드로부터 돌려주어집니다.
예를 들면, 2개의 정수의 더 큰 편을 돌려주는 함수는 이하와 같이 정의할 수 있습니다.
CREATE FUNCTION tcl_max(integer, integer) RETURNS integer AS $$
if {$1 > $2} {return $1}
return $2
$$ LANGUAGE pltcl STRICT;
STRICT구에 주의해 주세요. 이것에 의해 프로그래머는, 입력에 NULL값이 주어졌을 경우를 검토하는 것을 생략할 수가 있습니다. NULL값을 건네받았을 경우, 함수는 전혀 불려 가지 않고 단지 NULL이라고 하는 결과가 자동적으로 돌려주어집니다.
엄밀하지 않은 함수에서는 인자의 실제의 값이 NULL인 경우, 대응하는 $
n
변수는 공문자열로 설정됩니다.
어느 인자가 NULL인가 아닌가를 검출하기 위해서는, argisnull함수를 사용해 주세요.
예를 들면, 인자의 다른 한쪽이 NULL값이고 다른 한쪽이 비NULL값일 경우,
NULL값 아닌 비NULL의 인자의 편을 돌려주는 tcl_max를 생각하면 이하와 같이 됩니다.
CREATE FUNCTION tcl_max(integer, integer) RETURNS integer AS $$
if {[argisnull 1]} {
if {[argisnull 2]} { return_null }
return $2
}
if {[argisnull 2]} { return $1 }
if {$1 > $2} {return $1}
return $2
$$ LANGUAGE pltcl;
위에서 가리킨 대로, NULL값을 PL/Tcl 함수로부터 돌려주기 위해서는 return_null를 실행해 주세요. 이것은, 함수가 엄밀한지에 관계없이, 실행할 수가 있습니다.
복합형의 인자는, Tcl 배열로서 함수에게 건네집니다. 배열의 요소명은 복합형의 속성명입니다. 건네받은 행의 속성이 NULL값인 경우, 그 속성은 배열내에는 나타나지 않습니다. 이하에 예를 나타냅니다.
CREATE TABLE employee (
name text,
salary integer,
age integer
);
CREATE FUNCTION overpaid(employee) RETURNS boolean AS $$
if {200000.0 < $1(salary)} {
return "t"
}
if {$1(age) < 30 && 100000.0 < $1(salary)} {
return "t"
}
return "f"
$$ LANGUAGE pltcl;
현재, 복합형의 반환값을 돌려주는 기능이나 집합을 돌려주는 기능은 지원되고 있지 않습니다.
현재 PL/Tcl는 도메인형을 완전하게 지원하고 있습니다. 도메인을 그 배후에 있는 스칼라형과 같게 취급합니다. 이것은, 도메인에 관련하는 제약이 시행되지 않는다는 것을 의미하고 있습니다. 이것은 함수의 인자에서는 문제 없습니다만, PL/Tcl함수를 도메인형으로 돌려주도록 선언했을 경우는 위험합니다.