InitialenExterneVerantwoordelijke(VerzendWijzeID)
	new Result set Result = ""
	new VerzendWijze set VerzendWijze = ##class(DOM.VKP.VerzendWijze).%OpenId(VerzendWijzeID)
	if $IsObject(VerzendWijze) {
		new RegioID set RegioID =  VerzendWijze.GeefRegioID()
		if $length(RegioID) {
			#dim Regio As DOM.VKP.Regio = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefRegio(RegioID)
			#dim ExterneVerantwoordelijke As DOM.common.VanHoeckeGebruiker = Regio.GeefExterneVerantwoordelijke()
			if $IsObject(ExterneVerantwoordelijke) set Result = ExterneVerantwoordelijke.GeefInitialen()
			}
		}
	quit Result