Ero sivun ”Ympäristöterveydenhuollon toimijat” versioiden välillä
Siirry navigaatioon
Siirry hakuun
(ensimmäinen luonnos) |
pEi muokkausyhteenvetoa |
||
(4 välissä olevaa versiota toisen käyttäjän tekemänä ei näytetä) | |||
Rivi 1: | Rivi 1: | ||
[[Luokka:Ympäristöterveydenhuolto]] | [[Luokka:Ympäristöterveydenhuolto]] | ||
[[Luokka:Sisältää R-koodia]] | |||
{{tutkimus|moderator=Jouni}} | {{tutkimus|moderator=Jouni}} | ||
'''Ympäristöterveydenhuollon toimijat''' ovat henkilöitä, yrityksiä tai yhteisöjä, jotka tekevät ympäristöterveydenhuoltoon liittyvää toimintaa tai valvontaa. Tällä sivulla kerätään, päivitetään ja jaetaan tietoja heistä. | '''Ympäristöterveydenhuollon toimijat''' ovat henkilöitä, yrityksiä tai yhteisöjä, jotka tekevät ympäristöterveydenhuoltoon liittyvää toimintaa tai valvontaa. Tällä sivulla kerätään, päivitetään ja jaetaan tietoja heistä. | ||
==Tietojen syöttäminen== | |||
Kaikki ne tiedot päivittyvät, joita ei jätetä tyhjäksi. | |||
(* = Pakollinen tieto) | (* = Pakollinen tieto) | ||
<rcode showcode="-1" label="Tallenna tiedot" variables=" | <rcode showcode="-1" label="Tallenna tiedot" include="page:OpasnetBaseUtils|name:generic" variables=" | ||
name:var1|description:Y-tunnus *|type:text| | name:var1|description:Y-tunnus *|type:text| | ||
name:var2|description:Yrityksen kielikoodi|type:text | name:var2|description:Yrityksen kielikoodi (FI, SE, EN tms.)|type:text| | ||
name:var3|description:Yrityksen tila *|type:selection|options: | name:var3|description:Yrityksen tila *|type:selection|options:NA;Valitse;'vireillä';vireillä;'voimassa';voimassa;'lakannut';lakannut| | ||
name:var4|description:Kotikunta (koodi) *| | name:var4|description:Kotikunta (koodi) *|type:text| | ||
name:var5|description:Yritysmuoto (OY, avoin yhtiö, jne)|type:text| | name:var5|description:Yritysmuoto (OY, avoin yhtiö, jne)|type:text| | ||
name:var6|description:Omistajan tyypi|type:selection|options: | name:var6|description:Omistajan tyypi|type:selection|options:NA;Valitse;'Yksityinen kotimainen';Yksityinen kotimainen;'Valtio';Valtio;'Kunta';Kunta;'Ahvenanmaan maakunta';Ahvenanmaan maakunta;'Ulkomaalainen omistaja';Ulkomaalainen omistaja;'Pörssiyhtiö';Pörssiyhtiö;'Muu omistajatyyppi';Muu omistajatyyppi| | ||
name:var7|description:Toimialaluokitus (Tilastokeskuksen toimialaluokitus 2008)|type:text| | name:var7|description:Toimialaluokitus (Tilastokeskuksen toimialaluokitus 2008)|type:text| | ||
name:var8|description:Nimi *|type:text| | name:var8|description:Nimi *|type:text| | ||
name:var9|description:Nimen kielikoodi *|type:text | name:var9|description:Nimen kielikoodi (FI, SE, EN tms.) *|type:text| | ||
name:var10|description:Nimen tyyppikoodi *|type:selection|options: | name:var10|description:Nimen tyyppikoodi *|type:selection|options:NA;Valitse;'Vanha nimi';Vanha nimi;'Aputoiminimi';Aputoiminimi;'Rinnakkaistoiminimi';Rinnakkaistoiminimi;'Liikenimi';Liikenimi;'Rinnakkaistoiminimen aputoiminimi';Rinnakkaistoiminimen aputoiminimi;'Päätoiminimi';Päätoiminimi;'Perustettava yritys (sulautuminen)';Perustettava yritys (sulautuminen)| | ||
name:var11|description:Osoitteen tyyppi *|type:selection|options: | name:var11|description:Osoitteen tyyppi *|type:selection|options:NA;Valitse;'postiosoite';postiosoite;'käyntiosoite';käyntiosoite;'varmistamaton käyntiosoite';varmistamaton käyntiosoite;'varmistamaton postiosoite';varmistamaton postiosoite;'varmistamaton laskutusosoite';varmistamaton laskutusosoite| | ||
name:var12|description:Nimen täydenne (c/o tms.)|type:text| | name:var12|description:Nimen täydenne (c/o tms.)|type:text| | ||
name:var13|description:Osoite *|type:text| | name:var13|description:Osoite *|type:text| | ||
Rivi 24: | Rivi 29: | ||
name:var17|description:Osoitteen alkupvm|type:text| | name:var17|description:Osoitteen alkupvm|type:text| | ||
name:var18|description:Osoitteen loppupvm|type:text| | name:var18|description:Osoitteen loppupvm|type:text| | ||
name:var19|description:Puhelinnumeron tyyppi *|type:selection|options: | name:var19|description:Puhelinnumeron tyyppi *|type:selection|options:NA;Valitse;'puhelin';puhelin;'faksi';faksi;'YTJ:n puhelin';YTJ:n puhelin;'YTJ:n faksi';YTJ:n faksi| | ||
name:var20|description:Puhelinnumero *|type:text| | name:var20|description:Puhelinnumero *|type:text| | ||
name:var21|description:Lisätieto|type:text| | name:var21|description:Lisätieto|type:text| | ||
Rivi 32: | Rivi 37: | ||
library(OpasnetBaseUtils) | library(OpasnetBaseUtils) | ||
library(xtable) | library(xtable) | ||
if(var1 == "") { | |||
cat("Y-tunnus on annettava koska se toimii tunnisteena.\n") | |||
} else { | |||
data <- data.frame( | |||
Tyyppi = "Yritys", | |||
Tunniste = var1, | |||
Ominaisuus = c("Yrityksen kielikoodi", "Yrityksen tila", "Kotikunta", "Yritysmuoto", "Omistajan tyyppi", | |||
"Tomialaluokitus", "Nimi", "Nimen kielikoodi", "Nimen tyyppikoodi", "Osoitteen tyyppi", "Nimen täydenne", | |||
"Osoite", "Postinumero", "Maa", "Ulkomainen postinumero", "Osoitteen alkupvm", "Osoitteen loppupvm", | |||
"Puhelinnumeron tyyppi", "Puhelinnumero", "Lisätieto", "www-osoite", "Sähköposti" | |||
), | |||
Result = c(var2, var3, var4, var5, var6, var7, var8, var9, var10, var11, var12, var13, var14, var15, var16, var17, | |||
var18, var19, var20, var21, var22, var23 | |||
) | |||
) | |||
data <- data[!data$Result %in% c("", NA), ] | |||
if(nrow(data) > 0) { | |||
opbase.upload(dsn = "opasnet_base_write", input = data, ident = "Op_fi2950", acttype = 5, who = wiki_username, unit = "-") | |||
cat("Nämä tiedot on onnistuneesti tallennettu. Jos haluat muuttaa tietoja, tallenna lomake uudestaan.\n") | |||
print(xtable(data), type = 'html') | |||
} else { | |||
cat("Mitään muutetavaa ei ollut.\n") | |||
} | |||
} | |||
cat("Tässä ovat yrityksen nykyiset tiedot tietokannasta.\n") | |||
nykytiedot <- op_baseGetData("opasnet_base", "Op_fi2950") | |||
nykytiedot <- tidy(nykytiedot) | |||
nykytiedot <- nykytiedot[nykytiedot$Tunniste == var1, ] | |||
nykytiedot <- nykytiedot[!duplicated(nykytiedot[, "Ominaisuus"], fromLast = TRUE), ] | |||
print(xtable(nykytiedot), type = 'html') | |||
</rcode> | |||
==Yksittäisen toimijan tietojen hakeminen== | |||
'''Tällä voit hakea tietoja tietokannasta. | |||
<rcode showcode="-1" label="Hae tiedot" include="page:OpasnetBaseUtils|name:generic" | |||
variables="name:var1|description:Y-tunnus *|type:text"> | |||
library(OpasnetBaseUtils) | |||
library(xtable) | |||
cat("Tässä ovat yrityksen nykyiset tiedot tietokannasta.\n") | |||
) | nykytiedot <- op_baseGetData("opasnet_base", "Op_fi2950") | ||
nykytiedot <- tidy(nykytiedot) | |||
nykytiedot <- nykytiedot[nykytiedot$Tunniste == var1, ] | |||
nykytiedot <- nykytiedot[!duplicated(nykytiedot[, "Ominaisuus"], fromLast = TRUE), ] | |||
print(xtable(nykytiedot), type = 'html') | |||
</rcode> | |||
==Usean toimijan tietojen hakeminen== | |||
'''Tällä voit hakea useita toimijatietoja tietokannasta kerralla. | |||
<rcode showcode="-1" label="Hae tiedot" include="page:OpasnetBaseUtils|name:generic"> | |||
library(OpasnetBaseUtils) | |||
library(xtable) | |||
cat("Tässä ovat paikkojen nykyiset tiedot tietokannasta.\n") | |||
nykytiedot <- op_baseGetData("opasnet_base", "Op_fi2950") | |||
nykytiedot <- tidy(nykytiedot) | |||
nykytiedot <- nykytiedot[!duplicated(nykytiedot[, c("Ominaisuus", "Tunniste")], fromLast = TRUE), ] | |||
print(xtable(nykytiedot), type = 'html', html.table.attributes = "class='sortable'") | |||
</rcode> | </rcode> | ||
<br/> | |||
{{tuloslinkki}} |
Nykyinen versio 22. elokuuta 2013 kello 10.14
Tämä sivu on tutkimus.
Sivutunniste: Op_fi2950 |
---|
Moderaattori:Jouni (katso kaikki)
Sivun edistymistä ei ole arvioitu. Arvostuksen määrää ei ole arvioitu (ks. peer review). |
Lisää dataa
|
Ympäristöterveydenhuollon toimijat ovat henkilöitä, yrityksiä tai yhteisöjä, jotka tekevät ympäristöterveydenhuoltoon liittyvää toimintaa tai valvontaa. Tällä sivulla kerätään, päivitetään ja jaetaan tietoja heistä.
Tietojen syöttäminen
Kaikki ne tiedot päivittyvät, joita ei jätetä tyhjäksi.
(* = Pakollinen tieto)
Yksittäisen toimijan tietojen hakeminen
Tällä voit hakea tietoja tietokannasta.
Usean toimijan tietojen hakeminen
Tällä voit hakea useita toimijatietoja tietokannasta kerralla.
{{#opasnet_base_link:Op_fi2950}}