function marriage_data($marriageDb = '', $number = '0', $presentation = 'standard') { global $dbh, $db_functions, $tree_prefix_quoted, $url_path, $dataDb, $uri_path; global $language, $user, $screen_mode; global $templ_person; if ($marriageDb == '') { $marriageDb = $this->cls_marriage_Db; } // *** Open a person class for witnesses *** $person_cls = new person_cls(); $relation_kind = ''; $relation_check = false; $marriage_check = false; $addition = __(' to: '); $text = ''; if ($marriageDb->fam_kind == 'living together') { $relation_check = true; $relation_kind = __('Living together'); } if ($marriageDb->fam_kind == 'living apart together') { $relation_kind = __('Living apart together'); $relation_check = true; } if ($marriageDb->fam_kind == 'intentionally unmarried mother') { $relation_kind = __('Intentionally unmarried mother'); $relation_check = true; $addition = ''; } if ($marriageDb->fam_kind == 'homosexual') { $relation_check = true; $relation_kind = __('Homosexual'); } if ($marriageDb->fam_kind == 'non-marital') { $relation_check = true; $relation_kind = __('Non marital'); $addition = ''; } if ($marriageDb->fam_kind == 'extramarital') { $relation_check = true; $relation_kind = __('Extramarital'); $addition = ''; } // NOT TESTED if ($marriageDb->fam_kind == "PRO-GEN") { $relation_check = true; $relation_kind = __('Extramarital'); $addition = ''; } // *** Aldfaer relations *** if ($marriageDb->fam_kind == 'partners') { $relation_check = true; $relation_kind = __('Partner') . ' '; } if ($marriageDb->fam_kind == 'registered') { $relation_check = true; $relation_kind = __('Registered') . ' '; } if ($marriageDb->fam_kind == 'unknown') { $relation_check = true; $relation_kind = __('Unknown relation') . ' '; } // *** Living together *** $temp_text = ''; $temp = ''; if ($marriageDb->fam_relation_date or $marriageDb->fam_relation_place) { $templ_relation["marriage_date"] = date_place($marriageDb->fam_relation_date, $marriageDb->fam_relation_place); $temp = "marriage_date"; $temp_text .= $templ_relation["marriage_date"]; } if ($user["group_texts_fam"] == 'j' and process_text($marriageDb->fam_relation_text)) { if ($temp_text) { //$temp_text.= ', '; //if($temp) { $templ_relation[$temp].=", "; } $temp_text .= ' '; if ($temp) { $templ_relation[$temp] .= ' '; } } $templ_relation["marriage_text"] = process_text($marriageDb->fam_relation_text); $temp = "marriage_text"; $temp_text .= $templ_relation["marriage_text"]; } // *** Living together source *** $source = show_sources2("family", "fam_relation_source", $marriageDb->fam_gedcomnumber); if ($source) { if ($screen_mode == 'PDF') { $templ_relation["marriage_source"] = $source; $temp = "marriage_source"; } else { $temp_text .= $source; } } if ($temp_text) { $relation_check = true; $addition = __(' to: '); if ($text != '') { $text .= "<br>\n"; $templ_relation["marriage_exist"] = "\n"; } // *** Text "living together" already shown in "kind" *** // *** Just in case made an extra text "living together" here *** if (!$relation_kind) { $text .= '<b>' . __('Living together') . '</b>'; if (isset($templ_relation["marriage_exist"])) { $templ_relation["marriage_exist"] .= __('Living together') . " "; } else { $templ_relation["marriage_exist"] = __('Living together') . " "; } } $text .= ' ' . $temp_text; } // *** End of living together. NO end place, end text or end source yet. *** $temp_text = ''; $temp = ''; $fam_relation_end_place = ''; if ($marriageDb->fam_relation_end_date or $fam_relation_end_place) { $temp_text .= date_place($marriageDb->fam_relation_end_date, $fam_relation_end_place); $templ_relation["marriage_end"] = ''; if (isset($templ_relation["marriage_exist"])) { $templ_relation["marriage_end"] = '. '; } $templ_relation["marriage_end"] .= __('End living together') . ' ' . date_place($marriageDb->fam_relation_end_date, $fam_relation_end_place); $temp = "marriage_end"; } //if ($user["group_texts_fam"]=='j' AND isset($marriageDb->fam_relation_end_text) AND process_text($marriageDb->fam_relation_end_text)){ // if ($temp_text){ // $temp_text.= ', '; // if($temp) { $templ_relation[$temp].=", "; } // } // $temp_text.= process_text($marriageDb->fam_relation_end_text); // //$templ_relation["marriage_text"]=process_text($marriageDb->fam_relation_end_text); // //$temp="marriage_text"; //} // *** Living together source *** // no source yet... if ($temp_text) { $marriage_check = true; if ($text != '' or $relation_kind) { $text .= "<br>\n"; //$templ_relation["marriage_exist"]="\n"; } $text .= '<b>' . __('End living together') . '</b>'; //if(isset($templ_relation["marriage_exist"])) {$templ_relation["marriage_exist"].=__('End living together')." "; } //else {$templ_relation["marriage_exist"]=__('End living together')." "; } $text .= ' ' . $temp_text; } // *** Married Notice *** $temp_text = ''; $temp = ''; if ($marriageDb->fam_marr_notice_date or $marriageDb->fam_marr_notice_place) { $temp_text .= date_place($marriageDb->fam_marr_notice_date, $marriageDb->fam_marr_notice_place); $templ_relation["prew_date"] = date_place($marriageDb->fam_marr_notice_date, $marriageDb->fam_marr_notice_place); $temp = "prew_date"; } if ($user["group_texts_fam"] == 'j' and process_text($marriageDb->fam_marr_notice_text)) { if ($temp_text) { //$temp_text.= ', '; //if($temp) { $templ_relation[$temp].=", "; } $temp_text .= ' '; if ($temp) { $templ_relation[$temp] .= " "; } } $temp_text .= process_text($marriageDb->fam_marr_notice_text); $templ_relation["prew_text"] = process_text($marriageDb->fam_marr_notice_text); $temp = "prew_text"; } // *** Married notice source *** $source = show_sources2("family", "fam_marr_notice_source", $marriageDb->fam_gedcomnumber); if ($source) { if ($screen_mode == 'PDF') { $templ_relation["prew_source"] = $source; $temp = "pre_source"; } else { $temp_text .= $source; } } if ($temp_text) { $marriage_check = true; $addition = __(' to: '); if ($text != '') { $text .= "<br>\n"; $templ_relation["prew_exist"] = "\n"; } $text .= '<b>' . __('Marriage notice') . '</b> ' . $temp_text; if (isset($templ_relation["prew_exist"])) { $templ_relation["prew_exist"] .= __('Marriage notice') . ' '; } else { $templ_relation["prew_exist"] = __('Marriage notice') . ' '; } } // *** Marriage *** $temp_text = ''; $temp = ''; if ($marriageDb->fam_marr_date or $marriageDb->fam_marr_place) { $templ_relation["wedd_date"] = date_place($marriageDb->fam_marr_date, $marriageDb->fam_marr_place); $temp = "wedd_date"; $temp_text .= $templ_relation["wedd_date"]; } if ($marriageDb->fam_marr_authority) { $templ_relation["wedd_authority"] = " [" . $marriageDb->fam_marr_authority . "]"; $temp = "wedd_authority"; $temp_text .= $templ_relation["wedd_authority"]; } if ($user["group_texts_fam"] == 'j' and process_text($marriageDb->fam_marr_text)) { if ($temp_text) { //$temp_text.= ', '; //if($temp) { $templ_relation[$temp].=", "; } $temp_text .= ' '; if ($temp) { $templ_relation[$temp] .= " "; } } $templ_relation["wedd_text"] = process_text($marriageDb->fam_marr_text); $temp = "wedd_text"; $temp_text .= $templ_relation["wedd_text"]; } // *** Aldfaer/ HuMo-gen: show witnesses *** if ($marriageDb->fam_gedcomnumber) { $temp_text2 = witness($marriageDb->fam_gedcomnumber, 'marriage_witness', 'family'); if ($temp_text2) { $temp_text .= ' (' . __('marriage witness') . ' ' . $temp_text2 . ')'; if ($temp) { $templ_relation[$temp] .= " ("; } $templ_relation["wedd_witn"] = __('marriage witness') . ' ' . $temp_text2 . ')'; $temp = "wedd_witn"; } } // *** Marriage source *** $source = show_sources2("family", "fam_marr_source", $marriageDb->fam_gedcomnumber); if ($source) { if ($screen_mode == 'PDF') { $templ_relation["wedd_source"] = $source; $temp = "wedd_source"; } else { $temp_text .= $source; } } if ($temp_text) { $marriage_check = true; $addition = __(' to: '); if ($text != '') { $text .= "<br>\n"; $templ_relation["wedd_exist"] = "\n"; } $text .= '<b>' . __('Married') . '</b> ' . $temp_text; if (isset($templ_relation["wedd_exist"])) { $templ_relation["wedd_exist"] .= __('Married') . ' '; } else { $templ_relation["wedd_exist"] = __('Married') . ' '; } } else { // *** Marriage without further data (date or place) *** if ($marriageDb->fam_kind == 'civil') { $marriage_check = true; $addition = __(' to: '); $text .= '<b>' . __('Married') . '</b>'; $templ_relation["wedd_exist"] = __('Married'); } } // *** Married church notice *** $temp_text = ''; $temp = ''; if ($marriageDb->fam_marr_church_notice_date or $marriageDb->fam_marr_church_notice_place) { $templ_relation["prec_date"] = date_place($marriageDb->fam_marr_church_notice_date, $marriageDb->fam_marr_church_notice_place); $temp = "prec_date"; $temp_text .= $templ_relation["prec_date"]; } if ($user["group_texts_fam"] == 'j' and process_text($marriageDb->fam_marr_church_notice_text)) { if ($temp_text) { //$temp_text.= ', '; //if($temp) { $templ_relation[$temp].=", "; } $temp_text .= ' '; if ($temp) { $templ_relation[$temp] .= " "; } } $templ_relation["prec_text"] = process_text($marriageDb->fam_marr_church_notice_text); $temp = "prec_text"; $temp_text .= $templ_relation["prec_text"]; } // *** Married church notice source *** $source = show_sources2("family", "fam_marr_church_notice_source", $marriageDb->fam_gedcomnumber); if ($source) { if ($screen_mode == 'PDF') { $templ_relation["prec_source"] = $source; $temp = "prec_source"; } else { $temp_text .= $source; } } if ($temp_text) { $marriage_check = true; $addition = __(' to: '); if ($text != '') { $text .= "<br>\n"; $templ_relation["prec_exist"] = "\n"; } $text .= '<b>' . __('Married notice (religious)') . '</b> ' . $temp_text; if (isset($templ_relation["prec_exist"])) { $templ_relation["prec_exist"] .= __('Married notice (religious)') . ' '; } else { $templ_relation["prec_exist"] = __('Married notice (religious)') . ' '; } } // *** Married church *** $temp_text = ''; $temp = ''; if ($marriageDb->fam_marr_church_date or $marriageDb->fam_marr_church_place) { $templ_relation["chur_date"] = date_place($marriageDb->fam_marr_church_date, $marriageDb->fam_marr_church_place); $temp = "chur_date"; $temp_text .= $templ_relation["chur_date"]; } if ($user["group_texts_fam"] == 'j' and process_text($marriageDb->fam_marr_church_text)) { if ($temp_text) { //$temp_text.= ', '; //if($temp) { $templ_relation[$temp].=", "; } $temp_text .= ' '; if ($temp) { $templ_relation[$temp] .= " "; } } $templ_relation["chur_text"] = process_text($marriageDb->fam_marr_church_text); $temp = "chur_text"; $temp_text .= $templ_relation["chur_text"]; } // *** Aldfaer/ HuMo-gen show witnesses *** if ($marriageDb->fam_gedcomnumber) { $temp_text2 = witness($marriageDb->fam_gedcomnumber, 'marriage_witness_rel', 'family'); if ($temp_text2) { $temp_text .= ' (' . __('marriage witness (religious)') . ' ' . $temp_text2 . ')'; if ($temp) { $templ_relation[$temp] .= " ("; } $templ_relation["chur_witn"] = __('marriage witness (religious)') . ' ' . $temp_text2 . ')'; $temp = "chur_witn"; } } // *** Married church source *** $source = show_sources2("family", "fam_marr_church_source", $marriageDb->fam_gedcomnumber); if ($source) { if ($screen_mode == 'PDF') { $templ_relation["chur_source"] = $source; $temp = "chur_source"; } else { $temp_text .= $source; } } if ($temp_text) { $marriage_check = true; $addition = __(' to: '); if ($text != '') { $text .= "<br>\n"; $templ_relation["chur_exist"] = "\n"; } $text .= '<b>' . __('Married (religious)') . '</b> ' . $temp_text; if (isset($templ_relation["chur_exist"])) { $templ_relation["chur_exist"] .= __('Married (religious)') . ' '; } else { $templ_relation["chur_exist"] = __('Married (religious)') . ' '; } } // *** Religion *** if ($user['group_religion'] == 'j' and $marriageDb->fam_religion) { $templ_relation["reli_reli"] = ' (' . __('religion: ') . $marriageDb->fam_religion . ')'; $text .= ' <span class="religion">(' . __('religion: ') . $marriageDb->fam_religion . ')</span>'; } // *** Divorse *** $temp_text = ''; $temp = ''; if ($marriageDb->fam_div_date or $marriageDb->fam_div_place) { $templ_relation["devr_date"] = date_place($marriageDb->fam_div_date, $marriageDb->fam_div_place); $temp = "devr_date"; $temp_text .= $templ_relation["devr_date"]; } if ($marriageDb->fam_div_authority) { $templ_relation["devr_authority"] = " [" . $marriageDb->fam_div_authority . "]"; $temp = "devr_authority"; $temp_text .= $templ_relation["devr_authority"]; } if ($user["group_texts_fam"] == 'j' and $marriageDb->fam_div_text != 'DIVORCE' and process_text($marriageDb->fam_div_text)) { if ($temp_text) { //$temp_text.= ', '; //if($temp) { $templ_relation[$temp].=", "; } $temp_text .= ' '; if ($temp) { $templ_relation[$temp] .= " "; } } $templ_relation["devr_text"] = process_text($marriageDb->fam_div_text); $temp = "devr_text"; $temp_text .= $templ_relation["devr_text"]; } // *** Divorse source *** $source = show_sources2("family", "fam_div_source", $marriageDb->fam_gedcomnumber); if ($source) { if ($screen_mode == 'PDF') { $templ_relation["devr_source"] = $source; $temp = "devr_source"; } else { $temp_text .= $source; } } //if ($temp_text){ // *** div_text "DIVORCE" is used for divorce without further data! *** if ($temp_text or $marriageDb->fam_div_text == 'DIVORCE') { $marriage_check = true; $addition = ' ' . __('from:') . ' '; if ($text != '') { $text .= "<br>\n"; $templ_relation["devr_exist"] = "\n"; } $text .= '<span class="divorse"><b>' . ucfirst(__('divorced')) . '</b> ' . $temp_text . '</span>'; if (isset($templ_relation["devr_exist"])) { $templ_relation["devr_exist"] .= ucfirst(__('divorced')) . ' '; } else { $templ_relation["devr_exist"] = ucfirst(__('divorced')) . ' '; } } // *** No relation data (marriage without date), show standard text *** if ($relation_check == false and $marriage_check == false) { // *** Show standard marriage text *** $templ_relation["unkn_rel"] = __('Marriage/ Related') . ' '; $text .= '<b>' . __('Marriage/ Related') . '</b> '; } else { // *** Years of marriage *** if (($marriageDb->fam_marr_church_date or $marriageDb->fam_marr_date) and $marriageDb->fam_div_text != 'DIVORCE' and !($temp_text and $marriageDb->fam_div_date == '')) { $end_date = ''; // *** Check death date of husband *** @($person_manDb = $db_functions->get_person($marriageDb->fam_man)); if (isset($person_manDb->pers_death_date) and $person_manDb->pers_death_date) { $end_date = $person_manDb->pers_death_date; } // *** Check death date of wife *** @($person_womanDb = $db_functions->get_person($marriageDb->fam_woman)); if (isset($person_womanDb->pers_death_date) and $person_womanDb->pers_death_date) { // *** Check if men died earlier then woman (AT THIS MOMENT ONLY CHECK YEAR) *** if ($end_date and substr($end_date, -4) > substr($person_womanDb->pers_death_date, -4)) { $end_date = $person_womanDb->pers_death_date; } // *** Man still living or no date available *** if ($end_date == '') { $end_date = $person_womanDb->pers_death_date; } } // *** End of marriage by divorse *** if ($marriageDb->fam_div_date) { $end_date = $marriageDb->fam_div_date; } $marr_years = new calculate_year_cls(); $age = $marr_years->calculate_marriage($marriageDb->fam_marr_church_date, $marriageDb->fam_marr_date, $end_date); $text .= $age; // Space and komma in $age //PDF? } } // *** Show media/ pictures *** //$text.=show_media('',$marriageDb); // *** This function can be found in file: show_picture.php! *** $result = show_media('', $marriageDb); // *** This function can be found in file: show_picture.php! *** $text .= $result[0]; //if (isset($templ_person)) // $templ_person = array_merge((array)$templ_person,(array)$result[1]); //else // $templ_person=$result[1]; // *** Show objecs *** // *** Show events *** if ($user['group_event'] == 'j') { if ($marriageDb->fam_gedcomnumber) { $event_qry = $db_functions->get_events_family($marriageDb->fam_gedcomnumber, 'event'); $num_rows = count($event_qry); if ($num_rows > 0) { $text .= '<span class="event">'; } $i = 0; foreach ($event_qry as $eventDb) { $i++; //echo '<br>'.__('Event (family)'); if ($text != '') { $text .= "<br>\n"; } if ($i > 1) { $templ_relation["event" . $i . "_ged"] = "\n"; } // *** Check if NCHI is 0 or higher *** $event_gedcom = $eventDb->event_gedcom; $event_text = $eventDb->event_text; if ($event_gedcom == 'NCHI' and trim($eventDb->event_text) == '0') { $event_gedcom = 'NCHI0'; $event_text = ''; } $text .= '<b>' . language_event($event_gedcom) . '</b>'; if (isset($templ_relation["event" . $i . "_ged"])) { $templ_relation["event" . $i . "_ged"] .= language_event($event_gedcom); } else { $templ_relation["event" . $i . "_ged"] = language_event($event_gedcom); } // *** Show event kind *** if ($eventDb->event_event) { $templ_relation["event" . $i . "_event"] = ' (' . $eventDb->event_event . ')'; $text .= $templ_relation["event" . $i . "_event"]; } if ($eventDb->event_date or $eventDb->event_place) { $templ_relation["event" . $i . "_date"] = ' ' . date_place($eventDb->event_date, $eventDb->event_place); $text .= $templ_relation["event" . $i . "_date"]; } if ($event_text) { $templ_relation["event" . $i . "_text"] = ' ' . process_text($eventDb->event_text); $text .= $templ_relation["event" . $i . "_text"]; } // *** Sources by a family event *** $source = show_sources2("family", "fam_event_source", $eventDb->event_id); if ($source) { if ($screen_mode == 'PDF') { // $templ_relation["event_source"]=show_sources2("family","fam_event_source",$eventDb->event_id); // $temp="fam_event_source"; } else { $text .= $source; } } } if ($num_rows > 0) { $text .= "</span><br>\n"; // if there are events, the word "with" should be on a new line to make the text clearer $templ_relation["event_lastline"] = "\n"; $addition = ltrim($addition); } } } // ********************************** // *** Concacenate marriage texts *** // ********************************** // Process english 1st, 2nd, 3rd and 4th marriage. $relation_number = ''; //if ($number!=''){ if ($presentation == 'short' or $presentation == 'shorter') { if ($number == '1') { $relation_number = __('1st'); } if ($number == '2') { $relation_number = __('2nd'); } if ($number == '3') { $relation_number = __('3rd'); } if ($number > '3') { $relation_number = $number . __('th'); } if ($marriage_check == true) { if ($number) { $relation_number .= ' ' . __('marriage'); // marriage $relation_kind = ''; $addition = __(' to: '); } else { $relation_number .= __('Married '); // Married $relation_kind = ''; $addition = __(' to: '); } } if ($relation_check == true) { if ($number) { $relation_number .= ' ' . __('related'); // relation $relation_kind = ''; $addition = __(' to: '); } else { $relation_number = ucfirst(__('related')) . ' '; // Relation $relation_kind = ''; $addition = __(' to: '); } } if ($relation_check == false and $marriage_check == false) { if ($number) { // *** Other text in 2nd marriage: 2nd marriage Hubertus [Huub] Mons *** if ($presentation == 'shorter') { $relation_number .= ' ' . __('marriage/ relation'); // relation } else { $relation_number .= ' ' . __('marriage/ related'); // relation } $relation_kind = ''; $addition = __(' to: '); } else { $relation_number .= __('Marriage/ Related'); // Relation $relation_kind = ''; $addition = __(' to: '); } } } if ($presentation == 'short' or $presentation == 'shorter') { $text = '<b>' . $relation_number . $relation_kind . '</b>'; $templ_relation = array(); //reset array - don't need it // *** Show divorse if privacy filter is set *** if ($marriageDb->fam_div_date or $marriageDb->fam_div_place or $marriageDb->fam_div_text) { $text .= ' <span class="divorse">(' . __('divorced') . ')</span>'; } // Show end of relation here? // *** No addition in text: 2nd marriage Hubertus [Huub] Mons *** if ($presentation == 'shorter') { $addition = ''; } } else { $text = '<b>' . $relation_number . $relation_kind . '</b>' . $text; } if ($addition) { $text .= '<b>' . $addition . '</b>'; } $templ_relation["relnr_rel"] = $relation_number . $relation_kind; $templ_relation["rel_add"] = $addition; if ($screen_mode != "PDF") { return $text; } else { return $templ_relation; } }