package Ġno . nav . hel se . f rit ak ag p . service Ċ Ċ import Ġkotlinx . coroutines . run Blocking Ċ import Ġno . nav . hel se . ar be id sg iver . integr as jon er . p dl . P dl Client Ċ import Ġno . nav . hel se . f rit ak ag p . domain . Geo graf isk T ilk ny t ning Data Ċ import Ġno . nav . hel se . f rit ak ag p . integration . n org . Ar be ids for de ling Request Ċ import Ġno . nav . hel se . f rit ak ag p . integration . n org . Ar be ids for de ling Response Ċ import Ġno . nav . hel se . f rit ak ag p . integration . n org . N org 2 Client Ċ import Ġorg . slf 4 j . LoggerFactory Ċ import Ġjava . time . LocalDate Ċ Ċ const Ġval ĠSY KE PEN GER _ UT LAND Ġ= Ġ" 4 4 7 4 " Ċ const Ġval ĠSY KE PEN GER Ġ= Ġ" SY K " Ċ Ċ class ĠBe hand len de En het Service ( ĊĠĠĠ Ġprivate Ġval Ġp dl Client : ĠP dl Client , ĊĠĠĠ Ġprivate Ġval Ġn org 2 Client : ĠN org 2 Client , Ċ ) Ġ{ ĊĊĠĠĠ Ġvar Ġlog Ġ= ĠLoggerFactory . getLogger ( Be hand len de En het Service :: class . java ) ĊĊĠĠĠ Ġfun Ġh ent Be hand len de En het ( fn r : ĠString , Ġuuid : ĠString , Ġtid sp unkt : ĠLocalDate Ġ= ĠLocalDate . now ()): ĠString Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġgeo graf isk T ilk ny t ning Ġ= Ġh ent Geo graf isk T ilk ny t ning ( fn r ) ĊĊĠĠĠĠĠĠĠ Ġval Ġcriteria Ġ= ĠAr be ids for de ling Request ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġt ema Ġ= ĠSY KE PEN GER , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġdisk res jon sk ode Ġ= Ġgeo graf isk T ilk ny t ning ?. disk res jon sk ode , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġgeo graf isk Om ra ade Ġ= Ġgeo graf isk T ilk ny t ning ?. geo graf isk T ilk ny t ning ĊĠĠĠĠĠĠĠ Ġ) ĊĊĠĠĠĠĠĠĠ Ġval Ġcall Id Ġ= ĠMD CO per ations . get From M DC ( MD CO per ations . M DC _ CALL _ ID ) ĊĊĠĠĠĠĠĠĠ Ġtry Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġar be ids for de ling er Ġ= Ġrun Blocking Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġn org 2 Client . h ent Alle Ar be ids for de ling er ( criteria , Ġcall Id ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġlog . info (" F ant Ġen heter : Ġ" Ġ+ Ġar be ids for de ling er . toString ()) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġbe hand len de En het Ġ= Ġfin nA ktiv Be hand len de En het ( ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġar be ids for de ling er , ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġgeo graf isk T ilk ny t ning ?. geo graf isk T ilk ny t ning , ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġtid sp unkt ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ) ĊĊĠĠĠĠĠĠĠĠĠĠĠ Ġlog . info (" F ant Ġgeo graf isk T ilk ny t ning Ġ${ geo graf isk T ilk ny t ning . geo graf isk T ilk ny t ning } Ġmed Ġbe hand len de En het Ġ$ be hand len de En het Ġfor Ġkr av Ġ$ uuid ") ĊĠĠĠĠĠĠĠĠĠĠĠ Ġreturn Ġbe hand len de En het ĊĠĠĠĠĠĠĠ Ġ} Ġcatch Ġ( e : ĠRuntimeException ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġlog . error (" Kl arte Ġik ke ĠÃ¥ Ġh ente Ġbe hand len de Ġen het !", Ġe ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġthrow ĠBe hand len de En het Fe ilet Exception ( e ) ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġfun Ġh ent Geo graf isk T ilk ny t ning ( fn r : ĠString ): ĠGeo graf isk T ilk ny t ning Data Ġ{ ĊĠĠĠĠĠĠĠ Ġp dl Client . full Person ( fn r ). let Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġreturn ĠGeo graf isk T ilk ny t ning Data ( ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġgeo graf isk T ilk ny t ning Ġ= Ġit ?. h ent Geo graf isk T ilk ny t ning ?. h ent T ilk ny t ning (), ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġdisk res jon sk ode Ġ= Ġit ?. h ent Person ?. tre kk Ut Disk res jon sk ode () ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} Ċ } Ċ Ċ fun Ġfin nA ktiv Be hand len de En het ( ar be ids for de ling er : ĠList < Ar be ids for de ling Response >, Ġgeo graf isk T ilk ny t ning : ĠString ?, Ġtid sp unkt : ĠLocalDate ): ĠString Ġ{ ĊĠĠĠ Ġreturn Ġar be ids for de ling er ĊĠĠĠĠĠĠĠ Ġ. stream () ĊĠĠĠĠĠĠĠ Ġ. findFirst (). orElse Throw Ġ{ ĠIn gen A ktiv En het Exception ( geo graf isk T ilk ny t ning , Ġnull ) Ġ}. en het Nr !! Ċ } Ċ Ċ open Ġclass ĠBe handling Exception ( message : ĠString , Ġcause : ĠException ?) Ġ: ĠRuntimeException ( message , Ġcause ) Ċ open Ġclass ĠBe hand len de En het Exception ( message : ĠString , Ġcause : ĠException ?) Ġ: ĠBe handling Exception ( message , Ġcause ) Ċ open Ġclass ĠIn gen A ktiv En het Exception ( geo graf isk T ilk ny t ning : ĠString ?, Ġcause : Ġjava . lang . Exception ?) Ġ: ĠBe hand len de En het Exception (" F ant Ġing en Ġaktiv Ġen het Ġfor Ġ$ geo graf isk T ilk ny t ning ", Ġcause ) Ċ open Ġclass ĠBe hand len de En het Fe ilet Exception ( cause : Ġjava . lang . Exception ?) Ġ: ĠBe hand len de En het Exception (" Fe il Ġved Ġh ent ing Ġav Ġgeo graf isk Ġtil k ny t ning ", Ġcause ) Ċ