1 /* PSPPIRE - a graphical user interface for PSPP.
2 Copyright (C) 2007, 2011, 2012, 2016 Free Software Foundation
4 This program is free software: you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation, either version 3 of the License, or
7 (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program. If not, see <http://www.gnu.org/licenses/>. */
19 #include "goto-case-dialog.h"
20 #include "builder-wrapper.h"
21 #include "psppire-dialog.h"
22 #include "psppire-data-window.h"
23 #include "psppire-data-store.h"
24 #include "ui/gui/efficient-sheet/jmd-sheet.h"
28 refresh (JmdSheet *ds, GtkBuilder *xml)
30 GtkWidget *case_num_entry = get_widget_assert (xml, "goto-case-case-num-entry");
31 casenumber case_count = gtk_tree_model_iter_n_children (ds->data_model, NULL);
33 gtk_spin_button_set_range (GTK_SPIN_BUTTON (case_num_entry), 1, case_count);
37 goto_case_dialog (JmdSheet *ds)
41 GtkBuilder *xml = builder_new ("goto-case.ui");
42 GtkWidget *dialog = get_widget_assert (xml, "goto-case-dialog");
44 top_level = GTK_WINDOW (gtk_widget_get_toplevel (GTK_WIDGET (ds)));
45 gtk_window_set_transient_for (GTK_WINDOW (dialog), top_level);
49 response = psppire_dialog_run (PSPPIRE_DIALOG (dialog));
51 if (response == PSPPIRE_RESPONSE_GOTO)
53 GtkWidget *case_num_entry =
54 get_widget_assert (xml, "goto-case-case-num-entry");
57 gtk_spin_button_get_value_as_int (GTK_SPIN_BUTTON (case_num_entry))
61 case_num < gtk_tree_model_iter_n_children (ds->data_model, NULL))
63 jmd_sheet_scroll_to (ds, -1, case_num);
64 jmd_sheet_set_active_cell (ds, -1, case_num, 0);