Re: Problema con Funcion

El Codigo es el siguiente:

CREATE FUNCTION sp_cliente_insertar (pnombre VARCHAR, pdireccion
VARCHAR, pcolonia VARCHAR, pcp CHAR, ptelefono VARCHAR, pfax VARCHAR,
prfc VARCHAR, pcurp VARCHAR, ptipo SMALLINT, pciudad VARCHAR) RETURNS
INTEGER AS
$body$
DECLARE
vciudad INTEGER;
max_id INTEGER;
BEGIN

SELECT INTO vciudad id_ciudad FROM ciudad WHERE nombre=pciudad;
IF vciudad<=0 or vciudad IS NULL THEN
RAISE EXCEPTION 'La Ciudad No Existe';
END IF;

SELECT INTO max_id MAX(id_cliente) FROM cliente;
IF max_id IS NULL or Max_id=0 THEN
max_id=1;
ELSE
max_id= max_id+1;
END IF;

INSERT INTO cliente (id_cliente, nombre, direccion, colonia, cp,
telefono, fax, rfc, curp, tipo, status, ciudad) VALUES (max_id, pnombre,
pdireccion, pcolonia, pcp, ptelefono, pfax, prfc, pcurp, ptipo, 1, vciudad);
RETURN 1;
END;
$body$
LANGUAGE 'plpgsql' STABLE CALLED ON NULL INPUT SECURITY INVOKER;