@abaplint/runtime 2.0.62 → 2.0.65

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

@@ -2,8 +2,10 @@ import { DataReference, FieldSymbol, Structure } from "../types";
 import { ICharacter } from "../types/_character";
 import { INumeric } from "../types/_numeric";
 export interface IAssignInput {
-    source: INumeric | ICharacter | Structure | DataReference;
+    source?: INumeric | ICharacter | Structure | DataReference;
     target: FieldSymbol;
+    dynamicText?: string;
+    dynamicSource?: ICharacter;
     casting?: boolean;
     component?: string | ICharacter;
 }

package/build/src/statements/assign.js

@@ -3,14 +3,42 @@ Object.defineProperty(exports, "__esModule", { value: true });
 exports.assign = void 0;
 const types_1 = require("../types");
 function assign(input) {
-    if (input.component) {
+    if (input.dynamicText) {
+        if (input.dynamicSource instanceof types_1.FieldSymbol) {
+            input.dynamicSource = input.dynamicSource.getPointer();
+        }
+        if (input.dynamicText.includes("->")) {
+            if (input.dynamicSource instanceof types_1.ABAPObject) {
+                const split = input.dynamicText.split("->");
+                // @ts-ignore
+                input.dynamicSource = input.dynamicSource.get()[split[1].toLowerCase()];
+            }
+            else {
+                // @ts-ignore
+                abap.builtin.sy.get().subrc.set(4);
+                return;
+            }
+        }
+        if (input.dynamicSource) {
+            input.target.assign(input.dynamicSource);
+            // @ts-ignore
+            abap.builtin.sy.get().subrc.set(0);
+        }
+        else {
+            // @ts-ignore
+            abap.builtin.sy.get().subrc.set(4);
+        }
+    }
+    else if (input.component) {
         if (input.source instanceof types_1.FieldSymbol || input.source instanceof types_1.DataReference) {
             input.source = input.source.getPointer();
             assign(input);
             return;
         }
         else if (!(input.source instanceof types_1.Structure)) {
-            throw "ASSIGN, not a structure"; // todo, this should be a runtime error?
+            // @ts-ignore
+            abap.builtin.sy.get().subrc.set(4);
+            return;
         }
         let component = input.component;
         if (typeof component !== "string") {

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

@@ -6,6 +6,7 @@ export interface ICreateDataOptions {
     table?: boolean;
     name?: string;
     type?: PointerType;
+    typeHandle?: ABAPObject;
     likeLineOf?: FieldSymbol | Table;
 }
 export declare function createData(target: DataReference, options?: ICreateDataOptions): void;

package/build/src/statements/create_data.js

@@ -14,6 +14,24 @@ function createData(target, options) {
         // @ts-ignore
         target.assign(new abap.types.Table(abap.DDIC[options.name].type));
     }
+    else if (options === null || options === void 0 ? void 0 : options.typeHandle) {
+        switch (options.typeHandle.get().type_kind.get()) {
+            case "F":
+                target.assign(new types_1.Float());
+                break;
+            case "I":
+                target.assign(new types_1.Integer());
+                break;
+            case "D":
+                target.assign(new types_1.Date());
+                break;
+            case "T":
+                target.assign(new types_1.Time());
+                break;
+            default:
+                throw "CREATE DATA, unknown handle type";
+        }
+    }
     else if (options === null || options === void 0 ? void 0 : options.name) {
         // @ts-ignore
         if (abap.DDIC[options.name] === undefined) {

package/build/src/statements/describe.js

@@ -3,6 +3,7 @@ Object.defineProperty(exports, "__esModule", { value: true });
 exports.describe = void 0;
 const types_1 = require("../types");
 function describe(input) {
+    //  console.dir(input);
     if (input.type) {
         if (input.field instanceof types_1.FieldSymbol) {
             describe({ field: input.field.getPointer(), type: input.type, length: input.length, mode: input.mode });

package/build/src/types/data_reference.d.ts

@@ -4,7 +4,8 @@ import { ABAPObject } from "./abap_object";
 import { Table } from "./table";
 import { String } from "./string";
 import { Structure } from "./structure";
-declare type PointerType = INumeric | Table | ICharacter | ABAPObject | undefined | Structure;
+import { Float } from "./float";
+declare type PointerType = INumeric | Table | ICharacter | ABAPObject | undefined | Structure | Float;
 export declare class DataReference {
     private pointer;
     private readonly type;
@@ -16,7 +17,7 @@ export declare class DataReference {
     clear(): void;
     get(): any;
     array(): any;
-    set(value: any): void | ABAPObject | ICharacter | INumeric | Table | Structure;
+    set(value: any): void | ABAPObject | ICharacter | INumeric | Float | Table | Structure;
     getOffset(input: {
         offset: number;
         length: number;

package/build/src/types/field_symbol.d.ts

@@ -19,7 +19,7 @@ export declare class FieldSymbol {
     get(): any;
     appendInitial(): import("./table").TableRowType | undefined;
     array(): any;
-    set(value: any): void | Structure | undefined;
+    set(value: any): this;
     getOffset(input: {
         offset: number;
         length: number;

package/build/src/types/field_symbol.js

@@ -66,7 +66,8 @@ class FieldSymbol {
     }
     set(value) {
         var _a;
-        return (_a = this.pointer) === null || _a === void 0 ? void 0 : _a.set(value);
+        (_a = this.pointer) === null || _a === void 0 ? void 0 : _a.set(value);
+        return this;
     }
     getOffset(input) {
         // Assuming we're interested in Strings here, for now...

package/package.json

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