Index: APPS/Halux/PPS/Verpakking/impl/KartonSnijVisitor.cls.xml =================================================================== diff -u -r69183 -r69388 --- APPS/Halux/PPS/Verpakking/impl/KartonSnijVisitor.cls.xml (.../KartonSnijVisitor.cls.xml) (revision 69183) +++ APPS/Halux/PPS/Verpakking/impl/KartonSnijVisitor.cls.xml (.../KartonSnijVisitor.cls.xml) (revision 69388) @@ -98,7 +98,7 @@ } Catch { Set Status = $$$ERROR($$$GeneralError, "GeefDoos fout") #dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch() - #dim Logger = ##class(vhLib.Logger).%New("VH doos service").Error("GeefDoos", "Er is iets fout gelopen bij het verwerken van GeefDoos. Doosgroep: '"_UitvoeringInfo.DoosGroep_"', DoosNaam: '"_ UitvoeringInfo.DoosNaam _", PRNr: '"_ UitvoeringInfo.ProductID _"', MachineID: '"_ UitvoeringInfo.MachineID _"'."_Exception.GeefOmschrijving()) + #dim Logger = ##class(vhLib.Logger).%New("VH doos service").ErrorMail("GeefDoos", "Er is iets fout gelopen bij het verwerken van GeefDoos. Doosgroep: '"_UitvoeringInfo.DoosGroep_"', DoosNaam: '"_ UitvoeringInfo.DoosNaam _", PRNr: '"_ UitvoeringInfo.ProductID _"', MachineID: '"_ UitvoeringInfo.MachineID _"'."_Exception.GeefOmschrijving()) } } Index: APPS/Halux/PPS/Verpakking/impl/DoosLosseOnderdelen.cls.xml =================================================================== diff -u -r69271 -r69388 --- APPS/Halux/PPS/Verpakking/impl/DoosLosseOnderdelen.cls.xml (.../DoosLosseOnderdelen.cls.xml) (revision 69271) +++ APPS/Halux/PPS/Verpakking/impl/DoosLosseOnderdelen.cls.xml (.../DoosLosseOnderdelen.cls.xml) (revision 69388) @@ -102,7 +102,7 @@ } Catch { Set Status = ##class(BL.Sys.Proxy.pxStatus).Create(0, "GeefDoos fout") #dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch() - #dim Logger = ##class(vhLib.Logger).%New("VH doos service").Error("GeefDoos", "Er is iets fout gelopen bij het verwerken van GeefDoos. OptiID: '"_..#OptiGroep_ " "_..#OptiIDLosseOnderdelen_"', PRNr: '"_ ProductID _"', MachineID: '"_ MachineID _"'."_Exception.GeefOmschrijving()) + #dim Logger = ##class(vhLib.Logger).%New("VH doos service").ErrorMail("GeefDoos", "Er is iets fout gelopen bij het verwerken van GeefDoos. OptiID: '"_..#OptiGroep_ " "_..#OptiIDLosseOnderdelen_"', PRNr: '"_ ProductID _"', MachineID: '"_ MachineID _"'."_Exception.GeefOmschrijving()) } } ]]> Index: BL/PPS/TBX/OptiBox.cls.xml =================================================================== diff -u -r69271 -r69388 --- BL/PPS/TBX/OptiBox.cls.xml (.../OptiBox.cls.xml) (revision 69271) +++ BL/PPS/TBX/OptiBox.cls.xml (.../OptiBox.cls.xml) (revision 69388) @@ -470,7 +470,7 @@ } Catch { Set Status = ##class(BL.Sys.Proxy.pxStatus).Create(0, "GeefDoos fout") #dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch() - #dim Logger = ##class(vhLib.Logger).%New("VH doos service").Debug("GeefDoos", "Er is iets fout gelopen bij het verwerken van GeefDoos. OptiID: '"_OptiID_"', PRNr: '"_ PRNr _"', MachineID: '"_ MachineID _"'."_Exception.GeefOmschrijving()) + #dim Logger = ##class(vhLib.Logger).%New("VH doos service").ErrorMail("GeefDoos", "Er is iets fout gelopen bij het verwerken van GeefDoos. OptiID: '"_OptiID_"', PRNr: '"_ PRNr _"', MachineID: '"_ MachineID _"'."_Exception.GeefOmschrijving()) } Quit $G(Status) Index: BL/PPS/KAD/OptiBox.cls.xml =================================================================== diff -u -r69271 -r69388 --- BL/PPS/KAD/OptiBox.cls.xml (.../OptiBox.cls.xml) (revision 69271) +++ BL/PPS/KAD/OptiBox.cls.xml (.../OptiBox.cls.xml) (revision 69388) @@ -153,7 +153,7 @@ } Catch { Set Status = ##class(BL.Sys.Proxy.pxStatus).Create(0, "GeefDoos fout") #dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch() - #dim Logger = ##class(vhLib.Logger).%New("VH doos service").Debug("GeefDoos", "Er is iets fout gelopen bij het verwerken van GeefDoos. OptiID: '"_OptiID_"', PRNr: '"_ PRNr _"', MachineID: '"_ MachineID _"'."_Exception.GeefOmschrijving()) + #dim Logger = ##class(vhLib.Logger).%New("VH doos service").ErrorMail("GeefDoos", "Er is iets fout gelopen bij het verwerken van GeefDoos. OptiID: '"_OptiID_"', PRNr: '"_ PRNr _"', MachineID: '"_ MachineID _"'."_Exception.GeefOmschrijving()) } } Index: APPS/Verpakking/DoosService.cls.xml =================================================================== diff -u -r69206 -r69388 --- APPS/Verpakking/DoosService.cls.xml (.../DoosService.cls.xml) (revision 69206) +++ APPS/Verpakking/DoosService.cls.xml (.../DoosService.cls.xml) (revision 69388) @@ -109,7 +109,7 @@ Set Queue.WPVerpak.SnijStatus = "Q" } } Else { - Do ..Logger.Error("GeefDoos", "Voor dit maatwerktype is nog geen implementatie voorzien in de de VHDoosService.") + Do ..Logger.ErrorMail("GeefDoos", "Voor dit maatwerktype is nog geen implementatie voorzien in de de VHDoosService.") } } Index: APPS/Halux/PPS/TAORVerpakking/impl/DoosLade.cls.xml =================================================================== diff -u -r69271 -r69388 --- APPS/Halux/PPS/TAORVerpakking/impl/DoosLade.cls.xml (.../DoosLade.cls.xml) (revision 69271) +++ APPS/Halux/PPS/TAORVerpakking/impl/DoosLade.cls.xml (.../DoosLade.cls.xml) (revision 69388) @@ -172,7 +172,7 @@ } Catch { Set Status = ##class(BL.Sys.Proxy.pxStatus).Create(0, "GeefDoos fout") #dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch() - #dim Logger = ##class(vhLib.Logger).%New("VH doos service").Error("GeefDoos", "Er is iets fout gelopen bij het verwerken van GeefDoos. OptiID: '"_..#OptiGroep _" "_ ..#OptiIDDoosMetDeksel_"', PRNr: '"_ ProductID _"', MachineID: '"_ MachineID _"'."_Exception.GeefOmschrijving()) + #dim Logger = ##class(vhLib.Logger).%New("VH doos service").ErrorMail("GeefDoos", "Er is iets fout gelopen bij het verwerken van GeefDoos. OptiID: '"_..#OptiGroep _" "_ ..#OptiIDDoosMetDeksel_"', PRNr: '"_ ProductID _"', MachineID: '"_ MachineID _"'."_Exception.GeefOmschrijving()) } } ]]>