xref: /webtrees/tests/app/Census/CensusOfDenmark1940Test.php (revision e873f434551745f888937263ff89e80db3b0f785)
1<?php
2
3/**
4 * webtrees: online genealogy
5 * Copyright (C) 2023 webtrees development team
6 * This program is free software: you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation, either version 3 of the License, or
9 * (at your option) any later version.
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program. If not, see <https://www.gnu.org/licenses/>.
16 */
17
18declare(strict_types=1);
19
20namespace Fisharebest\Webtrees\Census;
21
22use Fisharebest\Webtrees\TestCase;
23use PHPUnit\Framework\Attributes\CoversClass;
24
25#[CoversClass(CensusOfDenmark1940::class)]
26#[CoversClass(AbstractCensusColumn::class)]
27class CensusOfDenmark1940Test extends TestCase
28{
29    /**
30     * Test the census place and date
31     */
32    public function testPlaceAndDate(): void
33    {
34        $census = new CensusOfDenmark1940();
35
36        self::assertSame('Danmark', $census->censusPlace());
37        self::assertSame('05 NOV 1940', $census->censusDate());
38    }
39
40    /**
41     * Test the census columns
42     */
43    public function testColumns(): void
44    {
45        $census  = new CensusOfDenmark1940();
46        $columns = $census->columns();
47
48        self::assertCount(15, $columns);
49        self::assertInstanceOf(CensusColumnSurnameGivenNames::class, $columns[0]);
50        self::assertInstanceOf(CensusColumnNull::class, $columns[1]);
51        self::assertInstanceOf(CensusColumnNull::class, $columns[2]);
52        self::assertInstanceOf(CensusColumnSexMK::class, $columns[3]);
53        self::assertInstanceOf(CensusColumnBirthDaySlashMonth::class, $columns[4]);
54        self::assertInstanceOf(CensusColumnBirthYear::class, $columns[5]);
55        self::assertInstanceOf(CensusColumnBirthPlace::class, $columns[6]);
56        self::assertInstanceOf(CensusColumnNull::class, $columns[7]);
57        self::assertInstanceOf(CensusColumnConditionDanish::class, $columns[8]);
58        self::assertInstanceOf(CensusColumnNull::class, $columns[9]);
59        self::assertInstanceOf(CensusColumnRelationToHead::class, $columns[10]);
60        self::assertInstanceOf(CensusColumnOccupation::class, $columns[11]);
61        self::assertInstanceOf(CensusColumnNull::class, $columns[12]);
62        self::assertInstanceOf(CensusColumnNull::class, $columns[13]);
63        self::assertInstanceOf(CensusColumnNull::class, $columns[14]);
64
65        self::assertSame('Navn', $columns[0]->abbreviation());
66        self::assertSame('Nærværende', $columns[1]->abbreviation());
67        self::assertSame('Fraværende', $columns[2]->abbreviation());
68        self::assertSame('Køn', $columns[3]->abbreviation());
69        self::assertSame('Fødselsdag', $columns[4]->abbreviation());
70        self::assertSame('Fødselsaar', $columns[5]->abbreviation());
71        self::assertSame('Fødested', $columns[6]->abbreviation());
72        self::assertSame('Statsborgerforhold', $columns[7]->abbreviation());
73        self::assertSame('Civilstand', $columns[8]->abbreviation());
74        self::assertSame('Indgaaelse', $columns[9]->abbreviation());
75        self::assertSame('Stilling i familien', $columns[10]->abbreviation());
76        self::assertSame('Erhverv', $columns[11]->abbreviation());
77        self::assertSame('Virksomhedens', $columns[12]->abbreviation());
78        self::assertSame('Hustruen', $columns[13]->abbreviation());
79        self::assertSame('Døtre', $columns[14]->abbreviation());
80
81        self::assertSame('', $columns[0]->title());
82        self::assertSame('Hvis den i Rubrik 1 opførte Person er midleritidg nærværende d.v.s. har fast Bopæl ????? (er optaget under en anden Address i Folkeregistret), anføres her den faste Bopæls Adresse (Kommunens Navn og den fuldstændige Adresse i denne; for Udlændinge dog kun Landets Navn).', $columns[1]->title());
83        self::assertSame('Hvis den i Rubrik 1 opførte Person er midleritidg fraværende d.v.s. har fast Bopæl paa Tællingsstedet (er optaget underdenne Address i Folkeregistret), men den 5. Novemer ikke er til Stede paa Tællingsstedet, anføres her „fraværende“ og Adressen paa det midlertidige Opholdssted (ved Ophold i Udlandet anføres jun Landets Navn).', $columns[2]->title());
84        self::assertSame('Køn Mand (M) Kvinde (K)', $columns[3]->title());
85        self::assertSame('', $columns[4]->title());
86        self::assertSame('', $columns[5]->title());
87        self::assertSame('', $columns[6]->title());
88        self::assertSame('', $columns[7]->title());
89        self::assertSame('Ægteskabelig Stillinge. Ugift (U), Gift (G), Enkemand eller Enke (E), Separeret (S), Fraskilt (F).', $columns[8]->title());
90        self::assertSame('Date for det nuværende Ægteskabs Indgaaelse. NB." RUbrikken udfyldes ikke al Enkemaend, Enker, Separerede eller Fraskilte.', $columns[9]->title());
91        self::assertSame('', $columns[10]->title());
92        self::assertSame('', $columns[11]->title());
93        self::assertSame('Virksomhedens (Branchens) Art', $columns[12]->title());
94        self::assertSame('Besvares kun af Hustruen og hjemmeboende Børn over 14 Aar', $columns[13]->title());
95        self::assertSame('Besvares kun af hjemmeboende Døtre over 14 Aar', $columns[14]->title());
96    }
97}
98