토토 사이트 pl/perl

다음 표가 있다고 가정합니다.

테이블 직원 생성 (
    이름 텍스트,
    Basesalary int4,
    보너스 int4);

총 보상 (기본 + 보너스)을 얻기 위해 우리 함수를 다음과 같이 정의 할 수 있습니다.

함수 생성 TotalComp (int4, int4)는 int4를 반환합니다
    as 'return $ _ [0] + $ _ [1]'
    언어 'plperl';

인수는의 함수로 전달됩니다.@_예상되는대로. 또한 함수 생성 SQL에 대한 인용 규칙에 따라 확장 인용 함수 (qq [], q [], qw [])를 토토 사이트하는 자신. 더 자주 당신이 익숙한 것입니다.

이제 우리는 다음과 같이 우리의 기능을 사용할 수 있습니다 :

직원의 이름, Totalcomp (Basesalary, 보너스) 선택

그러나, 우리는 또한 전체 튜플을 우리의 기능으로 전달할 수 있습니다 :

함수 생성 empcomp (Employee)는 int4를 반환합니다
    '내 $ emp = shift;
        return $ emp-  'basesalary' + $ emp-  'bonus'; '
    언어 'plperl';

튜플은 해시에 대한 참조로 전달됩니다. 키는 튜플의 필드 이름. 값은 값입니다 튜플의 해당 필드.

새로운 함수empcomp토토 사이트할 수 있습니다 좋다:

직원의 이름, empcomp (직원) 선택 선택;