@abaplint/runtime 2.7.40 → 2.7.42

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

@@ -2,7 +2,7 @@ import { INumeric } from "../types/_numeric";
 import { ICharacter } from "../types/_character";
 import { Table } from "../types";
 export interface IConcatenateInput {
-    source: [number | string | INumeric | ICharacter | Table];
+    source: (number | string | INumeric | ICharacter | Table)[];
     target: ICharacter;
     separatedBy?: number | string | INumeric | ICharacter;
     respectingBlanks?: boolean;

package/build/src/statements/create_data.js

@@ -70,6 +70,9 @@ function createData(target, options) {
         else if (options.name.trimEnd() === "F") {
             target.assign(new types_1.Float());
         }
+        else if (options.name.trimEnd() === "INT8") {
+            target.assign(new types_1.Integer8());
+        }
         else {
             (0, throw_error_1.throwError)("CX_SY_CREATE_DATA_ERROR");
         }
@@ -135,6 +138,9 @@ function createData(target, options) {
             case "STRING":
                 target.assign(new types_1.String());
                 break;
+            case "INT8":
+                target.assign(new types_1.Integer8());
+                break;
             case "XSTRING":
                 target.assign(new types_1.XString());
                 break;

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

@@ -3,5 +3,7 @@ import { INumeric } from "../types/_numeric";
 export interface IModifyInternalOptions {
     index: INumeric;
     from: any;
+    where?: (i: any) => boolean;
+    transporting?: string[];
 }
 export declare function modifyInternal(table: Table, options: IModifyInternalOptions): void;

package/build/src/statements/modify_internal.js

@@ -15,6 +15,25 @@ function modifyInternal(table, options) {
             table.insertIndex(options.from, index);
         }
     }
+    else if (options.where && options.transporting && options.from) {
+        let index = 1;
+        const fs = new types_1.FieldSymbol();
+        while (index <= table.array().length) {
+            const currentIndex = new types_1.Integer().set(index);
+            const readResult = (0, read_table_1.readTable)(table, {
+                withKey: options.where,
+                assigning: fs,
+                index: currentIndex
+            });
+            if (readResult.subrc === 0) {
+                found = true;
+                for (const t of options.transporting) {
+                    fs.get()[t].set(options.from.get()[t]);
+                }
+            }
+            index++;
+        }
+    }
     else if (options.from) {
         const readResult = (0, read_table_1.readTable)(table, { from: options.from });
         if (readResult.subrc === 0) {

package/build/src/statements/replace.js

@@ -2,8 +2,8 @@
 Object.defineProperty(exports, "__esModule", { value: true });
 exports.replace = void 0;
 const abap_regex_1 = require("../abap_regex");
-const offset_length_1 = require("../offset_length");
 const types_1 = require("../types");
+const concatenate_1 = require("./concatenate");
 function replace(input) {
     if (input.target instanceof types_1.Table) {
         for (const row of input.target.array()) {
@@ -34,7 +34,9 @@ function replace(input) {
         search = new RegExp(regex, ignoreCase + allOccurrences);
     }
     else if (input.sectionLength && input.sectionOffset) {
-        new offset_length_1.OffsetLength(input.target, { length: input.sectionLength, offset: input.sectionOffset }).set(input.with);
+        const before = input.target.getOffset({ length: input.sectionOffset });
+        const after = input.target.getOffset({ offset: input.sectionLength.get() + input.sectionOffset.get() });
+        (0, concatenate_1.concatenate)({ source: [before, input.with, after], target: input.target });
         // @ts-ignore
         abap.builtin.sy.get().subrc.set(0);
         return;

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@abaplint/runtime",
-  "version": "2.7.40",
+  "version": "2.7.42",
   "description": "Transpiler - Runtime",
   "main": "build/src/index.js",
   "typings": "build/src/index.d.ts",