@abaplint/core 2.113.226 → 2.113.227

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

@@ -0,0 +1,14 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.Free = void 0;
+const Expressions = require("../../2_statements/expressions");
+const target_1 = require("../expressions/target");
+class Free {
+    runSyntax(node, input) {
+        for (const t of node.findDirectExpressions(Expressions.Target)) {
+            target_1.Target.runSyntax(t, input);
+        }
+    }
+}
+exports.Free = Free;
+//# sourceMappingURL=free.js.map

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

@@ -9,7 +9,7 @@ const _syntax_input_1 = require("../_syntax_input");
 const assert_error_1 = require("../assert_error");
 class IncludeType {
     runSyntax(node, input) {
-        var _a, _b, _c;
+        var _a, _b, _c, _d, _e;
         const components = [];
         const iname = node.findFirstExpression(Expressions.TypeName);
         if (iname === undefined) {
@@ -24,7 +24,10 @@ class IncludeType {
                 ityp = found;
             }
         }
-        const as = (_b = node.findExpressionAfterToken("AS")) === null || _b === void 0 ? void 0 : _b.concatTokens();
+        else if (ityp instanceof basic_1.UnknownType) {
+            ityp = (_c = (_b = input.scope.findVariable(name)) === null || _b === void 0 ? void 0 : _b.getType()) !== null && _c !== void 0 ? _c : ityp;
+        }
+        const as = (_d = node.findExpressionAfterToken("AS")) === null || _d === void 0 ? void 0 : _d.concatTokens();
         if (as && ityp instanceof basic_1.StructureType) {
             ityp = new basic_1.StructureType(ityp.getComponents().concat([{
                     name: as,
@@ -38,12 +41,15 @@ class IncludeType {
         if (ityp instanceof basic_1.VoidType) {
             return ityp;
         }
+        else if (ityp instanceof basic_1.UnknownType) {
+            return ityp;
+        }
         if (!(ityp instanceof basic_1.StructureType)) {
             const message = "not structured, " + name;
             input.issues.push((0, _syntax_input_1.syntaxIssue)(input, iname.getFirstToken(), message));
             return basic_1.VoidType.get(_syntax_input_1.CheckSyntaxKey);
         }
-        const suffix = (_c = node.findExpressionAfterToken("SUFFIX")) === null || _c === void 0 ? void 0 : _c.concatTokens();
+        const suffix = (_e = node.findExpressionAfterToken("SUFFIX")) === null || _e === void 0 ? void 0 : _e.concatTokens();
         if (suffix && ityp instanceof basic_1.StructureType) {
             const components = [];
             for (const c of ityp.getComponents()) {

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

@@ -0,0 +1,14 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.Refresh = void 0;
+const Expressions = require("../../2_statements/expressions");
+const target_1 = require("../expressions/target");
+class Refresh {
+    runSyntax(node, input) {
+        for (const t of node.findDirectExpressions(Expressions.Target)) {
+            target_1.Target.runSyntax(t, input);
+        }
+    }
+}
+exports.Refresh = Refresh;
+//# sourceMappingURL=refresh.js.map

package/build/src/abap/5_syntax/structures/data.js

@@ -60,6 +60,9 @@ class Data {
                         return new _typed_identifier_1.TypedIdentifier(name, input.filename, found);
                     }
                 }
+                else if (found instanceof Basic.UnknownType) {
+                    return new _typed_identifier_1.TypedIdentifier(name, input.filename, found);
+                }
                 for (const c of found) {
                     components.push(c);
                 }

package/build/src/abap/5_syntax/structures/types.js

@@ -30,7 +30,7 @@ class Types {
                 }
                 else if (ctyp instanceof Statements.IncludeType) {
                     const found = new include_type_1.IncludeType().runSyntax(c, input);
-                    if (found instanceof basic_1.VoidType) {
+                    if (found instanceof basic_1.VoidType || found instanceof Basic.UnknownType) {
                         voidd = found;
                     }
                     else {

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

@@ -66,6 +66,8 @@ const do_1 = require("./statements/do");
 const concatenate_1 = require("./statements/concatenate");
 const call_function_1 = require("./statements/call_function");
 const clear_1 = require("./statements/clear");
+const refresh_1 = require("./statements/refresh");
+const free_1 = require("./statements/free");
 const replace_1 = require("./statements/replace");
 const get_bit_1 = require("./statements/get_bit");
 const raise_1 = require("./statements/raise");
@@ -192,6 +194,8 @@ if (Object.keys(map).length === 0) {
     addToMap(new delete_internal_1.DeleteInternal());
     addToMap(new delete_cluster_1.DeleteCluster());
     addToMap(new clear_1.Clear());
+    addToMap(new free_1.Free());
+    addToMap(new refresh_1.Refresh());
     addToMap(new receive_1.Receive());
     addToMap(new get_bit_1.GetBit());
     addToMap(new class_local_friends_1.ClassLocalFriends());

package/build/src/registry.js

@@ -67,7 +67,7 @@ class Registry {
     }
     static abaplintVersion() {
         // magic, see build script "version.sh"
-        return "2.113.226";
+        return "2.113.227";
     }
     getDDICReferences() {
         return this.ddicReferences;

package/build/src/rules/begin_single_include.js

@@ -65,6 +65,10 @@ DATA END OF foo.`,
             if (t.getChildren().length !== 3) {
                 continue;
             }
+            const data = t.findFirstStatement(Statements.DataBegin);
+            if (data === null || data === void 0 ? void 0 : data.findDirectTokenByText("OCCURS")) {
+                continue;
+            }
             if (t.findFirstStatement(Statements.IncludeType)) {
                 const token = t.getFirstToken();
                 const message = "DATA BEGIN with single INCLUDE";

package/build/src/rules/obsolete_statement.js

@@ -71,6 +71,12 @@ class ObsoleteStatementConf extends _basic_rule_config_1.BasicRuleConfig {
         this.formDefinition = true;
         /** Check for FORM IMPLEMENTATION */
         this.formImplementation = true;
+        /** Check for COMMON PART */
+        this.commonPart = true;
+        /** Check for FIELD-GROUPS */
+        this.fieldGroups = true;
+        /** Check for REPLACE INTO */
+        this.replaceInto = true;
     }
 }
 exports.ObsoleteStatementConf = ObsoleteStatementConf;
@@ -182,10 +188,22 @@ ENDIF.`,
                 const issue = issue_1.Issue.atStatement(file, staNode, "COMMUNICATION is obsolete", this.getMetadata().key, this.conf.severity);
                 issues.push(issue);
             }
+            if (this.conf.commonPart && sta instanceof Statements.DataBegin && staNode.findDirectTokenByText("COMMON")) {
+                const issue = issue_1.Issue.atStatement(file, staNode, "COMMON PART is obsolete", this.getMetadata().key, this.conf.severity);
+                issues.push(issue);
+            }
+            if (this.conf.replaceInto && sta instanceof Statements.Replace && staNode.findDirectTokenByText("INTO")) {
+                const issue = issue_1.Issue.atStatement(file, staNode, "REPLACE INTO is obsolete", this.getMetadata().key, this.conf.severity);
+                issues.push(issue);
+            }
             if (this.conf.pack && sta instanceof Statements.Pack) {
                 const issue = issue_1.Issue.atStatement(file, staNode, "PACK is obsolete", this.getMetadata().key, this.conf.severity);
                 issues.push(issue);
             }
+            if (this.conf.fieldGroups && sta instanceof Statements.FieldGroup) {
+                const issue = issue_1.Issue.atStatement(file, staNode, "FIELD-GROUPS is obsolete", this.getMetadata().key, this.conf.severity);
+                issues.push(issue);
+            }
             if (this.conf.parameter && sta instanceof Statements.Parameter) {
                 const token = staNode.getFirstToken();
                 if (token.getStr().toUpperCase() === "PARAMETER") {

package/package.json

@@ -1,6 +1,6 @@
 {
     "name": "@abaplint/core",
-    "version": "2.113.226",
+    "version": "2.113.227",
     "description": "abaplint - Core API",
     "main": "build/src/index.js",
     "typings": "build/abaplint.d.ts",