@abaplint/core 2.113.234 → 2.113.236

package/build/abaplint.d.ts

@@ -3908,6 +3908,7 @@ declare interface IReferenceExtras {
 export declare interface IRegistry {
     parse(): IRegistry;
     parseAsync(input?: IRunInput): Promise<IRegistry>;
+    clear(): void;
     addDependencies(files: readonly IFile[]): IRegistry;
     addDependency(file: IFile): IRegistry;
     removeDependency(obj: IObject): void;
@@ -5615,15 +5616,17 @@ declare class RefreshControl implements IStatement {
 }
 
 export declare class Registry implements IRegistry {
-    private readonly objects;
-    private readonly objectsByType;
-    private readonly dependencies;
-    private readonly ddicReferences;
-    private readonly msagReferences;
-    private readonly macroReferences;
+    private objects;
+    private objectsByType;
+    private dependencies;
+    private ddicReferences;
+    private msagReferences;
+    private macroReferences;
     private errorNamespace;
     private conf;
     constructor(conf?: IConfiguration);
+    /** clears all objects, keeping the configuration */
+    clear(): void;
     static abaplintVersion(): string;
     getDDICReferences(): IDDICReferences;
     getMSAGReferences(): IMSAGReferences;

package/build/src/abap/2_statements/expressions/definition_name.js

@@ -5,7 +5,7 @@ const combi_1 = require("../combi");
 const tokens_1 = require("../../1_lexer/tokens");
 class DefinitionName extends combi_1.Expression {
     getRunnable() {
-        const r = (0, combi_1.regex)(/^&|&?((\w*\/\w+\/)|(\w*\/\w+\/)?[\w\*$%\?]+)$/);
+        const r = (0, combi_1.regex)(/^&|&?((\w*\/\w+\/)|(\w*\/\w+\/)?[\w\*$%\?#]+)$/);
         return (0, combi_1.seq)(r, (0, combi_1.starPrio)((0, combi_1.seq)((0, combi_1.tok)(tokens_1.Dash), (0, combi_1.optPrio)(r))), (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.DashW)));
     }
 }

package/build/src/abap/2_statements/expressions/sql_from.js

@@ -5,9 +5,19 @@ const combi_1 = require("../combi");
 const tokens_1 = require("../../1_lexer/tokens");
 const _1 = require(".");
 class SQLFrom extends combi_1.Expression {
+    // todo: rewrite/refactor this method
     getRunnable() {
-        const from = (0, combi_1.seq)("FROM", (0, combi_1.starPrio)((0, combi_1.tok)(tokens_1.WParenLeftW)), _1.SQLFromSource);
-        const source = (0, combi_1.seq)(from, (0, combi_1.starPrio)((0, combi_1.seq)((0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)), _1.SQLJoin, (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)))));
+        const joins = (0, combi_1.starPrio)((0, combi_1.seq)((0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)), _1.SQLJoin));
+        // No opening parens
+        const from0 = (0, combi_1.seq)("FROM", _1.SQLFromSource, joins);
+        // 1 to 6 opening parens, with up to that many closing parens at the end
+        const from1 = (0, combi_1.seq)("FROM", (0, combi_1.tok)(tokens_1.WParenLeftW), _1.SQLFromSource, joins, (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)));
+        const from2 = (0, combi_1.seq)("FROM", (0, combi_1.tok)(tokens_1.WParenLeftW), (0, combi_1.tok)(tokens_1.WParenLeftW), _1.SQLFromSource, joins, (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)), (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)));
+        const from3 = (0, combi_1.seq)("FROM", (0, combi_1.tok)(tokens_1.WParenLeftW), (0, combi_1.tok)(tokens_1.WParenLeftW), (0, combi_1.tok)(tokens_1.WParenLeftW), _1.SQLFromSource, joins, (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)), (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)), (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)));
+        const from4 = (0, combi_1.seq)("FROM", (0, combi_1.tok)(tokens_1.WParenLeftW), (0, combi_1.tok)(tokens_1.WParenLeftW), (0, combi_1.tok)(tokens_1.WParenLeftW), (0, combi_1.tok)(tokens_1.WParenLeftW), _1.SQLFromSource, joins, (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)), (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)), (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)), (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)));
+        const from5 = (0, combi_1.seq)("FROM", (0, combi_1.tok)(tokens_1.WParenLeftW), (0, combi_1.tok)(tokens_1.WParenLeftW), (0, combi_1.tok)(tokens_1.WParenLeftW), (0, combi_1.tok)(tokens_1.WParenLeftW), (0, combi_1.tok)(tokens_1.WParenLeftW), _1.SQLFromSource, joins, (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)), (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)), (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)), (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)), (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)));
+        const from6 = (0, combi_1.seq)("FROM", (0, combi_1.tok)(tokens_1.WParenLeftW), (0, combi_1.tok)(tokens_1.WParenLeftW), (0, combi_1.tok)(tokens_1.WParenLeftW), (0, combi_1.tok)(tokens_1.WParenLeftW), (0, combi_1.tok)(tokens_1.WParenLeftW), (0, combi_1.tok)(tokens_1.WParenLeftW), _1.SQLFromSource, joins, (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)), (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)), (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)), (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)), (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)), (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW)));
+        const source = (0, combi_1.altPrio)(from6, from5, from4, from3, from2, from1, from0);
         return source;
     }
 }

package/build/src/abap/2_statements/expressions/sql_in.js

@@ -12,9 +12,9 @@ class SQLIn extends combi_1.Expression {
         const listOld = (0, combi_1.seq)((0, combi_1.tok)(tokens_1.WParenLeft), (0, combi_1.alt)((0, combi_1.ver)(version_1.Version.v740sp05, short, version_1.Version.OpenABAP), val), (0, combi_1.starPrio)((0, combi_1.seq)(",", val)), (0, combi_1.altPrio)((0, combi_1.tok)(tokens_1.ParenRight), (0, combi_1.tok)(tokens_1.ParenRightW), (0, combi_1.tok)(tokens_1.WParenRightW)));
         const listNew = (0, combi_1.seq)((0, combi_1.tok)(tokens_1.WParenLeftW), val, (0, combi_1.starPrio)((0, combi_1.seq)(",", (0, combi_1.altPrio)(short, val))), (0, combi_1.altPrio)((0, combi_1.tok)(tokens_1.WParenRight), (0, combi_1.tok)(tokens_1.WParenRightW)));
         // version is a guess, https://github.com/abaplint/abaplint/issues/2530
-        const list = (0, combi_1.alt)(listOld, (0, combi_1.ver)(version_1.Version.v740sp02, listNew, version_1.Version.OpenABAP));
+        const listNeww = (0, combi_1.ver)(version_1.Version.v740sp02, listNew, version_1.Version.OpenABAP);
         const subSelect = (0, combi_1.seq)("(", _1.Select, ")");
-        const inn = (0, combi_1.seq)("IN", (0, combi_1.altPrio)(_1.SQLSource, list, subSelect));
+        const inn = (0, combi_1.seq)("IN", (0, combi_1.altPrio)(subSelect, listOld, listNeww, _1.SQLSource));
         return inn;
     }
 }

package/build/src/abap/2_statements/statements/field.js

@@ -7,12 +7,12 @@ const version_1 = require("../../../version");
 const tokens_1 = require("../../1_lexer/tokens");
 class Field {
     getMatcher() {
-        const module = (0, combi_1.seq)("MODULE", expressions_1.FormName, (0, combi_1.opt)((0, combi_1.alt)("ON INPUT", "ON REQUEST", "ON CHAIN-REQUEST")));
+        const module = (0, combi_1.seq)("MODULE", expressions_1.FormName, (0, combi_1.opt)((0, combi_1.alt)("ON INPUT", "ON REQUEST", "ON CHAIN-REQUEST", "AT CURSOR-SELECTION")));
         const values = (0, combi_1.seq)("VALUES", (0, combi_1.tok)(tokens_1.WParenLeft), "BETWEEN", expressions_1.Constant, "AND", expressions_1.Constant, (0, combi_1.tok)(tokens_1.ParenRightW));
         const wit = (0, combi_1.seq)("WITH", expressions_1.FieldChain);
         const cond = (0, combi_1.seq)(expressions_1.FieldChain, "=", expressions_1.FieldChain);
         const where = (0, combi_1.seq)(cond, (0, combi_1.starPrio)((0, combi_1.seq)("AND", cond)));
-        const select = (0, combi_1.seq)("SELECT * FROM", expressions_1.FieldChain, "WHERE", where, "INTO RESULT WHENEVER NOT FOUND SEND ERRORMESSAGE");
+        const select = (0, combi_1.seq)("SELECT * FROM", expressions_1.FieldChain, "WHERE", where, (0, combi_1.opt)("INTO RESULT WHENEVER NOT FOUND SEND ERRORMESSAGE"));
         const ret = (0, combi_1.seq)("FIELD", expressions_1.FieldChain, (0, combi_1.opt)((0, combi_1.altPrio)(module, values, wit, select)));
         return (0, combi_1.verNot)(version_1.Version.Cloud, ret);
     }

package/build/src/abap/2_statements/statements/perform.js

@@ -14,7 +14,9 @@ class Perform {
         const program = (0, combi_1.seq)("IN PROGRAM", (0, combi_1.opt)((0, combi_1.alt)(Expressions.Dynamic, Expressions.IncludeName)));
         const found = (0, combi_1.str)("IF FOUND");
         const full = (0, combi_1.seq)((0, combi_1.alt)(Expressions.FormName, Expressions.Dynamic), (0, combi_1.opt)((0, combi_1.verNot)(version_1.Version.Cloud, program)));
-        const ret = (0, combi_1.seq)("PERFORM", (0, combi_1.alt)(short, full), (0, combi_1.opt)(found), (0, combi_1.opt)(expressions_1.PerformTables), (0, combi_1.opt)(expressions_1.PerformUsing), (0, combi_1.opt)(expressions_1.PerformChanging), (0, combi_1.opt)(found), (0, combi_1.opt)(commit));
+        const normal = (0, combi_1.seq)((0, combi_1.opt)(found), (0, combi_1.opt)(expressions_1.PerformTables), (0, combi_1.opt)(expressions_1.PerformUsing), (0, combi_1.opt)(expressions_1.PerformChanging), (0, combi_1.opt)(found), (0, combi_1.opt)(commit));
+        const of = (0, combi_1.seq)("OF", (0, combi_1.plus)(Expressions.FormName));
+        const ret = (0, combi_1.seq)("PERFORM", (0, combi_1.alt)(short, full), (0, combi_1.altPrio)(of, normal));
         return ret;
     }
 }

package/build/src/abap/5_syntax/basic_types.js

@@ -2,6 +2,7 @@
 Object.defineProperty(exports, "__esModule", { value: true });
 exports.BasicTypes = void 0;
 const _typed_identifier_1 = require("../types/_typed_identifier");
+const nodes_1 = require("../nodes");
 const Expressions = require("../2_statements/expressions");
 const Statements = require("../2_statements/statements");
 const Types = require("../types/basic");
@@ -158,6 +159,30 @@ class BasicTypes {
                         type = new basic_1.TableType(type.getRowType(), { withHeader: false, keyType: Types.TableKeyType.default });
                     }
                 }
+                else if (child instanceof nodes_1.ExpressionNode && child.get() instanceof Expressions.FieldLength) {
+                    const len = parseInt(child.concatTokens().replace("(", "").replace(")", ""), 10);
+                    if (isNaN(len)) {
+                        type = new Types.UnknownType("Type error, invalid field length");
+                    }
+                    else {
+                        if (type instanceof Types.DateType) {
+                            if (len > 8) {
+                                type = new Types.UnknownType("Type error, offset too long");
+                            }
+                            else {
+                                type = new Types.CharacterType(len);
+                            }
+                        }
+                        else if (type instanceof Types.CharacterType) {
+                            if (len <= type.getLength()) {
+                                type = new Types.CharacterType(len);
+                            }
+                            else {
+                                type = new Types.UnknownType("Type error, offset too long");
+                            }
+                        }
+                    }
+                }
                 else { // field name
                     if (type instanceof Types.TableType) {
                         type = type.getRowType();

package/build/src/abap/5_syntax/statements/fieldsymbol.js

@@ -5,18 +5,25 @@ const Expressions = require("../../2_statements/expressions");
 const _typed_identifier_1 = require("../../types/_typed_identifier");
 const basic_types_1 = require("../basic_types");
 const unknown_type_1 = require("../../types/basic/unknown_type");
+const basic_1 = require("../../types/basic");
 class FieldSymbol {
     runSyntax(node, input) {
         var _a;
         const fsname = (_a = node.findFirstExpression(Expressions.FieldSymbol)) === null || _a === void 0 ? void 0 : _a.getFirstToken();
+        if (fsname === undefined) {
+            return;
+        }
+        if (node.getChildren().length === 5) {
+            // no type specified
+            input.scope.addIdentifier(new _typed_identifier_1.TypedIdentifier(fsname, input.filename, basic_1.VoidType.get("FS-SIMPLE")));
+            return;
+        }
         const bfound = new basic_types_1.BasicTypes(input).parseType(node);
-        if (bfound && fsname) {
+        if (bfound) {
             input.scope.addIdentifier(new _typed_identifier_1.TypedIdentifier(fsname, input.filename, bfound));
             return;
         }
-        if (fsname) {
-            input.scope.addIdentifier(new _typed_identifier_1.TypedIdentifier(fsname, input.filename, new unknown_type_1.UnknownType("Fieldsymbol, fallback")));
-        }
+        input.scope.addIdentifier(new _typed_identifier_1.TypedIdentifier(fsname, input.filename, new unknown_type_1.UnknownType("Fieldsymbol, fallback")));
     }
 }
 exports.FieldSymbol = FieldSymbol;

package/build/src/registry.js

@@ -61,13 +61,20 @@ class Registry {
         this.objectsByType = {};
         this.dependencies = {};
         this.setConfig(conf ? conf : config_1.Config.getDefault());
+        this.clear();
+    }
+    /** clears all objects, keeping the configuration */
+    clear() {
+        this.objects = {};
+        this.objectsByType = {};
+        this.dependencies = {};
         this.ddicReferences = new ddic_references_1.DDICReferences();
         this.msagReferences = new msag_references_1.MSAGReferences();
         this.macroReferences = new macro_references_1.MacroReferences();
     }
     static abaplintVersion() {
         // magic, see build script "version.sh"
-        return "2.113.234";
+        return "2.113.236";
     }
     getDDICReferences() {
         return this.ddicReferences;

package/package.json

@@ -1,6 +1,6 @@
 {
     "name": "@abaplint/core",
-    "version": "2.113.234",
+    "version": "2.113.236",
     "description": "abaplint - Core API",
     "main": "build/src/index.js",
     "typings": "build/abaplint.d.ts",
@@ -50,7 +50,7 @@
     },
     "homepage": "https://abaplint.org",
     "devDependencies": {
-        "@microsoft/api-extractor": "^7.53.1",
+        "@microsoft/api-extractor": "^7.53.3",
         "@types/chai": "^4.3.20",
         "@types/mocha": "^10.0.10",
         "@types/node": "^24.9.1",