TECH.RegisteredObject APPS.TRANSP.GLS.GLSv1.Bericht.enu.VerzendWijze 1 APPS.TRANSP.GLS.GLSv1.CommunicatieServiceLocator 1 APPS.TRANSP.GLS.GLSv1.Bericht.RequestDataBouwer 1 CommunicatieServiceLocator:APPS.TRANSP.GLS.GLSv1.CommunicatieServiceLocator 1 1 %Status 1 1 %Boolean 1 1 1 APPS.TRANSP.GLS.GLSv1.Bericht.enu.RequestType 1 Request:APPS.TRANSP.GLS.GLSv1.Bericht.dto.Request 1 APPS.TRANSP.GLS.GLSv1.Bericht.dto.Response 1 Request:APPS.TRANSP.GLS.GLSv1.Bericht.dto.Request 1 1 VerzendDataID:%String Response:APPS.TRANSP.GLS.GLSv1.Bericht.dto.Response 1 %String Request:APPS.TRANSP.GLS.GLSv1.Bericht.dto.Request 1 %String 1 Error:APPS.TRANSP.GLS.GLSv1.Bericht.dto.Error,VerzendData:APPS.TRANSP.GLS.data.VerzendData 1 "_$listget(Calling,2) If (Error.Niveau = ##class(TECH.Exceptions.enu.Niveau).Waarschuwing()) || (Error.Niveau = ##class(TECH.Exceptions.enu.Niveau).FoutmeldingTeMeldenAanGebruiker()){ Set BerichtVoorGebruiker = Error.ErrorCode_": "_Error.Omschrijving_$$$CRLF_"Gelieve zelf of via OV actie te ondernemen." Do ##class(vhLib.Logger).%New("GLS").Warning(CallingMethod,(BerichtVoorGebruiker_..GeefBerichtVoorICT(Error))) }ElseIf(Error.Niveau = ##class(TECH.Exceptions.enu.Niveau).InterneWaarschuwing()){ Set BerichtVoorGebruiker = Error.Niveau_$C(13,10)_"Dit is enkel een waarschuwing. Code en data zijn correct." Do ##class(vhLib.Logger).%New("GLS").WarningMail(CallingMethod,(BerichtVoorGebruiker_..GeefBerichtVoorICT(Error))) }ElseIf(Error.Niveau = ##class(TECH.Exceptions.enu.Niveau).PleaseRetryError()){ Set BerichtVoorGebruiker = "Niet gelukt. Gelieve opnieuw te proberen." Do ##class(vhLib.Logger).%New("GLS").WarningMail(CallingMethod,(BerichtVoorGebruiker_..GeefBerichtVoorICT(Error))) }Else{ Set BerichtVoorGebruiker = Error.Niveau_$$$CRLF_"Dit probleem moet door ICT opgelost worden." Do ##class(vhLib.Logger).%New("GLS").ErrorMail(CallingMethod,(BerichtVoorGebruiker_..GeefBerichtVoorICT(Error))) } If (Error.Niveau '= ##class(TECH.Exceptions.enu.Niveau).InterneWaarschuwing()){ Do ##class(TECH.ExceptionHandler).Throw(##class(APPS.TRANSP.GLS.Exceptions.CommunicatieException).%New(BerichtVoorGebruiker)) } ]]> 1 ID:%String="" 1 APPS.TRANSP.GLS.data.VerzendData Error:APPS.TRANSP.GLS.GLSv1.Bericht.dto.Error 1 %String Response:APPS.TRANSP.GLS.GLSv1.Bericht.dto.Response %Boolean Response:APPS.TRANSP.GLS.GLSv1.Bericht.dto.Response APPS.TRANSP.GLS.GLSv1.Bericht.dto.Error