@abaplint/core 2.85.41 → 2.85.44

package/build/abaplint.d.ts

@@ -805,6 +805,7 @@ declare class ClassDefinition_3 extends Identifier implements IClassDefinition {
     private readonly implementing;
     private readonly testing;
     private readonly abstract;
+    private readonly sharedMemory;
     private aliases;
     constructor(node: StructureNode, filename: string, scope: CurrentScope);
     getFriends(): string[];
@@ -819,6 +820,7 @@ declare class ClassDefinition_3 extends Identifier implements IClassDefinition {
     getAliases(): IAliases;
     isForTesting(): boolean;
     isAbstract(): boolean;
+    isSharedMemory(): boolean;
     private findSuper;
     private findFriends;
     private addReference;
@@ -2553,6 +2555,7 @@ export declare interface IClassDefinition extends IInterfaceDefinition {
     isFinal(): boolean;
     isForTesting(): boolean;
     isAbstract(): boolean;
+    isSharedMemory(): boolean;
     getFriends(): string[];
 }
 
@@ -2882,6 +2885,7 @@ declare interface InfoClassDefinition extends InfoInterfaceDefinition {
     isFinal: boolean;
     interfaces: readonly InfoImplementing[];
     isForTesting: boolean;
+    isSharedMemory: boolean;
 }
 
 declare interface InfoClassImplementation {
@@ -3502,6 +3506,14 @@ declare class Loop_2 implements IStatement {
     getMatcher(): IStatementRunnable;
 }
 
+declare class LoopAtScreen implements IStructure {
+    getMatcher(): IStructureRunnable;
+}
+
+declare class LoopAtScreen_2 implements IStatement {
+    getMatcher(): IStatementRunnable;
+}
+
 declare class LoopGroupBy extends Expression {
     getRunnable(): IStatementRunnable;
 }
@@ -5026,6 +5038,7 @@ declare namespace Statements {
         BreakId,
         InterfaceDeferred,
         While_2 as While,
+        LoopAtScreen_2 as LoopAtScreen,
         Loop_2 as Loop,
         Check,
         EndProvide,
@@ -5425,6 +5438,7 @@ declare namespace Structures {
         If,
         InterfaceGlobal,
         Interface_2 as Interface,
+        LoopAtScreen,
         Loop,
         Method,
         Module,

package/build/src/abap/2_statements/combi.js

@@ -1,6 +1,6 @@
 "use strict";
 Object.defineProperty(exports, "__esModule", { value: true });
-exports.verNot = exports.ver = exports.plusPrio = exports.plus = exports.starPrio = exports.star = exports.per = exports.optPrio = exports.opt = exports.altPrio = exports.alt = exports.seq = exports.tok = exports.regex = exports.str = exports.Combi = exports.Expression = void 0;
+exports.fail = exports.verNot = exports.ver = exports.plusPrio = exports.plus = exports.starPrio = exports.star = exports.per = exports.optPrio = exports.opt = exports.altPrio = exports.alt = exports.seq = exports.tok = exports.regex = exports.str = exports.Combi = exports.Expression = void 0;
 const Tokens = require("../1_lexer/tokens");
 const nodes_1 = require("../nodes");
 const version_1 = require("../../version");
@@ -572,6 +572,28 @@ class Permutation {
         return [""];
     }
 }
+class FailCombinator extends Error {
+}
+class Fail {
+    listKeywords() {
+        return [];
+    }
+    getUsing() {
+        return [];
+    }
+    run(_r) {
+        throw new FailCombinator();
+    }
+    railroad() {
+        return "Railroad.Terminal('!Fail')";
+    }
+    toStr() {
+        return "fail()";
+    }
+    first() {
+        return [];
+    }
+}
 class Alternative {
     constructor(list) {
         if (list.length < 2) {
@@ -711,18 +733,26 @@ class Combi {
     static run(runnable, tokens, version) {
         this.ver = version;
         const input = new result_1.Result(tokens, 0);
-        const result = runnable.run([input]);
-        /*
-            console.log("res: " + result.length);
+        try {
+            const result = runnable.run([input]);
+            /*
+                console.log("res: " + result.length);
+                for (const res of result) {
+                  console.dir(res.getNodes().map(n => n.get().constructor.name));
+                  console.dir(res.getNodes().map(n => n.concatTokens()));
+                }
+            */
             for (const res of result) {
-              console.dir(res.getNodes().map(n => n.get().constructor.name));
-              console.dir(res.getNodes().map(n => n.concatTokens()));
+                if (res.remainingLength() === 0) {
+                    return res.getNodes();
+                }
             }
-        */
-        for (const res of result) {
-            if (res.remainingLength() === 0) {
-                return res.getNodes();
+        }
+        catch (err) {
+            if (err instanceof FailCombinator) {
+                return undefined;
             }
+            throw err;
         }
         return undefined;
     }
@@ -824,4 +854,8 @@ function verNot(version, first) {
     return new VersNot(version, map(first));
 }
 exports.verNot = verNot;
+function fail() {
+    return new Fail();
+}
+exports.fail = fail;
 //# sourceMappingURL=combi.js.map

package/build/src/abap/2_statements/statements/index.js

@@ -36,6 +36,7 @@ __exportStar(require("./do"), exports);
 __exportStar(require("./break_id"), exports);
 __exportStar(require("./interface_deferred"), exports);
 __exportStar(require("./while"), exports);
+__exportStar(require("./loop_at_screen"), exports);
 __exportStar(require("./loop"), exports);
 __exportStar(require("./check"), exports);
 __exportStar(require("./endprovide"), exports);

package/build/src/abap/2_statements/statements/loop.js

@@ -17,7 +17,7 @@ class Loop {
         const to = (0, combi_1.seq)("TO", expressions_1.Source);
         const usingKey = (0, combi_1.seq)("USING KEY", (0, combi_1.altPrio)(expressions_1.SimpleName, expressions_1.Dynamic));
         const options = (0, combi_1.per)(target, from, to, where, usingKey, group);
-        const at = (0, combi_1.seq)("AT", (0, combi_1.opt)((0, combi_1.ver)(version_1.Version.v740sp08, "GROUP")), (0, combi_1.alt)(simple_source2_1.SimpleSource2, (0, combi_1.ver)(version_1.Version.v740sp02, expressions_1.Source)), (0, combi_1.opt)(options));
+        const at = (0, combi_1.seq)("AT", (0, combi_1.opt)((0, combi_1.seq)("SCREEN", (0, combi_1.fail)())), (0, combi_1.opt)((0, combi_1.ver)(version_1.Version.v740sp08, "GROUP")), (0, combi_1.alt)(simple_source2_1.SimpleSource2, (0, combi_1.ver)(version_1.Version.v740sp02, expressions_1.Source)), (0, combi_1.opt)(options));
         return (0, combi_1.seq)("LOOP", (0, combi_1.opt)(at));
     }
 }

package/build/src/abap/2_statements/statements/loop_at_screen.js

@@ -0,0 +1,14 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.LoopAtScreen = void 0;
+const combi_1 = require("../combi");
+const version_1 = require("../../../version");
+const expressions_1 = require("../expressions");
+class LoopAtScreen {
+    getMatcher() {
+        const l = (0, combi_1.seq)("LOOP AT SCREEN", (0, combi_1.opt)((0, combi_1.seq)("INTO", expressions_1.Target)));
+        return (0, combi_1.verNot)(version_1.Version.Cloud, l);
+    }
+}
+exports.LoopAtScreen = LoopAtScreen;
+//# sourceMappingURL=loop_at_screen.js.map

package/build/src/abap/3_structures/structures/index.js

@@ -41,6 +41,7 @@ __exportStar(require("./function_module"), exports);
 __exportStar(require("./if"), exports);
 __exportStar(require("./interface_global"), exports);
 __exportStar(require("./interface"), exports);
+__exportStar(require("./loop_at_screen"), exports);
 __exportStar(require("./loop"), exports);
 __exportStar(require("./method"), exports);
 __exportStar(require("./module"), exports);

package/build/src/abap/3_structures/structures/loop_at_screen.js

@@ -0,0 +1,13 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.LoopAtScreen = void 0;
+const Statements = require("../../2_statements/statements");
+const _combi_1 = require("./_combi");
+const _1 = require(".");
+class LoopAtScreen {
+    getMatcher() {
+        return (0, _combi_1.beginEnd)((0, _combi_1.sta)(Statements.LoopAtScreen), (0, _combi_1.opt)((0, _combi_1.sub)(_1.Body)), (0, _combi_1.sta)(Statements.EndLoop));
+    }
+}
+exports.LoopAtScreen = LoopAtScreen;
+//# sourceMappingURL=loop_at_screen.js.map

package/build/src/abap/3_structures/structures/normal.js

@@ -8,7 +8,7 @@ const _statement_1 = require("../../2_statements/statements/_statement");
 class Normal {
     getMatcher() {
         // note that the sequence of alternatives here influences performance
-        return (0, _combi_1.alt)((0, _combi_1.sta)(Statements.Move), (0, _combi_1.sta)(Statements.Call), (0, _combi_1.sta)(Statements.Data), (0, _combi_1.sub)(Structures.If), (0, _combi_1.sta)(Statements.Clear), (0, _combi_1.sta)(Statements.FieldSymbol), (0, _combi_1.sta)(Statements.CreateObject), (0, _combi_1.sta)(Statements.CallFunction), (0, _combi_1.sta)(_statement_1.MacroCall), (0, _combi_1.sub)(Structures.Loop), (0, _combi_1.sta)(Statements.Append), (0, _combi_1.sub)(Structures.Try), (0, _combi_1.sta)(Statements.ReadTable), (0, _combi_1.sta)(Statements.Assert), (0, _combi_1.sta)(Statements.Return), (0, _combi_1.sta)(Statements.Select), (0, _combi_1.sta)(Statements.Assign), (0, _combi_1.sta)(Statements.InsertInternal), (0, _combi_1.sta)(Statements.DeleteInternal), (0, _combi_1.sta)(Statements.Concatenate), (0, _combi_1.sub)(Structures.Case), (0, _combi_1.sub)(Structures.CaseType), (0, _combi_1.sub)(Structures.Enhancement), (0, _combi_1.sub)(Structures.EnhancementSection), (0, _combi_1.sta)(Statements.AddCorresponding), (0, _combi_1.sta)(Statements.Add), (0, _combi_1.sta)(Statements.AssignLocalCopy), (0, _combi_1.sta)(Statements.AuthorityCheck), (0, _combi_1.sta)(Statements.Back), (0, _combi_1.sta)(Statements.Break), (0, _combi_1.sta)(Statements.BreakId), (0, _combi_1.sta)(Statements.CallDatabase), (0, _combi_1.sta)(Statements.CallDialog), (0, _combi_1.sta)(Statements.CallKernel), (0, _combi_1.sta)(Statements.CallOLE), (0, _combi_1.sta)(Statements.CallScreen), (0, _combi_1.sta)(Statements.ModifyScreen), (0, _combi_1.sta)(Statements.CallSelectionScreen), (0, _combi_1.sta)(Statements.CallTransaction), (0, _combi_1.sta)(Statements.CallTransformation), (0, _combi_1.sta)(Statements.Check), (0, _combi_1.sta)(Statements.ClassDefinitionLoad), (0, _combi_1.sta)(Statements.CloseCursor), (0, _combi_1.sta)(Statements.CloseDataset), (0, _combi_1.sta)(Statements.Collect), (0, _combi_1.sta)(Statements.Commit), (0, _combi_1.sta)(Statements.Communication), (0, _combi_1.sta)(Statements.Compute), (0, _combi_1.sta)(Statements.CallBadi), (0, _combi_1.sta)(Statements.Condense), (0, _combi_1.sta)(Statements.Constant), (0, _combi_1.sta)(Statements.Contexts), (0, _combi_1.sta)(Statements.Continue), (0, _combi_1.sta)(Statements.ConvertText), (0, _combi_1.sta)(Statements.Convert), (0, _combi_1.sta)(Statements.CreateData), (0, _combi_1.sta)(Statements.CreateOLE), (0, _combi_1.sta)(Statements.DeleteCluster), (0, _combi_1.sta)(Statements.DeleteDatabase), (0, _combi_1.sta)(Statements.DeleteDataset), (0, _combi_1.sta)(Statements.DeleteDynpro), (0, _combi_1.sta)(Statements.DeleteMemory), (0, _combi_1.sta)(Statements.DeleteReport), (0, _combi_1.sta)(Statements.DeleteTextpool), (0, _combi_1.sta)(Statements.Demand), (0, _combi_1.sta)(Statements.Describe), (0, _combi_1.sta)(Statements.Detail), (0, _combi_1.sta)(Statements.Divide), (0, _combi_1.sta)(Statements.EditorCall), (0, _combi_1.sta)(Statements.EnhancementPoint), (0, _combi_1.sta)(Statements.Exit), (0, _combi_1.sta)(Statements.ExportDynpro), (0, _combi_1.sta)(Statements.Export), (0, _combi_1.sta)(Statements.Extract), (0, _combi_1.sta)(Statements.FetchNextCursor), (0, _combi_1.sta)(Statements.FieldGroup), (0, _combi_1.sta)(Statements.Fields), (0, _combi_1.sta)(Statements.Find), (0, _combi_1.sta)(Statements.Format), (0, _combi_1.sta)(Statements.FreeMemory), (0, _combi_1.sta)(Statements.FreeObject), (0, _combi_1.sta)(Statements.Free), (0, _combi_1.sta)(Statements.GenerateDynpro), (0, _combi_1.sta)(Statements.GenerateReport), (0, _combi_1.sta)(Statements.GenerateSubroutine), (0, _combi_1.sta)(Statements.GetBadi), (0, _combi_1.sta)(Statements.GetBit), (0, _combi_1.sta)(Statements.GetCursor), (0, _combi_1.sta)(Statements.GetDataset), (0, _combi_1.sta)(Statements.GetLocale), (0, _combi_1.sta)(Statements.GetParameter), (0, _combi_1.sta)(Statements.GetPFStatus), (0, _combi_1.sta)(Statements.GetProperty), (0, _combi_1.sta)(Statements.GetReference), (0, _combi_1.sta)(Statements.GetRunTime), (0, _combi_1.sta)(Statements.GetTime), (0, _combi_1.sta)(Statements.Hide), (0, _combi_1.sta)(Statements.Nodes), (0, _combi_1.sta)(Statements.ImportDynpro), (0, _combi_1.sta)(Statements.ImportNametab), (0, _combi_1.sta)(Statements.MoveCorresponding), (0, _combi_1.sta)(Statements.Import), (0, _combi_1.sta)(Statements.Infotypes), (0, _combi_1.sta)(Statements.Include), // include does not have to be at top level
+        return (0, _combi_1.alt)((0, _combi_1.sta)(Statements.Move), (0, _combi_1.sta)(Statements.Call), (0, _combi_1.sta)(Statements.Data), (0, _combi_1.sub)(Structures.If), (0, _combi_1.sta)(Statements.Clear), (0, _combi_1.sta)(Statements.FieldSymbol), (0, _combi_1.sta)(Statements.CreateObject), (0, _combi_1.sta)(Statements.CallFunction), (0, _combi_1.sta)(_statement_1.MacroCall), (0, _combi_1.sub)(Structures.LoopAtScreen), (0, _combi_1.sub)(Structures.Loop), (0, _combi_1.sta)(Statements.Append), (0, _combi_1.sub)(Structures.Try), (0, _combi_1.sta)(Statements.ReadTable), (0, _combi_1.sta)(Statements.Assert), (0, _combi_1.sta)(Statements.Return), (0, _combi_1.sta)(Statements.Select), (0, _combi_1.sta)(Statements.Assign), (0, _combi_1.sta)(Statements.InsertInternal), (0, _combi_1.sta)(Statements.DeleteInternal), (0, _combi_1.sta)(Statements.Concatenate), (0, _combi_1.sub)(Structures.Case), (0, _combi_1.sub)(Structures.CaseType), (0, _combi_1.sub)(Structures.Enhancement), (0, _combi_1.sub)(Structures.EnhancementSection), (0, _combi_1.sta)(Statements.AddCorresponding), (0, _combi_1.sta)(Statements.Add), (0, _combi_1.sta)(Statements.AssignLocalCopy), (0, _combi_1.sta)(Statements.AuthorityCheck), (0, _combi_1.sta)(Statements.Back), (0, _combi_1.sta)(Statements.Break), (0, _combi_1.sta)(Statements.BreakId), (0, _combi_1.sta)(Statements.CallDatabase), (0, _combi_1.sta)(Statements.CallDialog), (0, _combi_1.sta)(Statements.CallKernel), (0, _combi_1.sta)(Statements.CallOLE), (0, _combi_1.sta)(Statements.CallScreen), (0, _combi_1.sta)(Statements.ModifyScreen), (0, _combi_1.sta)(Statements.CallSelectionScreen), (0, _combi_1.sta)(Statements.CallTransaction), (0, _combi_1.sta)(Statements.CallTransformation), (0, _combi_1.sta)(Statements.Check), (0, _combi_1.sta)(Statements.ClassDefinitionLoad), (0, _combi_1.sta)(Statements.CloseCursor), (0, _combi_1.sta)(Statements.CloseDataset), (0, _combi_1.sta)(Statements.Collect), (0, _combi_1.sta)(Statements.Commit), (0, _combi_1.sta)(Statements.Communication), (0, _combi_1.sta)(Statements.Compute), (0, _combi_1.sta)(Statements.CallBadi), (0, _combi_1.sta)(Statements.Condense), (0, _combi_1.sta)(Statements.Constant), (0, _combi_1.sta)(Statements.Contexts), (0, _combi_1.sta)(Statements.Continue), (0, _combi_1.sta)(Statements.ConvertText), (0, _combi_1.sta)(Statements.Convert), (0, _combi_1.sta)(Statements.CreateData), (0, _combi_1.sta)(Statements.CreateOLE), (0, _combi_1.sta)(Statements.DeleteCluster), (0, _combi_1.sta)(Statements.DeleteDatabase), (0, _combi_1.sta)(Statements.DeleteDataset), (0, _combi_1.sta)(Statements.DeleteDynpro), (0, _combi_1.sta)(Statements.DeleteMemory), (0, _combi_1.sta)(Statements.DeleteReport), (0, _combi_1.sta)(Statements.DeleteTextpool), (0, _combi_1.sta)(Statements.Demand), (0, _combi_1.sta)(Statements.Describe), (0, _combi_1.sta)(Statements.Detail), (0, _combi_1.sta)(Statements.Divide), (0, _combi_1.sta)(Statements.EditorCall), (0, _combi_1.sta)(Statements.EnhancementPoint), (0, _combi_1.sta)(Statements.Exit), (0, _combi_1.sta)(Statements.ExportDynpro), (0, _combi_1.sta)(Statements.Export), (0, _combi_1.sta)(Statements.Extract), (0, _combi_1.sta)(Statements.FetchNextCursor), (0, _combi_1.sta)(Statements.FieldGroup), (0, _combi_1.sta)(Statements.Fields), (0, _combi_1.sta)(Statements.Find), (0, _combi_1.sta)(Statements.Format), (0, _combi_1.sta)(Statements.FreeMemory), (0, _combi_1.sta)(Statements.FreeObject), (0, _combi_1.sta)(Statements.Free), (0, _combi_1.sta)(Statements.GenerateDynpro), (0, _combi_1.sta)(Statements.GenerateReport), (0, _combi_1.sta)(Statements.GenerateSubroutine), (0, _combi_1.sta)(Statements.GetBadi), (0, _combi_1.sta)(Statements.GetBit), (0, _combi_1.sta)(Statements.GetCursor), (0, _combi_1.sta)(Statements.GetDataset), (0, _combi_1.sta)(Statements.GetLocale), (0, _combi_1.sta)(Statements.GetParameter), (0, _combi_1.sta)(Statements.GetPFStatus), (0, _combi_1.sta)(Statements.GetProperty), (0, _combi_1.sta)(Statements.GetReference), (0, _combi_1.sta)(Statements.GetRunTime), (0, _combi_1.sta)(Statements.GetTime), (0, _combi_1.sta)(Statements.Hide), (0, _combi_1.sta)(Statements.Nodes), (0, _combi_1.sta)(Statements.ImportDynpro), (0, _combi_1.sta)(Statements.ImportNametab), (0, _combi_1.sta)(Statements.MoveCorresponding), (0, _combi_1.sta)(Statements.Import), (0, _combi_1.sta)(Statements.Infotypes), (0, _combi_1.sta)(Statements.Include), // include does not have to be at top level
         (0, _combi_1.sta)(Statements.InsertDatabase), (0, _combi_1.sta)(Statements.InsertReport), (0, _combi_1.sta)(Statements.InsertTextpool), (0, _combi_1.sta)(Statements.InsertFieldGroup), (0, _combi_1.sta)(Statements.InterfaceLoad), (0, _combi_1.sta)(Statements.Leave), (0, _combi_1.sta)(Statements.LoadReport), (0, _combi_1.sta)(Statements.Local), (0, _combi_1.sta)(Statements.With), (0, _combi_1.sta)(Statements.LogPoint), (0, _combi_1.sta)(Statements.Message), (0, _combi_1.sta)(Statements.ModifyLine), (0, _combi_1.sta)(Statements.ModifyDatabase), (0, _combi_1.sta)(Statements.ModifyInternal), (0, _combi_1.sta)(Statements.Multiply), (0, _combi_1.sta)(Statements.NewLine), (0, _combi_1.sta)(Statements.NewPage), (0, _combi_1.sta)(Statements.OpenCursor), (0, _combi_1.sta)(Statements.OpenDataset), (0, _combi_1.sta)(Statements.Overlay), (0, _combi_1.sta)(Statements.Pack), (0, _combi_1.sta)(Statements.Perform), (0, _combi_1.sta)(Statements.Position), (0, _combi_1.sta)(Statements.Put), (0, _combi_1.sta)(Statements.PrintControl), (0, _combi_1.sta)(Statements.RaiseEvent), (0, _combi_1.sta)(Statements.Raise), (0, _combi_1.sta)(Statements.Ranges), (0, _combi_1.sta)(Statements.ReadDataset), (0, _combi_1.sta)(Statements.ReadLine), (0, _combi_1.sta)(Statements.ReadReport), (0, _combi_1.sta)(Statements.ReadTextpool), (0, _combi_1.sta)(Statements.Receive), (0, _combi_1.sta)(Statements.RefreshControl), (0, _combi_1.sta)(Statements.Refresh), (0, _combi_1.sta)(Statements.Reject), (0, _combi_1.sta)(Statements.Replace), (0, _combi_1.sta)(Statements.Reserve), (0, _combi_1.sta)(Statements.Resume), (0, _combi_1.sta)(Statements.Retry), (0, _combi_1.sta)(Statements.Rollback), (0, _combi_1.sta)(Statements.Scan), (0, _combi_1.sta)(Statements.ScrollList), (0, _combi_1.sta)(Statements.Search), (0, _combi_1.sta)(Statements.SetBit), (0, _combi_1.sta)(Statements.SetBlank), (0, _combi_1.sta)(Statements.SetCountry), (0, _combi_1.sta)(Statements.SetCursor), (0, _combi_1.sta)(Statements.SetDataset), (0, _combi_1.sta)(Statements.SetExtendedCheck), (0, _combi_1.sta)(Statements.SetHandler), (0, _combi_1.sta)(Statements.SetLanguage), (0, _combi_1.sta)(Statements.SetLeft), (0, _combi_1.sta)(Statements.SetLocale), (0, _combi_1.sta)(Statements.SetMargin), (0, _combi_1.sta)(Statements.SetParameter), (0, _combi_1.sta)(Statements.SetPFStatus), (0, _combi_1.sta)(Statements.SetProperty), (0, _combi_1.sta)(Statements.SetRunTime), (0, _combi_1.sta)(Statements.SetScreen), (0, _combi_1.sta)(Statements.SetTitlebar), (0, _combi_1.sta)(Statements.SetUserCommand), (0, _combi_1.sta)(Statements.SetUpdateTask), (0, _combi_1.sta)(Statements.Shift), (0, _combi_1.sta)(Statements.Skip), (0, _combi_1.sta)(Statements.SortDataset), (0, _combi_1.sta)(Statements.Sort), (0, _combi_1.sta)(Statements.Static), (0, _combi_1.sta)(Statements.Split), (0, _combi_1.sta)(Statements.Stop), (0, _combi_1.sta)(Statements.Submit), (0, _combi_1.sta)(Statements.Summary), (0, _combi_1.sta)(Statements.SubtractCorresponding), (0, _combi_1.sta)(Statements.Subtract), (0, _combi_1.sta)(Statements.SuppressDialog), (0, _combi_1.sta)(Statements.Supply), (0, _combi_1.sta)(Statements.Sum), (0, _combi_1.sta)(Statements.SyntaxCheck), (0, _combi_1.sta)(Statements.SystemCall), (0, _combi_1.sta)(Statements.Tables), (0, _combi_1.sta)(Statements.Transfer), (0, _combi_1.sta)(Statements.Translate), (0, _combi_1.sta)(Statements.Type), (0, _combi_1.sta)(Statements.TypePools), (0, _combi_1.sta)(Statements.Uline), (0, _combi_1.sta)(Statements.Unassign), (0, _combi_1.sta)(Statements.Unpack), (0, _combi_1.sta)(Statements.UpdateDatabase), (0, _combi_1.sta)(Statements.Wait), (0, _combi_1.sta)(Statements.Window), (0, _combi_1.sta)(Statements.Write), (0, _combi_1.sta)(Statements.CommitEntities), (0, _combi_1.sta)(Statements.ModifyEntities), (0, _combi_1.sta)(Statements.ReadEntities), (0, _combi_1.sta)(Statements.RollbackEntities), (0, _combi_1.sub)(Structures.Define), (0, _combi_1.sub)(Structures.TestInjection), (0, _combi_1.sub)(Structures.TestSeam), (0, _combi_1.sub)(Structures.TypeMesh), (0, _combi_1.sub)(Structures.Provide), (0, _combi_1.sub)(Structures.CatchSystemExceptions), (0, _combi_1.sub)(Structures.At), (0, _combi_1.sub)(Structures.Constants), (0, _combi_1.sub)(Structures.Types), (0, _combi_1.sub)(Structures.Statics), (0, _combi_1.sub)(Structures.Select), (0, _combi_1.sub)(Structures.Data), (0, _combi_1.sub)(Structures.TypeEnum), (0, _combi_1.sub)(Structures.While), (0, _combi_1.sub)(Structures.With), (0, _combi_1.sub)(Structures.Do), (0, _combi_1.sub)(Structures.ExecSQL));
     }
 }

package/build/src/abap/4_file_information/abap_file_information.js

@@ -144,6 +144,7 @@ class ABAPFileInformation {
                 interfaces: this.getImplementing(found),
                 isForTesting: concat.includes(" FOR TESTING"),
                 isAbstract: concat.includes(" ABSTRACT"),
+                isSharedMemory: concat.includes(" SHARED MEMORY ENABLED"),
                 isFinal: found.findFirstExpression(Expressions.ClassFinal) !== undefined,
                 aliases,
                 attributes,

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

@@ -7,6 +7,33 @@ class TypeUtils {
     constructor(scope) {
         this.scope = scope;
     }
+    isCharLikeStrict(type) {
+        if (type === undefined) {
+            return false;
+        }
+        else if (type instanceof basic_1.StructureType) {
+            for (const c of type.getComponents()) {
+                if (this.isCharLikeStrict(c.type) === false) {
+                    return false;
+                }
+            }
+            return true;
+        }
+        else if (type instanceof basic_1.StringType
+            || type instanceof basic_1.AnyType
+            || type instanceof basic_1.CharacterType
+            || type instanceof basic_1.CLikeType
+            || type instanceof basic_1.DateType
+            || type instanceof basic_1.CSequenceType
+            || type instanceof basic_1.NumericGenericType
+            || type instanceof basic_1.NumericType
+            || type instanceof basic_1.TimeType
+            || type instanceof basic_1.UnknownType
+            || type instanceof basic_1.VoidType) {
+            return true;
+        }
+        return false;
+    }
     isCharLike(type) {
         if (type === undefined) {
             return false;

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

@@ -10,9 +10,10 @@ const _reference_1 = require("../_reference");
 class Catch {
     runSyntax(node, scope, filename) {
         var _a, _b;
+        const names = new Set();
         for (const c of node.findDirectExpressions(Expressions.ClassName)) {
             const token = c.getFirstToken();
-            const className = token.getStr();
+            const className = token.getStr().toUpperCase();
             const found = scope.existsObject(className);
             if (found.found === true && found.id) {
                 scope.addReference(token, found.id, found.type, filename);
@@ -24,6 +25,10 @@ class Catch {
             else {
                 throw new Error("CATCH, unknown class " + className);
             }
+            if (names.has(className)) {
+                throw new Error("Duplicate class name in CATCH: " + className);
+            }
+            names.add(className);
         }
         const target = node.findDirectExpression(Expressions.Target);
         const firstClassName = (_a = node.findDirectExpression(Expressions.ClassName)) === null || _a === void 0 ? void 0 : _a.getFirstToken().getStr();

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

@@ -0,0 +1,21 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.LoopAtScreen = void 0;
+const Expressions = require("../../2_statements/expressions");
+const target_1 = require("../expressions/target");
+const inline_data_1 = require("../expressions/inline_data");
+const basic_1 = require("../../types/basic");
+class LoopAtScreen {
+    runSyntax(node, scope, filename) {
+        const target = node.findDirectExpression(Expressions.Target);
+        if (target) {
+            new target_1.Target().runSyntax(target, scope, filename);
+        }
+        const inline = target === null || target === void 0 ? void 0 : target.findDirectExpression(Expressions.InlineData);
+        if (inline) {
+            new inline_data_1.InlineData().runSyntax(inline, scope, filename, new basic_1.VoidType("SCREEN"));
+        }
+    }
+}
+exports.LoopAtScreen = LoopAtScreen;
+//# sourceMappingURL=loop_at_screen.js.map

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

@@ -6,16 +6,31 @@ const basic_1 = require("../../types/basic");
 const inline_data_1 = require("../expressions/inline_data");
 const source_1 = require("../expressions/source");
 const target_1 = require("../expressions/target");
+const _type_utils_1 = require("../_type_utils");
 class Split {
     runSyntax(node, scope, filename) {
-        const type = node.findTokenSequencePosition("INTO", "TABLE") ? new basic_1.TableType(new basic_1.StringType(), { withHeader: false }) : new basic_1.StringType();
+        const intoTable = node.findTokenSequencePosition("INTO", "TABLE") !== undefined;
+        const type = intoTable ? new basic_1.TableType(new basic_1.StringType(), { withHeader: false }) : new basic_1.StringType();
         for (const target of node.findAllExpressions(Expressions.Target)) {
             const inline = target.findDirectExpression(Expressions.InlineData);
             if (inline) {
                 new inline_data_1.InlineData().runSyntax(inline, scope, filename, type);
             }
             else {
-                new target_1.Target().runSyntax(target, scope, filename);
+                let targetType = new target_1.Target().runSyntax(target, scope, filename);
+                if (intoTable) {
+                    if (!(targetType instanceof basic_1.TableType)
+                        && !(targetType instanceof basic_1.UnknownType)
+                        && !(targetType instanceof basic_1.VoidType)) {
+                        throw new Error("Into must be table typed");
+                    }
+                    if (targetType instanceof basic_1.TableType) {
+                        targetType = targetType.getRowType();
+                    }
+                }
+                if (new _type_utils_1.TypeUtils(scope).isCharLikeStrict(targetType) === false) {
+                    throw new Error("Incompatible, target not character like");
+                }
             }
         }
         for (const s of node.findDirectExpressions(Expressions.Source)) {

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

@@ -130,6 +130,7 @@ const delete_cluster_1 = require("./statements/delete_cluster");
 const unassign_1 = require("./statements/unassign");
 const insert_textpool_1 = require("./statements/insert_textpool");
 const get_cursor_1 = require("./statements/get_cursor");
+const loop_at_screen_1 = require("./statements/loop_at_screen");
 // -----------------------------------
 const map = {};
 function addToMap(handler) {
@@ -155,6 +156,7 @@ if (Object.keys(map).length === 0) {
     addToMap(new assert_1.Assert());
     addToMap(new catch_1.Catch());
     addToMap(new loop_1.Loop());
+    addToMap(new loop_at_screen_1.LoopAtScreen());
     addToMap(new set_pf_status_1.SetPFStatus());
     addToMap(new set_titlebar_1.SetTitlebar());
     addToMap(new submit_1.Submit());

package/build/src/abap/types/class_definition.js

@@ -43,6 +43,7 @@ class ClassDefinition extends _identifier_1.Identifier {
         scope.pop(node.getLastToken().getEnd());
         const concat = this.node.findFirstStatement(Statements.ClassDefinition).concatTokens().toUpperCase();
         this.testing = concat.includes(" FOR TESTING");
+        this.sharedMemory = concat.includes(" SHARED MEMORY ENABLED");
         this.abstract = concat.includes(" ABSTRACT");
     }
     getFriends() {
@@ -81,6 +82,9 @@ class ClassDefinition extends _identifier_1.Identifier {
     isAbstract() {
         return this.abstract;
     }
+    isSharedMemory() {
+        return this.sharedMemory;
+    }
     /*
       public getEvents() {
       }

package/build/src/pretty_printer/indent.js

@@ -139,6 +139,7 @@ class Indent {
                 || type instanceof Statements.WhenOthers
                 || type instanceof Statements.Cleanup
                 || type instanceof Statements.Loop
+                || type instanceof Statements.LoopAtScreen
                 || type instanceof Statements.CatchSystemExceptions
                 || type instanceof Statements.Form
                 || type instanceof Statements.Else

package/build/src/registry.js

@@ -68,7 +68,7 @@ class Registry {
     }
     static abaplintVersion() {
         // magic, see build script "version.sh"
-        return "2.85.41";
+        return "2.85.44";
     }
     getDDICReferences() {
         return this.references;

package/build/src/rules/cyclic_oo.js

@@ -15,6 +15,8 @@ class CyclicOOConf extends _basic_rule_config_1.BasicRuleConfig {
          * @uniqueItems true
         */
         this.skip = [];
+        /** Skips shared memory enabled classes*/
+        this.skipSharedMemory = true;
     }
 }
 exports.CyclicOOConf = CyclicOOConf;
@@ -41,16 +43,20 @@ class CyclicOO {
         }
     }
     initialize(reg) {
+        var _a;
         this.reg = reg;
         this.edges = {};
         for (const obj of this.reg.getObjectsByType("CLAS")) {
             const name = obj.getName().toUpperCase();
-            if (!(obj instanceof _abap_object_1.ABAPObject)) {
+            if (!(obj instanceof objects_1.Class)) {
                 continue;
             }
             else if (this.conf.skip.indexOf(name) >= 0) {
                 continue;
             }
+            else if (this.conf.skipSharedMemory === true && ((_a = obj.getClassDefinition()) === null || _a === void 0 ? void 0 : _a.isSharedMemory) === true) {
+                continue;
+            }
             this.buildEdges(name, new syntax_1.SyntaxLogic(this.reg, obj).run().spaghetti.getTop());
         }
         for (const obj of this.reg.getObjectsByType("INTF")) {

package/build/src/rules/downport.js

@@ -846,7 +846,7 @@ ${indentation}    output = ${topTarget}.`;
         return undefined;
     }
     outlineFor(forLoop, indentation) {
-        var _a, _b, _c, _d, _e, _f;
+        var _a, _b, _c, _d, _e, _f, _g, _h, _j;
         let body = "";
         let end = "";
         const loopSource = (_a = forLoop.findFirstExpression(Expressions.Source)) === null || _a === void 0 ? void 0 : _a.concatTokens();
@@ -860,12 +860,21 @@ ${indentation}    output = ${topTarget}.`;
             body += indentation + `  ${field} = ${field} + 1.\n`;
             end = "ENDWHILE";
         }
+        else if (forLoop.findDirectTokenByText("WHILE")) {
+            const name = (_f = forLoop.findFirstExpression(Expressions.Field)) === null || _f === void 0 ? void 0 : _f.concatTokens();
+            body += indentation + "DATA " + name + " TYPE i.\n";
+            const cond = forLoop.findFirstExpression(Expressions.Cond);
+            body += indentation + `WHILE ${cond === null || cond === void 0 ? void 0 : cond.concatTokens()}.\n`;
+            const field = (_h = (_g = forLoop.findDirectExpression(Expressions.InlineFieldDefinition)) === null || _g === void 0 ? void 0 : _g.findFirstExpression(Expressions.Field)) === null || _h === void 0 ? void 0 : _h.concatTokens();
+            body += indentation + `  ${field} = ${field} + 1.\n`;
+            end = "ENDWHILE";
+        }
         else if (loopTargetField) {
             body += indentation + `LOOP AT ${loopSource} INTO DATA(${loopTargetField}).\n`;
             end = "ENDLOOP";
         }
         else if (loopTargetField === undefined) {
-            const loopTargetFieldSymbol = (_f = forLoop.findFirstExpression(Expressions.TargetFieldSymbol)) === null || _f === void 0 ? void 0 : _f.concatTokens();
+            const loopTargetFieldSymbol = (_j = forLoop.findFirstExpression(Expressions.TargetFieldSymbol)) === null || _j === void 0 ? void 0 : _j.concatTokens();
             body += indentation + `LOOP AT ${loopSource} ASSIGNING FIELD-SYMBOL(${loopTargetFieldSymbol}).\n`;
             end = "ENDLOOP";
         }

package/build/src/rules/method_overwrites_builtin.js

@@ -19,8 +19,10 @@ class MethodOverwritesBuiltIn extends _abap_rule_1.ABAPRule {
             key: "method_overwrites_builtin",
             title: "Method name overwrites builtin function",
             shortDescription: `Checks Method names that overwrite builtin SAP functions`,
-            extendedInformation: `https://help.sap.com/doc/abapdocu_752_index_htm/7.52/en-us/abenbuilt_in_functions_overview.htm`,
-            tags: [_irule_1.RuleTag.Naming, _irule_1.RuleTag.SingleFile],
+            extendedInformation: `https://help.sap.com/doc/abapdocu_752_index_htm/7.52/en-us/abenbuilt_in_functions_overview.htm
+
+https://github.com/SAP/styleguides/blob/main/clean-abap/CleanABAP.md#avoid-obscuring-built-in-functions`,
+            tags: [_irule_1.RuleTag.Naming, _irule_1.RuleTag.SingleFile, _irule_1.RuleTag.Styleguide],
         };
     }
     getConfig() {

package/build/src/rules/pragma_placement.js

@@ -19,6 +19,7 @@ class PragmaPlacement extends _abap_rule_1.ABAPRule {
             title: "Pragma Placement",
             shortDescription: `Place pragmas at end of statements`,
             tags: [_irule_1.RuleTag.SingleFile],
+            extendedInformation: `https://help.sap.com/doc/abapdocu_cp_index_htm/CLOUD/en-US/abenpragma.htm`,
             badExample: `DATA field ##NO_TEXT TYPE i.`,
             goodExample: `DATA field TYPE i ##NO_TEXT.`,
         };
@@ -42,7 +43,7 @@ class PragmaPlacement extends _abap_rule_1.ABAPRule {
                 }
                 if (children[children.length - 2].getLastToken().getStart().isAfter(p.getStart())) {
                     const message = "Place pragma at end of statement";
-                    const issue = issue_1.Issue.atStatement(file, s, message, this.getMetadata().key, this.conf.severity);
+                    const issue = issue_1.Issue.atToken(file, p, message, this.getMetadata().key, this.conf.severity);
                     issues.push(issue);
                     continue; // max one finding per statement
                 }

package/build/src/rules/select_add_order_by.js

@@ -55,7 +55,7 @@ If the target is a sorted/hashed table, no issue is reported`,
             const selects = stru.findAllStatements(Statements.Select);
             selects.push(...stru.findAllStatements(Statements.SelectLoop));
             for (const s of selects) {
-                const c = s.concatTokens();
+                const c = s.concatTokens().toUpperCase();
                 if (c.startsWith("SELECT SINGLE ")) {
                     continue;
                 }

package/build/src/rules/use_new.js

@@ -59,6 +59,9 @@ Applicable from v740sp02 and up`,
                 else if (statement.findDirectExpression(expressions_1.ParameterListExceptions)) {
                     continue;
                 }
+                else if (statement.findDirectTokenByText("AREA")) {
+                    continue;
+                }
                 const target = ((_a = statement.findDirectExpression(expressions_1.Target)) === null || _a === void 0 ? void 0 : _a.concatTokens()) + "->";
                 if (statement.concatTokens().includes(target)) {
                     continue;

package/package.json

@@ -1,6 +1,6 @@
 {
     "name": "@abaplint/core",
-    "version": "2.85.41",
+    "version": "2.85.44",
     "description": "abaplint - Core API",
     "main": "build/src/index.js",
     "typings": "build/abaplint.d.ts",
@@ -45,20 +45,20 @@
     },
     "homepage": "https://abaplint.org",
     "devDependencies": {
-        "@microsoft/api-extractor": "^7.19.4",
+        "@microsoft/api-extractor": "^7.19.5",
         "@types/chai": "^4.3.0",
         "@types/mocha": "^9.1.0",
         "@types/node": "^17.0.21",
         "chai": "^4.3.6",
-        "eslint": "^8.10.0",
-        "mocha": "^9.2.1",
+        "eslint": "^8.11.0",
+        "mocha": "^9.2.2",
         "c8": "^7.11.0",
         "source-map-support": "^0.5.21",
         "ts-json-schema-generator": "^0.98.0",
         "typescript": "^4.6.2"
     },
     "dependencies": {
-        "fast-xml-parser": "^4.0.6",
+        "fast-xml-parser": "^4.0.7",
         "json5": "^2.2.0",
         "vscode-languageserver-protocol": "^3.16.0",
         "vscode-languageserver-types": "^3.16.0"