set stationerrorsmenu_items {
GuidoMenuItem edit_errors {
-label "Edit"
-icon "icons/16/edit_station_errors.png"
-command script scripts/EditStationErrors.tcl
}
GuidoMenuItem validate {
-label "Validate"
-icon "icons/16/station_errors_validate.png"
-command server "STATION ERRORS VALIDATE"
}
GuidoMenuItem report {
-label "Report"
-icon "icons/16/station_errors_report.png"
-command server "STATION ERRORS REPORT"
}
}
GuidoMenu stationerrorsmenu {
-label "Station errors"
-delayed_script $stationerrorsmenu_items
}
