Patch level :10.0 250
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:
		
							parent
							
								
									f0e91f172f
								
							
						
					
					
						commit
						9b5bca12ce
					
				@ -82,28 +82,30 @@ void TGoogle_mask::query_firm(int anno, long firm)
 | 
			
		||||
 | 
			
		||||
  xvt_fsys_save_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);
 | 
			
		||||
  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;
 | 
			
		||||
      if (tipodoc.full() && tipodoc.compare(file.get(1), -1, true) != 0)
 | 
			
		||||
        continue;
 | 
			
		||||
 | 
			
		||||
    if (tipodoc.full() && tipodoc.compare(file.get(1), -1, true) != 0)
 | 
			
		||||
      continue;
 | 
			
		||||
      if (codcf > 0 && codcf != file.get_long(3))
 | 
			
		||||
        continue;
 | 
			
		||||
 | 
			
		||||
    if (codcf > 0 && codcf != file.get_long(3))
 | 
			
		||||
      continue;
 | 
			
		||||
 | 
			
		||||
    TToken_string& row = sheet.row(-1);
 | 
			
		||||
    row.add(firm);
 | 
			
		||||
    row.add(anno);
 | 
			
		||||
    row.add(file);
 | 
			
		||||
      TToken_string& row = sheet.row(-1);
 | 
			
		||||
      row.add(firm);
 | 
			
		||||
      row.add(anno);
 | 
			
		||||
      row.add(file);
 | 
			
		||||
    }
 | 
			
		||||
    xvt_slist_destroy(files);
 | 
			
		||||
  }
 | 
			
		||||
  xvt_slist_destroy(files);
 | 
			
		||||
 | 
			
		||||
  else
 | 
			
		||||
    error_box("Ma che cavolo di cartella %s stai guardando Willis?", (const char*) name);
 | 
			
		||||
  xvt_fsys_restore_dir();
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
@ -167,6 +169,8 @@ TGoogle_mask::TGoogle_mask(const TFilename& base_dir)
 | 
			
		||||
  TSheet_field::set_line_number_width(7);
 | 
			
		||||
  read_mask("ba8600a", 0, 1);
 | 
			
		||||
  set_handlers();
 | 
			
		||||
 | 
			
		||||
  set(F_STUDIO, firm2dir(-1));
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
///////////////////////////////////////////////////////////
 | 
			
		||||
 | 
			
		||||
@ -5,4 +5,5 @@
 | 
			
		||||
#define F_TIPOCF     205
 | 
			
		||||
#define F_CLIFO      206
 | 
			
		||||
#define F_CLIRAGSOC  207
 | 
			
		||||
#define F_STUDIO     208
 | 
			
		||||
#define F_SHEET      300
 | 
			
		||||
 | 
			
		||||
@ -1,21 +1,23 @@
 | 
			
		||||
#include "ba8600a.h"
 | 
			
		||||
 | 
			
		||||
TOOLBAR "Toolbar" 0 -2 0 2
 | 
			
		||||
TOOLBAR "topbar" 0 0 0 2
 | 
			
		||||
 | 
			
		||||
BUTTON DLG_ELABORA 10 2
 | 
			
		||||
BUTTON DLG_ELABORA
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT -12 -11 "~Elabora"
 | 
			
		||||
  PROMPT -1 -1 "~Elabora"
 | 
			
		||||
  PICTURE BMP_ELABORA
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
BUTTON DLG_QUIT 10 2
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT -22 -11 ""
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
#include <helpbar.h>
 | 
			
		||||
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
 | 
			
		||||
BEGIN
 | 
			
		||||
 | 
			
		||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user