static char x[100];
char *cp;
- strcpy (x, s);
+ memset (x, 0, sizeof (x));
+ strncpy (x, s, 99);
for (cp=x;*cp;cp++)
if (isupper(*cp))
return p;
}
-char dtaus_char(void *buf, unsigned int pos)
+char *strip_nondigits (char *s)
+{
+ char *p;
+ char *x;
+
+ for (x=s,p=s;*x;*x++)
+ if (isdigit (*x))
+ *(p++) = *x;
+ *(p++) = '\0';
+
+ return s;
+}
+
+char dtaus_char (void *buf, unsigned int pos)
{
static char res;
char *bufp = buf;
timer = time ( NULL );
loctime = localtime(&timer);
- sprintf(res, "%02d.%02d.%02d", loctime->tm_mday, loctime->tm_mon+1, loctime->tm_year);
+ sprintf(res, "%02d.%02d.%02d", loctime->tm_mday, loctime->tm_mon+1, loctime->tm_year % 100);
return res;
}
buf[3] = '8';
buf[4] = 'A';
for (i=15;i<15+8; i++) buf[i] = '0';
- sprintf(tmp, "%02d%02d%2d", loctime->tm_mday, loctime->tm_mon+1, loctime->tm_year);
+ sprintf(tmp, "%02d%02d%02d", loctime->tm_mday, loctime->tm_mon+1, loctime->tm_year % 100);
for (i=0; i<6; i++) buf[50+i] = tmp[i];
for (i=56;i<56+4; i++) buf[i] = ' ';
for (i=70;i<70+10; i++) buf[i] = '0';
dtaus_prepareA(buf);
buf[5] = values[A_TRANS][0];
buf[6] = values[A_TRANS][1];
- sprintf (tmp, "%s", padzeroclip(values[A_BLZ],8));
+ sprintf (tmp, "%s", padzeroclip (strip_nondigits (values[A_BLZ]),8));
for (i=0; i<8; i++) buf[recA[A_BLZ].pos+i] = tmp[i];
sprintf (tmp, "%-27s", upcase(values[A_NAME]));
for (i=0; i<27; i++) buf[recA[A_NAME].pos+i] = tmp[i];
- sprintf (tmp, "%s", padzeroclip(values[A_KTO],10));
+ sprintf (tmp, "%s", padzeroclip (strip_nondigits (values[A_KTO]),10));
for (i=0; i<10; i++) buf[recA[A_KTO].pos+i] = tmp[i];
fputs(buf, f);
}
for (i=0; i<5; i++) buf[recC[C_TRANS].pos+i] = tmp[i];
if (values[C_MYBLZ])
- sprintf (tmp, "%s", padzeroclip(values[C_MYBLZ],8));
+ sprintf (tmp, "%s", padzeroclip (strip_nondigits (values[C_MYBLZ]),8));
else
- sprintf (tmp, "%s", padzeroclip(valuesA[A_BLZ],8));
+ sprintf (tmp, "%s", padzeroclip (strip_nondigits (valuesA[A_BLZ]),8));
for (i=0; i<recC[C_MYBLZ].len; i++) buf[5+i] = tmp[i];
for (i=0; i<recC[C_MYBLZ].len; i++) buf[recC[C_MYBLZ].pos+i] = tmp[i];
- sprintf (tmp, "%s", padzeroclip(values[C_BLZ],8));
+ sprintf (tmp, "%s", padzeroclip (strip_nondigits (values[C_BLZ]),8));
for (i=0; i<recC[C_BLZ].len; i++) buf[recC[C_BLZ].pos+i] = tmp[i];
- sprintf (tmp, "%s", padzeroclip(values[C_KTO],10));
+ sprintf (tmp, "%s", padzeroclip (strip_nondigits (values[C_KTO]),10));
for (i=0; i<recC[C_KTO].len; i++) buf[recC[C_KTO].pos+i] = tmp[i];
- sprintf (tmp, "%s", padzeroclip(real2string(values[C_VAL]),11));
+ sprintf (tmp, "%s", padzeroclip (real2string(values[C_VAL]),11));
for (i=0; i<recC[C_VAL].len; i++) buf[recC[C_VAL].pos+i] = tmp[i];
if (values[C_MYKTO])
- sprintf (tmp, "%s", padzeroclip(values[C_MYKTO],10));
+ sprintf (tmp, "%s", padzeroclip (strip_nondigits (values[C_MYKTO]),10));
else
- sprintf (tmp, "%s", padzeroclip(valuesA[A_KTO],10));
+ sprintf (tmp, "%s", padzeroclip (strip_nondigits (valuesA[A_KTO]),10));
for (i=0; i<recC[C_MYKTO].len; i++) buf[recC[C_MYKTO].pos+i] = tmp[i];
sprintf (tmp, "%-27s", upcase(values[C_NAME]));
for (i=0; i<recC[C_NAME].len; i++) buf[recC[C_NAME].pos+i] = tmp[i];
sprintf (tmp, "%07d", count);
for (i=0; i<recE[E_COUNT].len; i++) buf[recE[E_COUNT].pos+i] = tmp[i];
bigint_sprintf (tmp, "%s", sum);
- padzeroclip(tmp,13);
+ padzeroclip (tmp,13);
for (i=0; i<recE[E_VAL].len; i++) buf[recE[E_VAL].pos+i] = tmp[i];
bigint_sprintf (tmp, "%s", sum);
- padzeroclip(tmp,13);
+ padzeroclip (tmp,13);
for (i=0; i<recE[E_VAL].len; i++) buf[recE[E_VAL].pos+i] = tmp[i];
bigint_sprintf (tmp, "%s", kto);
- padzeroclip(tmp,17);
+ padzeroclip (tmp,17);
for (i=0; i<recE[E_KTO].len; i++) buf[recE[E_KTO].pos+i] = tmp[i];
bigint_sprintf (tmp, "%s", blz);
- padzeroclip(tmp,17);
+ padzeroclip (tmp,17);
for (i=0; i<recE[E_BLZ].len; i++) buf[recE[E_BLZ].pos+i] = tmp[i];
fputs(buf, f);