public function testaa_havainnon_poisto()
{
$this->lisaa_testikommentti("<h4>Havainnon poistotesti alkaa</h4>", false);
$this->lisaa_testikommentti("<p>Luodaan poistoa varten uusi havainto.</p>", false);
$henkilo_id = 1;
$lajiluokka_id = $this->lajiluokka_id2;
$vuosi = 2003;
$kk = 6;
$paiva = 12;
$paikka = "Koulun piha";
$kommentti = Havaintotestaus::$havainto_kommentti;
$maa = Maat::$suomi;
$varmuus = Varmuus::$melkoisen_varma;
$this->havainto3 = $this->luo_ja_tallenna_havainto($henkilo_id, $lajiluokka_id, $vuosi, $kk, $paiva, $paikka, $kommentti, $maa, $varmuus);
if ($this->havainto3 !== Havainto::$VIRHE) {
$this->lisaa_testikommentti("Poistettavan luonti onnistui.", false);
// Otetaan id talteen:
$id_poistettava = $this->havainto3->get_id();
$poistettava = $this->havainto3;
$palaute = $poistettava->poista();
if ($palaute === Havainto::$OPERAATIO_ONNISTUI) {
$this->lisaa_testikommentti("Poisto onnistui!", false);
$this->lisaa_testikommentti("Tehdaan viela tarkistus tietokannasta:", false);
// TArkistetaan vielä tietokanta:
$hakutulos = $this->tietokantaolio->tee_WHEREhaku_1(Tietokannan_taulunimet::$bhavainnot, Havainto::$SARAKENIMI_ID, $id_poistettava);
$lkm = $this->tietokantaolio->hae_osumarivien_lkm($hakutulos);
if ($lkm == 0) {
$this->lisaa_testikommentti("OK! Tietokannasta ei\n loytynyt poistettua havaintoa", false);
} else {
$this->lisaa_testikommentti("Virhe! Tietokannasta\n loytyi poistetun id:lla " . $lkm . " havaintoa", true);
}
} else {
$this->lisaa_testikommentti("Poisto epaonnistui! " . $palaute, true);
}
} else {
$this->lisaa_testikommentti("Poistettavan luonti epäonnistui!", true);
}
$this->lisaa_testikommentti("Kokeillaan sitten poistaa olematon\n havainto:", false);
$falskihavainto = new Havainto($this->tietokantaolio, 12345);
$palaute = $falskihavainto->poista();
if ($palaute == Havainto::$OPERAATIO_ONNISTUI) {
$this->lisaa_testikommentti("Virhe: olemattoman poisto onnistui! ", true);
} else {
$this->lisaa_testikommentti("Oikein: olemattoman poistoa ei edes\n yriteta! ", false);
}
$this->lisaa_testikommentti("<h4>Havainnon poistotesti loppui</h4>", false);
}
/**
* Toteuttaa yksittäisen uuden havainnon tallennuksen.
* @return type
*/
public function toteuta_tallenna_uusi()
{
$palauteolio = $this->get_palauteolio();
$omaid = $this->get_parametriolio()->omaid;
$uusi = new Havainto($this->get_tietokantaolio(), Havainto::$MUUTTUJAA_EI_MAARITELTY);
$uusi->set_henkilo_id($this->get_parametriolio()->omaid);
$uusi->set_lajiluokka_id($this->get_parametriolio()->lajiluokka_id_hav);
$uusi->set_paiva($this->get_parametriolio()->paiva_hav);
$uusi->set_kk($this->get_parametriolio()->kk_hav);
$uusi->set_vuosi($this->get_parametriolio()->vuosi_hav);
$uusi->set_paikka($this->get_parametriolio()->paikka_hav);
$uusi->set_kommentti($this->get_parametriolio()->kommentti_hav);
$uusi->set_maa($this->get_parametriolio()->maa_hav);
$uusi->set_varmuus($this->get_parametriolio()->varmuus_hav);
if ($uusi->tallenna_uusi() === Havainto::$OPERAATIO_ONNISTUI) {
$palauteolio->set_ilmoitus(Bongaustekstit::$ilm_havainnon_lisays_ok);
$palauteolio->set_sisalto($this->toteuta_nayta()->get_sisalto());
$palauteolio->set_muokatun_id($uusi->get_id());
// Aktiivisuusmerkintä:
$viimeksi_aktiivi = time();
$aktiivisuuslaji = Aktiivisuus::$HAVAINTO_UUDEN_TALLENNUS;
paivita_aktiivisuus($omaid, $this->get_tietokantaolio(), $viimeksi_aktiivi, $aktiivisuuslaji);
$palauteolio->set_operaatio_onnistui(true);
} else {
$palauteolio->set_operaatio_onnistui(false);
$palaute = Bongaustekstit::$ilm_havainnon_lisays_eiok . Html::luo_br() . $uusi->tulosta_virheilmoitukset();
// Parametriolion kautta saadaan lomakkeeseen palaute myös.
$this->get_parametriolio()->set_tallennuspalaute($palaute);
$palauteolio->set_ilmoitus($palaute);
// Asetetaan valituksi uusi:
$this->valittujen_idt = array($uusi->get_id());
$palauteolio->set_sisalto($this->toteuta_nayta_yksi_uusi_lomake()->get_sisalto());
}
return $palauteolio;
}
/**
* Palauttaa yhden olion tiedot taulukkoriviin pakattuna (tr-elementti).
* Huomaa huolehtia muista taulukkotageista!
* @param \Havainto $hav
* @param int $rivinro Taulukon rivin juokseva nro alkaen yhdestä.
* @param bool $erikoisvarustelu TRUE -> sopii poistovahvistukseen jne.
* @return type
*/
public function luo_taulukkorivi($hav, $rivinro, $erikoisvarustelu)
{
$rivi_class = "";
if ($rivinro % 2 == 0) {
$rivi_class = Bongausasetuksia::$havaintotaulu_parillinenrivi_class;
}
$rivi_id = "havainto" . $hav->get_id();
// Haetaan sitten lajiluokan nimi (kieli saadaan parametrioliosta:
$lj = new Lajiluokka($this->tietokantaolio, $hav->get_lajiluokka_id());
$kuvaus = $lj->hae_kuvaus($this->parametriolio->kieli_id);
if ($kuvaus === Lajiluokka::$MUUTTUJAA_EI_MAARITELTY) {
$nimi = $lj->get_nimi_latina();
} else {
$nimi = $kuvaus->get_nimi();
}
$bongaajan_nimi = hae_henkilon_nimi($hav->get_henkilo_id(), true, $this->tietokantaolio);
//========================== PIkakommentit =========================
// Toiminnot on tässä vaiheessa valintaruutu. Hakasulut pitää lisätä!
$maar_array_valinnat = array(Maarite::name(Bongausasetuksia::$havaintovalinta_id_taulukko_name . "[]"), Maarite::value($hav->get_id()));
$toimintasolu = Html::luo_tablesolu(Html::luo_checkbox($maar_array_valinnat), array());
// Esim. poistovahvistuksessa valinta oletuksena päällä (koska nämä
// on valittu):
if ($erikoisvarustelu) {
Maarite::lisaa_maarite(Maarite::checked(), $maar_array_valinnat);
$toimintasolu = Html::luo_tablesolu(Html::luo_checkbox($maar_array_valinnat), array());
}
//========================== PIkakommentit =========================
$pikakommenttisolu = "";
$kommenttien_lkm = 0;
$on_uusia_pk = false;
$pikakommentit = Pikakommentti::hae_pikakommentit($this->parametriolio->omaid, Pikakommentti::$KOHDE_BONGAUS, $hav->get_id(), $this->tietokantaolio);
// Jos viimeistä katseluaikaa ei ole asetettu, asetetaan 0:
if (!isset($_SESSION['edellinen_uloskirjausaika_sek'])) {
$_SESSION['edellinen_uloskirjausaika_sek'] = 0;
}
// Korostetaan solu, jos uusin on riittävän uusi eikä oma:
if (!empty($pikakommentit)) {
$kommenttien_lkm = sizeof($pikakommentit);
if ($pikakommentit[0]->get_tallennushetki_sek() > $_SESSION['edellinen_uloskirjausaika_sek'] && $pikakommentit[0]->get_henkilo_id() != $this->parametriolio->omaid) {
$on_uusia_pk = true;
}
}
// Taulukon solun muotoilu:
$onclick = Maarite::onclick("hae_pikakommentit", array(Pikakommentti::$KOHDE_BONGAUS, $hav->get_id()));
$pk_class = "";
if ($on_uusia_pk) {
$pk_class = "on_uusia";
}
$pikakommenttisolu = Html::luo_tablesolu(Html::luo_span($kommenttien_lkm, array(Maarite::id("id" . $hav->get_id()))), array(Maarite::classs($pk_class), Maarite::title(Bongaustekstit::$ilm_pikakommentit_nakyviin), Maarite::onclick("hae_pikakommentit", array(Pikakommentti::$KOHDE_BONGAUS, $hav->get_id()))));
//============= PIkakommentit loppu ================================
// Muokataan varmuus- ja maamerkinnät:
// Maa merkitään, ellei Suomi:
if ($hav->get_maa() == Maat::$suomi) {
$maa = "";
} else {
$maa = " (" . Maat::hae_maan_kuvaus($hav->get_maa()) . ")";
}
// Vain epävarmuus näytetään
$varmuus = "";
if ($hav->get_varmuus() == Varmuus::$epavarma) {
$varmuus = " (?)";
}
// Haetaan kuva_id ja koodi:
$kuvaolio = $hav->hae_kuva();
if ($kuvaolio instanceof Kuva) {
$kuvakoodi = $kuvaolio->nayta_pelkka_kuva($this->parametriolio->kuvien_kansio_osoite);
$kuva_id = $kuvaolio->getId();
} else {
$kuvakoodi = "";
$kuva_id = -1;
}
// Mahdollistetaan kuvan näyttö klikkaamalla:
// Kuvaa klikkaamalla saadaan se isoksi:
$klikkaus = "";
// Tyhjä, ellei kuvakoodi ok.
$title = "";
if ($kuvakoodi != "") {
$klikkaus = Maarite::onclick("hae_kuva_ja_tiedot", array($hav->get_lajiluokka_id(), $kuva_id, Kuva::$KUVAT_BONGAUS));
$title = Bongaustekstit::$havtaulkuvan_klikkausohje;
}
return Html::luo_tablerivi(Html::luo_tablesolu($rivinro, array()) . Html::luo_tablesolu($nimi . $varmuus, array(Maarite::classs("huomio"), Maarite::title(Bongauspainikkeet::$HAVAINNOT_NAYTA_LAJIHAVAINNOT_TITLE), Maarite::onclick("hae_lajihavainnot", array($hav->get_lajiluokka_id())))) . Html::luo_tablesolu($hav->hae_pvm(), array()) . Html::luo_tablesolu($hav->get_paikka() . $maa, array()) . Html::luo_tablesolu(Html::luo_table(Html::luo_tablerivi(Html::luo_tablesolu(Html::luo_span($hav->get_kommentti(), array(Maarite::classs(Bongausasetuksia::$havaintokuvakommentti_class))), array(Maarite::classs("rajaton"))) . Html::luo_tablesolu($kuvakoodi, array(Maarite::classs("rajaton"), $klikkaus, Maarite::title($title))), array()), array()), array(Maarite::name(Bongausasetuksia::$havaintotaulukon_kommenttisolun_name_arvo))) . Html::luo_tablesolu($bongaajan_nimi, array(Maarite::classs("huomio"), Maarite::title(Bongauspainikkeet::$HAVAINNOT_NAYTA_HENKILON_HAVAINNOT_TITLE), Maarite::onclick("hae_henkilon_havainnot", array($hav->get_henkilo_id(), $hav->get_lajiluokka_id())))) . $toimintasolu . $pikakommenttisolu, array(Maarite::classs($rivi_class), Maarite::id($rivi_id)));
}
/**
* Tallentaa havainnon ja palauttaa olion, jonka tiedot haettu tietokannasta.
* Virheen sattuessa palauttaa arvon Malliluokkapohja::VIRHE.
* @param <type> $henkilo_id
* @param <type> $lajiluokka_id
* @param <type> $vuosi
* @param <type> $kk
* @param <type> $paiva
* @param <type> $paikka
* @param <type> $kommentti
* @param <type> $maa
* @param <type> $varmuus
*/
public function luo_ja_tallenna_havainto($henkilo_id, $lajiluokka_id, $vuosi, $kk, $paiva, $paikka, $kommentti, $maa, $varmuus)
{
$id = Havainto::$PARAMETRI_EI_KAYTOSSA;
$hav = new Havainto($this->tietokantaolio, $id);
$hav->set_henkilo_id($henkilo_id);
$hav->set_lajiluokka_id($lajiluokka_id);
$hav->set_vuosi($vuosi);
$hav->set_kk($kk);
$hav->set_paiva($paiva);
$hav->set_paikka($paikka);
$hav->set_kommentti($kommentti);
$hav->set_maa($maa);
$hav->set_varmuus($varmuus);
$palaute = $hav->tallenna_uusi();
// Haetaan tiedot:
if ($palaute === Havainto::$OPERAATIO_ONNISTUI) {
return new Havainto($this->tietokantaolio, $hav->get_id());
} else {
// Otetaan virheilmoitukset talteen ja nollataan olio:
$this->lisaa_virheilmoitus($hav->tulosta_virheilmoitukset());
$hav->nollaa_muuttujat();
return Malliluokkapohja::$VIRHE;
}
}
