GuidoScript scripts/dtmutilities.tcl
global file_location
global file_id
global object_id_top
global obj_name_top
global trisolation_id_top
global tri_name_top
global length_file_location
global length_file_id
global object_id_bot
global obj_name_bot
global trisolation_id_bot
global tri_name_bot
global object_id_lay_top
global obj_name_lay_top
global trisolation_id_lay_top
global tri_name_lay_top
global object_id_lay_bot
global obj_name_lay_bot
global trisolation_id_lay_bot
global tri_name_lay_bot
global bearing_type
global hole_length
proc getLocation {file_location file_location_id extension} {
set current_file [$file_location getCurrentValue]
set current_file_id [$file_location_id getCurrentValue]
set buffer [GuidoExecServer FioStrFilename [subst {fileLocation = "$current_file" fileId = "$current_file_id" extension = "$extension"}]]
set location [ GuidoGetParamBufferValue $buffer "location_id" ]
return "$location"
}
proc collarNextFocus {collar_el} {
set collarChoice [$collar_el getCurrentValue]
if {"$collarChoice" == "Fixed"} {
$collar_el setNextFocusableComponentName fixed_el
} elseif {"$collarChoice" == "DTM layer"} {
$collar_el setNextFocusableComponentName layer_name
} elseif {"$collarChoice" == "DTM file"} {
$collar_el setNextFocusableComponentName file_location
} else {
$collar_el setNextFocusableComponentName hole_length
}
}
GuidoForm frm01127 {
-default_buttons
-label "Pre-split parameters"
-layout BoxLayout Y_AXIS
-tip "01127_TIP_001"
-action final {[destroyTemporaryProcessedDTMSwa]}
-help_id 1617
GuidoPanel frm01127_1 {
-layout BoxLayout X_AXIS
GuidoPanel lineInfo {
-border etched true
-layout BoxLayout Y_AXIS
-label "Presplit line"
GuidoPanel leftBit {
-layout BoxLayout Y_AXIS
GuidoPanel topLeftBit {
-layout BoxLayout X_AXIS
GuidoLabel frm01127_2 {
-label "Origin"
}
GuidoFiller frm01127_3 {
-width 1
}
GuidoPanel frm01127_4 {
-layout CentreLineLayout VERTICAL LEFT
GuidoField xpos {
-display_length 8
-format double
-font_style bold
-label X
-max_length 20
-next_focus ypos
-null false
-tip "Enter x position of the origin of the line"
-translate upper
}
GuidoFiller frm01127_5 {
-height 0.05
}
GuidoFiller frm01127_6 {
-height 0.05
}
GuidoField ypos {
-display_length 8
-format double
-font_style bold
-label Y
-max_length 20
-next_focus width
-null false
-tip "Enter y position of the origin of the line"
-translate upper
}
}
}
GuidoFiller frm01127_7 {
-height 0.5
}
GuidoPanel frm01127_8 {
-layout CentreLineLayout VERTICAL LEFT
GuidoField width {
-display_length 10
-format double
-font_style bold
-label "Line length"
-max_length 20
-legacy_action
-next_focus angle
-null false
-tip "Enter the length of the line"
-translate upper
}
GuidoFiller frm01127_9 {
-height 0.05
}
GuidoFiller frm01127_10 {
-height 0.05
}
GuidoField angle {
-display_length 10
-format double
-font_style bold
-label Bearing
-legacy_action
-max_length 20
-null false
-next_focus collar_el
-tip "Enter the bearing of the line"
-translate upper
}
}
}
}
GuidoPanel frm01127_11 {
-layout BoxLayout X_AXIS
-border etched true
-label "Hole spacing"
GuidoPanel frm01127_12 {
-tip "01128_TIP_002"
-layout BoxLayout X_AXIS
GuidoButtonGroupPanel size_method {
-layout BoxLayout Y_AXIS
-label "Spacing method"
GuidoRadioButton frm01127_13 {
-caption Spacing
-default true
-selected_value Spacing
-height 1
}
GuidoRadioButton frm01127_14 {
-caption "No. holes"
-selected_value "No holes"
-height 1
}
}
}
GuidoFiller frm01127_15 {
-width 3
}
GuidoPanel inp_panel {
-layout OverlayLayout
GuidoPanel frm01127_16 {
-layout BoxLayout Y_AXIS
-dependency {"[ $size_method getCurrentValue]" == "No holes"}
GuidoPanel cols_inp_panel {
-layout CentreLineLayout VERTICAL LEFT
GuidoField columns_inp {
-display_length 6
-format integer
-legacy_action
-label "No. holes"
-max_length 10
-next_focus hole_length
-null false
-tip "Enter the number of holes along the selected segment."
-translate none
}
}
GuidoFiller frm01127_86 {
-height 0.05
}
GuidoFiller frm01127_87 {
-height 0.05
}
GuidoPanel spacing_disp_panel {
-layout BoxLayout X_AXIS
GuidoLabel spacing_display_label {
-label Spacing
}
GuidoFiller space {
-width 2
}
GuidoLabel spacing_display {
-font_style bold
}
}
}
GuidoPanel frm01127_17 {
-layout BoxLayout Y_AXIS
-dependency {"[ $size_method getCurrentValue]" == "Spacing"}
GuidoPanel spacing_inp_panel {
-layout CentreLineLayout VERTICAL LEFT
GuidoField spacing_inp {
-display_length 6
-format double
-legacy_action
-max_length 20
-label "Spacing"
-next_focus hole_length
-null false
-tip "Enter the spacing between blast holes."
-translate upper
}
}
GuidoFiller frm01127_88 {
-height 0.05
}
GuidoFiller frm01127_89 {
-height 0.05
}
GuidoPanel columns_inp_panel {
-layout BoxLayout X_AXIS
GuidoLabel columns_display_label {
-dependency {"[ $size_method getCurrentValue]" == "Spacing"}
-label "No. holes"
}
GuidoFiller space {
-width 2
}
GuidoLabel columns_display {
-font_style bold
}
}
}
}
}
}
GuidoFiller space {
-height 0.05
}
GuidoPanel top_and_bot_panel {
-layout BoxLayout X_AXIS
GuidoPanel collar_panel {
-layout BoxLayout Y_AXIS
-border etched true
-label "Collar elevation"
GuidoPanel frm01127_18 {
-layout CentreLineLayout VERTICAL LEFT
GuidoComboBox collar_el {
-default "Fixed"
-display_length 10
-format none
-label "Elevation method"
-max_length 14
-action valueChanged {[collarNextFocus $collar_el]}
-action initial {[collarNextFocus $collar_el]}
-null false
-tip "Select the method for determining the collar elevation"
-value_in "Fixed" "DTM layer" "DTM file"
}
}
GuidoFiller frm01127_90 {
-height 0.05
}
GuidoFiller frm01127_100 {
-height 0.05
}
GuidoPanel top_overlay {
-layout OverlayLayout
GuidoPanel fixed_panel {
-layout CentreLineLayout VERTICAL LEFT
-dependency {"[ $collar_el getCurrentValue]" == "Fixed"}
GuidoLabel fixed_label {
-dependency {"[ $collar_el getCurrentValue]" == "Fixed"}
-label Elevation
}
GuidoField fixed_el {
-dependency {"[ $collar_el getCurrentValue]" == "Fixed"}
-display_length 13
-format double
-max_length 20
-null false
-tip "Enter the elevation of all drill holes"
-translate upper
}
}
GuidoPanel dtm_layer_panel {
-layout CentreLineLayout VERTICAL LEFT
-dependency {"[ $collar_el getCurrentValue]" == "DTM layer"}
GuidoComboBox layer_name {
-dependency {"[ $collar_el getCurrentValue]" == "DTM layer"}
-label "Layer name"
-display_length 12
-format none
-max_length "APP_MAX_LAYER_NAME_LENGTH"
-null false
-action initial {[fill_triobject_trisolation_details_for_layers $layer_name $object_id_lay_top $obj_name_lay_top $trisolation_id_lay_top $tri_name_lay_top]}
-action valueChanged {[fill_triobject_trisolation_details_for_layers $layer_name $object_id_lay_top $obj_name_lay_top $trisolation_id_lay_top $tri_name_lay_top]}
-tip "Enter the layer name of the layer containing the collar elevation DTM"
-translate none
}
GuidoFiller frm01127_101 {
-height 0.05
}
GuidoFiller frm01127_102 {
-height 0.05
}
GuidoLabel obj_id_lay_top_label {
-dependency {"[ $collar_el getCurrentValue]" == "DTM layer"}
-label "Object ID"
}
GuidoPanel frm01127_103 {
-layout CentreLineLayout VERTICAL LEFT
GuidoComboBox object_id_lay_top {
-dependency {"[ $collar_el getCurrentValue]" == "DTM layer"}
-display_length 5
-action valueChanged {[fill_triobject_details $layer_name $object_id_lay_top $obj_name_lay_top $trisolation_id_lay_top $tri_name_lay_top "false" "true"]}
-format integer
-max_length 32
-translate none
-tip "Select the object ID to process"
}
GuidoLabel obj_name_lay_top {
-height 1
}
}
GuidoFiller frm01127_104 {
-height 0.05
}
GuidoFiller frm01127_105 {
-height 0.05
}
GuidoLabel trisolation_id_lay_lab_top {
-dependency {"[ $collar_el getCurrentValue]" == "DTM layer"}
-label "Trisolation ID"
}
GuidoPanel frm01127_106 {
-layout CentreLineLayout VERTICAL LEFT
GuidoComboBox trisolation_id_lay_top {
-dependency {"[ $collar_el getCurrentValue]" == "DTM layer"}
-display_length 5
-format integer
-max_length 32
-translate none
-action valueChanged {[fill_trisolation_details $layer_name $object_id_lay_top $trisolation_id_lay_top $tri_name_lay_top "true" "true"]}
-tip "Select the trisolation ID to process"
}
GuidoLabel tri_name_lay_top {
-height 1
}
}
}
GuidoPanel dtm_file_panel {
-layout CentreLineLayout VERTICAL LEFT
-dependency {"[ $collar_el getCurrentValue]" == "DTM file"}
GuidoFileBrowserField file_location {
-dependency {"[ $collar_el getCurrentValue]" == "DTM file"}
-action initial {[checkthecontent $file_location $file_id ".dtm" $object_id_top $obj_name_top $trisolation_id_top $tri_name_top]}
-action focusGained {[checkthecontent $file_location $file_id ".dtm" $object_id_top $obj_name_top $trisolation_id_top $tri_name_top]}
-display_length 15.5
-label Location
-file_mask *.dtm
-format none
-link file_id
-max_length 252
-null false
-next_focus file_id
-tip "Enter the location of the top DTM file"
-translate none
}
GuidoFiller frm01127_21 {
-height 0.05
}
GuidoFiller frm01127_22 {
-height 0.05
}
GuidoField file_id {
-dependency {"[ $collar_el getCurrentValue]" == "DTM file"}
-action focusLost {[checkthecontent $file_location $file_id ".dtm" $object_id_top $obj_name_top $trisolation_id_top $tri_name_top]}
-label ID
-display_length 7.4
-format double
-max_length 10
-next_focus object_id_top
-tip "Enter the ID number of the collar elevation DTM"
-translate none
}
GuidoFiller frm01127_107 {
-height 0.05
}
GuidoFiller frm01127_108 {
-height 0.05
}
GuidoLabel obj_id_label_top {
-dependency {"[ $collar_el getCurrentValue]" == "DTM file"}
-label "Object ID"
}
GuidoPanel frm01127_26 {
-layout CentreLineLayout VERTICAL LEFT
GuidoComboBox object_id_top {
-display_length 5
-action focusGained {[WrapperUpdateObjectDetailsForMultipleDtms $file_location $file_id ".dtm" $object_id_top $trisolation_id_top ]}
-action valueChanged {[wrapperTriobjectChanged $file_location $file_id ".dtm" $object_id_top $obj_name_top $trisolation_id_top $tri_name_top]}
-format integer
-max_length 32
-translate none
-tip "Select the object ID to process"
-exclusive false
}
GuidoLabel obj_name_top {
-height	1
}
}
GuidoFiller frm01127_28 {
-height 0.05
}
GuidoFiller frm01127_29 {
-height 0.05
}
GuidoLabel trisolation_id_lab_top {
-label "Trisolation ID"
}
GuidoPanel frm01127_31 {
-layout CentreLineLayout VERTICAL LEFT
GuidoComboBox trisolation_id_top {
-display_length 5
-format integer
-max_length 32
-translate none
-action focusGained {[wrapperUpdateTrisolationDetailsForMultipleDtms $file_location $file_id ".dtm" $object_id_top $trisolation_id_top ]}
-action valueChanged {[wrapperTrisolationChanged $file_location $file_id ".dtm" $object_id_top $trisolation_id_top $tri_name_top]}
-tip "Select the trisolation ID to process"
-exclusive false
}
GuidoLabel tri_name_top {
-height 1
}
}
GuidoFiller frm01127_35 {
-height 0.05
}
GuidoFiller frm01127_36 {
-height 0.05
}
GuidoFiller frm01127_109 {
-height 0.05
}
GuidoPanel frm01127_37 {
-layout CentreLineLayout VERTICAL LEFT
GuidoCheckBox visible {
-dependency {"[ $collar_el getCurrentValue]" == "DTM file"}
-default false
-selected_value Yes
-tip "Select whether the top DTM, once loaded into memory, will be visible"
-unselected_value No
}
GuidoLabel visible_label_top {
-label "Make visible?"
}
}
}
}
GuidoPanel frm01127_38 {
-layout CentreLineLayout VERTICAL LEFT
GuidoField offset {
-default 0
-display_length 6
-format double
-label "Offset from line"
-low_bound 0
-max_length 20
-null false
-next_focus frm01127_92
-tip "01128_TIP_005"
-translate upper
}
}
}
GuidoPanel bot_panel {
-layout BoxLayout Y_AXIS
-border etched true
-label "Toe elevation"
GuidoPanel bot_inp_panel {
-layout CentreLineLayout VERTICAL LEFT
GuidoComboBox hole_length {
-default "Set Length"
-display_length 9
-format none
-label "Toe position method"
-max_length 14
-null false
-legacy_dependency
-tip "Select method for determining the bottom of the hole"
-value_in "Set Length" "Set Elevation" "DTM layer" "DTM file" "Set to Segment"
}
}
GuidoFiller frm01127_39 {
-height 0.05
}
GuidoFiller frm01127_40 {
-height 0.05
}
GuidoPanel bot_overlay {
-layout Overlaylayout
GuidoPanel set_length_panel {
-layout CentreLineLayout VERTICAL LEFT
-dependency {"[ $hole_length getCurrentValue]" == "Set Length"}
GuidoField set_length {
-dependency {"[ $hole_length getCurrentValue]" == "Set Length"}
-label "Hole length"
-display_length 8
-format double
-low_bound .001
-max_length 20
-null false
-tip "Enter the length of all holes"
-translate upper
}
}
GuidoPanel segment_offset_panel {
-layout CentreLineLayout VERTICAL LEFT
-dependency {"[ $hole_length getCurrentValue]" == "Set to Segment"}
GuidoField segment_offset {
-dependency {"[ $hole_length getCurrentValue]" == "Set to Segment"}
-default 0
-label "Segment offset"
-display_length 8
-format double
-max_length 20
-null false
-tip "Enter the offset from the target segment.  The direction of the offset will be selected later"
-translate upper
}
GuidoButtonGroupPanel segment_fix {
-layout BoxLayout Y_AXIS
-label "Fix value"
-tip "01128_TIP_015"
GuidoRadioButton frm01127_41 {
-caption Bearing
-default true
-selected_value Bearing
-height 1
}
GuidoRadioButton frm01127_42 {
-caption Offset
-selected_value Offset
-height 1
}
}
}
GuidoPanel set_el_panel {
-layout CentreLineLayout VERTICAL LEFT
-dependency {"[ $hole_length getCurrentValue]" == "Set Elevation"}
GuidoField set_el {
-dependency {"[ $hole_length getCurrentValue]" == "Set Elevation"}
-label Elevation
-display_length 8
-format double
-max_length 20
-null false
-tip "Enter the elevation of the bottom of all holes"
-translate upper
}
}
GuidoPanel bot_dtm_layer_panel {
-layout CentreLineLayout VERTICAL LEFT
-dependency {"[ $hole_length getCurrentValue]" == "DTM layer"}
GuidoComboBox length_layer_name {
-dependency {"[ $hole_length getCurrentValue]" == "DTM layer"}
-label "Layer name"
-display_length 13
-format none
-max_length "APP_MAX_LAYER_NAME_LENGTH"
-null false
-action initial {[fill_triobject_trisolation_details_for_layers $length_layer_name $object_id_lay_bot $obj_name_lay_bot $trisolation_id_lay_bot $tri_name_lay_bot]}
-action valueChanged {[fill_triobject_trisolation_details_for_layers $length_layer_name $object_id_lay_bot $obj_name_lay_bot $trisolation_id_lay_bot $tri_name_lay_bot]}
-tip "Enter the layer name of the layer containing the bottom of hole DTM"
-translate none
}
GuidoFiller frm01127_110 {
-height 0.05
}
GuidoFiller frm01127_111 {
-height 0.05
}
GuidoLabel obj_id_lay_lab_bot {
-label "Object ID"
}
GuidoPanel frm01127_112 {
-layout CentreLineLayout VERTICAL LEFT
GuidoComboBox object_id_lay_bot {
-display_length 5
-action valueChanged {[fill_triobject_details $length_layer_name $object_id_lay_bot $obj_name_lay_bot $trisolation_id_lay_bot $tri_name_lay_bot "false" "true"]}
-format integer
-max_length 32
-translate none
-tip "Select the object ID to process"
}
GuidoLabel obj_name_lay_bot {
-height 1
}
}
GuidoFiller frm01127_113 {
-height 0.05
}
GuidoFiller frm01127_114 {
-height 0.05
}
GuidoLabel trisolation_id_lay_lab_bot {
-label "Trisolation ID"
}
GuidoPanel frm01127_115 {
-layout CentreLineLayout VERTICAL LEFT
GuidoComboBox trisolation_id_lay_bot {
-display_length 5
-action valueChanged {[fill_trisolation_details $length_layer_name $object_id_lay_bot $trisolation_id_lay_bot $tri_name_lay_bot "true" "true"]}
-format integer
-max_length 32
-translate none
-tip "Select the trisolation ID to process"
}
GuidoLabel tri_name_lay_bot {
-height 1
}
}
GuidoFiller frm01127_116 {
-height 0.05
}
}
GuidoPanel bot_dtm_file_panel {
-layout CentreLineLayout VERTICAL LEFT
-dependency {"[ $hole_length getCurrentValue]" == "DTM file"}
GuidoFileBrowserField length_file_location {
-action initial {[checkthecontent $length_file_location $length_file_id ".dtm" $object_id_bot $obj_name_bot $trisolation_id_bot $tri_name_bot]}
-action focusGained {[checkthecontent $length_file_location $length_file_id ".dtm" $object_id_bot $obj_name_bot $trisolation_id_bot $tri_name_bot]}
-label Location
-display_length 15.5
-file_mask *.dtm
-format none
-link length_file_id
-max_length 252
-null false
-next_focus length_file_id
-tip "Enter the location of the hole bottom DTM file"
-translate none
}
GuidoFiller frm01127_43 {
-height 0.05
}
GuidoFiller frm01127_44 {
-height 0.05
}
GuidoField length_file_id {
-action focusLost {[checkthecontent $length_file_location $length_file_id ".dtm" $object_id_bot $obj_name_bot $trisolation_id_bot $tri_name_bot]}
-label ID
-display_length 7.4
-format none
-max_length 10
-next_focus object_id_bot
-tip "Enter the id number of the bottom of hole DTM"
-translate none
}
GuidoFiller frm01127_43 {
-height 0.05
}
GuidoFiller frm01127_44 {
-height 0.05
}
GuidoLabel obj_id_label_bot {
-label "Object ID"
}
GuidoPanel frm01127_45 {
-layout CentreLineLayout VERTICAL LEFT
GuidoComboBox object_id_bot {
-display_length 5
-action valueChanged {[wrapperTriobjectChanged $length_file_location $length_file_id ".dtm" $object_id_bot $obj_name_bot $trisolation_id_bot $tri_name_bot]}
-action focusGained {[WrapperUpdateObjectDetailsForMultipleDtms $length_file_location $length_file_id ".dtm" $object_id_bot $trisolation_id_bot ]}
-format integer
-max_length 32
-translate none
-tip "Select the object ID to process"
}
GuidoLabel obj_name_bot {
-height 1
}
}
GuidoFiller frm01127_50 {
-height 0.05
}
GuidoFiller frm01127_51 {
-height 0.05
}
GuidoLabel trisolation_id_lab_bot {
-label "Trisolation ID"
}
GuidoPanel frm01127_53 {
-layout CentreLineLayout VERTICAL LEFT
GuidoComboBox trisolation_id_bot {
-display_length 5
-format integer
-max_length 32
-translate none
-action focusGained {[wrapperUpdateTrisolationDetailsForMultipleDtms $length_file_location $length_file_id ".dtm" $object_id_bot $trisolation_id_bot]}
-action valueChanged {[wrapperTrisolationChanged $length_file_location $length_file_id ".dtm" $object_id_bot $trisolation_id_bot $tri_name_bot]}
-tip "Select the trisolation ID to process"
}
GuidoLabel tri_name_bot {
-height 1
}
}
GuidoFiller frm01127_57 {
-height 0.05
}
GuidoFiller frm01127_58 {
-height 0.05
}
GuidoFiller frm01127_58 {
-height 0.05
}
GuidoPanel frn01127_59 {
-layout CentreLineLayout VERTICAL LEFT
GuidoCheckBox length_visible {
-dependency {"[ $hole_length getCurrentValue]" == "DTM file"}
-default false
-selected_value Yes
-tip "Select whether the bottom DTM, once loaded into memory, will be visible"
-unselected_value No
}
GuidoLabel visible_label_bot {
-label "Make visible?"
}
}
}
}
GuidoPanel toe_type_panel {
-layout CentreLineLayout VERTICAL LEFT
GuidoField subdrill {
-display_length 8
-format double
-label "Subdrill distance"
-next_focus prefix
-tip "Enter the subdrill distance required"
}
}
}
}
GuidoFiller frm01127_60 {
-height 0.05
}
GuidoPanel frm01127_61 {
-layout CentreLineLayout VERTICAL LEFT
GuidoPanel frm01127_61_2 {
-layout BoxLayout Y_AXIS
GuidoPanel frm01127_80 {
-layout CentreLineLayout VERTICAL LEFT
-border etched true
-label "Hole settings"
-width 23
-height 9.7
GuidoLabel frm01127_91 {
-dependency { "[$hole_length getCurrentValue]" != "Set to Segment" }
-label Bearing
}
GuidoButtonGroupPanel bearing_type {
-layout BoxLayout Y_AXIS
-tip "01128_TIP_021"
GuidoRadioButton frm01127_92 {
-default true
-dependency { "[$hole_length getCurrentValue]" != "Set to Segment" }
-caption "Set bearing"
-selected_value "Set Bearing"
}
GuidoRadioButton frm01127_93 {
-dependency {"[$hole_length getCurrentValue]" != "Set to Segment"}
-caption "Perp. to segment"
-next_focus bearing
-selected_value "Perp. to Segment"
}
}
GuidoField bearing {
-default 0
-dependency { "[ $bearing_type getCurrentValue]" == "Set Bearing" && "[ $hole_length getCurrentValue]" != "Set to Segment"}
-display_length 8
-format decimal_angle
-label "Hole bearing"
-high_bound 6.283185307
-low_bound 0
-max_length 20
-next_focus dip
-null false
-tip "Enter the bearing of hole"
-translate upper
}
GuidoFiller frm01127_65 {
-height 0.05
}
GuidoFiller frm01127_66 {
-height 0.05
}
GuidoField dip {
-default -90
-dependency {"[ $hole_length getCurrentValue]" != "Set to Segment"}
-display_length 8
-format decimal_angle
-label "Hole dip"
-high_bound 1.570796327
-low_bound -1.570796327
-max_length 20
-next_focus diameter
-null false
-tip "Enter the dip of the holes"
-translate upper
}
GuidoFiller frm01127_67 {
-height 0.05
}
GuidoFiller frm01127_68 {
-height 0.05
}
GuidoField diameter {
-display_length 8
-format double
-label "Hole diameter"
-low_bound 0
-max_length 20
-next_focus clip
-null false
-tip "Enter the diameter of the holes"
-translate upper
}
}
GuidoPanel frm01127_69 {
-layout CentreLineLayout VERTICAL LEFT
-border etched true
-label "Blast settings"
-width 23
GuidoPanel toe_type_70 {
-layout CentreLineLayout VERTICAL LEFT
GuidoCheckBox clip {
-default false
-next_focus pattern_id
-selected_value Yes
-tip "Do you wish to clip the hole generation to an existing boundary?"
-unselected_value No
}
GuidoLabel clip_label {
-label "Clip to boundary"
}
}
GuidoFiller frm01127_71 {
-height 0.05
}
GuidoComboBox rmc {
-display_length 10
-format none
-label "Rock name"
-max_length 30
-null true
-exclusive false
}
GuidoField pattern_id {
-display_length 10.4
-format none
-label "Pattern identifier"
-max_length 20
-null false
-tip "Enter the pattern identifier for these holes."
-translate none
}
GuidoFiller frm01127_72 {
-height 0.05
}
GuidoFiller frm01127_73 {
-height 0.05
}
GuidoComboBox rig {
-label "Drill rig"
-display_length 8
-max_length 50
-null true
-exclusive false
-next_focus frm01127_13
-tip "Drill rig name"
}
}
}
GuidoPanel frm01127_74 {
-layout CentreLineLayout VERTICAL LEFT
-border etched true
-label "Labelling options"
-width 22.7
GuidoField prefix {
-display_length 8
-format none
-label "Hole ID prefix"
-max_length 20
-next_focus suffix
-tip "01128_TIP_027"
-translate none
}
GuidoFiller frm01127_75 {
-height 0.05
}
GuidoFiller frm01127_76 {
-height 0.05
}
GuidoField suffix {
-display_length 8
-format none
-label "Hole ID suffix"
-max_length 20
-next_focus start
-tip "Enter a hole suffix string.  This will be added to the hole id after the incrementing numerical part"
-translate none
}
GuidoFiller frm01127_77 {
-height 0.05
}
GuidoFiller frm01127_78 {
-height 0.05
}
GuidoField start {
-default 1
-display_length 8
-format integer
-label "Starting value"
-max_length 20
-next_focus pad_check
-null false
-tip "Enter the starting number for the incremental part of the hole id"
-translate none
}
GuidoFiller ffrm01127_79 {
-height 0.05
}
GuidoFiller frm01127_80_1 {
-height 0.05
}
GuidoFiller frm01127_82 {
-height 0.05
}
GuidoPanel toe_ty {
-layout CentreLineLayout VERTICAL LEFT
GuidoCheckBox pad_check {
-default true
-next_focus pad_length
-selected_value Yes
-tip "Would you like to pad the numerical portion of the hole id to a specific length?"
-unselected_value No
}
GuidoLabel phid_label {
-label "Pad hole_id"
}
}
GuidoFiller frm01127_83 {
-height 0.05
}
GuidoPanel toe_ty2 {
-layout CentreLineLayout VERTICAL LEFT
GuidoFiller frm01127_70 {
-width 2
}
GuidoPanel toe_ty1 {
-layout CentreLineLayout VERTICAL LEFT
GuidoField pad_length {
-default 5
-dependency {"[ $pad_check getCurrentValue]" == "Yes"}
-label "Pad length"
-display_length 2
-format integer
-low_bound 1
-max_length 20
-next_focus pad_char
-null false
-tip "Enter the length to pad the hole id to"
-translate none
}
GuidoFiller frm01127_86 {
-height 0.05
}
GuidoFiller frm01127_84 {
-height 0.05
}
GuidoField pad_char {
-default 0
-dependency {"[ $pad_check getCurrentValue]" == "Yes"}
-label "Pad character"
-display_length 2
-format none
-max_length 1
-null false
-next_focus default_buttons
-tip "Enter the character to pad the hole identifier with"
-translate none
}
}
}
}
GuidoFiller frm01127_85 {
-width 1
}
}
}
