Removed ";" from procedures in snippets

waldo1001 · Nov 24, 2023 · 5131784 · 5131784
1 parent 6904c7d
commit 5131784
Show file tree

Hide file tree

Showing 6 changed files with 39 additions and 39 deletions.
diff --git a/snippets/DesignPatterns.json b/snippets/DesignPatterns.json
@@ -16,7 +16,7 @@
             "\t\tAcknowledge${3:ShortMethodName}(${4:VarName}, HideDialog)",
             "\tend;",
             "",
-            "\tlocal procedure Do${3:ShortMethodName}(var ${4:VarName}: Record ${5:TableName}; IsHandled: Boolean);",
+            "\tlocal procedure Do${3:ShortMethodName}(var ${4:VarName}: Record ${5:TableName}; IsHandled: Boolean)",
             "\tbegin",
             "\t\tif IsHandled then",
             "\t\t\texit;",
@@ -45,12 +45,12 @@
             "\tend;",
             "",
             "\t[IntegrationEvent(false, false)]",
-            "\tlocal procedure OnBefore${3:ShortMethodName}(var ${4:VarName}: Record ${5:TableName}; var IsHandled: Boolean);",
+            "\tlocal procedure OnBefore${3:ShortMethodName}(var ${4:VarName}: Record ${5:TableName}; var IsHandled: Boolean)",
             "\tbegin",
             "\tend;",
             "",
             "\t[IntegrationEvent(false, false)]",
-            "\tlocal procedure OnAfter${3:ShortMethodName}(var ${4:VarName}: Record ${5:TableName});",
+            "\tlocal procedure OnAfter${3:ShortMethodName}(var ${4:VarName}: Record ${5:TableName})",
             "\tbegin",
             "\tend;",
             "}"
@@ -73,20 +73,20 @@
             "\t\tOnAfter${3:MethodName}(${4:VarName});",
             "\tend;",
             "",
-            "\tlocal procedure Do${3:MethodName}(var ${4:VarName}: Record ${5:TableName}; IsHandled: Boolean);",
+            "\tlocal procedure Do${3:MethodName}(var ${4:VarName}: Record ${5:TableName}; IsHandled: Boolean)",
             "\tbegin",
             "\t\tif IsHandled then",
             "\t\t\texit;",
             "",
             "\tend;",
             "",
             "\t[IntegrationEvent(false, false)]",
-            "\tlocal procedure OnBefore${3:MethodName}(var ${4:VarName}: Record ${5:TableName}; var IsHandled : Boolean);",
+            "\tlocal procedure OnBefore${3:MethodName}(var ${4:VarName}: Record ${5:TableName}; var IsHandled : Boolean)",
             "\tbegin",
             "\tend;",
             "",
             "\t[IntegrationEvent(false, false)]",
-            "\tlocal procedure OnAfter${3:MethodName}(var ${4:VarName}: Record ${5:TableName});",
+            "\tlocal procedure OnAfter${3:MethodName}(var ${4:VarName}: Record ${5:TableName})",
             "\tbegin",
             "\tend;",
             "}"

diff --git a/snippets/Onboarding.json b/snippets/Onboarding.json
@@ -4,7 +4,7 @@
         "prefix": "tassistedsetupwaldoBeforeV15",
         "body": [
             "[EventSubscriber(ObjectType::Table, Database::\"Aggregated Assisted Setup\", 'OnRegisterAssistedSetup', '', false, false)]",
-            "local procedure AddExtensionAssistedSetup_OnRegisterAssistedSetup(var TempAggregatedAssistedSetup: Record \"Aggregated Assisted Setup\" TEMPORARY);",
+            "local procedure AddExtensionAssistedSetup_OnRegisterAssistedSetup(var TempAggregatedAssistedSetup: Record \"Aggregated Assisted Setup\" TEMPORARY)",
             "var",
             "\t${2:AssistedSetupRecord}: Record ${1:\"TableName\"};",
             "begin",
@@ -16,11 +16,11 @@
             "\t\t\t\t\t\t\t\t\t\t\t\t\t\t'');",
             "end;",
             "[EventSubscriber(ObjectType::Table, Database::\"Aggregated Assisted Setup\", 'OnUpdateAssistedSetupStatus', '', false, false)]",
-            "local procedure AggregatedAssistedSetup_OnUpdateAssistedSetupStatus(var TempAggregatedAssistedSetup: Record \"Aggregated Assisted Setup\" TEMPORARY);",
+            "local procedure AggregatedAssistedSetup_OnUpdateAssistedSetupStatus(var TempAggregatedAssistedSetup: Record \"Aggregated Assisted Setup\" TEMPORARY)",
             "begin",
             "\tTempAggregatedAssistedSetup.SetStatus(TempAggregatedAssistedSetup, PAGE::${3:\"PageName\"}, GetAssistedSetupStatus(TempAggregatedAssistedSetup));",
             "end;",
-            "local procedure GetAssistedSetupStatus(AggregatedAssistedSetup: Record \"Aggregated Assisted Setup\"): Integer;",
+            "local procedure GetAssistedSetupStatus(AggregatedAssistedSetup: Record \"Aggregated Assisted Setup\"): Integer",
             "var",
             "\t${2:AssistedSetupRecord}: Record ${1:\"TableName\"};",
             "begin",
@@ -41,7 +41,7 @@
             "codeunit ${1:id} \"${2:Name} Meth\"",
             "{",
             "\t[EventSubscriber(ObjectType::Codeunit, Codeunit::\"Assisted Setup\", 'OnRegister', '', false, false)]",
-            "\tlocal procedure AddExtensionAssistedSetup_OnRegisterAssistedSetup();",
+            "\tlocal procedure AddExtensionAssistedSetup_OnRegisterAssistedSetup()",
             "\tvar",
             "\t\tAssistedSetup: Codeunit \"Assisted Setup\";",
             "\t\tCurrentGlobalLanguage: Integer;",
@@ -118,24 +118,24 @@
             "codeunit ${1:id} \"${2:Object Name}\"",
             "{",
             "\t[EventSubscriber(ObjectType::Codeunit, Codeunit::\"Guided Experience\", 'OnRegisterAssistedSetup', '', false, false)]",
-            "\tlocal procedure AddExtensionAssistedSetup_OnRegisterAssistedSetup();",
+            "\tlocal procedure AddExtensionAssistedSetup_OnRegisterAssistedSetup()",
             "\tvar",
             "\t\tGuidedExperience: Codeunit \"Guided Experience\";",
             "\t\tTitleLbl: Label '${3:Assited Setup Title}';",
             "\t\tShortTitleLbl: Label '${4:Assited Setup Short Title}';",
             "\t\tDescriptionLbl: Label '${5:Assited Setup Description}';",
             "\tbegin",
             "\t\tGuidedExperience.InsertAssistedSetup(",
-			"\t\t\tTitleLbl,",
-			"\t\t\tShortTitleLbl,",
-			"\t\t\tDescriptionLbl,",
-			"\t\t\t${6:Duration in Minutes},",
-			"\t\t\tObjectType::Page,",
-			"\t\t\tGetPageId(),",
-			"\t\t\t\"Assisted Setup Group\"::Extensions,",
-			"\t\t\t'https://www.youtube.com/embed/fitTMAwHcJw',",
-			"\t\t\t\"Video Category\"::Uncategorized,",
-			"\t\t\t'https://www.waldo.be');",
+            "\t\t\tTitleLbl,",
+            "\t\t\tShortTitleLbl,",
+            "\t\t\tDescriptionLbl,",
+            "\t\t\t${6:Duration in Minutes},",
+            "\t\t\tObjectType::Page,",
+            "\t\t\tGetPageId(),",
+            "\t\t\t\"Assisted Setup Group\"::Extensions,",
+            "\t\t\t'https://www.youtube.com/embed/fitTMAwHcJw',",
+            "\t\t\t\"Video Category\"::Uncategorized,",
+            "\t\t\t'https://www.waldo.be');",
             "",
             "\t\tUpdateStatus();",
             "\tend;",

diff --git a/snippets/Test.json b/snippets/Test.json
@@ -25,7 +25,7 @@
         "description": "Snippet (waldo): ModelPageHandler Procedure",
         "body": [
             "[ModalPageHandler]",
-            "procedure ${1:ModalPageHandler}(var ${2:Modalpage}: TestPage ${3:\"Your Page\"});",
+            "procedure ${1:ModalPageHandler}(var ${2:Modalpage}: TestPage ${3:\"Your Page\"})",
             "begin",
             "\t${0}",
             "end;"
@@ -47,7 +47,7 @@
         "description": "Snippet (waldo): ModelPageHandler Procedure",
         "body": [
             "[ConfirmHandler]",
-            "procedure ${1:ConfirmHandler}(Question: Text[1024]; var Reply: Boolean);",
+            "procedure ${1:ConfirmHandler}(Question: Text[1024]; var Reply: Boolean)",
             "begin",
             "\t${0}",
             "\tReply := ${2|true,false|};",

diff --git a/snippets/install.json b/snippets/install.json
@@ -19,7 +19,7 @@
             "\t\t\tHandleReinstall();",
             "\tend;",
             "",
-            "\tlocal procedure HandleFreshInstall();",
+            "\tlocal procedure HandleFreshInstall()",
             "\tvar",
             "\t\tUpgradeTag: Codeunit \"Upgrade Tag\";",
             "\tbegin",
@@ -28,11 +28,11 @@
             "\t\tUpgradeTag.SetAllUpgradeTags();",
             "\tend;",
             "",
-            "\tlocal procedure HandleReinstall();",
+            "\tlocal procedure HandleReinstall()",
             "\tbegin",
             "\t\t",
             "\tend;",
             "}"
         ]
     }
-}
+}
diff --git a/snippets/page.json b/snippets/page.json
@@ -168,7 +168,7 @@
             "\t\tStep3Visible: Boolean;",
             "\t\tTopBannerVisible: Boolean;",
             "",
-            "\tlocal procedure EnableControls();",
+            "\tlocal procedure EnableControls()",
             "\tbegin",
             "\t\tResetControls();",
             "",
@@ -182,7 +182,7 @@
             "\t\tend;",
             "\tend;",
             "",
-            "\tlocal procedure Store${4:RecordVar}();",
+            "\tlocal procedure Store${4:RecordVar}()",
             "\tvar",
             "\t\t${4:RecordVar}: Record ${3:TableName};",
             "\tbegin",
@@ -196,13 +196,13 @@
             "\tend;",
             "",
             "",
-            "\tlocal procedure FinishAction();",
+            "\tlocal procedure FinishAction()",
             "\tbegin",
             "\t\tStore${4:RecordVar}();",
             "\t\tCurrPage.Close();",
             "\tend;",
             "",
-            "\tlocal procedure NextStep(Backwards: Boolean);",
+            "\tlocal procedure NextStep(Backwards: Boolean)",
             "\tbegin",
             "\t\tif Backwards then",
             "\t\t\tStep := Step - 1",
@@ -212,28 +212,28 @@
             "\t\tEnableControls();",
             "\tend;",
             "",
-            "\tlocal procedure ShowStep1();",
+            "\tlocal procedure ShowStep1()",
             "\tbegin",
             "\t\tStep1Visible := true;",
             "",
             "\t\tFinishActionEnabled := false;",
             "\t\tBackActionEnabled := false;",
             "\tend;",
             "",
-            "\tlocal procedure ShowStep2();",
+            "\tlocal procedure ShowStep2()",
             "\tbegin",
             "\t\tStep2Visible := true;",
             "\tend;",
             "",
-            "\tlocal procedure ShowStep3();",
+            "\tlocal procedure ShowStep3()",
             "\tbegin",
             "\t\tStep3Visible := true;",
             "",
             "\t\tNextActionEnabled := false;",
             "\t\tFinishActionEnabled := true;",
             "\tend;",
             "",
-            "\tlocal procedure ResetControls();",
+            "\tlocal procedure ResetControls()",
             "\tbegin",
             "\t\tFinishActionEnabled := false;",
             "\t\tBackActionEnabled := true;",
@@ -244,7 +244,7 @@
             "\t\tStep3Visible := false;",
             "\tend;",
             "",
-            "\tlocal procedure LoadTopBanners();",
+            "\tlocal procedure LoadTopBanners()",
             "\tbegin",
             "\t\tif MediaRepositoryStandard.Get('AssistedSetup-NoText-400px.png', Format(CurrentClientType())) and",
             "\t\t\tMediaRepositoryDone.Get('AssistedSetupDone-NoText-400px.png', Format(CurrentClientType()))",
@@ -257,4 +257,4 @@
             "}"
         ]
     }
-}
+}
diff --git a/snippets/upgrade.json b/snippets/upgrade.json
@@ -25,7 +25,7 @@
             "",
             "",
             "\t[EventSubscriber(ObjectType::Codeunit, Codeunit::\"Upgrade Tag\", 'OnGetPerCompanyUpgradeTags', '', false, false)]",
-            "\tlocal procedure OnGetPerCompanyUpgradeTags(var PerCompanyUpgradeTags: List of [Code[250]]);",
+            "\tlocal procedure OnGetPerCompanyUpgradeTags(var PerCompanyUpgradeTags: List of [Code[250]])",
             "\tbegin",
             "\t\tPerCompanyUpgradeTags.Add(${4:Reason}Lbl);",
             "\tend;",
@@ -120,7 +120,7 @@
             "    end;",
             "",
             "    [EventSubscriber(ObjectType::Codeunit, Codeunit::\"Upgrade Tag\", 'OnGetPerCompanyUpgradeTags', '', false, false)]",
-            "    local procedure OnGetPerCompanyUpgradeTags(var PerCompanyUpgradeTags: List of [Code[250]]);",
+            "    local procedure OnGetPerCompanyUpgradeTags(var PerCompanyUpgradeTags: List of [Code[250]])",
             "    begin",
             "        PerCompanyUpgradeTags.Add(${4:Reason}Lbl);",
             "    end;",
@@ -131,4 +131,4 @@
             "}"
         ]
     }
-}
+}