fcl-db: datadict: SEQUENCE START value can be any signed integer value (+ missing spaces)

git-svn-id: trunk@32850 -

packages/fcl-db/src/datadict/fpdatadict.pp

@@ -2514,10 +2514,10 @@ end;
 function TFPDDSQLEngine.CreateSequenceSQL(Sequence: TDDSequenceDef): String;
 begin
   Result:='CREATE SEQUENCE '+Sequence.SequenceName;
-  If (Sequence.StartValue>0) then
-    Result:=Result+'START WITH '+IntToStr(Sequence.StartValue);
+  If (Sequence.StartValue<>0) then
+    Result:=Result+' START WITH '+IntToStr(Sequence.StartValue);
   If (Sequence.Increment<>0) then
-    Result:=Result+'INCREMENT BY '+IntToStr(Sequence.Increment);
+    Result:=Result+' INCREMENT BY '+IntToStr(Sequence.Increment);
 end;
 
 function TFPDDSQLEngine.CreateSequencesSQL(Sequences: TFPDDSequenceList): String;