set sdbeditmenu_items {
GuidoMenuItem view_table_record {
-label "View table"
-icon "icons/16/view_table_row.png"
-command script forms/s_cn_DatabaseTableView.tcl false
}
GuidoMenuItem view_table_row {
-label "View table constrained"
-icon "icons/16/view_table_row.png"
-command server "VIEW TABLE ROW"
}
GuidoSeparator sep1 {
}
GuidoMenuItem modify_table_record {
-label "Edit table"
-command script forms/s_cn_DatabaseTableView.tcl true
}
GuidoMenuItem edit_table_row {
-label "Edit table constrained"
-command server "EDIT TABLE ROW"
}
GuidoSeparator sep2 {
}
GuidoMenuItem insert_table_record {
-label "Insert records"
-command server "INSERT TABLE ROW"
}
GuidoMenuItem delete_table_record {
-label "Delete records"
-command server "DELETE TABLE ROW"
}
GuidoSeparator sep3 {
}
GuidoMenuItem editxstyles {
-label "Survey display styles"
-icon "icons/16/edit_drillhole_styles.png"
-command script forms/editstyles.tcl "surveys"
}
GuidoMenuItem select_stations_to_display {
-label "Display stations from database"
-icon "icons/16/draw_survey_stations.png"
-command server "DRAW SURVEY STATIONS"
}
GuidoMenuItem redisplay_stations {
-label "Redisplay stations"
-icon "icons/16/redraw_survey_stations.png"
-command server "REDRAW SURVEY STATIONS"
}
GuidoMenuItem erase_stations {
-label "Hide stations"
-icon "icons/16/erase_survey_stations.png"
-command server "ERASE SURVEY STATIONS"
}
GuidoCheckBoxMenuItem station_selectability {
-label "Station selectability"
-status_item "station selectability"
-icon "icons/16/toggle_survey_station_selectability.png"
-command server "TOGGLE SURVEY STATION SELECTABILITY"
-command server "TOGGLE SURVEY STATION SELECTABILITY"
}
GuidoSeparator sep4 {
}
GuidoMenuItem maths_field {
-label "Field maths"
-icon "icons/16/field_maths.png"
-command server "FIELD MATHS"
}
}
GuidoMenu sdbeditmenu {
-label "Stations"
-delayed_script $sdbeditmenu_items
}
