@abaplint/transpiler 2.3.71 → 2.3.73

package/build/src/expressions/index.d.ts

@@ -19,8 +19,6 @@ export * from "./field_length";
 export * from "./field_offset";
 export * from "./field_symbol";
 export * from "./function_exporting";
-export * from "./sql_from";
-export * from "./sql_join";
 export * from "./function_parameters";
 export * from "./message_number";
 export * from "./method_call_body";
@@ -41,8 +39,11 @@ export * from "./simple_source4";
 export * from "./source_field_symbol";
 export * from "./source";
 export * from "./sql_cond";
+export * from "./sql_from";
+export * from "./sql_join";
 export * from "./sql_source_simple";
 export * from "./sql_source";
+export * from "./sql_target";
 export * from "./string_template_source";
 export * from "./string_template";
 export * from "./target";

package/build/src/expressions/index.js

@@ -35,8 +35,6 @@ __exportStar(require("./field_length"), exports);
 __exportStar(require("./field_offset"), exports);
 __exportStar(require("./field_symbol"), exports);
 __exportStar(require("./function_exporting"), exports);
-__exportStar(require("./sql_from"), exports);
-__exportStar(require("./sql_join"), exports);
 __exportStar(require("./function_parameters"), exports);
 __exportStar(require("./message_number"), exports);
 __exportStar(require("./method_call_body"), exports);
@@ -57,8 +55,11 @@ __exportStar(require("./simple_source4"), exports);
 __exportStar(require("./source_field_symbol"), exports);
 __exportStar(require("./source"), exports);
 __exportStar(require("./sql_cond"), exports);
+__exportStar(require("./sql_from"), exports);
+__exportStar(require("./sql_join"), exports);
 __exportStar(require("./sql_source_simple"), exports);
 __exportStar(require("./sql_source"), exports);
+__exportStar(require("./sql_target"), exports);
 __exportStar(require("./string_template_source"), exports);
 __exportStar(require("./string_template"), exports);
 __exportStar(require("./target"), exports);

package/build/src/expressions/sql_target.d.ts

@@ -0,0 +1,7 @@
+import { Nodes } from "@abaplint/core";
+import { IExpressionTranspiler } from "./_expression_transpiler";
+import { Traversal } from "../traversal";
+import { Chunk } from "../chunk";
+export declare class SQLTargetTranspiler implements IExpressionTranspiler {
+    transpile(node: Nodes.ExpressionNode, traversal: Traversal): Chunk;
+}

package/build/src/expressions/sql_target.js

@@ -0,0 +1,12 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.SQLTargetTranspiler = void 0;
+const abaplint = require("@abaplint/core");
+class SQLTargetTranspiler {
+    transpile(node, traversal) {
+        const s = node.findDirectExpression(abaplint.Expressions.Target);
+        return traversal.traverse(s);
+    }
+}
+exports.SQLTargetTranspiler = SQLTargetTranspiler;
+//# sourceMappingURL=sql_target.js.map

package/build/src/statements/index.d.ts

@@ -104,6 +104,7 @@ export * from "./select";
 export * from "./set_bit";
 export * from "./set_dataset";
 export * from "./set_handler";
+export * from "./set_language";
 export * from "./set_locale";
 export * from "./set_parameter";
 export * from "./set_screen";

package/build/src/statements/index.js

@@ -120,6 +120,7 @@ __exportStar(require("./select"), exports);
 __exportStar(require("./set_bit"), exports);
 __exportStar(require("./set_dataset"), exports);
 __exportStar(require("./set_handler"), exports);
+__exportStar(require("./set_language"), exports);
 __exportStar(require("./set_locale"), exports);
 __exportStar(require("./set_parameter"), exports);
 __exportStar(require("./set_screen"), exports);

package/build/src/statements/method_implementation.js

@@ -66,6 +66,9 @@ class MethodImplementationTranspiler {
                         else if (parameterDefault.getFirstToken().getStr().toLowerCase() === "space") {
                             val = "abap.builtin.space";
                         }
+                        else if (parameterDefault.concatTokens().toLowerCase() === "sy-langu") {
+                            val = "abap.builtin.sy.get().langu";
+                        }
                         else if (parameterDefault.concatTokens().toLowerCase() === "sy-uname") {
                             val = "abap.builtin.sy.get().uname";
                         }

package/build/src/statements/select.js

@@ -8,7 +8,7 @@ const unique_identifier_1 = require("../unique_identifier");
 const sql_from_1 = require("../expressions/sql_from");
 class SelectTranspiler {
     transpile(node, traversal, targetOverride) {
-        var _a, _b, _c;
+        var _a;
         let target = "undefined";
         if (targetOverride) {
             target = targetOverride;
@@ -76,14 +76,15 @@ class SelectTranspiler {
         }
         if (node.findFirstExpression(abaplint.Expressions.SQLForAllEntries)) {
             const unique = unique_identifier_1.UniqueIdentifier.get();
-            const faeName = (_c = (_b = (_a = node.findFirstExpression(abaplint.Expressions.SQLForAllEntries)) === null || _a === void 0 ? void 0 : _a.findDirectExpression(abaplint.Expressions.SQLSource)) === null || _b === void 0 ? void 0 : _b.concatTokens()) === null || _c === void 0 ? void 0 : _c.toLowerCase();
-            select = select.replace(new RegExp(" " + faeName, "g"), " " + unique);
+            const fn = (_a = node.findFirstExpression(abaplint.Expressions.SQLForAllEntries)) === null || _a === void 0 ? void 0 : _a.findDirectExpression(abaplint.Expressions.SQLSource);
+            const faeTranspiled = new expressions_1.SQLSourceTranspiler().transpile(fn, traversal).getCode();
+            select = select.replace(new RegExp(" " + faeTranspiled, "g"), " " + unique);
             select = select.replace(unique + ".get().table_line.get()", unique + ".get()"); // there can be only one?
-            const code = `if (${faeName}.array().length === 0) {
+            const code = `if (${faeTranspiled}.array().length === 0) {
   throw "FAE, todo, empty table";
 } else {
   abap.statements.clear(${target});
-  for await (const ${unique} of abap.statements.loop(${faeName})) {
+  for await (const ${unique} of abap.statements.loop(${faeTranspiled})) {
     await abap.statements.select(${target}, {select: "${select.trim()}"${extra}}, {appending: true});
   }
   abap.builtin.sy.get().dbcnt.set(${target}.array().length);

package/build/src/statements/set_language.d.ts

@@ -0,0 +1,7 @@
+import * as abaplint from "@abaplint/core";
+import { IStatementTranspiler } from "./_statement_transpiler";
+import { Traversal } from "../traversal";
+import { Chunk } from "../chunk";
+export declare class SetLanguageTranspiler implements IStatementTranspiler {
+    transpile(_node: abaplint.Nodes.StatementNode, _traversal: Traversal): Chunk;
+}

package/build/src/statements/set_language.js

@@ -0,0 +1,11 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.SetLanguageTranspiler = void 0;
+const chunk_1 = require("../chunk");
+class SetLanguageTranspiler {
+    transpile(_node, _traversal) {
+        return new chunk_1.Chunk(`throw new Error("SetLanguage, transpiler todo");`);
+    }
+}
+exports.SetLanguageTranspiler = SetLanguageTranspiler;
+//# sourceMappingURL=set_language.js.map

package/build/src/structures/select.js

@@ -5,23 +5,24 @@ const abaplint = require("@abaplint/core");
 const select_1 = require("../statements/select");
 const chunk_1 = require("../chunk");
 const unique_identifier_1 = require("../unique_identifier");
+const expressions_1 = require("../expressions");
 class SelectTranspiler {
     transpile(node, traversal) {
-        var _a, _b;
+        var _a;
         const ret = new chunk_1.Chunk();
         const selectStatement = node.findFirstStatement(abaplint.Statements.SelectLoop);
         if (selectStatement === undefined) {
             throw "Structure, select loop not found";
         }
         const from = (_a = selectStatement.findFirstExpression(abaplint.Expressions.SQLFromSource)) === null || _a === void 0 ? void 0 : _a.concatTokens().toUpperCase();
-        const intoName = (_b = selectStatement.findFirstExpression(abaplint.Expressions.SQLTarget)) === null || _b === void 0 ? void 0 : _b.concatTokens();
+        const intoName = new expressions_1.SQLTargetTranspiler().transpile(selectStatement.findFirstExpression(abaplint.Expressions.SQLTarget), traversal).getCode();
         // note: this implementation SELECTs everything into memory, which might be bad, and sometimes not correct
         const targetName = unique_identifier_1.UniqueIdentifier.get();
         const loopName = unique_identifier_1.UniqueIdentifier.get();
         ret.appendString(`let ${targetName} = new abap.types.Table(abap.DDIC["${from}"].type);\n`);
         ret.appendChunk(new select_1.SelectTranspiler().transpile(selectStatement, traversal, targetName));
         ret.appendString(`\nfor (const ${loopName} of ${targetName}.array()) {\n`);
-        ret.appendString(`${intoName === null || intoName === void 0 ? void 0 : intoName.replace("-", ".get().")}.set(${loopName});\n`);
+        ret.appendString(`${intoName}.set(${loopName});\n`);
         const body = node.findDirectStructure(abaplint.Structures.Body);
         if (body) {
             ret.appendChunk(traversal.traverse(body));

package/build/src/validation.js

@@ -27,7 +27,28 @@ exports.config = {
         },
         "parser_error": true,
         "allowed_object_types": {
-            "allowed": ["INTF", "CLAS", "PROG", "DEVC", "TABL", "SHLP", "VIEW", "XSLT", "ENQU", "SHMA", "SICF", "NROB", "TYPE", "DTEL", "DOMA", "TTYP", "MSAG", "FUGR"],
+            "allowed": [
+                "CLAS",
+                "DEVC",
+                "DOMA",
+                "DTEL",
+                "ENQU",
+                "FUGR",
+                "INTF",
+                "MSAG",
+                "NROB",
+                "PARA",
+                "PROG",
+                "SHLP",
+                "SHMA",
+                "SICF",
+                "SMIM",
+                "TABL",
+                "TTYP",
+                "TYPE",
+                "VIEW",
+                "XSLT",
+            ],
         },
         "unknown_types": true,
         "ambiguous_statement": true,

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@abaplint/transpiler",
-  "version": "2.3.71",
+  "version": "2.3.73",
   "description": "Transpiler",
   "main": "build/src/index.js",
   "typings": "build/src/index.d.ts",