2014-11-18 14:13 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)

* include/dbinfo.ch
    + added new rddInfo() action: RDDI_DECIMALS

  * include/hbrdddbf.h
  * src/rdd/dbf1.c
    + added support for RDDI_DECIMALS - when set it's used as default number
      of decimal places in conversions to string for fields type "B" and "8"
      with 0 number of decimal places in DBF header.

include/dbinfo.ch

@@ -106,6 +106,7 @@
 #define RDDI_LOCKRETRY           43   /* Get/Set record and file lock timeout value */
 #define RDDI_DIRTYREAD           44   /* Get/Set index dirty read flag */
 #define RDDI_INDEXPAGESIZE       45   /* Get/Set default index page size */
+#define RDDI_DECIMALS            46   /* Get/Set default number of decimal places for numeric fields if it's undefined */
 
 /*
    Constants for SELF_ORDINFO ()

include/hbrdddbf.h

@@ -142,6 +142,7 @@ typedef struct _DBFDATA
    HB_BYTE   bCryptType;       /* DB_CRYPT_NONE */
    HB_BYTE   bMemoType;        /* DB_MEMO_FPT */
    HB_BYTE   bMemoExtType;     /* DB_MEMOVER_FLEX */
+   HB_BYTE   bDecimals;        /* RDDI_DECIMALS */
    HB_USHORT uiDirtyRead;      /* HB_IDXREAD_CLEANMASK */
    HB_USHORT uiIndexPageSize;  /* 0 */
    HB_ULONG  ulMemoBlockSize;  /* 0 */