@abaplint/core 2.85.23 → 2.85.26

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

@@ -1,11 +1,13 @@
 "use strict";
 Object.defineProperty(exports, "__esModule", { value: true });
 exports.SQLAsName = void 0;
+const tokens_1 = require("../../1_lexer/tokens");
 const combi_1 = require("../combi");
 class SQLAsName extends combi_1.Expression {
     getRunnable() {
         // todo, below allows too much?
-        return (0, combi_1.regex)(/^[&_!]?\*?\w*(\/\w+\/)?\d*[a-zA-Z_%\$][\w\*%\$\?]*(~\w+)?$/);
+        const field = (0, combi_1.regex)(/^[&_!]?\*?\w*(\/\w+\/)?\d*[a-zA-Z_%\$][\w\*%\$\?]*(~\w+)?$/);
+        return (0, combi_1.seq)(field, (0, combi_1.starPrio)((0, combi_1.seq)((0, combi_1.tok)(tokens_1.Dash), field)));
     }
 }
 exports.SQLAsName = SQLAsName;

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

@@ -16,9 +16,8 @@ class SQLCompare extends combi_1.Expression {
         const nul = (0, combi_1.seq)("IS", (0, combi_1.optPrio)("NOT"), (0, combi_1.altPrio)("NULL", (0, combi_1.ver)(version_1.Version.v753, "INITIAL")));
         const source = new _1.SQLSource();
         const sub = (0, combi_1.seq)((0, combi_1.optPrio)((0, combi_1.altPrio)("ALL", "ANY", "SOME")), subSelect);
-        const builtin = (0, combi_1.ver)(version_1.Version.v751, (0, combi_1.seq)((0, combi_1.altPrio)("lower", "upper"), (0, combi_1.tok)(tokens_1.ParenLeftW), _1.SQLFieldName, (0, combi_1.tok)(tokens_1.WParenRightW)));
         const arith = (0, combi_1.ver)(version_1.Version.v750, (0, combi_1.plusPrio)((0, combi_1.seq)((0, combi_1.altPrio)("+", "-", "*", "/"), _1.SQLFieldName)));
-        const rett = (0, combi_1.seq)((0, combi_1.altPrio)(builtin, (0, combi_1.seq)(_1.SQLFieldName, (0, combi_1.optPrio)(arith))), (0, combi_1.altPrio)((0, combi_1.seq)(_1.SQLCompareOperator, (0, combi_1.altPrio)(sub, source)), (0, combi_1.seq)((0, combi_1.optPrio)("NOT"), (0, combi_1.altPrio)(inn, like, between)), nul));
+        const rett = (0, combi_1.seq)((0, combi_1.altPrio)(_1.SQLFunction, (0, combi_1.seq)(_1.SQLFieldName, (0, combi_1.optPrio)(arith))), (0, combi_1.altPrio)((0, combi_1.seq)(_1.SQLCompareOperator, (0, combi_1.altPrio)(sub, source)), (0, combi_1.seq)((0, combi_1.optPrio)("NOT"), (0, combi_1.altPrio)(inn, like, between)), nul));
         const exists = (0, combi_1.seq)("EXISTS", subSelect);
         return (0, combi_1.altPrio)(exists, _1.Dynamic, rett);
     }

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

@@ -12,7 +12,7 @@ class SQLFieldList extends combi_1.Expression {
     getRunnable() {
         const comma = (0, combi_1.optPrio)((0, combi_1.ver)(version_1.Version.v740sp05, ","));
         const abap = (0, combi_1.ver)(version_1.Version.v740sp05, (0, combi_1.seq)((0, combi_1.tok)(tokens_1.WAt), simple_field_chain_1.SimpleFieldChain));
-        const as = (0, combi_1.seq)("AS", _1.Field);
+        const as = (0, combi_1.seq)("AS", _1.SQLAsName);
         const field = (0, combi_1.altPrio)(_1.SQLAggregation, _1.SQLCase, sql_function_1.SQLFunction, sql_path_1.SQLPath, _1.SQLFieldName, abap, _1.Constant);
         const sub = (0, combi_1.plusPrio)((0, combi_1.seq)((0, combi_1.altPrio)("+", "-", "*", "/", "&&"), (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenLeftW)), field, (0, combi_1.optPrio)((0, combi_1.tok)(tokens_1.WParenRightW))));
         const arith = (0, combi_1.ver)(version_1.Version.v740sp05, sub);

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

@@ -8,9 +8,13 @@ const combi_1 = require("../combi");
 const integer_1 = require("./integer");
 const sql_alias_field_1 = require("./sql_alias_field");
 const sql_field_name_1 = require("./sql_field_name");
+const simple_source3_1 = require("./simple_source3");
+const source_1 = require("./source");
 class SQLFunction extends combi_1.Expression {
     getRunnable() {
-        const param = (0, combi_1.alt)(sql_field_name_1.SQLFieldName, sql_alias_field_1.SQLAliasField, SQLFunction, constant_1.Constant);
+        const paren = (0, combi_1.seq)((0, combi_1.tok)(tokens_1.ParenLeftW), source_1.Source, (0, combi_1.tok)(tokens_1.WParenRightW));
+        const at = (0, combi_1.ver)(version_1.Version.v740sp05, (0, combi_1.seq)((0, combi_1.tok)(tokens_1.WAt), (0, combi_1.alt)(simple_source3_1.SimpleSource3, paren)));
+        const param = (0, combi_1.alt)(sql_field_name_1.SQLFieldName, sql_alias_field_1.SQLAliasField, SQLFunction, constant_1.Constant, at);
         const castTypes = (0, combi_1.altPrio)((0, combi_1.seq)("CHAR", (0, combi_1.tok)(tokens_1.ParenLeftW), integer_1.Integer, (0, combi_1.tok)(tokens_1.WParenRightW)), "FLTP");
         const abs = (0, combi_1.ver)(version_1.Version.v740sp05, (0, combi_1.seq)("abs", (0, combi_1.tok)(tokens_1.ParenLeftW), param, (0, combi_1.tok)(tokens_1.WParenRightW)));
         const cast = (0, combi_1.ver)(version_1.Version.v750, (0, combi_1.seq)("cast", (0, combi_1.tok)(tokens_1.ParenLeftW), param, "AS", castTypes, (0, combi_1.tok)(tokens_1.WParenRightW)));
@@ -20,10 +24,12 @@ class SQLFunction extends combi_1.Expression {
         const div = (0, combi_1.ver)(version_1.Version.v740sp05, (0, combi_1.seq)("div", (0, combi_1.tok)(tokens_1.ParenLeftW), param, ",", param, (0, combi_1.tok)(tokens_1.WParenRightW)));
         const floor = (0, combi_1.ver)(version_1.Version.v740sp05, (0, combi_1.seq)("floor", (0, combi_1.tok)(tokens_1.ParenLeftW), param, (0, combi_1.tok)(tokens_1.WParenRightW)));
         const length = (0, combi_1.ver)(version_1.Version.v750, (0, combi_1.seq)("length", (0, combi_1.tok)(tokens_1.ParenLeftW), param, (0, combi_1.tok)(tokens_1.WParenRightW)));
+        const lower = (0, combi_1.ver)(version_1.Version.v751, (0, combi_1.seq)("lower", (0, combi_1.tok)(tokens_1.ParenLeftW), param, (0, combi_1.tok)(tokens_1.WParenRightW)));
         const mod = (0, combi_1.ver)(version_1.Version.v740sp05, (0, combi_1.seq)("mod", (0, combi_1.tok)(tokens_1.ParenLeftW), param, ",", param, (0, combi_1.tok)(tokens_1.WParenRightW)));
         const replace = (0, combi_1.ver)(version_1.Version.v750, (0, combi_1.seq)("replace", (0, combi_1.tok)(tokens_1.ParenLeftW), param, ",", param, ",", param, (0, combi_1.tok)(tokens_1.WParenRightW)));
+        const upper = (0, combi_1.ver)(version_1.Version.v751, (0, combi_1.seq)("upper", (0, combi_1.tok)(tokens_1.ParenLeftW), param, (0, combi_1.tok)(tokens_1.WParenRightW)));
         const uuid = (0, combi_1.ver)(version_1.Version.v754, (0, combi_1.seq)("uuid", (0, combi_1.tok)(tokens_1.ParenLeftW), (0, combi_1.tok)(tokens_1.WParenRightW)));
-        return (0, combi_1.altPrio)(uuid, abs, ceil, floor, cast, div, mod, coalesce, concat, replace, length);
+        return (0, combi_1.altPrio)(uuid, abs, ceil, floor, cast, div, mod, coalesce, concat, replace, length, lower, upper);
     }
 }
 exports.SQLFunction = SQLFunction;

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

@@ -131,6 +131,7 @@ class BuiltIn {
         ret.push(this.buildConstant("col_heading", new basic_1.IntegerType(), "1"));
         ret.push(this.buildConstant("col_key", new basic_1.IntegerType(), "4"));
         ret.push(this.buildConstant("col_negative", new basic_1.IntegerType(), "6"));
+        ret.push(this.buildConstant("col_group", new basic_1.IntegerType(), "7"));
         ret.push(this.buildConstant("col_normal", new basic_1.IntegerType(), "2"));
         ret.push(this.buildConstant("col_positive", new basic_1.IntegerType(), "5"));
         ret.push(this.buildConstant("col_total", new basic_1.IntegerType(), "3"));

package/build/src/abap/5_syntax/expressions/source.js

@@ -72,8 +72,11 @@ class Source {
                 case "SWITCH":
                     {
                         const foundType = this.determineType(node, scope, filename, targetType);
-                        new switch_body_1.SwitchBody().runSyntax(node.findDirectExpression(Expressions.SwitchBody), scope, filename);
-                        return foundType;
+                        const bodyType = new switch_body_1.SwitchBody().runSyntax(node.findDirectExpression(Expressions.SwitchBody), scope, filename);
+                        if (foundType === undefined) {
+                            this.addIfInferred(node, scope, filename, bodyType);
+                        }
+                        return foundType ? foundType : bodyType;
                     }
                 case "COND":
                     {

package/build/src/abap/5_syntax/expressions/switch_body.js

@@ -8,9 +8,18 @@ class SwitchBody {
         if (node === undefined) {
             return;
         }
+        const thenSource = node.findExpressionAfterToken("THEN");
+        if (!((thenSource === null || thenSource === void 0 ? void 0 : thenSource.get()) instanceof Expressions.Source)) {
+            throw new Error("SwitchBody, unexpected");
+        }
+        const type = new source_1.Source().runSyntax(thenSource, scope, filename);
         for (const s of node.findDirectExpressions(Expressions.Source)) {
+            if (s === thenSource) {
+                continue;
+            }
             new source_1.Source().runSyntax(s, scope, filename);
         }
+        return type;
     }
 }
 exports.SwitchBody = SwitchBody;

package/build/src/registry.js

@@ -68,7 +68,7 @@ class Registry {
     }
     static abaplintVersion() {
         // magic, see build script "version.sh"
-        return "2.85.23";
+        return "2.85.26";
     }
     getDDICReferences() {
         return this.references;

package/build/src/rules/downport.js

@@ -44,19 +44,21 @@ Current rules:
 * CONV is outlined
 * COND is outlined
 * REDUCE is outlined
+* SWITCH is outlined
+* APPEND expression is outlined
 * EMPTY KEY is changed to DEFAULT KEY, opposite of DEFAULT KEY in https://rules.abaplint.org/avoid_use/
 * CAST changed to ?=
 * LOOP AT method_call( ) is outlined
 * VALUE # with structure fields
 * VALUE # with internal table lines
-* Table Expressions[ index ] are outlined
+* Table Expressions are outlined
 * SELECT INTO @DATA definitions are outlined
 * Some occurrences of string template formatting option ALPHA changed to function module call
 * SELECT/INSERT/MODIFY/DELETE/UPDATE "," in field list removed, "@" in source/targets removed
 * PARTIALLY IMPLEMENTED removed, it can be quick fixed via rule implement_methods
 * RAISE EXCEPTION ... MESSAGE
-* APPEND expression is outlined
-* Moving with +=, -=, /=, *=, &&=
+* Moving with +=, -=, /=, *=, &&= is expanded
+* line_exists and line_index is downported to READ TABLE
 
 Only one transformation is applied to a statement at a time, so multiple steps might be required to do the full downport.`,
             tags: [_irule_1.RuleTag.Experimental, _irule_1.RuleTag.Downport, _irule_1.RuleTag.Quickfix],
@@ -192,6 +194,10 @@ Only one transformation is applied to a statement at a time, so multiple steps m
         if (found) {
             return found;
         }
+        found = this.outlineSwitch(high, lowFile, highSyntax);
+        if (found) {
+            return found;
+        }
         found = this.outlineCast(high, lowFile, highSyntax);
         if (found) {
             return found;
@@ -224,7 +230,11 @@ Only one transformation is applied to a statement at a time, so multiple steps m
         if (found) {
             return found;
         }
-        // todo, line_exists() should be replaced before this call
+        found = this.replaceLineFunctions(high, lowFile, highSyntax);
+        if (found) {
+            return found;
+        }
+        // note: line_exists() must be replaced before this call
         found = this.replaceTableExpression(high, lowFile, highSyntax);
         if (found) {
             return found;
@@ -233,7 +243,6 @@ Only one transformation is applied to a statement at a time, so multiple steps m
         if (found) {
             return found;
         }
-        // todo, add more rules here
         return undefined;
     }
     //////////////////////////////////////////
@@ -405,16 +414,11 @@ ${indentation}${uniqueName} = ${source.concatTokens()}.\n${indentation}`);
         return undefined;
     }
     replaceTableExpression(node, lowFile, highSyntax) {
-        var _a;
         for (const fieldChain of node.findAllExpressionsRecursive(Expressions.FieldChain)) {
             const tableExpression = fieldChain.findDirectExpression(Expressions.TableExpression);
             if (tableExpression === undefined) {
                 continue;
             }
-            if (tableExpression.getChildren().length > 3) {
-                // for now, only support the INDEX scenario
-                continue;
-            }
             let pre = "";
             let startToken = undefined;
             for (const child of fieldChain.getChildren()) {
@@ -429,11 +433,24 @@ ${indentation}${uniqueName} = ${source.concatTokens()}.\n${indentation}`);
             if (startToken === undefined) {
                 continue;
             }
+            let condition = "";
+            for (const c of tableExpression.getChildren() || []) {
+                if (c.getFirstToken().getStr() === "[" || c.getFirstToken().getStr() === "]") {
+                    continue;
+                }
+                else if (c.get() instanceof Expressions.ComponentChainSimple && condition === "") {
+                    condition = "WITH KEY ";
+                }
+                else if (c.get() instanceof Expressions.Source && condition === "") {
+                    condition = "INDEX ";
+                }
+                condition += c.concatTokens() + " ";
+            }
             const uniqueName = this.uniqueName(node.getFirstToken().getStart(), lowFile.getFilename(), highSyntax);
             const indentation = " ".repeat(node.getFirstToken().getStart().getCol() - 1);
             const firstToken = node.getFirstToken();
             const fix1 = edit_helper_1.EditHelper.insertAt(lowFile, firstToken.getStart(), `DATA ${uniqueName} LIKE LINE OF ${pre}.
-${indentation}READ TABLE ${pre} INDEX ${(_a = tableExpression.findFirstExpression(Expressions.Source)) === null || _a === void 0 ? void 0 : _a.concatTokens()} INTO ${uniqueName}.
+${indentation}READ TABLE ${pre} ${condition}INTO ${uniqueName}.
 ${indentation}IF sy-subrc <> 0.
 ${indentation}  RAISE EXCEPTION TYPE cx_sy_itab_line_not_found.
 ${indentation}ENDIF.
@@ -732,6 +749,67 @@ ${indentation}    output = ${topTarget}.`;
         }
         return { body, end };
     }
+    outlineSwitch(node, lowFile, highSyntax) {
+        var _a, _b;
+        for (const i of node.findAllExpressionsRecursive(Expressions.Source)) {
+            const firstToken = i.getFirstToken();
+            if (firstToken.getStr().toUpperCase() !== "SWITCH") {
+                continue;
+            }
+            const type = this.findType(i, lowFile, highSyntax);
+            if (type === undefined) {
+                continue;
+            }
+            const uniqueName = this.uniqueName(firstToken.getStart(), lowFile.getFilename(), highSyntax);
+            const indentation = " ".repeat(node.getFirstToken().getStart().getCol() - 1);
+            let body = "";
+            let name = "";
+            const switchBody = i.findDirectExpression(Expressions.SwitchBody);
+            if (switchBody === undefined) {
+                continue;
+            }
+            for (const l of ((_a = switchBody === null || switchBody === void 0 ? void 0 : switchBody.findDirectExpression(Expressions.Let)) === null || _a === void 0 ? void 0 : _a.findDirectExpressions(Expressions.InlineFieldDefinition)) || []) {
+                name = l.getFirstToken().getStr();
+                body += indentation + `DATA(${name}) = ${(_b = switchBody.findFirstExpression(Expressions.Source)) === null || _b === void 0 ? void 0 : _b.concatTokens()}.\n`;
+            }
+            body += `DATA ${uniqueName} TYPE ${type}.\n`;
+            let firstSource = false;
+            let inWhen = false;
+            for (const c of switchBody.getChildren()) {
+                if (c.get() instanceof Expressions.Source && firstSource === false) {
+                    body += indentation + `CASE ${c.concatTokens()}.`;
+                    firstSource = true;
+                }
+                else if (c instanceof nodes_1.TokenNode && c.concatTokens().toUpperCase() === "THEN") {
+                    inWhen = true;
+                    body += ".\n";
+                }
+                else if (c instanceof nodes_1.TokenNode && c.concatTokens().toUpperCase() === "WHEN") {
+                    inWhen = false;
+                    body += `\n${indentation}  WHEN `;
+                }
+                else if (c instanceof nodes_1.TokenNode && c.concatTokens().toUpperCase() === "OR") {
+                    body += ` OR `;
+                }
+                else if (c instanceof nodes_1.TokenNode && c.concatTokens().toUpperCase() === "ELSE") {
+                    inWhen = true;
+                    body += `\n${indentation}  WHEN OTHERS.\n`;
+                }
+                else if (inWhen === false) {
+                    body += c.concatTokens();
+                }
+                else {
+                    body += indentation + "    " + uniqueName + " = " + c.concatTokens() + ".";
+                }
+            }
+            body += "\n" + indentation + "ENDCASE.\n" + indentation;
+            const fix1 = edit_helper_1.EditHelper.insertAt(lowFile, node.getFirstToken().getStart(), body);
+            const fix2 = edit_helper_1.EditHelper.replaceRange(lowFile, firstToken.getStart(), i.getLastToken().getEnd(), uniqueName);
+            const fix = edit_helper_1.EditHelper.merge(fix2, fix1);
+            return issue_1.Issue.atToken(lowFile, firstToken, "Downport SWITCH", this.getMetadata().key, this.conf.severity, fix);
+        }
+        return undefined;
+    }
     outlineReduce(node, lowFile, highSyntax) {
         var _a;
         for (const i of node.findAllExpressionsRecursive(Expressions.Source)) {
@@ -1089,6 +1167,58 @@ ${indentation}    output = ${topTarget}.`;
         }
         return undefined;
     }
+    findMethodCallExpression(node, token) {
+        var _a;
+        for (const m of node.findAllExpressions(Expressions.MethodCall)) {
+            if ((_a = m.findDirectExpression(Expressions.MethodName)) === null || _a === void 0 ? void 0 : _a.getFirstToken().getStart().equals(token.getStart())) {
+                return m;
+            }
+        }
+        return undefined;
+    }
+    replaceLineFunctions(node, lowFile, highSyntax) {
+        var _a, _b;
+        const spag = highSyntax.spaghetti.lookupPosition(node.getFirstToken().getStart(), lowFile.getFilename());
+        for (const r of (spag === null || spag === void 0 ? void 0 : spag.getData().references) || []) {
+            const func = r.position.getName().toUpperCase();
+            if (r.referenceType === _reference_1.ReferenceType.BuiltinMethodReference
+                && (func === "LINE_EXISTS" || func === "LINE_INDEX")) {
+                const token = r.position.getToken();
+                const expression = this.findMethodCallExpression(node, token);
+                if (expression === undefined) {
+                    continue;
+                }
+                let condition = "";
+                for (const c of ((_a = expression === null || expression === void 0 ? void 0 : expression.findFirstExpression(Expressions.TableExpression)) === null || _a === void 0 ? void 0 : _a.getChildren()) || []) {
+                    if (c.getFirstToken().getStr() === "[" || c.getFirstToken().getStr() === "]") {
+                        continue;
+                    }
+                    else if (c.get() instanceof Expressions.ComponentChainSimple && condition === "") {
+                        condition = "WITH KEY ";
+                    }
+                    else if (c.get() instanceof Expressions.Source && condition === "") {
+                        condition = "INDEX ";
+                    }
+                    condition += c.concatTokens() + " ";
+                }
+                const tableName = (_b = expression === null || expression === void 0 ? void 0 : expression.findFirstExpression(Expressions.SourceField)) === null || _b === void 0 ? void 0 : _b.concatTokens();
+                const uniqueName = this.uniqueName(node.getFirstToken().getStart(), lowFile.getFilename(), highSyntax);
+                const indentation = " ".repeat(node.getFirstToken().getStart().getCol() - 1);
+                const sy = func === "LINE_EXISTS" ? "sy-subrc" : "sy-tabix";
+                const code = `DATA ${uniqueName} LIKE sy-subrc.\n` +
+                    indentation + `READ TABLE ${tableName} ${condition}TRANSPORTING NO FIELDS.\n` +
+                    indentation + uniqueName + ` = ${sy}.\n` +
+                    indentation;
+                const fix1 = edit_helper_1.EditHelper.insertAt(lowFile, node.getFirstToken().getStart(), code);
+                const start = expression.getFirstToken().getStart();
+                const end = expression.getLastToken().getEnd();
+                const fix2 = edit_helper_1.EditHelper.replaceRange(lowFile, start, end, uniqueName + (func === "LINE_EXISTS" ? " = 0" : ""));
+                const fix = edit_helper_1.EditHelper.merge(fix2, fix1);
+                return issue_1.Issue.atToken(lowFile, token, "Use BOOLC", this.getMetadata().key, this.conf.severity, fix);
+            }
+        }
+        return undefined;
+    }
     newToCreateObject(node, lowFile, highSyntax) {
         const source = node.findDirectExpression(Expressions.Source);
         let fix = undefined;

package/package.json

@@ -1,6 +1,6 @@
 {
     "name": "@abaplint/core",
-    "version": "2.85.23",
+    "version": "2.85.26",
     "description": "abaplint - Core API",
     "main": "build/src/index.js",
     "typings": "build/abaplint.d.ts",
@@ -50,7 +50,7 @@
         "@types/mocha": "^9.1.0",
         "@types/node": "^17.0.21",
         "chai": "^4.3.6",
-        "eslint": "^8.9.0",
+        "eslint": "^8.10.0",
         "mocha": "^9.2.1",
         "c8": "^7.11.0",
         "source-map-support": "^0.5.21",