cardat / cardatdbtools

CAR's database tools
GNU General Public License v2.0
4 stars 0 forks source link

PGIS tools: points_to_geom function #5

Open ivanhanigan opened 3 years ago

ivanhanigan commented 3 years ago

something like this, but these are old codes that need updating e.g. st_ prefix

points_to_geom_query = function(schema,tablename,col_lat,col_long){
        table=sprintf("%s.%s",schema,tablename)

        cat(sprintf(
        "SELECT AddGeometryColumn('%s', '%s', 'the_geom', 4283, 'POINT', 2);\n",
        schema,tablename))

        cat(sprintf(
        "ALTER TABLE %s ADD CONSTRAINT geometry_valid_check CHECK (isvalid(the_geom));\n" ,
        table))

        cat(sprintf("
        UPDATE %s
        SET the_geom=GeomFromText(
                'POINT('||
                %s ||
                ' '||
                %s ||')'
                ,4283);\n",table,col_long,col_lat))