@abaplint/core 2.102.32 → 2.102.34

package/build/abaplint.d.ts

@@ -1345,6 +1345,7 @@ export declare class CurrentScope {
     getType(): ScopeType;
     push(stype: ScopeType, sname: string, start: Position, filename: string): void;
     isOO(): boolean;
+    isGlobalOO(): boolean;
     isTypePool(): boolean;
     setAllowHeaderUse(name: string): void;
     isAllowHeaderUse(name: string): boolean;

package/build/src/abap/5_syntax/_current_scope.js

@@ -387,6 +387,9 @@ class CurrentScope {
         }
         return false;
     }
+    isGlobalOO() {
+        return this.parentObj.getType() === "INTF" || this.parentObj.getType() === "CLAS";
+    }
     isTypePool() {
         var _a;
         return ((_a = this.current) === null || _a === void 0 ? void 0 : _a.getIdentifier().filename.endsWith(".type.abap")) === true || false;

package/build/src/abap/5_syntax/statements/insert_internal.js

@@ -16,7 +16,8 @@ class InsertInternal {
         if (t) {
             targetType = new target_1.Target().runSyntax(t, scope, filename);
         }
-        if (targetType instanceof basic_1.TableType && node.findDirectTokenByText("LINES") === undefined) {
+        if (targetType instanceof basic_1.TableType
+            && node.findDirectTokenByText("LINES") === undefined) {
             targetType = targetType.getRowType();
         }
         let source = node.findDirectExpression(Expressions.SimpleSource4);
@@ -34,7 +35,8 @@ class InsertInternal {
                 new fstarget_1.FSTarget().runSyntax(afterAssigning, scope, filename, sourceType);
             }
         }
-        if (new _type_utils_1.TypeUtils(scope).isAssignableStrict(sourceType, targetType) === false) {
+        if (node.findDirectTokenByText("INITIAL") === undefined
+            && new _type_utils_1.TypeUtils(scope).isAssignableStrict(sourceType, targetType) === false) {
             throw new Error("Types not compatible");
         }
         const afterInto = node.findExpressionAfterToken("INTO");

package/build/src/abap/5_syntax/statements/type.js

@@ -18,6 +18,13 @@ class Type {
                 && (found === null || found === void 0 ? void 0 : found.getType().containsVoid()) === false) {
                 throw new Error("TYPES definition cannot be generic, " + found.getName());
             }
+            if (scope.isGlobalOO() && found.getType() instanceof basic_1.PackedType) {
+                const concat = node.concatTokens().toUpperCase();
+                if ((concat.includes(" TYPE P ") || concat.includes(" TYPE P."))
+                    && concat.includes(" DECIMALS ") === false) {
+                    throw new Error("Specify DECIMALS in OO context for packed");
+                }
+            }
             return found;
         }
         const fallback = node.findFirstExpression(Expressions.NamespaceSimpleName);

package/build/src/registry.js

@@ -65,7 +65,7 @@ class Registry {
     }
     static abaplintVersion() {
         // magic, see build script "version.sh"
-        return "2.102.32";
+        return "2.102.34";
     }
     getDDICReferences() {
         return this.ddicReferences;

package/package.json

@@ -1,6 +1,6 @@
 {
     "name": "@abaplint/core",
-    "version": "2.102.32",
+    "version": "2.102.34",
     "description": "abaplint - Core API",
     "main": "build/src/index.js",
     "typings": "build/abaplint.d.ts",