Reset col when reading new lines. Fix issue #39356

packages/fcl-db/src/base/sqlscript.pp

@@ -509,6 +509,7 @@ begin
   FSkipStackIndex:=0;
   Faborted:=False;
   FLine:=1;
+  FCol:=1;
   DefaultDirectives;
   Repeat
     NextStatement();