From e41619eea3814936fb62322c7cd9db5d72cb85e4 Mon Sep 17 00:00:00 2001
From: Marty Kraimer <mrkraimer@comcast.net>
Date: Mon, 13 Jan 1997 15:54:54 +0000
Subject: [PATCH] Be willing to generate null string fields

---
 src/dbStatic/dbStaticLib.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/dbStatic/dbStaticLib.c b/src/dbStatic/dbStaticLib.c
index 0fd6daa4f..99f83b751 100644
--- a/src/dbStatic/dbStaticLib.c
+++ b/src/dbStatic/dbStaticLib.c
@@ -827,6 +827,8 @@ long dbWriteRecordFP(DBBASE *pdbbase,FILE *fp,char *precordTypename,int level)
 		if(!dbIsDefaultValue(pdbentry) || level>0) {
 		    fprintf(fp,"\tfield(%s,\"%s\")\n",
 			dbGetFieldName(pdbentry),dbGetString(pdbentry));
+		} else if(level>0) { /*generate 0 length string*/
+		    fprintf(fp,"\tfield(%s,\"\")\n",dbGetFieldName(pdbentry));
 		}
 		status=dbNextField(pdbentry,dctonly);
 	    }