pg postgres 存储过程

CREATE OR REPLACE FUNCTION gx_cal_area_cell() RETURNS bigint AS
$BODY$
DECLARE
  rd RECORD;
  i integer  := 1;
  num integer  := 1;
  sql "varchar";
  seq_sql varchar;
BEGIN
  sql := 'create table tmp1 as select scene_name,create_time,scene_area as geo from gis_polygondata;';
  EXECUTE sql;
  sql := 'select count(*) as num from tmp1;';

  FOR rd IN EXECUTE sql LOOP
    num := rd.num;
  END LOOP;

  while i < num loop
    seq_sql :='insert into area_cell(cgi,enb_id,longitude,latitude,cell_type,area_name,insert_time,isuse,isdelete,geom) select a.cgi,a.enb_id,a.longitude,a.latitude,a.cell_type,b.scene_name  area_name, current_date insert_time ,''1'' isuse ,''0'' isdelete,b.geo geom from (select cgi,enb_id,longitude,latitude,cell_type from cmv_gis_ltecell_gx where ST_Intersects(geom,(select geo from tmp1 limit 1 offset '||i||'))) a,(select scene_name,geo from tmp1 limit 1 offset '||i||') b;';
    --RAISE NOTICE 'value %',seq_sql;
    EXECUTE seq_sql;
    i := i+1;
  end loop;
  sql :='drop table tmp1;';
  EXECUTE sql;
  RETURN 0;
END;

$BODY$
LANGUAGE plpgsql VOLATILE NOT LEAKPROOF
COST 100;