package Ġimporter Ċ Ċ import Ġcom . me lon base . micro quark . rest . dto . inbound . Ne ue Vol ks ab st imm ung Ċ import Ġio . rest ass ured . Rest Ass ured . given Ċ import Ġjava . nio . file . Files Ċ import Ġjava . nio . file . Path Ċ import Ġjava . time . LocalDate Ċ import Ġjava . util . stream . Collectors Ċ import Ġjavax . ws . rs . core . MediaType Ċ Ċ /* Ċ Ġ* ĠHelper Ġtool Ġto Ġimport ĠVol ks ab stim mun gen Ġfrom Ġthe ĠCSV Ġfile Ġ' data . csv '. Ċ Ġ* ĠFurthermore , Ġfor Ġevery ĠVol ks ab st imm ung Ġthe Ġvoting Ġis Ġexecuted . Ċ Ġ* Ċ Ġ* ĠThis Ġway Ġyou Ġeasily Ġget Ġsome Ġdata Ġinto Ġyour ĠMicro Stream Ġstorage ! Ċ Ġ* Ċ Ġ* ĠThe Ġdata Ġhas Ġbeen Ġtaken Ġfrom : Ċ Ġ* Ġhttps :// www . bk . admin . ch / ch / d / p ore / va / v ab _ 2 _ 2 _ 4 _ 1 _ ges amt . html Ċ Ġ*/ Ċ object ĠData Importer Ġ{ ĊĊĠ Ġ@ Jvm Static ĊĠ Ġfun Ġmain ( args : ĠArray < String >) Ġ{ ĊĠĠĠ Ġval Ġvor l agen By Date Ġ= ĠFiles . lines ( Path . of (" data . csv ")) ĊĠĠĠĠĠ Ġ. filter Ġ{ Ġline Ġ-> Ġline . isNotEmpty () Ġ} ĊĠĠĠĠĠ Ġ. map Ġ{ Ġit . split (' ; '). to Pair () Ġ} ĊĠĠĠĠĠ Ġ. collect ( Collectors . grouping By Ġ{ Ġit . first Ġ}) ĊĊĠĠĠ Ġvor l agen By Date . forEach Ġ{ Ġ( datum , Ġpairs ) Ġ-> ĊĠĠĠĠĠ Ġval Ġlocal Date Ġ= ĠLocalDate . parse ( datum ) ĊĠĠĠĠĠ Ġval Ġvor l agen Ġ= Ġpairs . map Ġ{ Ġit . second Ġ} ĊĊĠĠĠĠĠ Ġval Ġvol ks ab st imm ung Ġ= ĠNeue Vol ks ab st imm ung ( local Date , Ġvor l agen ) ĊĊĠĠĠĠĠ Ġprintln ( vol ks ab st imm ung ) ĊĊĠĠĠĠĠ Ġadd ( vol ks ab st imm ung ) ĊĠĠĠĠĠ Ġab stim men ( vol ks ab st imm ung ) ĊĠĠĠ Ġ} ĊĠ Ġ} ĊĊĠ Ġprivate Ġfun Ġadd ( vol ks ab st imm ung : ĠNeue Vol ks ab st imm ung ) Ġ{ ĊĠĠĠ Ġgiven () ĊĠĠĠĠĠ Ġ. body ( vol ks ab st imm ung ) ĊĠĠĠĠĠ Ġ. contentType ( MediaType . APPLICATION _ JSON ) ĊĠĠĠĠĠ Ġ. ` when `() ĊĠĠĠĠĠ Ġ. post (" http :// localhost : 8 0 8 0 / vol ks ab stim mun gen ") ĊĠ Ġ} ĊĊĠ Ġprivate Ġfun Ġab stim men ( vol ks ab st imm ung : ĠNeue Vol ks ab st imm ung ) Ġ{ ĊĠĠĠ Ġgiven () ĊĠĠĠĠĠ Ġ. ` when `() ĊĠĠĠĠĠ Ġ. post (" http :// localhost : 8 0 8 0 / vol ks ab stim mun gen /${ vol ks ab st imm ung . datum }/ ab stim men ") ĊĠ Ġ} Ċ } Ċ Ċ private Ġfun ĠList < String >. to Pair (): ĠPair < String , ĠString > Ġ{ ĊĠ Ġreturn ĠPair ( this [ 0 ], Ġthis [ 1 ]) Ċ } Ċ