Errore MI4357

git-svn-id: svn://10.65.10.50/trunk@4213 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1997-03-17 09:44:12 +00:00
parent a31e8709cf
commit cc86160256

View File

@ -246,17 +246,22 @@ bool TPrintclifo_app::preprocess_page(int file, int counter)
//modifica del 27/04/1995
TString16 comcf = get_field(LF_CLIFO, CLI_COMCF);
TRectype com = look_comuni(comcf);
if (com.empty())
_comune.cut(0);
_comprov.cut(0);
if (_localita.not_empty())
{
_comprov = _comune = _localita;
_prov = "";
_comune << _localita << " ";
_comprov = _comune;
}
if (com.empty())
_prov = "";
else
{
_comprov = com.get(COM_DENCOM);
_comprov << com.get(COM_DENCOM);
_comprov << " ";
_comprov << com.get(COM_PROVCOM);
_comune = (com.get(COM_DENCOM)).left(20);
_comune << (com.get(COM_DENCOM));
_comune = _comune.left(20);
_prov = com.get(COM_PROVCOM);
}
TString16 comnasc = get_field(LF_CLIFO, CLI_COMNASC);