------------插入直线塔--------------------------------------------------
//
//
//改xlmc='包东甲线'和CD_XLMC.(线路代码在表cd_xlmcdm中找)
//
//
------------初始化杆塔类型。
set serveroutput on size 1000000;
alter table b$common_n disable all triggers;
alter table b$sd_gt_n disable all triggers;
alter table b$sd_gt_pt disable all triggers;
alter table b$sd_gt_pt_sdogeom disable all triggers;
alter table b$sd_gt_lb disable all triggers;
alter table b$sd_gt_lb_sdogeom disable all triggers;
create or replace procedure dz_gt_Create_sdgt IS
v_lable_sdo_x1 FLOAT(126);
v_lable_sdo_y1 FLOAT(126);
v_sdo_x1 FLOAT(126);
v_sdo_y1 FLOAT(126);
v_g3e_fno number(5);
v_g3e_fid number(10);
v_g3e_cid number(5);
v_g3e_id number(10);
v_g3e_pt_id number(10);
v_g3e_sdogeom_id nu