annotate src/myframe.cpp @ 12:9452ed888d10

start EazyPrint implementation.
author pyon@macmini
date Sun, 26 Jun 2011 13:43:46 +0900
parents 07adad93df84
children 3e045b68738a
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
1 // Filename : mainframe.cpp
12
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
2 // Last Change: 24-Jun-2011.
0
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
3 //
12
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
4 #include "wx/html/htmprint.h"
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
5 #include "wx/print.h"
0
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
6
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
7 #include "symbol.h"
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
8 #include "common.h"
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
9 #include "myframe.h"
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
10 #include "hhsdb.h"
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
11 #include "htmlhelp.h"
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
12 #include "main.h"
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
13 #include "wx/wxsqlite3.h"
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
14
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
15 // resources
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
16 // the application icon (under Windows and OS/2 it is in resources and even
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
17 // though we could still include the XPM here it would be unused)
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
18 #if !defined(__WXMSW__) && !defined(__WXPM__)
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
19 #include "sample.xpm"
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
20 #include "print.xpm"
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
21 #include "index.xpm"
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
22 #endif
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
23
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
24 //////////////////////////////////////////////////////////////////////////
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
25 // control constructor
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
26 MyCmdBox::MyCmdBox( wxWindow *parent, wxWindowID id, const wxString value, const wxPoint pos, const wxSize size, long style )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
27 : wxTextCtrl( parent, id, value, pos, size, style )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
28 {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
29 // for search history
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
30 hist = wxGetApp().searchhist;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
31 histpos = 5;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
32
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
33 // for autocomplete hhs
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
34 wxString gszFile = wxGetCwd() + wxT("/db/ccn.db");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
35 wxSQLite3Database ccndb;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
36 ccndb.Open( gszFile );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
37 wxSQLite3Statement stmt = ccndb.PrepareStatement("SELECT hhsno FROM path ORDER BY path DESC LIMIT 500");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
38 wxSQLite3ResultSet q = stmt.ExecuteQuery();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
39
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
40 gszFile = wxGetCwd() + wxT("/db/hhs.db");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
41 wxSQLite3Database hhsdb;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
42 hhsdb.Open( gszFile );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
43 wxSQLite3ResultSet q2;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
44
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
45 wxString hhsno;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
46 while ( q.NextRow() ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
47 hhsno = q.GetString(0);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
48
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
49 recenthhs.Add(hhsno);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
50
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
51 wxSQLite3Statement stmt2 = hhsdb.PrepareStatement("SELECT name FROM hhs_master WHERE hhsno = ?");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
52 stmt2.Bind( 1, hhsno );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
53 q2 = stmt2.ExecuteQuery();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
54 if ( !q2.IsNull(0) ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
55 while ( q2.NextRow() ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
56 recentname.Add(q2.GetString(0));
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
57 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
58 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
59 else {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
60 recentname.Add(wxEmptyString);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
61 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
62 stmt2.Finalize();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
63 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
64 stmt.Finalize();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
65
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
66 hhsdb.Close();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
67 ccndb.Close();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
68 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
69
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
70 // destructor
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
71 MyCmdBox::~MyCmdBox()
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
72 {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
73 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
74
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
75 // Event Table
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
76 BEGIN_EVENT_TABLE( MyCmdBox, wxTextCtrl )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
77 EVT_CHAR( MyCmdBox::OnChar )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
78 EVT_TEXT_ENTER( ID_CMD, MyCmdBox::OnCmd )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
79 END_EVENT_TABLE()
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
80
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
81 // Event Handlers
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
82 void MyCmdBox::OnChar( wxKeyEvent& event )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
83 {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
84 if ( event.GetKeyCode() == 13 ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
85 event.Skip();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
86 return;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
87 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
88
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
89 if ( event.GetKeyCode() == 45 ) { // テンキーの"-"キーで一文字削除
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
90 wxString s = this->GetStringSelection();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
91 if ( s.IsEmpty() ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
92 long p = this->GetInsertionPoint();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
93 this->Remove( p-1, p );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
94 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
95 else {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
96 this->Cut();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
97 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
98 return;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
99 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
100
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
101 MyFrame *mf = (MyFrame*)FindWindowById( ID_MAIN );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
102
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
103 if ( event.GetKeyCode() == WXK_UP ) { // ↑
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
104 mf->m_statusBar->SetStatusText( wxEmptyString, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
105 histpos--;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
106 if ( histpos < 0 ) histpos = 0;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
107 this->ChangeValue( hist[histpos] );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
108 return;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
109 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
110 else if ( event.GetKeyCode() == WXK_DOWN ) { // ↓
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
111 mf->m_statusBar->SetStatusText( wxEmptyString, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
112 histpos++;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
113 if ( histpos >= hist.GetCount() ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
114 histpos = hist.GetCount();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
115 this->Clear();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
116 return;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
117 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
118 this->ChangeValue( hist[histpos] );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
119 return;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
120 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
121
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
122 if ( event.GetKeyCode() == WXK_ESCAPE ) { // clear by ESC
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
123 this->Clear();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
124 mf->m_statusBar->SetStatusText( wxEmptyString, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
125 return;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
126 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
127
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
128 this->Cut();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
129 int c = event.GetKeyCode();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
130 if ( c >= 48 && c <= 57 ) { // [0-9]
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
131 c -= 48;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
132 wxString input = this->GetLineText(0) + wxString::Format(wxT("%d"),c);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
133 if ( input.Len() < 5 ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
134 event.Skip();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
135 return;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
136 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
137 // autocomplete
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
138 mf->m_statusBar->SetStatusText( wxEmptyString, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
139 for ( int i=0; i<recenthhs.GetCount(); i++ ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
140 if ( recenthhs[i].StartsWith( input ) ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
141 this->ChangeValue( recenthhs[i] );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
142 this->SetSelection( input.Len(), 10 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
143
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
144 wxString msg = wxT("もしかして... ") + recentname[i] + wxT(" ?!");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
145 mf->m_statusBar->SetStatusText( msg, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
146
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
147 return;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
148 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
149 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
150 event.Skip();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
151 return;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
152 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
153
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
154 event.Skip();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
155 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
156
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
157 void MyCmdBox::OnCmd( wxCommandEvent& event )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
158 {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
159 wxHtmlWindow *h = (wxHtmlWindow*)FindWindowById( ID_HTML );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
160 wxGrid *g = (wxGrid*)FindWindowById( ID_CCN );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
161 wxSplitterWindow *s = (wxSplitterWindow*)FindWindowById( ID_SPLT );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
162 s->ReplaceWindow( h, g );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
163 h->Show(true);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
164 g->Show(false);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
165
8
db7bd315e52c editing mark-sheet image.
pyon@macmini
parents: 3
diff changeset
166 wxRegEx reHhs(wxT("^0[1238][0-9]{8}$")); // 1:被保番チェック
db7bd315e52c editing mark-sheet image.
pyon@macmini
parents: 3
diff changeset
167 wxRegEx reCno(wxT("^[0-9]{1,2}$")); // 2:開くフォルダの番号
12
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
168 wxRegEx rePrint(wxT("^\\.[0-9]*$")); // 3:印刷するフォルダの番号
0
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
169
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
170 wxString cmd;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
171 cmd = this->GetLineText(0);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
172 int cond = 0;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
173 if ( reHhs.Matches( cmd ) )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
174 cond = 1;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
175 else if ( reCno.Matches( cmd ) )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
176 cond = 2;
8
db7bd315e52c editing mark-sheet image.
pyon@macmini
parents: 3
diff changeset
177 else if ( rePrint.Matches( cmd ) )
db7bd315e52c editing mark-sheet image.
pyon@macmini
parents: 3
diff changeset
178 cond = 3;
0
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
179
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
180 wxString htmlbody;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
181
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
182 MyFrame *mf = (MyFrame*)FindWindowById( ID_MAIN );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
183 wxHtmlWindow *hr = (wxHtmlWindow*)FindWindowById( ID_HTML );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
184 switch (cond) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
185 // 被保険者番号が入力されたら
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
186 case 1: {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
187 wxString hhs = cmd;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
188 mf->m_statusBar->SetStatusText( wxEmptyString, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
189 this->SetSelection( 0, this->GetLastPosition() );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
190
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
191 // 被保険者検索
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
192 wxString gszFile = wxGetCwd() + wxT("/db/hhs.db");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
193 wxSQLite3Database hhsdb;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
194 hhsdb.Open( gszFile );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
195
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
196 wxSQLite3Statement stmt = hhsdb.PrepareStatement("SELECT name FROM hhs_master WHERE hhsno = ?");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
197 stmt.Bind( 1, hhs );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
198 wxSQLite3ResultSet q = stmt.ExecuteQuery();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
199
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
200 wxString name = wxT("登録なし");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
201 if ( q.IsNull(0) ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
202 wxString msg = wxT("データベースに存在しない被保険者です.") + hhs;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
203 mf->m_statusBar->SetStatusText( msg, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
204 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
205 else {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
206 name = q.GetString(0);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
207 hist.Add( hhs );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
208 histpos++;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
209 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
210 stmt.Finalize();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
211 hhsdb.Close();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
212
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
213 // パス検索
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
214 gszFile = wxGetCwd() + wxT("/db/ccn.db");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
215 wxSQLite3Database ccndb;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
216 ccndb.Open( gszFile );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
217
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
218 stmt = ccndb.PrepareStatement("SELECT path FROM path WHERE hhsno = ? ORDER BY path DESC");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
219 stmt.Bind( 1, hhs );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
220 q = stmt.ExecuteQuery();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
221 if ( q.IsNull(0) ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
222 hr->LoadPage( wxT("html/notfound.html") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
223 mf->m_statusBar->SetStatusText( wxT("データが存在しません."), 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
224 return;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
225 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
226
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
227 path.Clear();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
228 wxRegEx reDate(wxT("(^.*20[0-9]{2}.)(20[0-9]{2})([0-2][0-9])([0-9]{2})(.*$)"));
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
229
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
230 int i=1;
11
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
231 int clrflg = -1;
0
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
232 while ( q.NextRow() ) {
11
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
233 wxString filepath = q.GetString(0);
10
24e0775af32e Add Name-View.
pyon@macmini
parents: 8
diff changeset
234 // 氏名画像生成
11
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
235 wxDir dir(filepath);
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
236 wxString file;
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
237 if ( !dir.IsOpened() ) return;
10
24e0775af32e Add Name-View.
pyon@macmini
parents: 8
diff changeset
238
11
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
239 if ( clrflg == -1 ) {
10
24e0775af32e Add Name-View.
pyon@macmini
parents: 8
diff changeset
240 bool cout = dir.GetFirst( &file, wxT("*.jpg"), wxDIR_FILES );
24e0775af32e Add Name-View.
pyon@macmini
parents: 8
diff changeset
241 if ( cout ) {
24e0775af32e Add Name-View.
pyon@macmini
parents: 8
diff changeset
242 wxString s = filepath + wxFILE_SEP_PATH + file;
24e0775af32e Add Name-View.
pyon@macmini
parents: 8
diff changeset
243 wxImage img_org( s, wxBITMAP_TYPE_JPEG );
24e0775af32e Add Name-View.
pyon@macmini
parents: 8
diff changeset
244 wxImage img_name;
24e0775af32e Add Name-View.
pyon@macmini
parents: 8
diff changeset
245 img_name = img_org.GetSubImage( wxRect( wxPoint(328,556), wxSize(626,288) ) );
11
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
246 img_name = img_name.Scale( 200, 92 );
10
24e0775af32e Add Name-View.
pyon@macmini
parents: 8
diff changeset
247 img_name.SaveFile( wxT("tmp/tmp.jpg") );
11
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
248
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
249 // HTML生成
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
250 htmlbody = wxT("<html><body>");
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
251 htmlbody += wxT("<table border=0>");
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
252 htmlbody += wxT("<tr bgcolor=\"#ffffcc\"><td>該当者: </td><td></td></tr>");
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
253 htmlbody += wxT("<tr><td><b>") + name + wxT("</b></td>");
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
254 htmlbody += wxT("<td> ( ") + hhs + wxT(" )") + wxT("</td></tr>");
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
255 htmlbody += wxT("</table><br /><br />");
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
256 htmlbody += wxT("<table border=0>");
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
257 htmlbody += wxT("<tr><td bgcolor=\"#ffffcc\">番号1の画像情報:</td></tr>");
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
258 htmlbody += wxT("<tr><td><img src=\"tmp/tmp.jpg\" /></td></tr>");
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
259 htmlbody += wxT("</table>");
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
260 htmlbody += wxT("<br /><br />検索結果");
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
261 htmlbody += wxT("<table border=1>");
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
262 htmlbody += wxT("<tr bgcolor=\"#ffcc33\"><th>番号</th><th>日付</th><th>フォルダ</th></tr>");
10
24e0775af32e Add Name-View.
pyon@macmini
parents: 8
diff changeset
263 }
11
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
264 clrflg = 1;
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
265 }
10
24e0775af32e Add Name-View.
pyon@macmini
parents: 8
diff changeset
266
24e0775af32e Add Name-View.
pyon@macmini
parents: 8
diff changeset
267 path.Add(filepath);
24e0775af32e Add Name-View.
pyon@macmini
parents: 8
diff changeset
268 wxString date = filepath;
0
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
269 reDate.ReplaceAll( &date, wxT("\\2-\\3-\\4") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
270
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
271 if ( clrflg ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
272 htmlbody += wxT("<tr bgcolor=\"#ffffcc\">");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
273 clrflg = 0;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
274 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
275 else {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
276 htmlbody += wxT("<tr bgcolor=\"#ffff99\">");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
277 clrflg = 1;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
278 }
1
e0cf49906039 start editing preview.cpp / preview.h
pyon@macmini
parents: 0
diff changeset
279 htmlbody += wxT("<td align=\"center\">") + wxString::Format(wxT("%d"),i++) + wxT("</td>"); // 番号
e0cf49906039 start editing preview.cpp / preview.h
pyon@macmini
parents: 0
diff changeset
280 htmlbody += wxT("<td>") + date + wxT("</td>"); // 日付
e0cf49906039 start editing preview.cpp / preview.h
pyon@macmini
parents: 0
diff changeset
281 htmlbody += wxT("<td>") + q.GetString(0) + wxT("</td></tr>"); // フォルダパス
0
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
282 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
283 stmt.Finalize();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
284 ccndb.Close();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
285 path.Shrink();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
286
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
287 htmlbody += wxT("</table>");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
288 htmlbody += wxT("<br />");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
289 htmlbody += wxT("<div>");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
290 htmlbody += wxT("フォルダを開くには,番号を入力してください.<br />");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
291 htmlbody += wxT("他の被保険者を検索するには,被保番を入力してください.");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
292 htmlbody += wxT("</div>");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
293 htmlbody += wxT("</body></html>");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
294
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
295 hr->SetPage( htmlbody );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
296
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
297 break;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
298 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
299 // フォルダ表示
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
300 case 2: {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
301 this->SetSelection( 0, this->GetLastPosition() );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
302 long val;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
303 cmd.ToLong( &val, 10 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
304 val--;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
305 if ( path.IsEmpty()
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
306 || val < 0
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
307 || val > path.GetCount()-1 ) {
11
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
308 mf->m_statusBar->SetStatusText( wxT("不適切な入力です.警告コード2"), 0 );
0
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
309 break;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
310 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
311 wxString execmd = wxT("explorer ") + path[val];
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
312 wxExecute( execmd );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
313 mf->m_statusBar->SetStatusText( wxEmptyString, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
314
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
315 // 検索履歴をログに保存
11
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
316 wxString logfn = wxGetCwd() + wxFILE_SEP_PATH + wxT("tmp") + wxFILE_SEP_PATH + wxT("log.txt");
0
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
317 wxTextFile logFile;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
318 logFile.Open( logfn );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
319 wxDateTime now = wxDateTime::Now();
12
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
320 wxString log = now.Format() + wxT(" ") + cmd + wxT(" ") + path[val];
0
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
321 logFile.AddLine( log );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
322 logFile.Write();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
323 logFile.Close();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
324
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
325 break;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
326 }
8
db7bd315e52c editing mark-sheet image.
pyon@macmini
parents: 3
diff changeset
327 // ファイル印刷
db7bd315e52c editing mark-sheet image.
pyon@macmini
parents: 3
diff changeset
328 case 3: {
11
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
329 this->SetSelection( 0, this->GetLastPosition() );
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
330 if ( path.IsEmpty() ) {
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
331 mf->m_statusBar->SetStatusText( wxT("不適切な入力です.警告コード3"), 0 );
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
332 break;
07adad93df84 ver2.9 Add Name-View
pyon@macmini
parents: 10
diff changeset
333 }
12
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
334 PrintImages( path[0] );
8
db7bd315e52c editing mark-sheet image.
pyon@macmini
parents: 3
diff changeset
335 break;
db7bd315e52c editing mark-sheet image.
pyon@macmini
parents: 3
diff changeset
336 }
0
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
337 // 制御用コマンド
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
338 case 0: {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
339 path.Clear();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
340 if ( cmd.Cmp(wxT("s")) == 0 ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
341 hr->LoadPage( wxT("html/start.html") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
342 this->ChangeValue( wxEmptyString );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
343 mf->m_statusBar->SetStatusText( wxEmptyString, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
344 return;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
345 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
346 if ( cmd.Cmp(wxT("c")) == 0 ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
347 hr->LoadPage( wxT("Searcher2.conf") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
348 this->ChangeValue( wxEmptyString );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
349 mf->m_statusBar->SetStatusText( wxEmptyString, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
350 return;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
351 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
352 if ( cmd.Cmp(wxT("t")) == 0 ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
353 hr->LoadPage( wxT("html/todo.html") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
354 this->ChangeValue( wxEmptyString );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
355 mf->m_statusBar->SetStatusText( wxEmptyString, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
356 return;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
357 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
358 if ( cmd.Cmp(wxT("l")) == 0 ) {
10
24e0775af32e Add Name-View.
pyon@macmini
parents: 8
diff changeset
359 hr->LoadPage( wxT("tmp/log.txt") );
0
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
360 this->ChangeValue( wxEmptyString );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
361 mf->m_statusBar->SetStatusText( wxEmptyString, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
362 return;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
363 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
364 if ( cmd.Cmp(wxT("**")) == 0 ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
365 mf->m_statusBar->SetStatusText( wxT("Now Saving..."), 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
366 mf->Close();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
367 return;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
368 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
369
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
370 mf->m_statusBar->SetStatusText( wxT("不適切な入力です."), 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
371 this->SetSelection( 0, this->GetLastPosition() );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
372
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
373 break;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
374 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
375 //
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
376 default: {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
377 break;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
378 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
379 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
380 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
381
12
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
382 // functions
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
383 void MyCmdBox::PrintImages( wxString& path )
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
384 {
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
385 wxHtmlPrintout* hpout = new wxHtmlPrintout( wxT("Searcher2") );
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
386 hpout->SetMargins( 0,0,0,0,0 );
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
387 wxPrintDialogData* pd;
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
388 wxPrinter* p = new wxPrinter( pd );
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
389
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
390 wxDir dir(path);
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
391 wxString file;
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
392 if ( !dir.IsOpened() ) return;
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
393
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
394 bool cout = dir.GetFirst( &file, wxT("*.jpg"), wxDIR_FILES );
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
395 while ( cout ) {
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
396 file = path + wxFILE_SEP_PATH + file;
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
397 file.Replace( wxT("\\"), wxT("/") );
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
398 wxString html;
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
399 html = html + wxT("<html><body>");
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
400 html = html + wxT("<img src=\"") + file + wxT("\" width=\"750\" height=\"1060\"/>");
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
401 html = html + wxT("</body></html>");
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
402
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
403 hpout->SetHtmlText( html, wxEmptyString, false );
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
404 p->Print( NULL, hpout, false );
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
405 cout = dir.GetNext( &file );
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
406 }
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
407 return;
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
408 }
9452ed888d10 start EazyPrint implementation.
pyon@macmini
parents: 11
diff changeset
409
0
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
410 //////////////////////////////////////////////////////////////////////////
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
411 // frame constructor
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
412 MyFrame::MyFrame( wxWindow* parent, wxWindowID id, const wxString& title )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
413 : wxFrame( parent, id, title )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
414 {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
415 this->SetSizeHints( wxDefaultSize, wxDefaultSize );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
416 // set the frame icon
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
417 SetIcon(wxICON(sample));
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
418
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
419 // メニューバー
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
420 m_menubar = new wxMenuBar();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
421
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
422 m_menuFile = new wxMenu();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
423 m_menuFile->Append( ID_MUPHHS, wxT("被保険者DB更新"), wxT("Update hhs-db") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
424 m_menuFile->Append( ID_MLSCCN, wxT("インデックス更新一覧"), wxT("List index") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
425 m_menuFile->AppendSeparator(); //----
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
426 wxMenu *menuMaintain = new wxMenu();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
427 m_menuFile->AppendSubMenu( menuMaintain, wxT("メンテナンス") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
428 menuMaintain->Append( ID_MDBBKUP, wxT("データベースバックアップ"), wxT("Backup DBs") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
429 menuMaintain->Append( ID_MDBOPT, wxT("データベース最適化"), wxT("Optimize DBs") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
430 menuMaintain->Enable( ID_MDBOPT, false );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
431 menuMaintain->Append( ID_MCHKHHS, wxT("被保者整合性チェック"), wxT("Check hhs") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
432 m_menuFile->AppendSeparator(); //----
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
433 wxMenu *menuOpendir = new wxMenu();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
434 m_menuFile->AppendSubMenu( menuOpendir, wxT("フォルダを開く") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
435 menuOpendir->Append( ID_MOAD, wxT("アプリケーションフォルダ"), wxT("Open App Folder") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
436 menuOpendir->Append( ID_MODD, wxT("データフォルダ"), wxT("Open Data Folder") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
437 m_menuFile->AppendSeparator(); //----
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
438 m_menuFile->Append( wxID_EXIT, wxT("終了(&X)\tAlt-X"), wxT("Quit this program") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
439
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
440 m_menuHelp = new wxMenu();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
441 m_menuHelp->Append( ID_MHELP, wxT("&Help"), wxT("Show help") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
442 m_menuHelp->Append( wxID_ABOUT, wxT("&About...\tF1"), wxT("Show about dialog") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
443
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
444 // now append the freshly created menu to the menu bar...
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
445 m_menubar->Append( m_menuFile, wxT("ファイル(&F)") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
446 m_menubar->Append( m_menuHelp, wxT("ヘルプ(&H)") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
447
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
448 this->SetMenuBar( m_menubar );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
449
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
450 // ツールバー
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
451 //m_toolBar = new wxToolBar( this, wxID_ANY, wxDefaultPosition, wxDefaultSize, wxTB_HORIZONTAL|wxNO_BORDER );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
452 //wxBitmap bmpPrint( print_xpm );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
453 //wxBitmap bmpIndex( index_xpm );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
454
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
455 // ステータスバー
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
456 int widths[] = { -1, 120, 100 };
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
457 m_statusBar = this->CreateStatusBar( WXSIZEOF(widths), wxST_SIZEGRIP );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
458 m_statusBar->SetStatusWidths( WXSIZEOF(widths), widths );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
459 m_statusBar->SetStatusText( wxEmptyString, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
460
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
461 wxBoxSizer* bSizer;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
462 bSizer = new wxBoxSizer( wxVERTICAL );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
463
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
464 // controls here
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
465 m_panelHead = new wxPanel( this, wxID_ANY, wxDefaultPosition, wxDefaultSize );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
466 wxBoxSizer* bSizerHead;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
467 bSizerHead = new wxBoxSizer( wxHORIZONTAL );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
468
3
75fefb53d983 update preview.
pyon@macmini
parents: 1
diff changeset
469 /* after version 2.11
0
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
470 m_staticTextHname = new wxStaticText( m_panelHead, wxID_ANY, wxT("氏名カナ検索"), wxDefaultPosition, wxDefaultSize, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
471 bSizerHead->Add( m_staticTextHname, 0, wxALL, 5 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
472
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
473 m_searchCtrlHname = new wxSearchCtrl( m_panelHead, ID_SRCHHHS, wxT("3字以上入力"), wxDefaultPosition, wxSize(200,20), 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
474 #ifndef __WXMAC__
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
475 m_searchCtrlHname->ShowSearchButton( true );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
476 #endif
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
477 bSizerHead->Add( m_searchCtrlHname, 0, wxALL, 1 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
478
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
479 m_bitmapMkidx = new wxStaticBitmap( m_panelHead, wxID_ANY, wxNullBitmap, wxDefaultPosition, wxDefaultSize, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
480 bSizerHead->Add( m_bitmapMkidx, 0, wxALL, 1 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
481 */
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
482
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
483 bSizerHead->AddStretchSpacer( 1 ); // spacer
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
484
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
485 m_staticTextIdx = new wxStaticText( m_panelHead, wxID_ANY, wxT("インデックス"), wxDefaultPosition, wxDefaultSize, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
486 bSizerHead->Add( m_staticTextIdx, 0, wxALIGN_CENTER_VERTICAL|wxALL, 5 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
487
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
488 m_datePicker = new wxDatePickerCtrl( m_panelHead, ID_DTIDX, wxDefaultDateTime, wxDefaultPosition, wxDefaultSize, wxDP_SHOWCENTURY|wxDP_DROPDOWN );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
489 bSizerHead->Add( m_datePicker, 0, wxALIGN_CENTER_VERTICAL|wxALL, 5 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
490
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
491 m_buttonMkidx = new wxButton( m_panelHead, ID_MKIDX, wxT("作成"), wxDefaultPosition, wxSize(50,25), 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
492 bSizerHead->Add( m_buttonMkidx, 0, wxALL, 5 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
493
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
494 m_panelHead->SetSizer( bSizerHead );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
495 m_panelHead->Layout();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
496 bSizerHead->Fit( m_panelHead );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
497
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
498 // メインペイン
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
499 wxBoxSizer* bSizerHtml;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
500 bSizerHtml = new wxBoxSizer( wxVERTICAL );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
501 m_splitter = new wxSplitterWindow( this, ID_SPLT, wxDefaultPosition, wxDefaultSize, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
502
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
503 // 検索結果Html
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
504 m_html = new wxHtmlWindow( m_splitter, ID_HTML, wxDefaultPosition, wxDefaultSize, wxHW_SCROLLBAR_AUTO );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
505 m_html->LoadPage( wxT("html/start.html") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
506
3
75fefb53d983 update preview.
pyon@macmini
parents: 1
diff changeset
507 /* after version 2.11
0
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
508 // 被保険者カナ検索Grid
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
509 m_gridHhs = new wxGrid( m_panelHtml, ID_HLST, wxDefaultPosition, wxDefaultSize, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
510 m_gridHhs->CreateGrid( 0, 5 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
511 m_gridHhs->EnableEditing( true );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
512 m_gridHhs->EnableGridLines( true );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
513 m_gridHhs->EnableDragGridSize( false );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
514 m_gridHhs->SetMargins( 0, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
515
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
516 // Columns
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
517 m_gridHhs->AutoSizeColumns();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
518 m_gridHhs->EnableDragColMove( false );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
519 m_gridHhs->SetColLabelValue( 0, wxT("番号") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
520 m_gridHhs->SetColLabelValue( 1, wxT("氏名") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
521 m_gridHhs->SetColLabelValue( 2, wxT("カナ") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
522 m_gridHhs->SetColLabelValue( 3, wxT("生年月日") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
523 m_gridHhs->SetColLabelValue( 4, wxT("住所") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
524 m_gridHhs->SetColLabelAlignment( wxALIGN_CENTRE, wxALIGN_CENTRE );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
525
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
526 // Cell Defaults
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
527 m_gridHhs->SetDefaultCellAlignment( wxALIGN_LEFT, wxALIGN_BOTTOM );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
528 m_gridHhs->Hide();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
529
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
530 bSizerHtml->Add( m_gridHhs, 0, wxALL, 5 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
531 */
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
532
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
533 // 審査会合議体表示Grid
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
534 m_gridCcn = new wxGrid( m_splitter, ID_CCN, wxDefaultPosition, wxDefaultSize, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
535 m_gridCcn->CreateGrid( 0, 2 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
536 m_gridCcn->EnableEditing( true );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
537 m_gridCcn->EnableGridLines( true );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
538 m_gridCcn->EnableDragGridSize( false );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
539 m_gridCcn->SetMargins( 0, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
540 m_gridCcn->SetDefaultCellAlignment( wxALIGN_CENTRE, wxALIGN_BOTTOM );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
541 m_gridCcn->Show(false);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
542
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
543 // Columns
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
544 m_gridCcn->AutoSizeColumns();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
545 m_gridCcn->EnableDragColMove( false );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
546 m_gridCcn->SetColLabelValue( 0, wxT("審査会年月日") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
547 m_gridCcn->SetColLabelValue( 1, wxT("DB更新時刻") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
548 m_gridCcn->SetColSize( 0, 100 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
549 m_gridCcn->SetColSize( 1, 200 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
550 m_gridCcn->SetColLabelAlignment( wxALIGN_CENTRE, wxALIGN_CENTRE );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
551
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
552 m_splitter->Initialize( m_html );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
553 m_splitter->SetSizer( bSizerHtml );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
554 m_splitter->Layout();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
555 bSizerHtml->Fit( m_splitter );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
556
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
557 // コマンドライン
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
558 m_panelCmd = new wxPanel( this, wxID_ANY, wxDefaultPosition, wxDefaultSize );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
559 wxBoxSizer* bSizerCmd;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
560 bSizerCmd = new wxBoxSizer( wxHORIZONTAL );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
561
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
562 m_staticTextCmd = new wxStaticText( m_panelCmd, wxID_ANY, wxT("コマンド?"), wxDefaultPosition, wxDefaultSize, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
563 bSizerCmd->Add( m_staticTextCmd, 0, wxALL, 5 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
564
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
565 m_cmdbox = new MyCmdBox( m_panelCmd, ID_CMD, wxEmptyString, wxDefaultPosition, wxDefaultSize, wxTE_PROCESS_ENTER );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
566 bSizerCmd->Add( m_cmdbox, 1, wxALL, 3 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
567 m_cmdbox->SetFocus();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
568
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
569 m_panelCmd->SetSizer( bSizerCmd );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
570 m_panelCmd->Layout();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
571 bSizerCmd->Fit( m_panelCmd );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
572
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
573
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
574 bSizer->Add( m_panelHead, 0, wxEXPAND|wxTOP, 1 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
575 bSizer->Add( m_splitter, 1, wxEXPAND|wxALL, 1 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
576 bSizer->Add( m_panelCmd, 0, wxEXPAND|wxALL, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
577
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
578 this->SetSizer( bSizer );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
579 this->Layout();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
580 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
581
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
582 // destructor
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
583 MyFrame::~MyFrame()
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
584 {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
585 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
586
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
587 // Event Table
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
588 BEGIN_EVENT_TABLE( MyFrame, wxFrame )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
589 EVT_MENU( wxID_EXIT, MyFrame::OnQuit )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
590 EVT_MENU( wxID_ABOUT, MyFrame::OnAbout )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
591 EVT_MENU( ID_MUPHHS, MyFrame::OnUpdateHhsDb )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
592 EVT_MENU( ID_MLSCCN, MyFrame::OnListCcn )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
593 EVT_MENU( ID_MDBBKUP, MyFrame::OnBackupDB )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
594 EVT_MENU( ID_MDBOPT, MyFrame::OnOptimizeDB )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
595 EVT_MENU( ID_MCHKHHS, MyFrame::OnCheckHhs )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
596 EVT_MENU( ID_MOAD, MyFrame::OnOpenAppDir )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
597 EVT_MENU( ID_MODD, MyFrame::OnOpenDataDir )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
598 EVT_MENU( ID_MHELP, MyFrame::OnHelp )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
599
3
75fefb53d983 update preview.
pyon@macmini
parents: 1
diff changeset
600 //EVT_TEXT_ENTER( ID_SRCHHHS, MyFrame::OnHhsSearch ) after version 2.11
0
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
601 EVT_BUTTON( ID_MKIDX, MyFrame::OnMkIndex )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
602
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
603 EVT_CLOSE( MyFrame::SaveConfig )
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
604 END_EVENT_TABLE()
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
605
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
606 // Event Handlers
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
607 /* 終了 */
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
608 void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
609 {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
610 Close(true);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
611 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
612
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
613 /* オンラインヘルプ */
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
614 void MyFrame::OnHelp(wxCommandEvent& WXUNUSED(event))
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
615 {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
616 HtmlHelpFrame *f = (HtmlHelpFrame*)FindWindowById( ID_HELP );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
617
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
618 if ( f == NULL ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
619 HtmlHelpFrame *helpframe = new HtmlHelpFrame( wxT("Online Help"), ID_HELP );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
620 helpframe->Show(true);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
621 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
622 else {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
623 f->Raise();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
624 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
625 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
626
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
627 /* バージョン情報 */
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
628 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
629 {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
630 wxSQLite3Database sqlite;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
631 wxMessageBox(
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
632 wxString::Format(
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
633 wxT("Version %d.%d ( build %d ) by %s\n")
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
634 wxT("with SQLite library %s\n")
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
635 wxT("running under %s."),
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
636 VER, REV, BLD, wxVERSION_STRING,
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
637 sqlite.GetVersion().c_str(),
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
638 wxGetOsDescription().c_str()
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
639 ),
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
640 wxT("About this program"), wxOK | wxICON_INFORMATION, this );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
641 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
642
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
643 /* 被保険者検索 */
3
75fefb53d983 update preview.
pyon@macmini
parents: 1
diff changeset
644 /* after version 2.11
0
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
645 void MyFrame::OnHhsSearch(wxCommandEvent& WXUNUSED(event))
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
646 {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
647 this->m_html->Hide();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
648 this->m_gridCcn->Hide();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
649 this->m_gridHhs->Show(true);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
650
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
651 wxString gszFile = wxGetCwd() + wxT("/db/hhs.db");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
652 wxSQLite3Database hhsdb;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
653 hhsdb.Open( gszFile );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
654
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
655 wxSQLite3Statement stmt = hhsdb.PrepareStatement("SELECT count(*) FROM hhs_master WHERE kana LIKE ?");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
656 stmt.Bind( 1, this->m_searchCtrlHname->GetValue() );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
657 wxSQLite3ResultSet q = stmt.ExecuteQuery();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
658 wxString cnt = q.GetString(0);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
659
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
660 if ( cnt.Cmp(wxT("0")) == '0' ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
661 wxString msg = cnt + wxT("指定した条件の被保険者はいませんでした.");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
662 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
663 else {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
664 wxString msg = cnt + wxT("件マッチしました.");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
665 return ; // test now
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
666
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
667 stmt = hhsdb.PrepareStatement("SELECT hhs, name, kana, addr, birth, sex FROM hhs_master ORDER BY birth DESC");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
668 q = stmt.ExecuteQuery();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
669 wxSQLite3ResultSet q = stmt.ExecuteQuery();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
670 while ( q.NextRow() ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
671 wxString hhs = q.GetString(0);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
672 wxString name = q.GetString(1);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
673 wxString kana = q.GetString(2);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
674 wxString addr = q.GetString(3);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
675 wxString birth = q.GetString(4);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
676 wxString sex = q.GetString(5);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
677 // ここに gridに 追加するコード
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
678 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
679 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
680
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
681 stmt.Finalize();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
682 hhsdb.Close();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
683 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
684 */
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
685
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
686 /* インデックス作成 */
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
687 void MyFrame::OnMkIndex(wxCommandEvent& WXUNUSED(event))
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
688 {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
689 wxDateTime dt = m_datePicker->GetValue();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
690 wxString month = dt.Format(wxT("%m"));
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
691 wxString year = dt.Format(wxT("%Y"));
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
692 if ( month.IsSameAs(wxT("01")) || month.IsSameAs(wxT("02")) || month.IsSameAs(wxT("03")) ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
693 long y;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
694 year.ToLong( &y, 10 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
695 y--;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
696 year = wxString::Format(wxT("%d"),y);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
697 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
698 wxString pathroot = wxGetApp().rootdir + wxFILE_SEP_PATH + year + dt.Format(wxT("\\%Y%m%d"));
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
699 wxDir rootd(pathroot);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
700 if ( !wxDir::Exists(pathroot) ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
701 wxMessageBox( wxT("フォルダが存在しません.")+pathroot );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
702 return;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
703 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
704
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
705 wxProgressDialog pd( wxT("進行状況"), wxT("処理開始..."), 200, this, wxPD_APP_MODAL|wxPD_REMAINING_TIME|wxPD_AUTO_HIDE );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
706 pd.SetSize( wxSize(320,140) );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
707 int count=0;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
708
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
709 wxString ccndir;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
710 bool cont = rootd.GetFirst( &ccndir, wxT("*.*"), wxDIR_DIRS );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
711 while ( cont ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
712 wxString gszFile = wxGetCwd() + wxT("/db/ccn.db");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
713 wxSQLite3Database ccndb;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
714 ccndb.Open( gszFile );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
715
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
716 wxSQLite3Statement stmt = ccndb.PrepareStatement("INSERT OR REPLACE INTO ccn VALUES( ?, datetime('now','localtime') )");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
717 stmt.Bind( 1, dt.Format(wxT("%Y-%m-%d")) );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
718 stmt.ExecuteQuery();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
719
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
720 stmt.Finalize();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
721
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
722 wxDir ccnd( pathroot + wxFILE_SEP_PATH + ccndir );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
723 if ( !ccnd.IsOpened() ) return;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
724 wxString hhsdir;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
725 bool c = ccnd.GetFirst( &hhsdir, wxT("*.*"), wxDIR_DIRS );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
726 wxRegEx reHhs(wxT("^0[1238][0-9]{8}$")); // 被保番チェック
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
727 while ( c ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
728 if ( reHhs.Matches(hhsdir) ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
729 wxString path = pathroot + wxFILE_SEP_PATH + ccndir + wxFILE_SEP_PATH + hhsdir;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
730
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
731 stmt = ccndb.PrepareStatement("INSERT OR REPLACE INTO path VALUES( ?, ? )");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
732 stmt.Bind( 1, hhsdir );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
733 stmt.Bind( 2, path );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
734 stmt.ExecuteQuery();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
735
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
736 stmt.Finalize();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
737 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
738 c = ccnd.GetNext(&hhsdir);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
739 pd.Update( count++, hhsdir+wxT("@")+ccndir+wxT("を処理しました.") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
740 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
741 ccndb.Close();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
742
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
743 cont = rootd.GetNext(&ccndir);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
744 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
745 wxMessageBox(wxT("インデックス作成が終了しました."));
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
746 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
747
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
748 /* インデックス更新一覧 */
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
749 void MyFrame::OnListCcn(wxCommandEvent& WXUNUSED(event))
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
750 {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
751 this->m_splitter->ReplaceWindow( this->m_html, this->m_gridCcn );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
752 this->m_gridCcn->Show(true);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
753 this->m_html->Show(false);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
754 MyCmdBox *c = (MyCmdBox*)FindWindowById( ID_CMD );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
755 c->Clear();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
756
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
757 wxString gszFile = wxGetCwd() + wxT("/db/ccn.db");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
758 wxSQLite3Database ccndb;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
759 ccndb.Open( gszFile );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
760
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
761 wxSQLite3Statement stmt = ccndb.PrepareStatement("SELECT ymd, time FROM ccn ORDER BY ymd DESC, time DESC");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
762 wxSQLite3ResultSet q = stmt.ExecuteQuery();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
763 int r=0;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
764 while ( q.NextRow() ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
765 wxString ymd = q.GetString(0);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
766 wxString time = q.GetString(1);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
767 this->m_gridCcn->AppendRows(1);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
768 this->m_gridCcn->SetCellValue(r,0,ymd);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
769 this->m_gridCcn->SetCellValue(r,1,time);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
770 r++;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
771 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
772
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
773 stmt.Finalize();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
774 ccndb.Close();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
775 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
776
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
777 /* 被保険者DB更新 */
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
778 void MyFrame::OnUpdateHhsDb(wxCommandEvent& WXUNUSED(event))
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
779 {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
780 FrameHhsDB *f = (FrameHhsDB*)FindWindowById( ID_HHSDB );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
781
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
782 if ( f == NULL ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
783 FrameHhsDB *hhsdb = new FrameHhsDB( this, ID_HHSDB );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
784 hhsdb->Show(true);
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
785 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
786 else {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
787 f->Raise();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
788 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
789 return;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
790 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
791
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
792 /* 被保険者整合性チェック */
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
793 void MyFrame::OnCheckHhs(wxCommandEvent& WXUNUSED(event))
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
794 {
10
24e0775af32e Add Name-View.
pyon@macmini
parents: 8
diff changeset
795 wxString logfn = wxGetCwd() + wxT("/tmp/checkhhs.log");
0
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
796 wxTextFile logFile;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
797 logFile.Open( logfn );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
798 logFile.Clear();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
799
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
800 wxString gszFile = wxGetCwd() + wxT("/db/ccn.db");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
801 wxSQLite3Database ccndb;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
802 ccndb.Open( gszFile );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
803 wxSQLite3Statement stmt = ccndb.PrepareStatement("ATTACH 'db/hhs.db' AS hhs");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
804 wxSQLite3ResultSet q = stmt.ExecuteQuery();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
805 stmt = ccndb.PrepareStatement("SELECT hhsno FROM path EXCEPT SELECT hhsno FROM hhs.hhs_master");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
806 q = stmt.ExecuteQuery();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
807
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
808 while ( q.NextRow() ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
809 logFile.AddLine( q.GetString(0) );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
810 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
811 stmt.Finalize();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
812 ccndb.Close();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
813
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
814 logFile.Write();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
815 logFile.Close();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
816
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
817 wxString msg = wxT("結果を ") + logfn + wxT(" に保存しました.");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
818 wxMessageBox( msg );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
819 return;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
820 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
821
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
822 /* DBバックアップ */
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
823 void MyFrame::OnBackupDB(wxCommandEvent& WXUNUSED(event))
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
824 {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
825 wxDateTime now = wxDateTime::Now();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
826 wxString nowstr = now.Format(wxT("%Y%m%d%H%M%S"));
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
827
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
828 wxString org = wxGetCwd() + wxT("/db/ccn.db");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
829 wxString bk = wxGetCwd() + wxT("/db/") + nowstr + wxT("_ccn.db");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
830 wxCopyFile( org, bk, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
831
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
832 org = wxGetCwd() + wxT("/db/hhs.db");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
833 bk = wxGetCwd() + wxT("/db/") + nowstr + wxT("_hhs.db");
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
834 wxCopyFile( org, bk, 0 );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
835
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
836 wxMessageBox( wxT("バックアップ終了.") );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
837 return;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
838 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
839
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
840 /* DB最適化 */
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
841 void MyFrame::OnOptimizeDB(wxCommandEvent& WXUNUSED(event))
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
842 {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
843 return;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
844 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
845
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
846 /* アプリケーションフォルダを開く */
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
847 void MyFrame::OnOpenAppDir(wxCommandEvent& WXUNUSED(event))
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
848 {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
849 wxStandardPaths appdir;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
850 wxString execmd = wxT("explorer ") + appdir.GetDataDir();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
851 wxExecute( execmd );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
852 return;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
853 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
854
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
855 /* データフォルダを開く */
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
856 void MyFrame::OnOpenDataDir(wxCommandEvent& WXUNUSED(event))
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
857 {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
858 wxString datadir = wxGetApp().rootdir;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
859 wxString execmd = wxT("explorer ") + datadir;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
860 wxExecute( execmd );
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
861 return;
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
862 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
863
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
864
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
865 /* 設定を保存 */
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
866 void MyFrame::SaveConfig(wxCloseEvent& WXUNUSED(event))
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
867 {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
868 if ( !IsIconized() && !IsMaximized() ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
869 wxGetApp().rect = this->GetRect();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
870 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
871
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
872 int i = m_cmdbox->hist.GetCount();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
873 for ( int j=0; j<5; j++ ) {
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
874 wxGetApp().searchhist[j] = m_cmdbox->hist[--i];
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
875 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
876
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
877 Destroy();
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
878 }
c174ac668e9f First commit ! (ver2.8)
pyon@macmini
parents:
diff changeset
879