Selaa lähdekoodia

Reset col when reading new lines. Fix issue #39356

(cherry picked from commit 672f90bf40cc6fe8d3dbb2be0402e41d7113fc00)
Michaël Van Canneyt 3 vuotta sitten
vanhempi
commit
0376cb7ae8
1 muutettua tiedostoa jossa 1 lisäystä ja 0 poistoa
  1. 1 0
      packages/fcl-db/src/base/sqlscript.pp

+ 1 - 0
packages/fcl-db/src/base/sqlscript.pp

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