Ero sivun ”Kuopion kaupunkipyörä/lainaus” versioiden välillä
Siirry navigaatioon
Siirry hakuun
(vaihtoehto hukassa lisätty) |
pEi muokkausyhteenvetoa |
||
| Rivi 1: | Rivi 1: | ||
[[Luokka:Kaupunkipyörä]] | |||
<rcode name="lainaus" label="Tee kirjaus" live=1 showcode=-1 variables=" | <rcode name="lainaus" label="Tee kirjaus" live=1 showcode=-1 variables=" | ||
name:paikka|description:Mihin palautat pyörän?|type:hidden|default:0"> | name:paikka|description:Mihin palautat pyörän?|type:hidden|default:0"> | ||
| Rivi 7: | Rivi 9: | ||
# 4;En palauta vaan otan lainaan|default:4 | # 4;En palauta vaan otan lainaan|default:4 | ||
#"> | #"> | ||
# This is code | # This is code Op_fi5440/lainaus on page [[Kuopion kaupunkipyörä/lainaus]] | ||
# Parameters: | # Parameters: | ||
## paikka: place where the bike was returned: selection (text string) | ## paikka: place where the bike was returned: selection (text string) | ||
| Rivi 22: | Rivi 24: | ||
dat <- data.frame( | dat <- data.frame( | ||
Lainaaja = wiki_username, | Lainaaja = wiki_username, | ||
Puhelinnumero = "", | |||
Sijainti = paikka, | Sijainti = paikka, | ||
Result = as.numeric(Sys.time()) | Result = as.numeric(Sys.time()) | ||
| Rivi 40: | Rivi 43: | ||
oprint(out, include.rownames = FALSE) | oprint(out, include.rownames = FALSE) | ||
cat("Tieto on onnistuneesti tallennettu.\n") | cat("Tieto pyörän nykyisestä sijainnista on onnistuneesti tallennettu.\n") | ||
} | } | ||
</rcode> | </rcode> | ||
Versio 25. toukokuuta 2016 kello 13.56