Index: Res/VertalingRepository.cls.xml
===================================================================
diff -u -r62861 -r62862
--- Res/VertalingRepository.cls.xml (.../VertalingRepository.cls.xml) (revision 62861)
+++ Res/VertalingRepository.cls.xml (.../VertalingRepository.cls.xml) (revision 62862)
@@ -45,8 +45,6 @@
Groep:%String,Sleutel:%String,Type:%String,Taal:%String,Vertaling:%String
TECH.Persistent
1
+
+vhLib.Logger
+1
+
+
-VertalingenParser:Res.Perfion.Synchroniser.VertalingenParser,VertalingenService:WSimpl.PM.Perfion.Vertaling.DataService.GetData,VertalingRepository:Res.VertalingRepository,TaalConverter:Res.Perfion.Synchroniser.TaalConverter,PerfionRepository:Res.Perfion.Synchroniser.PerfionRepository
+VertalingenParser:Res.Perfion.Synchroniser.VertalingenParser,VertalingenService:WSimpl.PM.Perfion.Vertaling.DataService.GetData,VertalingRepository:Res.VertalingRepository,TaalConverter:Res.Perfion.Synchroniser.TaalConverter,PerfionRepository:Res.Perfion.Synchroniser.PerfionRepository,Logger:vhLib.Logger
1
1
%Status
@@ -45,7 +50,7 @@
Set ..VertalingRepository = $$$Inject(VertalingRepository, ##class(Res.VertalingRepository).%New())
Set ..TaalConverter = $$$Inject(TaalConverter, ##class(Res.Perfion.Synchroniser.TaalConverter).%New())
Set ..PerfionRepository = $$$Inject(PerfionRepository, ##class(Res.Perfion.Synchroniser.PerfionRepository).%New())
-
+ Set ..Logger = $$$Inject(Logger, ##class(vhLib.Logger).%New())
Quit $$$OK
]]>
@@ -72,7 +77,8 @@
Try {
Do ..PerfionRepository.MaakSleutelVoorPerfion(Vertaling.Intern)
} Catch {
- #dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+ #dim Exceptie As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+ Do ..Logger.LogExceptie(Exceptie)
}
}
]]>
@@ -98,7 +104,8 @@
Try {
Do ..PerfionRepository.VerwijderViaSleutel(Sleutel)
} Catch {
- #dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+ #dim Exceptie As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+ Do ..Logger.LogExceptie(Exceptie)
}
#dim VertalingenIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(VertalingObject.Vertalingen)