From fc804efc22afc6b2f0b97175b01232ff3d3984a2 Mon Sep 17 00:00:00 2001
From: Even Rouault <even.rouault@mines-paris.org>
Date: Mon, 19 May 2014 22:33:49 +0200
Subject: [PATCH] When writing to .dat, initialize date fields if the field is
 not set (http://trac.osgeo.org/gdal/ticket/4150)

---
 mitab/mitab_feature.cpp | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/mitab/mitab_feature.cpp b/mitab/mitab_feature.cpp
index de2a004..efd6e41 100644
--- a/mitab/mitab_feature.cpp
+++ b/mitab/mitab_feature.cpp
@@ -620,6 +620,9 @@ int TABFeature::WriteRecordToDATFile(TABDATFile *poDATFile,
                 GetFieldAsDateTime(iField, &nYear, &nMon, &nDay,
                                    &nHour, &nMin, &nSec, &nTZFlag);
              }
+             else
+                 nYear = nMon = nDay = 0;
+
              nStatus = poDATFile->WriteDateField(nYear, nMon, nDay,
                                                  poINDFile, panIndexNo[iField]);
 #else
@@ -653,6 +656,9 @@ int TABFeature::WriteRecordToDATFile(TABDATFile *poDATFile,
                 GetFieldAsDateTime(iField, &nYear, &nMon, &nDay,
                                    &nHour, &nMin, &nSec, &nTZFlag);
              }
+             else
+                 nYear = nMon = nDay = nHour = nMin = nSec = 0;
+
              nStatus = poDATFile->WriteDateTimeField(nYear, nMon, nDay, 
                                                      nHour, nMin, nSec, 0,
                                                      poINDFile, panIndexNo[iField]);