package Ġno . nav . sy fo . akt iver meld ing Ċ Ċ import Ġio . mock k . mock k Ċ import Ġno . nav . sy fo . akt iver meld ing . mq . Arena Mq Producer Ċ import Ġno . nav . sy fo . model . AK TI V IT ET SK R AV _ 8 _ UK ER _ TYPE Ċ import Ġno . nav . sy fo . model . BRE V _ 3 9 _ UK ER _ TYPE Ċ import Ġno . nav . sy fo . model . BRE V _ 4 _ UK ER _ TYPE Ċ import Ġno . nav . sy fo . model . Plan lag t Mel ding Db Model Ċ import Ġno . nav . sy fo . model . ST ANS _ TYPE Ċ import Ġorg . am sh ove . k lu ent . shouldBe EqualTo Ċ import Ġorg . spe k framework . spe k 2 . Spe k Ċ import Ġorg . spe k framework . spe k 2 . style . specification . describe Ċ import Ġjava . time . LocalDate Ċ import Ġjava . time . Offset DateTime Ċ import Ġjava . time . Zone Offset Ċ import Ġjava . util . UUID Ċ Ċ object ĠA rena Mel ding Service Test Ġ: ĠSpe k ({ ĊĠĠĠ Ġval Ġarena Mq Producer Ġ= Ġmock k < Arena Mq Producer >( relax ed Ġ= Ġtrue ) ĊĊĠĠĠ Ġval Ġarena Mel ding Service Ġ= ĠA rena Mel ding Service ( arena Mq Producer ) ĊĊĠĠĠ Ġdescribe (" Test Ġav Ġopp ret ting Ġav Ġ 4 - uk ers meld ing ") Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġnow Ġ= ĠOffset DateTime . of ( LocalDate . of ( 2 0 2 0 , Ġ 7 , Ġ 2 ). at Time ( 1 5 , Ġ 2 0 ), ĠZone Offset . UTC ) ĊĠĠĠĠĠĠĠ Ġval Ġplan lag t Mel ding Db Model Ġ= ĠPlan lag t Mel ding Db Model ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġid Ġ= ĠUUID . randomUUID (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġfn r Ġ= Ġ" 1 2 3 4 5 6 7 8 9 1 0 ", ĊĠĠĠĠĠĠĠĠĠĠĠ Ġstart dat o Ġ= ĠLocalDate . of ( 2 0 2 0 , Ġ 5 , Ġ 2 ), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtype Ġ= ĠB REV _ 4 _ UK ER _ TYPE , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġopp rett et Ġ= ĠOffset DateTime . now ( Zone Offset . UTC ). minus Week s ( 8 ), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġsen des Ġ= ĠOffset DateTime . now ( Zone Offset . UTC ). minus Minutes ( 1 0 ) ĊĠĠĠĠĠĠĠ Ġ) ĊĊĠĠĠĠĠĠĠ Ġval Ġb rev 4 Uk ers meld ing Ġ= Ġarena Mel ding Service . til 4 Uk ers meld ing ( plan lag t Mel ding Db Model , Ġnow ) ĊĊĠĠĠĠĠĠĠ Ġb rev 4 Uk ers meld ing . n 2 8 1 0 . dat o ĠshouldBe EqualTo Ġ" 0 2 0 7 2 0 2 0 " ĊĠĠĠĠĠĠĠ Ġb rev 4 Uk ers meld ing . n 2 8 1 0 . k lok ke ĠshouldBe EqualTo Ġ" 1 5 2 0 0 0 " ĊĠĠĠĠĠĠĠ Ġb rev 4 Uk ers meld ing . n 2 8 1 0 . fn r ĠshouldBe EqualTo Ġ" 1 2 3 4 5 6 7 8 9 1 0 " ĊĠĠĠĠĠĠĠ Ġb rev 4 Uk ers meld ing . n 2 8 1 0 . meld K ode ĠshouldBe EqualTo Ġ" I " ĊĠĠĠĠĠĠĠ Ġb rev 4 Uk ers meld ing . n 2 8 3 0 . meld ing Id ĠshouldBe EqualTo Ġ" M - F 2 3 4 - 1 Ġ Ġ" ĊĠĠĠĠĠĠĠ Ġb rev 4 Uk ers meld ing . n 2 8 3 0 . vers jon ĠshouldBe EqualTo Ġ" 0 1 4 " ĊĠĠĠĠĠĠĠ Ġb rev 4 Uk ers meld ing . n 2 8 3 0 . meld ings data ĠshouldBe EqualTo Ġ" 0 2 0 5 2 0 2 0 ĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ" Ġ// Ġl eng de Ġ 9 0 ĊĠĠĠĠĠĠĠ Ġb rev 4 Uk ers meld ing . n 2 8 4 0 . tag lin je ĠshouldBe EqualTo Ġ" SP : Ġ 4 Ġuk ers bre vet Ġer Ġdann et . ĠB rev et Ġsen des Ġf ra ĠA rena Ġ( via Ġden ne Ġh ende ls en ). ĠĠĠĠ Ġ" Ġ// Ġl eng de Ġ 8 0 ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġdescribe (" Test Ġav Ġopp ret ting Ġav Ġ 8 - uk ers meld ing ") Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġnow Ġ= ĠOffset DateTime . of ( LocalDate . of ( 2 0 2 0 , Ġ 7 , Ġ 2 ). at Time ( 1 5 , Ġ 2 0 ), ĠZone Offset . UTC ) ĊĠĠĠĠĠĠĠ Ġval Ġplan lag t Mel ding Db Model Ġ= ĠPlan lag t Mel ding Db Model ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġid Ġ= ĠUUID . randomUUID (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġfn r Ġ= Ġ" 1 2 3 4 5 6 7 8 9 1 0 ", ĊĠĠĠĠĠĠĠĠĠĠĠ Ġstart dat o Ġ= ĠLocalDate . of ( 2 0 2 0 , Ġ 5 , Ġ 2 ), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtype Ġ= ĠA K TI V IT ET SK R AV _ 8 _ UK ER _ TYPE , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġopp rett et Ġ= ĠOffset DateTime . now ( Zone Offset . UTC ). minus Week s ( 8 ), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġsen des Ġ= ĠOffset DateTime . now ( Zone Offset . UTC ). minus Minutes ( 1 0 ) ĊĠĠĠĠĠĠĠ Ġ) ĊĊĠĠĠĠĠĠĠ Ġval Ġaktiv itet sk rav 8 U ker Mel ding Ġ= Ġarena Mel ding Service . til 8 Uk ers meld ing ( plan lag t Mel ding Db Model , Ġnow ) ĊĊĠĠĠĠĠĠĠ Ġaktiv itet sk rav 8 U ker Mel ding . n 2 8 1 0 . dat o ĠshouldBe EqualTo Ġ" 0 2 0 7 2 0 2 0 " ĊĠĠĠĠĠĠĠ Ġaktiv itet sk rav 8 U ker Mel ding . n 2 8 1 0 . k lok ke ĠshouldBe EqualTo Ġ" 1 5 2 0 0 0 " ĊĠĠĠĠĠĠĠ Ġaktiv itet sk rav 8 U ker Mel ding . n 2 8 1 0 . fn r ĠshouldBe EqualTo Ġ" 1 2 3 4 5 6 7 8 9 1 0 " ĊĠĠĠĠĠĠĠ Ġaktiv itet sk rav 8 U ker Mel ding . n 2 8 1 0 . meld K ode ĠshouldBe EqualTo Ġ" O " ĊĠĠĠĠĠĠĠ Ġaktiv itet sk rav 8 U ker Mel ding . n 2 8 3 0 . meld ing Id ĠshouldBe EqualTo Ġ" M - RK 6 8 - 1 Ġ Ġ" ĊĠĠĠĠĠĠĠ Ġaktiv itet sk rav 8 U ker Mel ding . n 2 8 3 0 . vers jon ĠshouldBe EqualTo Ġ" 0 0 8 " ĊĠĠĠĠĠĠĠ Ġaktiv itet sk rav 8 U ker Mel ding . n 2 8 3 0 . meld ings data ĠshouldBe EqualTo Ġ" 0 2 0 5 2 0 2 0 ĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ" Ġ// Ġl eng de Ġ 9 0 ĊĠĠĠĠĠĠĠ Ġaktiv itet sk rav 8 U ker Mel ding . n 2 8 4 0 . tag lin je ĠshouldBe EqualTo Ġ" SP : ĠA ktiv itet sk rav Ġved Ġ 8 Ġu ker Ġ 1 0 0 % Ġsy k meld t ĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ" Ġ// Ġl eng de Ġ 8 0 ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġdescribe (" Test Ġav Ġopp ret ting Ġav Ġ 3 9 - uk ers meld ing ") Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġnow Ġ= ĠOffset DateTime . of ( LocalDate . of ( 2 0 2 0 , Ġ 7 , Ġ 2 ). at Time ( 1 5 , Ġ 2 0 ), ĠZone Offset . UTC ) ĊĠĠĠĠĠĠĠ Ġval Ġplan lag t Mel ding Db Model Ġ= ĠPlan lag t Mel ding Db Model ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġid Ġ= ĠUUID . randomUUID (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġfn r Ġ= Ġ" 1 2 3 4 5 6 7 8 9 1 0 ", ĊĠĠĠĠĠĠĠĠĠĠĠ Ġstart dat o Ġ= ĠLocalDate . of ( 2 0 2 0 , Ġ 5 , Ġ 2 ), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtype Ġ= ĠB REV _ 3 9 _ UK ER _ TYPE , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġopp rett et Ġ= ĠOffset DateTime . now ( Zone Offset . UTC ). minus Week s ( 8 ), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġsen des Ġ= ĠOffset DateTime . now ( Zone Offset . UTC ). minus Minutes ( 1 0 ) ĊĠĠĠĠĠĠĠ Ġ) ĊĊĠĠĠĠĠĠĠ Ġval Ġb rev 3 9 Uk ers meld ing Ġ= Ġarena Mel ding Service . til 3 9 Uk ers meld ing ( plan lag t Mel ding Db Model , Ġnow ) ĊĊĠĠĠĠĠĠĠ Ġb rev 3 9 Uk ers meld ing . n 2 8 1 0 . dat o ĠshouldBe EqualTo Ġ" 0 2 0 7 2 0 2 0 " ĊĠĠĠĠĠĠĠ Ġb rev 3 9 Uk ers meld ing . n 2 8 1 0 . k lok ke ĠshouldBe EqualTo Ġ" 1 5 2 0 0 0 " ĊĠĠĠĠĠĠĠ Ġb rev 3 9 Uk ers meld ing . n 2 8 1 0 . fn r ĠshouldBe EqualTo Ġ" 1 2 3 4 5 6 7 8 9 1 0 " ĊĠĠĠĠĠĠĠ Ġb rev 3 9 Uk ers meld ing . n 2 8 1 0 . meld K ode ĠshouldBe EqualTo Ġ" I " ĊĠĠĠĠĠĠĠ Ġb rev 3 9 Uk ers meld ing . n 2 8 3 0 . meld ing Id ĠshouldBe EqualTo Ġ" M - F 2 2 6 - 1 Ġ Ġ" ĊĠĠĠĠĠĠĠ Ġb rev 3 9 Uk ers meld ing . n 2 8 3 0 . vers jon ĠshouldBe EqualTo Ġ" 0 1 5 " ĊĠĠĠĠĠĠĠ Ġb rev 3 9 Uk ers meld ing . n 2 8 3 0 . meld ings data ĠshouldBe EqualTo Ġ" 0 2 0 5 2 0 2 0 ĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ" Ġ// Ġl eng de Ġ 9 0 ĊĠĠĠĠĠĠĠ Ġb rev 3 9 Uk ers meld ing . n 2 8 4 0 . tag lin je ĠshouldBe EqualTo Ġ" SP : Ġ 3 9 Ġuk ers bre vet Ġer Ġdann et . ĠB rev et Ġsen des Ġf ra ĠA rena Ġ( via Ġden ne Ġh ende ls en ). ĠĠĠ Ġ" Ġ// Ġl eng de Ġ 8 0 ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġdescribe (" Test Ġav Ġopp ret ting Ġav Ġst ans meld ing ") Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġnow Ġ= ĠOffset DateTime . of ( LocalDate . of ( 2 0 2 0 , Ġ 7 , Ġ 2 ). at Time ( 1 5 , Ġ 2 0 ), ĠZone Offset . UTC ) ĊĠĠĠĠĠĠĠ Ġval Ġplan lag t Mel ding Db Model Ġ= ĠPlan lag t Mel ding Db Model ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġid Ġ= ĠUUID . randomUUID (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġfn r Ġ= Ġ" 1 2 3 4 5 6 7 8 9 1 0 ", ĊĠĠĠĠĠĠĠĠĠĠĠ Ġstart dat o Ġ= ĠLocalDate . of ( 2 0 2 0 , Ġ 5 , Ġ 2 ), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtype Ġ= ĠST ANS _ TYPE , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġopp rett et Ġ= ĠOffset DateTime . now ( Zone Offset . UTC ). minus Week s ( 8 ), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġsen des Ġ= ĠOffset DateTime . now ( Zone Offset . UTC ). minus Minutes ( 1 0 ) ĊĠĠĠĠĠĠĠ Ġ) ĊĊĠĠĠĠĠĠĠ Ġval Ġst ans meld ing Ġ= Ġarena Mel ding Service . til St ans meld ing ( plan lag t Mel ding Db Model , Ġnow ) ĊĊĠĠĠĠĠĠĠ Ġst ans meld ing . k 2 7 8 M 8 1 0 . dat o ĠshouldBe EqualTo Ġ" 0 2 0 7 2 0 2 0 " ĊĠĠĠĠĠĠĠ Ġst ans meld ing . k 2 7 8 M 8 1 0 . k lok ke ĠshouldBe EqualTo Ġ" 1 5 2 0 0 0 " ĊĠĠĠĠĠĠĠ Ġst ans meld ing . k 2 7 8 M 8 1 0 . fn r ĠshouldBe EqualTo Ġ" 1 2 3 4 5 6 7 8 9 1 0 " ĊĠĠĠĠĠĠĠ Ġst ans meld ing . k 2 7 8 M 8 3 0 . start dat o ĠshouldBe EqualTo Ġ" 0 2 0 5 2 0 2 0 " ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġdescribe (" Test Ġav Ġdat o formatter ing ") Ġ{ ĊĠĠĠĠĠĠĠ Ġit (" Format Date Ġformatter er Ġdat o Ġri kt ig ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġdat o Ġ= ĠLocalDate . of ( 2 0 2 0 , Ġ 3 , Ġ 1 2 ) ĊĊĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġformatter t D ato Ġ= Ġarena Mel ding Service . format Date ( dat o ) ĊĊĠĠĠĠĠĠĠĠĠĠĠ Ġformatter t D ato ĠshouldBe EqualTo Ġ" 1 2 0 3 2 0 2 0 " ĊĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠĠĠĠĠ Ġit (" Format DateTime Ġformatter er Ġdat o Ġmed Ġk lo kk es lett Ġri kt ig ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġdat o Ġ= ĠOffset DateTime . of ( LocalDate . of ( 2 0 2 0 , Ġ 3 , Ġ 1 2 ). at Time ( 1 5 , Ġ 2 0 ), ĠZone Offset . UTC ) ĊĊĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġformatter t D ato Ġ= Ġarena Mel ding Service . format DateTime ( dat o ) ĊĊĠĠĠĠĠĠĠĠĠĠĠ Ġformatter t D ato ĠshouldBe EqualTo Ġ" 1 2 0 3 2 0 2 0 , 1 5 2 0 0 0 " ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} Ċ }) Ċ