@abaplint/runtime 1.7.2 → 1.7.6

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

@@ -12,5 +12,6 @@ export * from "./initial";
 export * from "./le";
 export * from "./lt";
 export * from "./ne";
+export * from "./na";
 export * from "./ns";
 export { compareIn as in } from "./in";

package/build/src/compare/index.js

@@ -25,6 +25,7 @@ __exportStar(require("./initial"), exports);
 __exportStar(require("./le"), exports);
 __exportStar(require("./lt"), exports);
 __exportStar(require("./ne"), exports);
+__exportStar(require("./na"), exports);
 __exportStar(require("./ns"), exports);
 var in_1 = require("./in");
 Object.defineProperty(exports, "in", { enumerable: true, get: function () { return in_1.compareIn; } });

package/build/src/compare/na.d.ts

@@ -0,0 +1,3 @@
+import { ICharacter } from "../types/_character";
+import { INumeric } from "../types/_numeric";
+export declare function na(left: number | string | ICharacter | INumeric, right: string | ICharacter): boolean;

package/build/src/compare/na.js

@@ -0,0 +1,9 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.na = void 0;
+const ca_1 = require("./ca");
+function na(left, right) {
+    return !(0, ca_1.ca)(left, right);
+}
+exports.na = na;
+//# sourceMappingURL=na.js.map

package/build/src/statements/modify_internal.js

@@ -1,12 +1,26 @@
 "use strict";
 Object.defineProperty(exports, "__esModule", { value: true });
 exports.modifyInternal = void 0;
+const types_1 = require("../types");
+const delete_internal_1 = require("./delete_internal");
+const insert_internal_1 = require("./insert_internal");
+const read_table_1 = require("./read_table");
 function modifyInternal(table, options) {
-    const index = options.index.get() - 1;
-    const found = table.array()[index] !== undefined;
-    if (found) {
-        table.deleteIndex(index);
-        table.insertIndex(options.from, index);
+    let found = false;
+    if (options.index) {
+        const index = options.index.get() - 1;
+        found = table.array()[index] !== undefined;
+        if (found) {
+            table.deleteIndex(index);
+            table.insertIndex(options.from, index);
+        }
+    }
+    else if (options.from) {
+        const readResult = (0, read_table_1.readTable)(table, { from: options.from });
+        if (readResult.subrc === 0) {
+            (0, delete_internal_1.deleteInternal)(table, { index: new types_1.Integer().set(readResult.foundIndex) });
+        }
+        (0, insert_internal_1.insertInternal)({ table, data: options.from });
     }
     const subrc = found ? 0 : 4;
     // @ts-ignore

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

@@ -5,7 +5,11 @@ export interface IReadTableOptions {
     index?: INumeric | number;
     withKey?: (i: any) => boolean;
     into?: INumeric | ICharacter | Structure | Table | DataReference;
+    from?: INumeric | ICharacter | Structure | Table | DataReference;
     referenceInto?: DataReference;
     assigning?: FieldSymbol;
 }
-export declare function readTable(table: Table | FieldSymbol, options?: IReadTableOptions): void;
+export declare function readTable(table: Table | FieldSymbol, options?: IReadTableOptions): {
+    subrc: number;
+    foundIndex: number;
+};

package/build/src/statements/read_table.js

@@ -1,8 +1,10 @@
 "use strict";
 Object.defineProperty(exports, "__esModule", { value: true });
 exports.readTable = void 0;
+const compare_1 = require("../compare");
 const types_1 = require("../types");
 function readTable(table, options) {
+    var _a;
     let found = undefined;
     let foundIndex = 0;
     const arr = table.array();
@@ -30,10 +32,40 @@ function readTable(table, options) {
             foundIndex = 0;
         }
     }
+    else if (options === null || options === void 0 ? void 0 : options.from) {
+        if (table instanceof types_1.Table && options.from instanceof types_1.Structure) {
+            const keys = (_a = table.getOptions()) === null || _a === void 0 ? void 0 : _a.keyFields;
+            const isStructured = arr[0] instanceof types_1.Structure;
+            if (keys !== undefined && isStructured === true) {
+                //        console.dir(keys);
+                //        console.dir(options.from.get()[keys[0].toLowerCase()]);
+                for (const a of arr) {
+                    foundIndex++;
+                    let matches = true;
+                    for (const k of keys) {
+                        if ((0, compare_1.eq)(a.get()[k.toLowerCase()], options.from.get()[k.toLowerCase()]) === false) {
+                            matches = false;
+                            break;
+                        }
+                    }
+                    if (matches === true) {
+                        found = arr;
+                        break;
+                    }
+                }
+            }
+        }
+        if (found === undefined) {
+            foundIndex = 0;
+        }
+    }
     else {
         throw new Error("runtime, readTable, unexpected input");
     }
-    const subrc = found ? 0 : 4;
+    let subrc = found ? 0 : 4;
+    if ((options === null || options === void 0 ? void 0 : options.from) && subrc === 4) {
+        subrc = 8;
+    }
     // @ts-ignore
     abap.builtin.sy.get().subrc.set(subrc);
     // @ts-ignore
@@ -55,6 +87,7 @@ function readTable(table, options) {
     else if (options.assigning && found) {
         options.assigning.assign(found);
     }
+    return { subrc, foundIndex };
 }
 exports.readTable = readTable;
 //# sourceMappingURL=read_table.js.map

package/package.json

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