Aggiunto pack delle tabelle comuni

git-svn-id: svn://10.65.10.50/trunk@2701 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1996-03-27 11:29:24 +00:00
parent f28253517a
commit d66747e754

View File

@ -929,6 +929,12 @@ void TConversione_archivi::convert_codreg() const
} }
// (fase 2) // (fase 2)
// compatta la tabella
{
TSystemisamfile tabcom(LF_TABCOM);
tabcom.pack();
}
// vuota la tabella concessioni // vuota la tabella concessioni
{ {
TTable uffconc("%UCC"); TTable uffconc("%UCC");