xref: /webtrees/tests/app/Census/CensusOfDenmark1940Test.php (revision 753e86301bbfbbdd508c82990ef27571eca12b18) 
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;
23
24/**
25 * Test harness for the class CensusOfDenmark1930
26 */
27class CensusOfDenmark1940Test extends TestCase
28{
29    /**
30     * Test the census place and date
31     *
32     * @covers \Fisharebest\Webtrees\Census\CensusOfDenmark1940
33     */
34    public function testPlaceAndDate(): void
35    {
36        $census = new CensusOfDenmark1940();
37
38        self::assertSame('Danmark', $census->censusPlace());
39        self::assertSame('05 NOV 1940', $census->censusDate());
40    }
41
42    /**
43     * Test the census columns
44     *
45     * @covers \Fisharebest\Webtrees\Census\CensusOfDenmark1940
46     * @covers \Fisharebest\Webtrees\Census\AbstractCensusColumn
47     */
48    public function testColumns(): void
49    {
50        $census  = new CensusOfDenmark1940();
51        $columns = $census->columns();
52
53        self::assertCount(15, $columns);
54        self::assertInstanceOf(CensusColumnSurnameGivenNames::class, $columns[0]);
55        self::assertInstanceOf(CensusColumnNull::class, $columns[1]);
56        self::assertInstanceOf(CensusColumnNull::class, $columns[2]);
57        self::assertInstanceOf(CensusColumnSexMK::class, $columns[3]);
58        self::assertInstanceOf(CensusColumnBirthDaySlashMonth::class, $columns[4]);
59        self::assertInstanceOf(CensusColumnBirthYear::class, $columns[5]);
60        self::assertInstanceOf(CensusColumnBirthPlace::class, $columns[6]);
61        self::assertInstanceOf(CensusColumnNull::class, $columns[7]);
62        self::assertInstanceOf(CensusColumnConditionDanish::class, $columns[8]);
63        self::assertInstanceOf(CensusColumnNull::class, $columns[9]);
64        self::assertInstanceOf(CensusColumnRelationToHead::class, $columns[10]);
65        self::assertInstanceOf(CensusColumnOccupation::class, $columns[11]);
66        self::assertInstanceOf(CensusColumnNull::class, $columns[12]);
67        self::assertInstanceOf(CensusColumnNull::class, $columns[13]);
68        self::assertInstanceOf(CensusColumnNull::class, $columns[14]);
69
70        self::assertSame('Navn', $columns[0]->abbreviation());
71        self::assertSame('Nærværende', $columns[1]->abbreviation());
72        self::assertSame('Fraværende', $columns[2]->abbreviation());
73        self::assertSame('Køn', $columns[3]->abbreviation());
74        self::assertSame('Fødselsdag', $columns[4]->abbreviation());
75        self::assertSame('Fødselsaar', $columns[5]->abbreviation());
76        self::assertSame('Fødested', $columns[6]->abbreviation());
77        self::assertSame('Statsborgerforhold', $columns[7]->abbreviation());
78        self::assertSame('Civilstand', $columns[8]->abbreviation());
79        self::assertSame('Indgaaelse', $columns[9]->abbreviation());
80        self::assertSame('Stilling i familien', $columns[10]->abbreviation());
81        self::assertSame('Erhverv', $columns[11]->abbreviation());
82        self::assertSame('Virksomhedens', $columns[12]->abbreviation());
83        self::assertSame('Hustruen', $columns[13]->abbreviation());
84        self::assertSame('Døtre', $columns[14]->abbreviation());
85
86        self::assertSame('', $columns[0]->title());
87        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());
88        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());
89        self::assertSame('Køn Mand (M) Kvinde (K)', $columns[3]->title());
90        self::assertSame('', $columns[4]->title());
91        self::assertSame('', $columns[5]->title());
92        self::assertSame('', $columns[6]->title());
93        self::assertSame('', $columns[7]->title());
94        self::assertSame('Ægteskabelig Stillinge. Ugift (U), Gift (G), Enkemand eller Enke (E), Separeret (S), Fraskilt (F).', $columns[8]->title());
95        self::assertSame('Date for det nuværende Ægteskabs Indgaaelse. NB." RUbrikken udfyldes ikke al Enkemaend, Enker, Separerede eller Fraskilte.', $columns[9]->title());
96        self::assertSame('', $columns[10]->title());
97        self::assertSame('', $columns[11]->title());
98        self::assertSame('Virksomhedens (Branchens) Art', $columns[12]->title());
99        self::assertSame('Besvares kun af Hustruen og hjemmeboende Børn over 14 Aar', $columns[13]->title());
100        self::assertSame('Besvares kun af hjemmeboende Døtre over 14 Aar', $columns[14]->title());
101    }
102}
103