Modifica alla CPutFieldBuff(). Ora scrive al massimo i caratteri per
i quali la lunghezza del campo e' configurata, evitando le fastidiose segnalazioni "Il campo nnnn non appartiene al file nnn". git-svn-id: svn://10.65.10.50/trunk@3138 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
40dc9b80a7
commit
af28c001f4
@ -1024,11 +1024,7 @@ int CPutFieldBuff(fieldname,recd,s,recout)
|
|||||||
if (recd->Fd[p].TypeF == RealF) setdec(s2, recd->Fd[p].Dec);
|
if (recd->Fd[p].TypeF == RealF) setdec(s2, recd->Fd[p].Dec);
|
||||||
l = LENGTH(s2);
|
l = LENGTH(s2);
|
||||||
if (l > len)
|
if (l > len)
|
||||||
{
|
l = len;
|
||||||
/* free(s2); */
|
|
||||||
yesnofatal_box("Impossibile scrivere %d caratteri su di un campo di %d", l, len);
|
|
||||||
return(0);
|
|
||||||
}
|
|
||||||
s1 = recout + off ;
|
s1 = recout + off ;
|
||||||
for (i = 0; i < l ; i++) s1[i] = s2[i] ;
|
for (i = 0; i < l ; i++) s1[i] = s2[i] ;
|
||||||
if ((recd->Fd[p].TypeF == IntF) ||
|
if ((recd->Fd[p].TypeF == IntF) ||
|
||||||
|
Loading…
x
Reference in New Issue
Block a user