Index: vhDeploy/D20220113xSQLUserAddJoannesLemmens.cls.xml
===================================================================
diff -u
--- vhDeploy/D20220113xSQLUserAddJoannesLemmens.cls.xml	(revision 0)
+++ vhDeploy/D20220113xSQLUserAddJoannesLemmens.cls.xml	(revision 66585)
@@ -0,0 +1,25 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.D20220113xSQLUserAddJoannesLemmens">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Add SQL (en portal en Studio) User Sam Van Hoey</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Set User = ##class(Tools.dto.SQL.User).%New()
+	Set User.Naam = "JoannesL"
+	Set User.Paswoord = "fixed"
+	Do User.Roles.Insert("ICT")	
+	
+	Do ##class(Tools.SQLImporter).MaakUser(User)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhDeploy/D20220113AanmakenPinningJLM.cls.xml
===================================================================
diff -u
--- vhDeploy/D20220113AanmakenPinningJLM.cls.xml	(revision 0)
+++ vhDeploy/D20220113AanmakenPinningJLM.cls.xml	(revision 66585)
@@ -0,0 +1,21 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.D20220113AanmakenPinningJLM">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Instellen Pinning voor Joannes Lemmens (vervangt pinning Sam Van Hoey)</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Kill ^cLOG($$$Server,"PIN",1252)
+	Set ^cLOG($$$Server,"PIN",1252) = "JLM"
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>