@abaplint/transpiler-cli 2.12.10 → 2.12.12

package/build/bundle.js

@@ -7266,11 +7266,14 @@ class SQLField extends combi_1.Expression {
     getRunnable() {
         const abap = (0, combi_1.ver)(version_1.Version.v740sp05, (0, combi_1.seq)((0, combi_1.tok)(tokens_1.WAt), _1.SimpleFieldChain2), version_1.Version.OpenABAP);
         const as = (0, combi_1.seq)("AS", _1.SQLAsName);
-        const paren = (0, combi_1.seq)((0, combi_1.tok)(tokens_1.WParenLeftW), _1.SQLFieldName, (0, combi_1.altPrio)((0, combi_1.tok)(tokens_1.WParenRightW), (0, combi_1.tok)(tokens_1.WParenRight)));
-        const field = (0, combi_1.altPrio)(_1.SQLAggregation, _1.SQLCase, _1.SQLCast, sql_function_1.SQLFunction, sql_path_1.SQLPath, _1.SQLFieldName, abap, _1.Constant, paren);
-        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 parenFieldName = (0, combi_1.seq)((0, combi_1.tok)(tokens_1.WParenLeftW), _1.SQLFieldName, (0, combi_1.altPrio)((0, combi_1.tok)(tokens_1.WParenRightW), (0, combi_1.tok)(tokens_1.WParenRight)));
+        const field = (0, combi_1.altPrio)(_1.SQLAggregation, _1.SQLCase, _1.SQLCast, sql_function_1.SQLFunction, sql_path_1.SQLPath, _1.SQLFieldName, abap, _1.Constant, parenFieldName);
+        const parenField = (0, combi_1.seq)((0, combi_1.tok)(tokens_1.WParenLeftW), field, (0, combi_1.tok)(tokens_1.WParenRightW));
+        const sub = (0, combi_1.plusPrio)((0, combi_1.seq)((0, combi_1.altPrio)("+", "-", "*", "/", "&&"), (0, combi_1.altPrio)(parenField, field)));
         const arith = (0, combi_1.ver)(version_1.Version.v740sp05, sub);
-        return (0, combi_1.seq)(field, (0, combi_1.optPrio)(arith), (0, combi_1.optPrio)(as));
+        const arithSequence = (0, combi_1.seq)(field, (0, combi_1.optPrio)(arith));
+        const parenArithSequence = (0, combi_1.seq)((0, combi_1.tok)(tokens_1.WParenLeftW), arithSequence, (0, combi_1.tok)(tokens_1.WParenRightW));
+        return (0, combi_1.seq)((0, combi_1.altPrio)(parenArithSequence, arithSequence), (0, combi_1.optPrio)(as));
     }
 }
 exports.SQLField = SQLField;
@@ -10728,17 +10731,18 @@ class Convert {
         const intoTime = (0, combi_1.seq)("TIME", expressions_1.Target);
         const intoDate = (0, combi_1.seq)("DATE", expressions_1.Target);
         const into = (0, combi_1.seq)("INTO", (0, combi_1.per)(intoTime, intoDate));
-        const daylight = (0, combi_1.seq)("DAYLIGHT SAVING TIME", expressions_1.Source);
+        const daylightSource = (0, combi_1.seq)("DAYLIGHT SAVING TIME", expressions_1.Source);
+        const daylightTarget = (0, combi_1.seq)("DAYLIGHT SAVING TIME", expressions_1.Target);
         const zone = (0, combi_1.seq)("TIME ZONE", expressions_1.Source);
-        const time = (0, combi_1.seq)("TIME STAMP", expressions_1.Source, (0, combi_1.per)(zone, into, daylight));
+        const time = (0, combi_1.seq)("TIME STAMP", expressions_1.Source, (0, combi_1.per)(zone, into, daylightTarget));
         const dat = (0, combi_1.seq)("DATE", expressions_1.Source);
         const tim = (0, combi_1.seq)("TIME", expressions_1.Source);
         const stamp = (0, combi_1.seq)("INTO TIME STAMP", expressions_1.Target);
         const intoutc = (0, combi_1.ver)(version_1.Version.v754, (0, combi_1.seq)("INTO UTCLONG", expressions_1.Target));
         const invert = (0, combi_1.seq)("INTO INVERTED-DATE", expressions_1.Target);
-        const date = (0, combi_1.seq)((0, combi_1.per)(dat, tim), (0, combi_1.per)(daylight, stamp, zone, invert, intoutc));
+        const date = (0, combi_1.seq)((0, combi_1.per)(dat, tim), (0, combi_1.per)(daylightSource, stamp, zone, invert, intoutc));
         const inv = (0, combi_1.seq)("INVERTED-DATE", expressions_1.Source, "INTO DATE", expressions_1.Target);
-        const utclong = (0, combi_1.ver)(version_1.Version.v754, (0, combi_1.seq)("UTCLONG", expressions_1.Source, (0, combi_1.per)(zone, into, daylight)));
+        const utclong = (0, combi_1.ver)(version_1.Version.v754, (0, combi_1.seq)("UTCLONG", expressions_1.Source, (0, combi_1.per)(zone, into, daylightSource)));
         return (0, combi_1.seq)("CONVERT", (0, combi_1.alt)(time, date, inv, utclong));
     }
 }
@@ -23101,7 +23105,6 @@ class BasicTypes {
         return undefined;
     }
     resolveLikeName(node, headerLogic = true) {
-        var _a;
         if (node === undefined) {
             return undefined;
         }
@@ -23147,7 +23150,12 @@ class BasicTypes {
                 this.input.scope.addReference(chain === null || chain === void 0 ? void 0 : chain.getFirstToken(), found, _reference_1.ReferenceType.TypeReference, this.input.filename);
             }
             if (type === undefined) {
-                type = (_a = this.input.scope.getDDIC().lookupNoVoid(name)) === null || _a === void 0 ? void 0 : _a.type;
+                const found = this.input.scope.getDDIC().lookupNoVoid(name);
+                if (found !== undefined) {
+                    const using = { filename: this.input.filename, token: chain.getFirstToken(), object: found.object };
+                    this.input.scope.getDDICReferences().addUsing(this.input.scope.getParentObj(), using);
+                }
+                type = found === null || found === void 0 ? void 0 : found.type;
             }
             if (type === undefined && this.input.scope.isAnyOO() === false && this.input.scope.getDDIC().inErrorNamespace(name) === false) {
                 this.input.scope.addReference(chain.getChildren()[0].getFirstToken(), undefined, _reference_1.ReferenceType.VoidType, this.input.filename);
@@ -24524,7 +24532,9 @@ class ComponentName {
                 return ret;
             }
         }
-        input.issues.push((0, _syntax_input_1.syntaxIssue)(input, nameToken, "Not a structure, ComponentName, \"" + name + "\""));
+        if (!(context instanceof Basic.UnknownType)) {
+            input.issues.push((0, _syntax_input_1.syntaxIssue)(input, nameToken, "Not a structure, ComponentName, \"" + name + "\", (" + (context === null || context === void 0 ? void 0 : context.constructor.name) + ")"));
+        }
         return Basic.VoidType.get(_syntax_input_1.CheckSyntaxKey);
     }
 }
@@ -27843,7 +27853,7 @@ class SQLForAllEntries {
         }
         if (s) {
             const type = source_1.Source.runSyntax(s, input);
-            if (type instanceof basic_1.VoidType) {
+            if (type instanceof basic_1.VoidType || type instanceof basic_1.UnknownType) {
                 return;
             }
             if (!(type instanceof basic_1.TableType)) {
@@ -28198,8 +28208,9 @@ class Target {
             currentIndex++;
             if (current.get() instanceof tokens_1.Dash) {
                 if (context instanceof unknown_type_1.UnknownType) {
-                    const message = "Not a structure, type unknown, target";
-                    input.issues.push((0, _syntax_input_1.syntaxIssue)(input, node.getFirstToken(), message));
+                    return basic_1.VoidType.get(_syntax_input_1.CheckSyntaxKey);
+                }
+                else if (context instanceof basic_1.TableType && context.isWithHeader() && context.getRowType() instanceof unknown_type_1.UnknownType) {
                     return basic_1.VoidType.get(_syntax_input_1.CheckSyntaxKey);
                 }
                 else if (!(context instanceof basic_1.StructureType)
@@ -30194,14 +30205,21 @@ class Convert {
         for (const s of node.findDirectExpressions(Expressions.Source)) {
             source_1.Source.runSyntax(s, input);
         }
-        const timeTarget = node.findExpressionAfterToken("TIME");
-        if ((timeTarget === null || timeTarget === void 0 ? void 0 : timeTarget.get()) instanceof Expressions.Target) {
-            const inline = timeTarget === null || timeTarget === void 0 ? void 0 : timeTarget.findDirectExpression(Expressions.InlineData);
-            if (inline) {
-                inline_data_1.InlineData.runSyntax(inline, input, new basic_1.TimeType());
-            }
-            else {
-                target_1.Target.runSyntax(timeTarget, input);
+        const timeTargets = node.findExpressionsAfterToken("TIME");
+        for (const timeTarget of timeTargets) {
+            const concat = node.concatTokens().toUpperCase();
+            if ((timeTarget === null || timeTarget === void 0 ? void 0 : timeTarget.get()) instanceof Expressions.Target) {
+                const inline = timeTarget === null || timeTarget === void 0 ? void 0 : timeTarget.findDirectExpression(Expressions.InlineData);
+                if (inline) {
+                    let targetType = new basic_1.TimeType();
+                    if (concat.includes("DAYLIGHT SAVING TIME " + inline.concatTokens().toUpperCase())) {
+                        targetType = new basic_1.CharacterType(1);
+                    }
+                    inline_data_1.InlineData.runSyntax(inline, input, targetType);
+                }
+                else {
+                    target_1.Target.runSyntax(timeTarget, input);
+                }
             }
         }
         const dateTarget = node.findExpressionAfterToken("DATE");
@@ -31519,27 +31537,27 @@ const basic_types_1 = __webpack_require__(/*! ../basic_types */ "./node_modules/
 const _typed_identifier_1 = __webpack_require__(/*! ../../types/_typed_identifier */ "./node_modules/@abaplint/core/build/src/abap/types/_typed_identifier.js");
 const _syntax_input_1 = __webpack_require__(/*! ../_syntax_input */ "./node_modules/@abaplint/core/build/src/abap/5_syntax/_syntax_input.js");
 const assert_error_1 = __webpack_require__(/*! ../assert_error */ "./node_modules/@abaplint/core/build/src/abap/5_syntax/assert_error.js");
+const _reference_1 = __webpack_require__(/*! ../_reference */ "./node_modules/@abaplint/core/build/src/abap/5_syntax/_reference.js");
 class IncludeType {
     runSyntax(node, input) {
-        var _a, _b, _c, _d, _e;
+        var _a, _b;
         const components = [];
         const iname = node.findFirstExpression(Expressions.TypeName);
         if (iname === undefined) {
             throw new assert_error_1.AssertError("IncludeType, unexpected node structure");
         }
-        const name = iname.getFirstToken().getStr();
+        const firstToken = iname.getFirstToken();
+        const name = firstToken.getStr();
         const isStructure = node.findDirectTokenByText("STRUCTURE") !== undefined;
         let ityp = new basic_types_1.BasicTypes(input).parseType(iname);
-        if (ityp instanceof basic_1.VoidType && isStructure) {
-            const found = (_a = input.scope.findVariable(name)) === null || _a === void 0 ? void 0 : _a.getType();
+        if ((ityp instanceof basic_1.VoidType && isStructure) || ityp instanceof basic_1.UnknownType) {
+            const found = input.scope.findVariable(name);
             if (found) {
-                ityp = found;
+                input.scope.addReference(firstToken, found, _reference_1.ReferenceType.DataReadReference, input.filename);
+                ityp = found.getType();
             }
         }
-        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();
+        const as = (_a = node.findExpressionAfterToken("AS")) === null || _a === void 0 ? void 0 : _a.concatTokens();
         if (as && ityp instanceof basic_1.StructureType) {
             ityp = new basic_1.StructureType(ityp.getComponents().concat([{
                     name: as,
@@ -31561,7 +31579,7 @@ class IncludeType {
             input.issues.push((0, _syntax_input_1.syntaxIssue)(input, iname.getFirstToken(), message));
             return basic_1.VoidType.get(_syntax_input_1.CheckSyntaxKey);
         }
-        const suffix = (_e = node.findExpressionAfterToken("SUFFIX")) === null || _e === void 0 ? void 0 : _e.concatTokens();
+        const suffix = (_b = node.findExpressionAfterToken("SUFFIX")) === null || _b === void 0 ? void 0 : _b.concatTokens();
         if (suffix && ityp instanceof basic_1.StructureType) {
             const components = [];
             for (const c of ityp.getComponents()) {
@@ -32960,6 +32978,9 @@ class ReadTable {
             input.issues.push((0, _syntax_input_1.syntaxIssue)(input, node.getFirstToken(), message));
             return;
         }
+        else if (sourceType instanceof basic_1.UnknownType) {
+            // do nothing, ok
+        }
         else if (!(sourceType instanceof basic_1.TableType) && !(sourceType instanceof basic_1.VoidType)) {
             const message = "Read table, not a table type";
             input.issues.push((0, _syntax_input_1.syntaxIssue)(input, node.getFirstToken(), message));
@@ -53783,7 +53804,7 @@ class Registry {
     }
     static abaplintVersion() {
         // magic, see build script "version.sh"
-        return "2.113.240";
+        return "2.113.246";
     }
     getDDICReferences() {
         return this.ddicReferences;
@@ -56694,6 +56715,7 @@ const _abap_object_1 = __webpack_require__(/*! ../objects/_abap_object */ "./nod
 const include_graph_1 = __webpack_require__(/*! ../utils/include_graph */ "./node_modules/@abaplint/core/build/src/utils/include_graph.js");
 const _irule_1 = __webpack_require__(/*! ./_irule */ "./node_modules/@abaplint/core/build/src/rules/_irule.js");
 const objects_1 = __webpack_require__(/*! ../objects */ "./node_modules/@abaplint/core/build/src/objects/index.js");
+const severity_1 = __webpack_require__(/*! ../severity */ "./node_modules/@abaplint/core/build/src/severity.js");
 class CheckIncludeConf extends _basic_rule_config_1.BasicRuleConfig {
 }
 exports.CheckIncludeConf = CheckIncludeConf;
@@ -56722,7 +56744,7 @@ class CheckInclude {
     }
     initialize(reg) {
         this.reg = reg;
-        this.graph = new include_graph_1.IncludeGraph(this.reg);
+        this.graph = new include_graph_1.IncludeGraph(this.reg, this.getConfig().severity || severity_1.Severity.Error);
         return this;
     }
     run(obj) {
@@ -77420,10 +77442,11 @@ class Graph {
     }
 }
 class IncludeGraph {
-    constructor(reg) {
+    constructor(reg, severity = severity_1.Severity.Error) {
         this.reg = reg;
         this.issues = [];
         this.graph = new Graph();
+        this.severity = severity;
         this.build();
     }
     listMainForInclude(filename) {
@@ -77453,7 +77476,7 @@ class IncludeGraph {
             if (f === undefined) {
                 throw new Error("findUnusedIncludes internal error");
             }
-            const issue = issue_1.Issue.atPosition(f, new position_1.Position(1, 1), "INCLUDE not used anywhere", new check_include_1.CheckInclude().getMetadata().key, severity_1.Severity.Error);
+            const issue = issue_1.Issue.atPosition(f, new position_1.Position(1, 1), "INCLUDE not used anywhere", new check_include_1.CheckInclude().getMetadata().key, this.severity);
             ret.push(issue);
         }
         return ret;
@@ -77481,12 +77504,12 @@ class IncludeGraph {
                         if (found === undefined) {
                             const ifFound = s.concatTokens().toUpperCase().includes("IF FOUND");
                             if (ifFound === false) {
-                                const issue = issue_1.Issue.atStatement(f, s, "Include " + name + " not found", new check_include_1.CheckInclude().getMetadata().key, severity_1.Severity.Error);
+                                const issue = issue_1.Issue.atStatement(f, s, "Include " + name + " not found", new check_include_1.CheckInclude().getMetadata().key, this.severity);
                                 this.issues.push(issue);
                             }
                         }
                         else if (found.include === false) {
-                            const issue = issue_1.Issue.atStatement(f, s, "Not possible to INCLUDE a main program, " + name, new check_include_1.CheckInclude().getMetadata().key, severity_1.Severity.Error);
+                            const issue = issue_1.Issue.atStatement(f, s, "Not possible to INCLUDE a main program, " + name, new check_include_1.CheckInclude().getMetadata().key, this.severity);
                             this.issues.push(issue);
                         }
                         else {
@@ -78782,13 +78805,13 @@ class CompareTranspiler {
                 const field = concat.replace(" IS NOT REQUESTED", "").toLowerCase();
                 return new chunk_1.Chunk().appendString(pre + "INPUT && INPUT." + field + " === undefined && INPUT.importing?." + field + " === undefined");
             }
-            if (concat.startsWith("NOT ") || concat.includes(" IS NOT INSTANCE OF ")) {
-                const cname = node.findDirectExpression(core_1.Expressions.ClassName)?.concatTokens();
-                return new chunk_1.Chunk().appendString("abap.compare.instance_of(").appendChunk(s0).appendString(`, ${cname}) === false`);
-            }
-            else if (concat.includes(" IS INSTANCE OF ")) {
-                const cname = node.findDirectExpression(core_1.Expressions.ClassName)?.concatTokens();
-                return new chunk_1.Chunk().appendString("abap.compare.instance_of(").appendChunk(s0).appendString(`, ${cname})`);
+            if (concat.includes(" IS INSTANCE OF ")) {
+                const notted = concat.startsWith("NOT ") || concat.includes(" IS NOT INSTANCE OF ");
+                const falsed = notted ? " === false" : "";
+                const expr = node.findDirectExpression(core_1.Expressions.ClassName);
+                const cname = expr?.concatTokens();
+                const lookup = traversal.lookupClassOrInterface(cname, expr?.getFirstToken());
+                return new chunk_1.Chunk().appendString("abap.compare.instance_of(").appendChunk(s0).appendString(`, ${lookup})` + falsed);
             }
         }
         else if (sources.length === 2 && node.findDirectTokenByText("IN")) {
@@ -82497,7 +82520,9 @@ class ValueBodyTranspiler {
         let post = "";
         let extraFields = "";
         const hasLines = body.findDirectExpression(core_1.Expressions.ValueBodyLine) !== undefined;
-        for (const child of body.getChildren()) {
+        const children = body.getChildren();
+        for (let i = 0; i < children.length; i++) {
+            const child = children[i];
             if (child.get() instanceof core_1.Expressions.FieldAssignment && child instanceof core_1.Nodes.ExpressionNode) {
                 const transpiled = new field_assignment_1.FieldAssignmentTranspiler().transpile(child, traversal, context).getCode();
                 if (hasLines === false) {
@@ -82523,117 +82548,22 @@ class ValueBodyTranspiler {
                 ret.appendString(".set(" + source.getCode() + ".clone())");
             }
             else if (child.get() instanceof core_1.Expressions.For && child instanceof core_1.Nodes.ExpressionNode) {
-                const loop = child.findDirectExpression(core_1.Expressions.InlineLoopDefinition);
-                if (loop) {
-                    if (["THEN", "UNTIL", "WHILE", "FROM", "TO", "GROUPS"].some(token => child.findDirectTokenByText(token))) {
-                        throw new Error("ValueBody FOR todo, " + body.concatTokens());
-                    }
-                    let loopWhere = "";
-                    const whereNode = child?.findDirectExpression(core_1.Expressions.ComponentCond);
-                    if (whereNode) {
-                        const where = traversal.traverse(whereNode).getCode();
-                        loopWhere = `, {"where": async ` + where + `}`;
-                    }
-                    const base = loop.findDirectExpression(core_1.Expressions.ValueBase);
-                    if (base) {
-                        throw new Error("ValueBody FOR todo, base, " + body.concatTokens());
-                    }
-                    let targetDeclare = "";
-                    let targetAction = "";
-                    const fs = loop.findDirectExpression(core_1.Expressions.TargetFieldSymbol);
-                    if (fs) {
-                        targetDeclare = new statements_1.FieldSymbolTranspiler().transpile(fs, traversal).getCode();
-                        const targetName = new source_field_symbol_1.SourceFieldSymbolTranspiler().transpile(fs, traversal).getCode();
-                        targetAction = `${targetName}.assign(unique1);`;
-                    }
-                    else {
-                        const field = traversal.traverse(loop.findDirectExpression(core_1.Expressions.TargetField));
-                        if (field === undefined) {
-                            throw new Error("ValueBody FOR empty field todo, " + body.concatTokens());
-                        }
-                        targetAction = `const ${field.getCode()} = unique1.clone();`;
-                    }
-                    const llet = child.findDirectExpression(core_1.Expressions.Let);
-                    if (llet) {
-                        targetAction += new let_1.LetTranspiler().transpile(llet, traversal).getCode();
-                    }
-                    const source = traversal.traverse(loop.findDirectExpression(core_1.Expressions.Source)).getCode();
-                    const val = new type_name_or_infer_1.TypeNameOrInfer().transpile(typ, traversal).getCode();
-                    ret = new chunk_1.Chunk().appendString(`await (async () => {
-${targetDeclare}
-const VAL = ${val};
-for await (const unique1 of abap.statements.loop(${source}${loopWhere})) {
-  ${targetAction}
-  VAL`);
-                    post = ";\n}\nreturn VAL;\n})()";
-                }
-                else {
-                    const counter = child.findDirectExpression(core_1.Expressions.InlineFieldDefinition);
-                    if (counter === undefined) {
-                        throw new Error("ValueBody FOR todo, " + body.concatTokens());
-                    }
-                    if (["GROUPS", "FROM", "TO"].some(token => child.findDirectTokenByText(token))) {
-                        throw new Error("ValueBody FOR todo, " + body.concatTokens());
-                    }
-                    if (child.findDirectExpression(core_1.Expressions.ComponentCond)) {
-                        throw new Error("ValueBody FOR todo, component cond, " + body.concatTokens());
-                    }
-                    const cond = child.findDirectExpression(core_1.Expressions.Cond);
-                    if (cond === undefined) {
-                        throw new Error("ValueBody FOR missing condition, " + body.concatTokens());
-                    }
-                    const hasUntil = child.findDirectTokenByText("UNTIL") !== undefined;
-                    const hasWhile = child.findDirectTokenByText("WHILE") !== undefined;
-                    if ((hasUntil ? 1 : 0) + (hasWhile ? 1 : 0) !== 1) {
-                        throw new Error("ValueBody FOR todo, condition, " + body.concatTokens());
-                    }
-                    const fieldExpr = counter.findDirectExpression(core_1.Expressions.Field);
-                    const fieldName = fieldExpr?.concatTokens().toLowerCase();
-                    if (fieldName === undefined) {
-                        throw new Error("ValueBody FOR todo, inline field, " + body.concatTokens());
-                    }
-                    const scope = traversal.findCurrentScopeByToken(counter.getFirstToken());
-                    const variable = scope?.findVariable(fieldName);
-                    if (variable === undefined) {
-                        throw new Error("ValueBody FOR todo, variable, " + body.concatTokens());
-                    }
-                    const declare = transpile_types_1.TranspileTypes.declare(variable);
-                    const counterName = traversal_1.Traversal.prefixVariable(fieldName);
-                    const startSource = counter.findDirectExpression(core_1.Expressions.Source);
-                    if (startSource === undefined) {
-                        throw new Error("ValueBody FOR missing initial value, " + body.concatTokens());
-                    }
-                    const start = traversal.traverse(startSource).getCode();
-                    const thenExpr = child.findExpressionAfterToken("THEN");
-                    let incrementExpression = "";
-                    if (thenExpr && thenExpr instanceof core_1.Nodes.ExpressionNode) {
-                        incrementExpression = traversal.traverse(thenExpr).getCode();
+                const forNodes = [];
+                let idx = i;
+                while (idx < children.length) {
+                    const candidate = children[idx];
+                    if (candidate.get() instanceof core_1.Expressions.For && candidate instanceof core_1.Nodes.ExpressionNode) {
+                        forNodes.push(candidate);
+                        idx++;
                     }
                     else {
-                        incrementExpression = `abap.operators.add(${counterName}, new abap.types.Integer().set(1))`;
-                    }
-                    const incrementLine = `${counterName}.set(${incrementExpression});`;
-                    const llet = child.findDirectExpression(core_1.Expressions.Let);
-                    let letCode = "";
-                    if (llet) {
-                        letCode = new let_1.LetTranspiler().transpile(llet, traversal).getCode();
-                    }
-                    const letSection = letCode === "" ? "" : "  " + letCode.replace(/\n/g, "\n  ") + "\n";
-                    const condCode = traversal.traverse(cond).getCode();
-                    const val = new type_name_or_infer_1.TypeNameOrInfer().transpile(typ, traversal).getCode();
-                    const preCheck = hasWhile ? `  if (!(${condCode})) {\n    break;\n  }\n` : "";
-                    let postLoop = `  ${incrementLine}\n`;
-                    if (hasUntil) {
-                        postLoop += `  if (${condCode}) {\n    break;\n  }\n`;
+                        break;
                     }
-                    ret = new chunk_1.Chunk().appendString(`await (async () => {
-${declare}
-${counterName}.set(${start});
-const VAL = ${val};
-while (true) {
-${preCheck}${letSection}  VAL`);
-                    post = ";\n" + postLoop + "}\nreturn VAL;\n})()";
                 }
+                i = idx - 1;
+                const result = this.buildForChain(forNodes, typ, traversal, body);
+                ret = result.chunk;
+                post = result.post;
             }
             else if (child instanceof core_1.Nodes.TokenNode && child.getFirstToken().getStr().toUpperCase() === "DEFAULT") {
                 // note: this is last in the body, so its okay to prepend and postpend
@@ -82655,6 +82585,203 @@ ${preCheck}${letSection}  VAL`);
         }
         return ret.appendString(post);
     }
+    buildForChain(forNodes, typ, traversal, body) {
+        const val = new type_name_or_infer_1.TypeNameOrInfer().transpile(typ, traversal).getCode();
+        const chunk = new chunk_1.Chunk();
+        const preLoopDecls = [];
+        const descriptors = [];
+        const levelIndents = [];
+        let uniqueCounter = 1;
+        for (const child of forNodes) {
+            const loop = child.findDirectExpression(core_1.Expressions.InlineLoopDefinition);
+            if (loop) {
+                if (["THEN", "UNTIL", "WHILE", "FROM", "TO", "GROUPS"].some(token => child.findDirectTokenByText(token))) {
+                    throw new Error("ValueBody FOR todo, " + body.concatTokens());
+                }
+                let loopWhere = "";
+                const whereNode = child.findDirectExpression(core_1.Expressions.ComponentCond);
+                if (whereNode) {
+                    const where = traversal.traverse(whereNode).getCode();
+                    loopWhere = `, {"where": async ` + where + `}`;
+                }
+                const base = loop.findDirectExpression(core_1.Expressions.ValueBase);
+                if (base) {
+                    throw new Error("ValueBody FOR todo, base, " + body.concatTokens());
+                }
+                let targetDeclare = "";
+                let targetAction = "";
+                const fs = loop.findDirectExpression(core_1.Expressions.TargetFieldSymbol);
+                const uniqueName = `unique${uniqueCounter++}`;
+                if (fs) {
+                    targetDeclare = new statements_1.FieldSymbolTranspiler().transpile(fs, traversal).getCode();
+                    const targetName = new source_field_symbol_1.SourceFieldSymbolTranspiler().transpile(fs, traversal).getCode();
+                    targetAction = `${targetName}.assign(${uniqueName});`;
+                }
+                else {
+                    const field = traversal.traverse(loop.findDirectExpression(core_1.Expressions.TargetField));
+                    if (field === undefined) {
+                        throw new Error("ValueBody FOR empty field todo, " + body.concatTokens());
+                    }
+                    targetAction = `const ${field.getCode()} = ${uniqueName}.clone();`;
+                }
+                const llet = child.findDirectExpression(core_1.Expressions.Let);
+                if (llet) {
+                    targetAction += new let_1.LetTranspiler().transpile(llet, traversal).getCode();
+                }
+                const preBodyStatements = [];
+                if (targetAction !== "") {
+                    preBodyStatements.push(targetAction);
+                }
+                const source = traversal.traverse(loop.findDirectExpression(core_1.Expressions.Source)).getCode();
+                if (targetDeclare !== "") {
+                    preLoopDecls.push(targetDeclare);
+                }
+                const descriptor = {
+                    beforeLoop: [],
+                    open: `for await (const ${uniqueName} of abap.statements.loop(${source}${loopWhere})) {`,
+                    preBody: preBodyStatements,
+                    postBody: [],
+                    close: "}",
+                };
+                const loopTokens = loop.concatTokens().toUpperCase();
+                const indexTarget = loopTokens.includes("INDEX INTO") ? loop.findExpressionAfterToken("INTO") : undefined;
+                if (indexTarget && indexTarget instanceof core_1.Nodes.ExpressionNode) {
+                    const indexCode = traversal.traverse(indexTarget).getCode();
+                    const counterName = `unique${uniqueCounter++}`;
+                    descriptor.beforeLoop.push(`let ${counterName} = 1;`);
+                    descriptor.preBody.push(`const ${indexCode} = new abap.types.Integer().set(${counterName});`);
+                    descriptor.postBody.push(`${counterName}++;`);
+                }
+                descriptors.push(descriptor);
+            }
+            else {
+                const counter = child.findDirectExpression(core_1.Expressions.InlineFieldDefinition);
+                if (counter === undefined) {
+                    throw new Error("ValueBody FOR todo, " + body.concatTokens());
+                }
+                if (["GROUPS", "FROM", "TO"].some(token => child.findDirectTokenByText(token))) {
+                    throw new Error("ValueBody FOR todo, " + body.concatTokens());
+                }
+                if (child.findDirectExpression(core_1.Expressions.ComponentCond)) {
+                    throw new Error("ValueBody FOR todo, component cond, " + body.concatTokens());
+                }
+                const cond = child.findDirectExpression(core_1.Expressions.Cond);
+                if (cond === undefined) {
+                    throw new Error("ValueBody FOR missing condition, " + body.concatTokens());
+                }
+                const hasUntil = child.findDirectTokenByText("UNTIL") !== undefined;
+                const hasWhile = child.findDirectTokenByText("WHILE") !== undefined;
+                if ((hasUntil ? 1 : 0) + (hasWhile ? 1 : 0) !== 1) {
+                    throw new Error("ValueBody FOR todo, condition, " + body.concatTokens());
+                }
+                const fieldExpr = counter.findDirectExpression(core_1.Expressions.Field);
+                const fieldName = fieldExpr?.concatTokens().toLowerCase();
+                if (fieldName === undefined) {
+                    throw new Error("ValueBody FOR todo, inline field, " + body.concatTokens());
+                }
+                const scope = traversal.findCurrentScopeByToken(counter.getFirstToken());
+                const variable = scope?.findVariable(fieldName);
+                if (variable === undefined) {
+                    throw new Error("ValueBody FOR todo, variable, " + body.concatTokens());
+                }
+                const declare = transpile_types_1.TranspileTypes.declare(variable);
+                const counterName = traversal_1.Traversal.prefixVariable(fieldName);
+                const startSource = counter.findDirectExpression(core_1.Expressions.Source);
+                if (startSource === undefined) {
+                    throw new Error("ValueBody FOR missing initial value, " + body.concatTokens());
+                }
+                const start = traversal.traverse(startSource).getCode();
+                const thenExpr = child.findExpressionAfterToken("THEN");
+                let incrementExpression = "";
+                if (thenExpr && thenExpr instanceof core_1.Nodes.ExpressionNode) {
+                    incrementExpression = traversal.traverse(thenExpr).getCode();
+                }
+                else {
+                    incrementExpression = `abap.operators.add(${counterName}, new abap.types.Integer().set(1))`;
+                }
+                const incrementLine = `${counterName}.set(${incrementExpression});`;
+                const llet = child.findDirectExpression(core_1.Expressions.Let);
+                let letCode = "";
+                if (llet) {
+                    letCode = new let_1.LetTranspiler().transpile(llet, traversal).getCode();
+                }
+                const condCode = traversal.traverse(cond).getCode();
+                const preCheck = hasWhile ? `if (!(${condCode})) {\n  break;\n}` : "";
+                const postLoop = [];
+                postLoop.push(incrementLine);
+                if (hasUntil) {
+                    postLoop.push(`if (${condCode}) {\n  break;\n}`);
+                }
+                descriptors.push({
+                    beforeLoop: [declare, `${counterName}.set(${start});`],
+                    open: "while (true) {",
+                    preBody: [preCheck, letCode].filter(s => s !== ""),
+                    postBody: postLoop,
+                    close: "}",
+                });
+            }
+        }
+        if (descriptors.length === 0) {
+            throw new Error("ValueBodyTranspiler FOR internal error");
+        }
+        chunk.appendString("await (async () => {\n");
+        this.appendBlocks(chunk, preLoopDecls, "");
+        chunk.appendString(`const VAL = ${val};\n`);
+        let indent = "";
+        for (const desc of descriptors) {
+            this.appendBlocks(chunk, desc.beforeLoop, indent);
+            chunk.appendString(indent + desc.open + "\n");
+            indent += "  ";
+            levelIndents.push(indent);
+            this.appendBlocks(chunk, desc.preBody, indent);
+        }
+        chunk.appendString(indent + "VAL");
+        let post = ";\n";
+        for (let i = descriptors.length - 1; i >= 0; i--) {
+            const desc = descriptors[i];
+            const currentIndent = levelIndents[i] ?? "";
+            post += this.blocksToString(desc.postBody, currentIndent);
+            const parentIndent = currentIndent.substring(0, Math.max(0, currentIndent.length - 2));
+            post += parentIndent + desc.close + "\n";
+        }
+        post += "return VAL;\n})()";
+        return { chunk, post };
+    }
+    appendBlocks(chunk, blocks, indent) {
+        for (const block of blocks) {
+            this.appendBlock(chunk, block, indent);
+        }
+    }
+    appendBlock(chunk, block, indent) {
+        if (block === "") {
+            return;
+        }
+        const lines = block.split("\n");
+        for (const line of lines) {
+            const clean = line.replace(/\r/g, "");
+            if (clean.trim() === "") {
+                continue;
+            }
+            chunk.appendString(indent + clean + "\n");
+        }
+    }
+    blocksToString(blocks, indent) {
+        let ret = "";
+        for (const block of blocks) {
+            if (block === "") {
+                continue;
+            }
+            const lines = block.split("\n");
+            for (const line of lines) {
+                const clean = line.replace(/\r/g, "");
+                if (clean.trim() === "") {
+                    continue;
+                }
+                ret += indent + clean + "\n";
+            }
+        }
+        return ret;
+    }
 }
 exports.ValueBodyTranspiler = ValueBodyTranspiler;
 //# sourceMappingURL=value_body.js.map

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@abaplint/transpiler-cli",
-  "version": "2.12.10",
+  "version": "2.12.12",
   "description": "Transpiler - Command Line Interface",
   "funding": "https://github.com/sponsors/larshp",
   "bin": {
@@ -27,8 +27,8 @@
   "author": "abaplint",
   "license": "MIT",
   "devDependencies": {
-    "@abaplint/core": "^2.113.240",
-    "@abaplint/transpiler": "^2.12.10",
+    "@abaplint/core": "^2.113.246",
+    "@abaplint/transpiler": "^2.12.12",
     "@types/glob": "^8.1.0",
     "@types/node": "^24.10.1",
     "@types/progress": "^2.0.7",