package Ġno . nav . f amil ie . ef . iver k set t . fel les Ċ Ċ import Ġno . nav . f amil ie . http . client . Abstract RestClient Ċ import Ġno . nav . f amil ie . kon tr ak ter . fel les . Person Ident Ċ import Ġno . nav . f amil ie . kon tr ak ter . fel les . Ress urs Ċ import Ġno . nav . f amil ie . kon tr ak ter . fel les . ar be ids for de ling . En het Ċ import Ġno . nav . f amil ie . kon tr ak ter . fel les . getData OrThrow Ċ import Ġno . nav . f amil ie . kon tr ak ter . fel les . person op pl ys ning . Fin n Person id enter Response Ċ import Ġno . nav . f amil ie . kon tr ak ter . fel les . person op pl ys ning . Ident Ċ import Ġno . nav . f amil ie . kon tr ak ter . fel les . person op pl ys ning . Person Ident Med H istor ikk Ċ import Ġorg . slf 4 j . Logger Ċ import Ġorg . slf 4 j . LoggerFactory Ċ import Ġorg . springframework . beans . factory . annotation . Qualifier Ċ import Ġorg . springframework . beans . factory . annotation . Value Ċ import Ġorg . springframework . stereotype . Component Ċ import Ġorg . springframework . web . client . Rest Operations Ċ import Ġorg . springframework . web . util . Uri Components Builder Ċ import Ġjava . net . URI Ċ Ċ @ Component Ċ class ĠF amil ie Integr as jon er Client ( ĊĠĠĠĠĠĠĠ Ġ@ Qualifier (" azure ") Ġrest Operations : ĠRest Operations , ĊĠĠĠĠĠĠĠ Ġ@ Value ("\ ${ FAMIL IE _ INTEGR AS J ON ER _ API _ URL }") ĊĠĠĠĠĠĠĠ Ġprivate Ġval Ġintegr as jon Uri : ĠURI Ċ ) Ġ: ĠAbstract RestClient ( rest Operations , Ġ" f amil ie . integr as jon er ") Ġ{ ĊĊĠĠĠ Ġprivate Ġval Ġlogger : ĠLogger Ġ= ĠLoggerFactory . getLogger ( this :: class . java ) ĊĊĠĠĠ Ġprivate Ġval Ġh ent Id enter URI Ġ= ĊĠĠĠĠĠĠĠĠĠĠĠ ĠUri Components Builder . from Uri ( integr as jon Uri ). path Segment ( PATH _ H ENT _ ID ENTER ). build (). to Uri () ĊĠĠĠ Ġprivate Ġval Ġakt Ã¸ r Uri Ġ= ĊĠĠĠĠĠĠĠĠĠĠĠ ĠUri Components Builder . from Uri ( integr as jon Uri ). path Segment ( PATH _ AK T Ã ĺ R ). build (). to Uri () ĊĠĠĠ Ġprivate Ġfun Ġar be ids for de ling Uri ( t ema : ĠString ) Ġ= ĊĠĠĠĠĠĠĠĠĠĠĠ ĠUri Components Builder . from Uri ( integr as jon Uri ). path Segment ( PATH _ AR BE IDS FOR DEL ING , Ġt ema ). build (). to Uri () ĊĊĠĠĠ Ġfun Ġh ent Id enter ( person ident : ĠString , Ġmed Hist pri kk : ĠBoolean ): ĠList < Person Ident Med H istor ikk > Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġuri Ġ= ĠUri Components Builder . from Uri ( h ent Id enter URI ). query Param (" h istor ikk ", Ġmed Hist pri kk ). build (). to Uri () ĊĠĠĠĠĠĠĠ Ġval Ġresponse Ġ= Ġpost For Entity < Ress urs < Fin n Person id enter Response >>( uri , ĠPerson Ident ( person ident )) ĊĠĠĠĠĠĠĠ Ġreturn Ġresponse . getData OrThrow (). id enter ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġfun Ġh ent A kt Ã¸ r Id ( person ident : ĠString ): ĠString Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġresponse Ġ= Ġpost For Entity < Ress urs < Mutable Map < *, Ġ* >> >( akt Ã¸ r Uri , ĠIdent ( person ident )) ĊĠĠĠĠĠĠĠ Ġreturn Ġresponse . getData OrThrow ()[" akt Ã¸ r Id "]. toString () ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġfun Ġh ent Be hand len de En het For Opp f Ã¸ l ging ( person ident : ĠString ): ĠEn het ? Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġresponse Ġ= Ġpost For Entity < Ress urs < List < En het >> >( ar be ids for de ling Uri ( TE MA _ OP PF Ã ĺ LG ING ), ĠIdent ( person ident )) ĊĠĠĠĠĠĠĠ Ġreturn Ġresponse . getData OrThrow (). first OrNull () ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġfun Ġh ent Be hand len de En het For Be handling ( person ident : ĠString ): ĠEn het ? Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġresponse Ġ= Ġpost For Entity < Ress urs < List < En het >> >( ar be ids for de ling Uri ( TE MA _ EN SL IG _ F ORS Ã ĺ R GER ), ĠIdent ( person ident )) ĊĠĠĠĠĠĠĠ Ġreturn Ġresponse . getData OrThrow (). first OrNull () ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġcompanion Ġobject Ġ{ ĊĊĠĠĠĠĠĠĠ Ġprivate Ġconst Ġval ĠTE MA _ OP PF Ã ĺ LG ING Ġ= Ġ" OP P " Ġ// Opp f Ã¸ l ging Ġ- Ġlokal en het ĊĠĠĠĠĠĠĠ Ġprivate Ġconst Ġval ĠTE MA _ EN SL IG _ F ORS Ã ĺ R GER Ġ= Ġ" EN F " Ġ// NA Y Ġ- Ġ 4 4 8 9 ĊĠĠĠĠĠĠĠ Ġconst Ġval ĠPATH _ AR BE IDS FOR DEL ING Ġ= Ġ" api / ar be ids for de ling / en het " ĊĠĠĠĠĠĠĠ Ġconst Ġval ĠPATH _ AK T Ã ĺ R Ġ= Ġ" api / ak to er / v 2 / EN F " ĊĠĠĠĠĠĠĠ Ġconst Ġval ĠPATH _ H ENT _ ID ENTER Ġ= Ġ" api / person op pl ys ning / v 1 / id enter / EN F " ĊĠĠĠ Ġ} Ċ Ċ }