--创建删除所有表的存储过程
CREATE OR REPLACE FUNCTION delAllTable()
RETURNS void
AS
$BODY$
DECLARE
tmp VARCHAR(512);
DECLARE names CURSOR FOR
select tablename from pg_tables where tableowner='wxdch';
BEGIN
FOR stmt IN names LOOP
tmp := 'DROP TABLE '|| quote_ident(stmt.tablename) || ' CASCADE;';
RAISE NOTICE 'notice: %', tmp;
EXECUTE 'DROP TABLE '|| quote_ident(stmt.tablename) || ' CASCADE;';
END LOOP;
RAISE NOTICE 'finished .....';
END;
$BODY$ LANGUAGE 'plpgsql' VOLATILE;
--执行存储过程
select * from delAllTable() as temp;

公司主营业务：网站设计、成都网站建设、移动网站开发等业务。帮助企业客户真正实现互联网宣传，提高企业的竞争能力。创新互联建站是一支青春激扬、勤奋敬业、活力青春激扬、勤奋敬业、活力澎湃、和谐高效的团队。公司秉承以“开放、自由、严谨、自律”为核心的企业文化，感谢他们对我们的高要求，感谢他们从不同领域给我们带来的挑战，让我们激情的团队有机会用头脑与智慧不断的给客户带来惊喜。创新互联建站推出临翔免费做网站回馈大家。

--创建删除所有序列号的存储过程
CREATE OR REPLACE FUNCTION delAllSeq()
RETURNS void AS
$BODY$
DECLARE
tmp VARCHAR(512);
DECLARE names CURSOR FOR
select * from pg_class where relowner=(select usesysid from pg_user where usename='wxdch') and relkind='S' ;
BEGIN
FOR stmt IN names LOOP
tmp := 'DROP sequence '|| quote_ident(stmt.relname) || ' CASCADE;';
RAISE NOTICE 'notice: %', tmp;
EXECUTE 'DROP sequence '|| quote_ident(stmt.relname) || ' CASCADE;';
END LOOP;
RAISE NOTICE 'finished .....';
END;
$BODY$
LANGUAGE 'plpgsql' VOLATILE
COST 100;
ALTER FUNCTION delAllSeq() OWNER TO postgres;
--执行存储过程

select * from delAllSeq() as temp;

网页标题：删除数据库所有表序列号
文章位置：http://kswjz.com/article/pghjei.html