![]() |
|
|
CREATE OR REPLACE FUNCTION validate_ccnumber(VARCHAR)
RETURNS BOOLEAN AS '
DECLARE
mynumber ALIAS FOR $1;
BEGIN
IF length(mynumber) != 16 THEN
RAISE EXCEPTION \'Credit card numbers must be 16 digits long\';
END IF;
IF cc_checksum(mynumber) THEN
RAISE EXCEPTION \'Invalid credit card number: checksum failed\n';
END IF;
RETURN TRUE;
END;
' LANGUAGE plpgsql;
| | |
|---|