root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Patch level :10.0 250

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :
0001155: La ricerca file archiviati è rimasta nel look 3.2
Descrizione  La ricerca file archiviati è rimasta nel look 3.2


git-svn-id: svn://10.65.10.50/trunk@18355 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2009-02-25 16:08:18 +00:00
parent f0e91f172f
commit 9b5bca12ce
3 changed files with 34 additions and 27 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

40
ba/ba8600.cpp
View File

@ -82,28 +82,30 @@ void TGoogle_mask::query_firm(int anno, long firm)
xvt_fsys_save_dir(); xvt_fsys_save_dir();
DIRECTORY dir; xvt_fsys_convert_str_to_dir(name, &dir); DIRECTORY dir; xvt_fsys_convert_str_to_dir(name, &dir);
xvt_fsys_set_dir(&dir); if (xvt_fsys_set_dir(&dir))
{
SLIST files = xvt_fsys_list_files("", "*.*", FALSE);
for (SLIST_ELT e = xvt_slist_get_first(files); e; e = xvt_slist_get_next(files, e))
{
TToken_string file(xvt_slist_get(files, e, NULL), '_');
if (file.items() < 3)
continue;
SLIST files = xvt_fsys_list_files("", "*.*", FALSE); if (tipodoc.full() && tipodoc.compare(file.get(1), -1, true) != 0)
for (SLIST_ELT e = xvt_slist_get_first(files); e; e = xvt_slist_get_next(files, e)) continue;
{
TToken_string file(xvt_slist_get(files, e, NULL), '_');
if (file.items() < 3)
continue;
if (tipodoc.full() && tipodoc.compare(file.get(1), -1, true) != 0) if (codcf > 0 && codcf != file.get_long(3))
continue; continue;
if (codcf > 0 && codcf != file.get_long(3)) TToken_string& row = sheet.row(-1);
continue; row.add(firm);
row.add(anno);
TToken_string& row = sheet.row(-1); row.add(file);
row.add(firm); }
row.add(anno); xvt_slist_destroy(files);
row.add(file);
} }
xvt_slist_destroy(files); else
error_box("Ma che cavolo di cartella %s stai guardando Willis?", (const char*) name);
xvt_fsys_restore_dir(); xvt_fsys_restore_dir();
} }
@ -167,6 +169,8 @@ TGoogle_mask::TGoogle_mask(const TFilename& base_dir)
TSheet_field::set_line_number_width(7); TSheet_field::set_line_number_width(7);
read_mask("ba8600a", 0, 1); read_mask("ba8600a", 0, 1);
set_handlers(); set_handlers();
set(F_STUDIO, firm2dir(-1));
} }
/////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////

1
ba/ba8600a.h
View File

@ -5,4 +5,5 @@
#define F_TIPOCF 205 #define F_TIPOCF 205
#define F_CLIFO 206 #define F_CLIFO 206
#define F_CLIRAGSOC 207 #define F_CLIRAGSOC 207
#define F_STUDIO 208
#define F_SHEET 300 #define F_SHEET 300

20
ba/ba8600a.uml
View File

@ -1,21 +1,23 @@
#include "ba8600a.h" #include "ba8600a.h"
TOOLBAR "Toolbar" 0 -2 0 2 TOOLBAR "topbar" 0 0 0 2
BUTTON DLG_ELABORA 10 2 BUTTON DLG_ELABORA
BEGIN BEGIN
PROMPT -12 -11 "~Elabora" PROMPT -1 -1 "~Elabora"
PICTURE BMP_ELABORA PICTURE BMP_ELABORA
END END
BUTTON DLG_QUIT 10 2 #include <helpbar.h>
BEGIN
PROMPT -22 -11 ""
END
ENDPAGE ENDPAGE
PAGE "Ricerca documenti" 0 0 0 -2 PAGE "Ricerca documenti" 0 2 0 0
STRING F_STUDIO 256 78
BEGIN
PROMPT 1 0 "Studio "
FLAGS "D"
END
NUMBER F_DITTA 5 NUMBER F_DITTA 5
BEGIN BEGIN