Ultimissima cazzatina

git-svn-id: svn://10.65.10.50/trunk@2699 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
villa 1996-03-26 10:37:15 +00:00
parent b7b9d5d29d
commit 364401f662

View File

@ -546,13 +546,16 @@ void TAnaprint_app::set_scheda_socio()
ana.zero();
ana.put("TIPOA",soc.get("TIPOASOC"));
ana.put("CODANAGR",soc.get("CODANAGRSO"));
ana.read();
// always at top level
TString zio = ana.get("CODANAGR"); zio.insert("Socio ", 0);
if (ana.read() == NOERR)
{
TString zio("Socio ");
zio << soc.get("CODANAGRSO");
zio << "("; zio << soc.get("TIPOASOC") << "): ";
zio << ana.get("RAGSOC");
_bk_socio = set_bookmark(zio, _bk_ditta);
TString codconiuge = "";
TLocalisamfile* anaf;
@ -675,6 +678,7 @@ void TAnaprint_app::set_scheda_socio()
FLD(LF_ANAG,"DATAAGG"),
FLD(LF_SOCI,"DATAAGG"));
set_row(rw+13,""); set_row(rw+14,"");
}
ana.setkey(k);
ana.readat(rno);