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