GuidoScript scripts/dtmutilities.tcl
global inp_dtm_loc
global dtm_obj_id
global dtm_trisol_id
global dtm_obj_name
global dtm_trisol_name
GuidoForm Trisolationsplit {
-default_buttons
-label "Trisolation split connected"
-action initial {[fill_triobject_trisolation_details $inp_dtm_loc $dtm_obj_id $dtm_obj_name $dtm_trisol_id $dtm_trisol_name]}
-layout BoxLayout Y_AXIS
-tip "APP_TRISOLATION_SPLIT_CONNECTED_TIP"
-help_id 1623
GuidoPanel Trisolationsplit_01 {
-border etched true
-label "Define DTM to split"
-layout CentreLineLayout
GuidoFileBrowserField inp_dtm_loc {
-display_length 22
-action valueChanged {[fill_triobject_trisolation_details $inp_dtm_loc $dtm_obj_id $dtm_obj_name $dtm_trisol_id $dtm_trisol_name]}
-file_mask *.dtm
-format none
-label Location
-extension false
-null false
-max_length FIO_MAX_LOCATION_LENGTH
-tip "APP_TRISOLATION_SPLIT_TIP"
-translate none
}
GuidoFiller filler {
-height 0.05
}
GuidoFiller filler {
-height 0.05
}
GuidoLabel obj_label {
-label "Object ID"
}
GuidoPanel p1 {
-layout BoxLayout X_AXIS
GuidoComboBox dtm_obj_id {
-display_length 6
-action valueChanged {[fill_triobject_details $inp_dtm_loc $dtm_obj_id $dtm_obj_name $dtm_trisol_id $dtm_trisol_name "false" "false"]}
-high_bound 32000
-low_bound 1
-exclusive false
-format integer
-max_length 6
-tip "Select the object identifier to process"
-translate upper
}
GuidoFiller filler {
-width 0.2
}
GuidoLabel dtm_obj_name {}
}
GuidoFiller filler {
-height 0.05
}
GuidoFiller filler {
-height 0.05
}
GuidoLabel trisol_label {
-label "Trisolation ID"
}
GuidoPanel p2 {
-layout BoxLayout X_AXIS
GuidoComboBox dtm_trisol_id {
-display_length 6
-action valueChanged {[fill_trisolation_details $inp_dtm_loc $dtm_obj_id $dtm_trisol_id $dtm_trisol_name "true" "false"]}
-high_bound 32000
-low_bound 1
-format none
-exclusive false
-tip "Select the trisolation identifier to process"
-max_length 6
-translate upper
}
GuidoFiller filler {
-width 0.2
}
GuidoLabel dtm_trisol_name {}
}
}
GuidoFiller frm00299_21 {
-height 0.2
}
GuidoPanel Trisolationsplit_02 {
-border etched true
-label "Define the output file to be created"
-layout CentreLineLayout
GuidoFileBrowserField out_dtm_loc {
-display_length 24
-file_mask *.dtm
-format none
-label "File name"
-max_length FIO_MAX_LOCATION_LENGTH
-tip "APP_TRISOLATION_SPLIT_OUT_TIP"
-null false
}
GuidoField out_dtm_id {
-display_length 10
-default 1
-null false
-format integer
-high_bound 32000
-low_bound 1
-label "Object ID"
-tip "Define the object identifier to be created"
-max_length 16
}
}
}
