##
# extrator de gis_obj_ids
##
_global get_gis_obj_ids <<
@ get_gis_obj_ids(path_name, sql)
_local out << external_text_output_stream.new(path_name)
_local rec << personal_select(sql)
_for i _over rec.elements()
_loop
_if i.gis_obj_id _isnt _unset
_then
out.newline()
out.write_string("gis_obj_id : ", i.gis_obj_id)
_endif
_endloop
_protection
out.close()
_endprotect
_endproc
$
Nenhum comentário :
Postar um comentário