43.6. PL/Perl 토토 베이#

PL/Perl을 사용하여 토토 베이 기능을 작성할 수 있습니다. 토토 베이 함수에서 해시 참조$_TD현재 트리거 이벤트에 대한 정보가 포함되어 있습니다.$_TD은 토토 베이를 호출할 때마다 별도의 로컬 값을 가져오는 전역 변수입니다. 의 필드$_TD해시 참조는 다음과 같습니다.

$_TD-신규foo

신규열의 값foo

$_TD-oldfoo

오래된열의 값foo

$_TD-이름

호출되는 토토 베이의 이름

$_TD-이벤트

토토 베이 이벤트:삽입, 업데이트, 삭제, 잘라내기또는알 수 없음

$_TD-언제

토토 베이가 호출되었을 때:이전, 이후, 대신또는알 수 없음

$_TD-레벨

토토 베이 레벨:ROW, 진술문, 또는알 수 없음

$_TD-렐리드

토토 베이가 실행된 테이블의 OID

$_TD-테이블_이름

토토 베이가 실행된 테이블의 이름

$_TD-relname

토토 베이가 실행된 테이블의 이름. 이는 더 이상 사용되지 않으며 향후 릴리스에서 제거될 수 있습니다. 대신 $_TD-table_name을(를) 사용하세요.

$_TD-table_schema

토토 베이가 실행된 테이블이 있는 스키마의 이름

$_TD-argc

토토 베이 함수의 인수 수

@$_TD-args

트리거 기능의 인수. 다음과 같은 경우 존재하지 않습니다.$_TD-argc0입니다.

행 수준 트리거는 다음 중 하나를 반환할 수 있습니다:

반환;

작업 실행

"건너뛰기"

작업을 실행하지 마세요

"수정"

다음을 나타냅니다.신규행이 토토 베이 기능에 의해 수정되었습니다.

다음은 위의 내용 중 일부를 보여주는 트리거 기능의 예입니다.

테이블 생성 테스트(
    나는 int,
    v varchar
);

생성 또는 교체 함수 valid_id()는 $$로 트리거를 반환합니다.
    if (($_TD-newi = 100) || ($_TD-newi <= 0)) 
        "건너뛰기"를 반환합니다.    # INSERT/UPDATE 명령을 건너뜁니다.
     elsif ($_TD-newv ne "불멸") 
        $_TD-newv .= "(트리거에 의해 수정됨)";
        "수정"을 반환합니다.  # 행을 수정하고 INSERT/UPDATE 명령을 실행합니다.
     그렇지 않으면 
        반환;           # INSERT/UPDATE 명령을 실행합니다.

수정사항 제출

문서에 올바르지 않은 내용이 있으면 일치하지 않습니다. 특정 기능에 대한 경험이 있거나 추가 설명이 필요한 경우 이용해주세요이 양식문서 문제를 보고합니다.