Aggiunta conversione vecchi profili di stampa. (Cancellazione dei vecchi
e caricamento dei nuovi da lf0054.txt) git-svn-id: svn://10.65.10.50/trunk@1961 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
6708d7658e
commit
d42e610d21
16
ba/bacnv.cpp
16
ba/bacnv.cpp
@ -245,6 +245,22 @@ bool TConversione_archivi::menu(MENU_TAG)
|
||||
TSystemisamfile comuni(LF_COMUNI);
|
||||
|
||||
comuni.load(format("%sstd/ncom02.txt", __ptprf));
|
||||
|
||||
//Cancella tutti i vecchi profili, sostituendoli con i nuovi
|
||||
TSystemisamfile form(LF_FORM),rform(LF_RFORM);
|
||||
TDir d;
|
||||
TFilename lf;
|
||||
|
||||
d.get(LF_FORM, _nolock, _comdir, _sysdirop);
|
||||
d.eod() = 0;
|
||||
d.put(LF_FORM, _comdir, _sysdirop);
|
||||
form.pack();
|
||||
lf.format("%sstd/lf0054.txt", __ptprf);
|
||||
if (fexist(lf)) form.load(lf);
|
||||
d.get(LF_RFORM, _nolock, _comdir, _sysdirop);
|
||||
d.eod() = 0;
|
||||
d.put(LF_RFORM, _comdir, _sysdirop);
|
||||
rform.pack();
|
||||
}
|
||||
}
|
||||
default:
|
||||
|
Loading…
x
Reference in New Issue
Block a user