ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/runtime/nongui/ibxscript.pas
(Generate patch)

Comparing ibx/trunk/runtime/nongui/ibxscript.pas (file contents):
Revision 348 by tony, Wed Oct 6 09:38:14 2021 UTC vs.
Revision 349 by tony, Mon Oct 18 08:39:40 2021 UTC

# Line 631 | Line 631 | begin
631          sqltCommentLine:
632            stmt += '/* ' + TokenText + ' */' + LineEnding;
633  
634 +        sqltQuotedString:
635 +          stmt += '''' + SQLSafeString(TokenText) + '''';  {exists some DECLARE with cursor having SELECT ...\... rc.rdb$constraint_type = 'PRIMARY KEY');}
636 +
637          sqltSemiColon:
638            begin
639              State := stInStmt;
# Line 1484 | Line 1487 | begin
1487    while FSQLReader.GetNextStatement(stmt) do
1488    try
1489      stmt := trim(stmt);
1490 < //    writeln('stmt = ',stmt);
1490 > //    writeln('stmt = "',stmt,'"');
1491      if stmt = '' then continue;
1492      if not ProcessStatement(stmt) then
1493        ExecSQL(stmt);

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines