Merge pull request #241 from christianbraeunlich/feature/add-missing-rec

updated tpageactivitieswaldo snippet
waldo1001 · May 23, 2022 · 8d1444c · 8d1444c
2 parents da54628 + 73efb14
commit 8d1444c
Showing 1 changed file with 5 additions and 5 deletions.
diff --git a/snippets/DesignPatterns.json b/snippets/DesignPatterns.json
@@ -590,10 +590,10 @@
             "\r",
             "\ttrigger OnOpenPage()\r",
             "\tbegin\r",
-            "\t\tReset();\r",
-            "\t\tIf not Get() then begin\r",
-            "\t\t\tInit();\r",
-            "\t\t\tInsert();\r",
+            "\t\tRec.Reset();\r",
+            "\t\tif not Rec.Get() then begin\r",
+            "\t\t\tRec.Init();\r",
+            "\t\t\tRec.Insert();\r",
             "\t\tend;\r",
             "\r",
             "\tend;\r",
@@ -605,7 +605,7 @@
             "\r",
             "\tlocal procedure CalculateCueFieldValues()\r",
             "\tbegin\r",
-            "\t\tif FIELDACTIVE(\"Normal field\") then\r",
+            "\t\tif FieldActive(\"Normal field\") then\r",
             "\t\t\t\"Normal field\" := 2 + 1 //add some calculation here for normal fields;\r",
             "\tend;\r",
             "\r",