<?php

/*

Tehty ja validoitu käyttäen speksejä:

URL: http://www.iso20022.org/catalogue_of_unifi_messages.page

Msg ID: pain.001.001.02

Message Name: CustomerCreditTransferInitiationV02

*/

function sepa_header() {

}

function sepa_paymentinfo($laskurow) {

}

function sepa_credittransfer($laskurow, $popvm_nyt, $netotetut_rivit = '') {

}

if (isset($_POST["tee"])) {

if ($_POST["tee"] == 'lataa_tiedosto') $lataa_tiedosto = 1;

if ($_POST["kaunisnimi"] != '') $_POST["kaunisnimi"] = str_replace("/", "", $_POST["kaunisnimi"]);

}

require "inc/parametrit.inc";

require "inc/pankkiyhteys_functions.inc";

$tee = empty($tee) ? '' : $tee;

// Onko maksuaineistoille annettu salasanat.php:ssä oma polku jonne tallennetaan

if ($tee == "KIRJOITAKOPIO") {

$pankkitiedostot_polku = "/tmp";

}

elseif (!empty($maksuaineiston_siirto[$kukarow["yhtio"]]["local_dir"])) {

$pankkitiedostot_polku = trim($maksuaineiston_siirto[$kukarow["yhtio"]]["local_dir"]);

}

elseif (!empty($pankkitiedostot_polku) != "") {

$pankkitiedostot_polku = trim($pankkitiedostot_polku);

}

else {

$pankkitiedostot_polku = $pupe_root_polku."/dataout";

}

// Varmistetaan, että loppuu kauttaviivaan

$pankkitiedostot_polku = rtrim($pankkitiedostot_polku, '/').'/';

if ($tee == "lataa_tiedosto") {

if (isset($pankkifilenimi)) {

readfile($pankkitiedostot_polku.basename($pankkifilenimi));

}

elseif (isset($tmpfilenimi)) {

readfile("/tmp/".basename($tmpfilenimi));

}

exit;

}

echo "<font class='head'>".t("SEPA-maksuaineisto")."</font><hr>";

if (!is_writable($pankkitiedostot_polku)) {

virhe("Pankkitiedostopolku virheellinen!");

$tee = "";

}

// Pankkiyhteys oikeellisuustarkastukset

if ($tee == "laheta_pankkiin") {

if (empty($salasana)) {

virhe("Salasana täytyy antaa!");

$tee = "virhe";

}

elseif (!hae_pankkiyhteys_ja_pura_salaus($pankkiyhteys_tunnus, $salasana)) {

virhe("Antamasi salasana on väärä!");

$tee = "virhe";

}

if (empty($pankkiyhteys_tunnus)) {

virhe("Pankkiyhteystunnus katosi!");

$tee = "virhe";

}

$pankkiyhteys_tiedosto_full = "{$pankkitiedostot_polku}{$pankkiyhteys_tiedosto}";

if (!is_readable($pankkiyhteys_tiedosto_full)) {

virhe("Maksuaineisto ei ole luettavissa!");

$tee = "virhe";

}

}

// Pankkiyhteys tiedoston lähetys

if ($tee == "laheta_pankkiin") {

$_xml = file_get_contents($pankkiyhteys_tiedosto_full);

$_data = base64_encode($_xml);

$params = array(

"pankkiyhteys_tunnus" => $pankkiyhteys_tunnus,

"pankkiyhteys_salasana" => $salasana,

"file_type" => "NDCORPAYS",

"maksuaineisto" => $_data,

);

$vastaus = sepa_upload_file($params);

if ($vastaus) {

viesti("Maksuaineisto lähetetty, vastaus pankista:");

echo "<br/>";

echo "<table>";

echo "<tbody>";

foreach ($vastaus as $key => $value) {

echo "<tr>";

echo "<td>{$key}</td>";

echo "<td>{$value}</td>";

echo "</tr>";

}

echo "</tbody>";

echo "</table>";

echo "<br/><br/>";

// Nollataan tämä, niin ei näytetä lähetyskäyttöliittymää uudestaan!

$pankkiyhteys_tiedosto = "";

}

$tee = "";

}

$pankkitili_tunnus = empty($pankkitili_tunnus) ? 0 : (int) $pankkitili_tunnus;

// Jos halutaan tiedosto per pankki per päivä

if ($yhtiorow["pankkitiedostot"] == "E") {

echo "<font class='error'>";

echo t("SEPA-aineston voi luoda ainoastaan per pankki tai kaikki pankit yhteen tiedostoon.");

echo "<br>";

echo t("Tarkista pankkitiedostot -yhtiön parametrti.");

echo "</font>";

$tee = "virhe";

}

if ($tee == "KIRJOITAKOPIO") {

$lisa = " and lasku.tunnus in ($poimitut_laskut) ";

}

else {

$lisa = " and lasku.tila = 'P' and lasku.maksaja = '$kukarow[kuka]' ";

}

// Haetaan kaiki SEPA-maat

$sepa_maat_array = tarkista_sepa('', 'K');

$sepamaat = "'".implode("','", $sepa_maat_array)."'";

// Haetaan poimitut maksut (HUOM: sama selecti alempana!!!!)

$haku_query = "SELECT lasku.*,

if(lasku.ultilno_maa != '', lasku.ultilno_maa, lasku.maa) iban_maa,

if((lasku.ultilno_maa != ''

AND lasku.ultilno_maa in ($sepamaat))

OR lasku.maa in ($sepamaat), 'SEPA', '') sepa,

yriti.iban yriti_iban,

yriti.bic yriti_bic,

yriti.asiakastunnus yriti_asiakastunnus,

yriti.tunnus AS yriti_tunnus,

date_format(lasku.popvm, '%d.%m.%y.%H.%i.%s') popvm_dmy

FROM lasku

INNER JOIN valuu ON (valuu.yhtio = lasku.yhtio

AND valuu.nimi = lasku.valkoodi)

INNER JOIN yriti ON (yriti.yhtio = lasku.yhtio

AND yriti.tunnus = lasku.maksu_tili

AND yriti.kaytossa = '')

WHERE lasku.yhtio = '{$kukarow["yhtio"]}'

{$lisa}

ORDER BY maksu_tili, olmapvm, sepa, ultilno";

$result = pupe_query($haku_query);

if ($tee == "") {

$_num = mysql_num_rows($result);

echo "<br>";

echo "<font class='message'>".t("Sinulla on")." {$_num} ".t("laskua poimittuna").".</font>";

echo "<br><br>";

// Jos meillä on pankkiyhteys käytössä, niin pitää hakea pankkitilin tunnus

if (SEPA_PANKKIYHTEYS and $_num > 0) {

$_temp = mysql_fetch_assoc($result);

$pankkitili_tunnus = $_temp['yriti_tunnus'];

mysql_data_seek($result, 0);

}

$virheita = 0;

while ($laskurow = mysql_fetch_assoc($result)) {

// Tehdään oikeellisuustarkastuksia

if (tarkista_iban($laskurow["ultilno"]) != $laskurow["ultilno"] and tarkista_sepa($laskurow["iban_maa"]) !== FALSE) {

echo "<font class='error'>Laskun tilinumero ei ole oikeellinen IBAN tilinumero, laskua ei voida lisätä aineistoon! $laskurow[nimi] ($laskurow[summa] $laskurow[valkoodi]) $laskurow[ultilno]</font><br>";

$virheita++;

continue;

}

elseif (tarkista_bban($laskurow["ultilno"]) === FALSE) {

echo "<font class='error'>Laskun tilinumero ei ole oikeellinen BBAN tilinumero, laskua ei voida lisätä aineistoon! $laskurow[nimi] ($laskurow[summa] $laskurow[valkoodi]) $laskurow[ultilno]</font><br>";

$virheita++;

continue;

}

if ($laskurow["ultilno"] == "") {

echo "<font class='error'>Laskulta puuttuu tilinumero, laskua ei voida lisätä aineistoon! $laskurow[nimi] ($laskurow[summa] $laskurow[valkoodi]) </font><br>";

$virheita++;

continue;

}

if (tarkista_iban($laskurow["yriti_iban"]) == "") {

echo "<font class='error'>Yrityksen pankkitili $laskurow[yriti_iban] ei ole oikeellinen IBAN tilinumero, laskua ei voida lisätä aineistoon! $laskurow[nimi] ($laskurow[summa] $laskurow[valkoodi]) </font><br>";

$virheita++;

continue;

}

if (tarkista_bic($laskurow["yriti_bic"]) === FALSE) {

echo "<font class='error'>Yrityksen pankkitilin $laskurow[yriti_iban] BIC on virheellinen, laskua ei voida lisätä aineistoon! $laskurow[nimi] ($laskurow[summa] $laskurow[valkoodi]) </font><br>";

$virheita++;

continue;

}

if (tarkista_bic($laskurow["swift"]) === FALSE) {

echo "<font class='error'>Laskun BIC ei ole oikeellinen, laskua ei voida lisätä aineistoon! $laskurow[nimi] ($laskurow[summa] $laskurow[valkoodi]) $laskurow[swift]</font><br>";

$virheita++;

continue;

}

if ($laskurow["summa"] == 0) {

echo "<font class='error'>Laskulta puuttuu summa, laskua ei voida lisätä aineistoon! $laskurow[nimi] ($laskurow[summa] $laskurow[valkoodi]) </font><br>";

$virheita++;

continue;

}

}

if (!is_dir($pankkitiedostot_polku) or !is_writable($pankkitiedostot_polku)) {

echo "<font class='error'>".t("Kansioissa ongelmia").": $pankkitiedostot_polku</font><br>";

$virheita++;

}

if (mysql_num_rows($result) > 0 and $virheita == 0) {

echo "<form name = 'valinta' method='post'>";

echo "<input type = 'hidden' name = 'tee' value = 'KIRJOITA'>";

echo "<input type = 'hidden' name = 'pankkitili_tunnus' value = '{$pankkitili_tunnus}'>";

echo "<input type = 'submit' value = '".t("Tee maksuaineistot")."'>";

echo "</form>";

}

}

if ($tee == "KIRJOITA" or $tee == "KIRJOITAKOPIO") {

if (mysql_num_rows($result) > 0) {

$popvm_row = mysql_fetch_assoc($result);

// uniikkia tunnusta varten popvm: aineistokopiolle alkuperäinen ja uudelle aineistolle se joka kirjoitetaan kantaan

if ($tee == "KIRJOITAKOPIO") {

$popvm_nyt = $popvm_row["popvm"];

$popvm_dmy = $popvm_row["popvm_dmy"];

}

else {

$popvm_nyt = date("Y-m-d H:i:s");

$popvm_dmy = date("d.m.y.H.i.s");

}

// Päätetääm maksuaineston tiedostonimi

if (strtoupper($yhtiorow['maa']) == 'EE' and substr($popvm_row['yriti_iban'], 0, 2) == "EE") {

$kaunisnimi = "EESEPA-$kukarow[yhtio]-".$popvm_dmy.".xml";

}

else {

$kaunisnimi = "SEPA-$kukarow[yhtio]-".$popvm_dmy.".xml";

}

$toot = fopen($pankkitiedostot_polku.$kaunisnimi, "w+");

if (!$toot) {

echo t("En saanut tiedostoa auki! Tarkista polku")." $pankkitiedostot_polku$kaunisnimi !";

exit;

}

echo "<br>";

echo "<table>";

echo "<tr>";

echo "<th>".t("Tiedosto")."</th>";

echo "<td>$kaunisnimi</td>";

echo "</tr>";

}

else {

echo "<font class='message'>".t("Sopivia laskuja ei löydy")."</font>";

exit;

}

// Alustetaan muuttujat

$tapahtuma_maara = 0;

$edpvm = "0000-00-00";

$edsepa = "";

$edtili = "";

$netotettava_laskut = array();

$netotettava_summa = array();

// Tarkistetaan ensin mahdolliset netotettavat hyvitykset

$query = "SELECT maksu_tili, ultilno, olmapvm, valkoodi

FROM lasku

WHERE yhtio = '$kukarow[yhtio]'

{$lisa}

AND summa < 0

GROUP BY maksu_tili, ultilno, olmapvm, valkoodi";

$result = pupe_query($query);

while ($laskurow = mysql_fetch_assoc($result)) {

// Etsitään samalle päivälle tarpeeksi veloituksia, haetaan ensin kaikki miinukset, sitten summan mukaan desc

$query = "SELECT lasku.tunnus laskutunnus,

if(lasku.alatila = 'K', summa - kasumma, summa) maksettavasumma

FROM lasku

WHERE yhtio = '$kukarow[yhtio]'

{$lisa}

AND ultilno = '$laskurow[ultilno]'

AND valkoodi = '$laskurow[valkoodi]'

AND maksu_tili = '$laskurow[maksu_tili]'

AND olmapvm = '$laskurow[olmapvm]'

ORDER BY if(summa < 0, 1, 2), summa DESC";

$nettolaskures = pupe_query($query);

// Tällä lasketaan monta laskua tarvitaan mukaan

$nettosumma_yhteensa = 0;

$nettolaskuja_yhteensa = 0;

// Tänne tallennetaan laskujen tunnukset

$nettolaskujen_tunnukset = "";

// Loopataan laskuja läpi, kunnes päästään plussalle

while ($nettolaskurow = mysql_fetch_assoc($nettolaskures)) {

$nettosumma_yhteensa += $nettolaskurow["maksettavasumma"];

$nettolaskujen_tunnukset .= "$nettolaskurow[laskutunnus],";

$nettolaskuja_yhteensa++;

if ($nettosumma_yhteensa > 0) {

break;

}

}

// Vika pilkku pois

$nettolaskujen_tunnukset = substr($nettolaskujen_tunnukset, 0, -1);

if ($nettosumma_yhteensa < 0) {

echo "<tr>";

echo "<th>".t("Virhe")."</th>";

echo "<td><font class='error'>Hyvityslaskujen netotus jää miinukselle! Poimi lisää laskuja tilille $laskurow[valkoodi] $laskurow[ultilno], $laskurow[olmapvm]</font></td>";

echo "</tr>";

echo "</table>";

require "inc/footer.inc";

exit;

}

if ($nettolaskuja_yhteensa > 9) {

echo "<tr>";

echo "<th>".t("Virhe")."</th>";

echo "<td><font class='error'>Hyvityslaskujen netotus koostuu yli yhdeksästä tapahtumasta! SEPA aineisto ei tue näin isoja netotuksia! $laskurow[valkoodi] $laskurow[ultilno], $laskurow[olmapvm]</font></td>";

echo "</tr>";

echo "</table>";

require "inc/footer.inc";

exit;

}

$netotettava_laskut[] = $nettolaskujen_tunnukset;

$netotettava_summa[] = $nettosumma_yhteensa;

}

// SEPA header

sepa_header();

// Tehdään netotetut tapahtumat

foreach ($netotettava_laskut as $i => $tunnukset) {

$query = "SELECT lasku.*, if(lasku.ultilno_maa != '', lasku.ultilno_maa, lasku.maa) iban_maa,

if((lasku.ultilno_maa != ''

AND lasku.ultilno_maa in ($sepamaat))

OR lasku.maa in ($sepamaat), 'SEPA', '') sepa,

yriti.iban yriti_iban, yriti.bic yriti_bic, yriti.asiakastunnus yriti_asiakastunnus

FROM lasku

JOIN yriti ON (yriti.yhtio = lasku.yhtio

AND yriti.tunnus = lasku.maksu_tili

AND yriti.kaytossa = '')

WHERE lasku.yhtio = '$kukarow[yhtio]'

AND lasku.tunnus in ($tunnukset)

LIMIT 1";

$result = pupe_query($query);

$nettorow = mysql_fetch_assoc($result);

// Viesti ei saa olla tyhjä

$nettorow["viesti"] = (trim($nettorow["viesti"]) == "") ? $nettorow["laskunro"] : $nettorow["viesti"];

$nettorow["viesti"] = (trim($nettorow["viesti"]) == "") ? $nettorow["viite"] : $nettorow["viesti"];

$nettorow["viite"] = ''; // Viitenroa ei sallita netotetulla tapahtumalla

$nettorow["alatila"] = ''; // Ei käteisalennusta netotetulla tapahtumalla

$nettorow["summa"] = $netotettava_summa[$i]; // Netotettu summa

sepa_paymentinfo($nettorow);

sepa_credittransfer($nettorow, $popvm_nyt, $tunnukset);

$tapahtuma_maara++;

if ($tee == "KIRJOITA") {

// päivitetään laskut "odottaa suoritusta" tilaan

$query = "UPDATE lasku

SET tila = 'Q',

popvm = '$popvm_nyt'

WHERE yhtio = '$kukarow[yhtio]'

AND tunnus in ($tunnukset)";

$uresult = pupe_query($query);

}

}

$netotetut_laskut = implode(",", $netotettava_laskut);

// Haetaan poimitut maksut POISLUKIEN netotetut

if ($netotetut_laskut != "") {

$lisa .= " and lasku.tunnus not in ($netotetut_laskut) ";

}

// Haetaan poimitut maksut (HUOM: sama selecti ylempänä!!!!)

$haku_query = "SELECT lasku.*,

if(lasku.ultilno_maa != '', lasku.ultilno_maa, lasku.maa) iban_maa,

if((lasku.ultilno_maa != ''

AND lasku.ultilno_maa in ($sepamaat))

OR lasku.maa in ($sepamaat), 'SEPA', '') sepa,

yriti.iban yriti_iban,

yriti.bic yriti_bic,

yriti.asiakastunnus yriti_asiakastunnus,

date_format(lasku.popvm, '%d.%m.%y.%H.%i.%s') popvm_dmy

FROM lasku

INNER JOIN valuu ON (valuu.yhtio = lasku.yhtio

AND valuu.nimi = lasku.valkoodi)

INNER JOIN yriti ON (yriti.yhtio = lasku.yhtio

AND yriti.tunnus = lasku.maksu_tili

AND yriti.kaytossa = '')

WHERE lasku.yhtio = '{$kukarow["yhtio"]}'

{$lisa}

ORDER BY maksu_tili, olmapvm, sepa, ultilno";

$result = pupe_query($haku_query);

while ($laskurow = mysql_fetch_assoc($result)) {

// Jos laskunumero on syötetty, lisätään se viestiin mukaan

if ($laskurow['laskunro'] != 0 and $laskurow['laskunro'] != $laskurow['viesti'] and $yhtiorow['maa'] != 'EE') {

$laskurow['viesti'] = (trim($laskurow['viesti']) == "") ? $laskurow['laskunro'] : $laskurow['viesti']." ".$laskurow['laskunro'];

}

if ($kukarow["yhtio"] == "kiko") {

// Tehdään erät per päivä ja sepa-maksut yhteen ja muut toiseen

if ($edpvm != $laskurow['olmapvm'] or $edsepa != $laskurow['sepa']) {

sepa_paymentinfo($laskurow);

$edpvm = $laskurow['olmapvm'];

$edsepa = $laskurow['sepa'];

}

}

else {

if ($edpvm != $laskurow['olmapvm'] or $edtili != $laskurow['ultilno']) {

sepa_paymentinfo($laskurow);

$edpvm = $laskurow['olmapvm'];

$edtili = $laskurow['ultilno'];

}

}

sepa_credittransfer($laskurow, $popvm_nyt);

$tapahtuma_maara++;

if ($tee == "KIRJOITA") {

// päivitetään lasku "odottaa suoritusta" tilaan

$query = "UPDATE lasku

SET tila = 'Q',

popvm = '$popvm_nyt'

WHERE yhtio = '$kukarow[yhtio]'

AND tunnus = '$laskurow[tunnus]'";

$uresult = pupe_query($query);

}

}

// Lisätään vielä oikea tapahtumien määrä sanoman headeriin

$xml->{"pain.001.001.02"}->GrpHdr->NbOfTxs = $tapahtuma_maara;

/* Tämä blocki piti poistaa, koska rikkoo Samlinkin. Aineistossa ei saa olla mitään jäsentelyä.

// Kirjoitetaaan XML, tehdään tästä jäsennelty aineisto. Tämä toimii paremmin mm OPn kanssa

$dom = new DOMDocument('1.0');

$dom->preserveWhiteSpace = true;

$dom->formatOutput = true;

$dom->loadXML(str_replace(array("\n", "\r"), "", utf8_encode($xml->asXML())));

fwrite($toot, ($dom->saveXML()));

*/

// Kirjoitetaaan XML ja tehdään UTF8 encode

fwrite($toot, str_replace(chr(10), "", utf8_encode($xml->asXML())));

fclose($toot);

// Tehdään vielä tässä vaiheessa XML validointi, vaikka ainesto onkin jo tehty. :(

libxml_use_internal_errors(true);

$xml_virheet = "";

$xml_domdoc = new DomDocument;

$xml_file = $pankkitiedostot_polku.$kaunisnimi;

$xml_schema = "$pupe_root_polku/datain/pain.001.001.02.xsd";

// Tämä tiedosto lähetetään pankkiin!

$pankkiyhteys_tiedosto = $kaunisnimi;

$xml_domdoc->Load($xml_file);

if (!$xml_domdoc->schemaValidate($xml_schema)) {

echo "<font class='message'>SEPA-aineistosta löytyi vielä seuraavat virheet, aineisto saattaa hylkääntyä pankissa!</font><br><br>";

$all_errors = libxml_get_errors();

foreach ($all_errors as $error) {

echo "<font class='info'>$error->message</font><br>";

$xml_virheet .= "$error->message\n";

}

echo "<br>";

// Lähetetään viesti adminille!

mail($yhtiorow['admin_email'], mb_encode_mimeheader($yhtiorow['nimi']." - SEPA Error", "ISO-8859-1", "Q"), $xml_virheet."\n", "From: ".mb_encode_mimeheader($yhtiorow["nimi"], "ISO-8859-1", "Q")." <$yhtiorow[postittaja_email]>\n", "-f $yhtiorow[postittaja_email]");

}

echo "<tr><th>".t("Tallenna aineisto")."</th>";

echo "<form method='post' class='multisubmit'>";

echo "<input type='hidden' name='tee' value='lataa_tiedosto'>";

echo "<input type='hidden' name='kaunisnimi' value='$kaunisnimi'>";

if ($tee == "KIRJOITAKOPIO") {

echo "<input type='hidden' name='tmpfilenimi' value='".basename($kaunisnimi)."'>";

}

else {

echo "<input type='hidden' name='pankkifilenimi' value='$kaunisnimi'>";

}

echo "<td><input type='submit' value='".t("Tallenna")."'></form></td>";

echo "</tr>";

echo "</table>";

// Jos kaikki siirtoon tarvittavat parametrit on kunnossa, siirretään tiedosto!

$y = $kukarow["yhtio"];

if (isset( $maksuaineiston_siirto[$y]["host"],

$maksuaineiston_siirto[$y]["user"],

$maksuaineiston_siirto[$y]["pass"],

$maksuaineiston_siirto[$y]["path"],

$maksuaineiston_siirto[$y]["type"],

$maksuaineiston_siirto[$y]["file"],

$maksuaineiston_siirto[$y]["local_dir"],

$maksuaineiston_siirto[$y]["local_dir_ok"],

$maksuaineiston_siirto[$y]["local_dir_error"])) {

require "maksuaineisto_send.php";

echo "<br><font class='message'>".t("Maksuaineisto siirretty pankkiyhteysohjelmaan").".</font>";

}

}

// Jos meillä on SEPA pankkiyhteys käytössä

if (SEPA_PANKKIYHTEYS and !empty($pankkiyhteys_tiedosto)) {

// Katsotaan, että pankkiyhteys on perustettu

$query = "SELECT pankkiyhteys.tunnus AS pankkiyhteys_tunnus

FROM yriti

INNER JOIN pankkiyhteys ON (pankkiyhteys.yhtio = yriti.yhtio

AND pankkiyhteys.pankki = yriti.bic)

WHERE yriti.yhtio = '{$kukarow["yhtio"]}'

AND yriti.tunnus = {$pankkitili_tunnus}";

$result = pupe_query($query);

// Meillä on pankkiyhteys luotu, tehdään formi lähettämistä varten

if (mysql_num_rows($result) == 1) {

$row = mysql_fetch_assoc($result);

echo "<br><br>";

echo "<font class='message'>";

echo t("Lähetä maksuaineisto pankkiin");

echo "</font>";

echo "<hr>";

echo "<form method='post' action='sepa.php'>";

echo "<input type='hidden' name='tee' value='laheta_pankkiin'/>";

echo "<input type='hidden' name='pankkitili_tunnus' value='{$pankkitili_tunnus}'/>";

echo "<input type='hidden' name='pankkiyhteys_tunnus' value='{$row['pankkiyhteys_tunnus']}'/>";

echo "<input type='hidden' name='pankkiyhteys_tiedosto' value='$pankkiyhteys_tiedosto'/>";

echo "<table>";

echo "<tr>";

echo "<th>" . t("Tiedosto") . "</th>";

echo "<td>{$pankkiyhteys_tiedosto}</td>";

echo "</tr>";

echo "<tr>";

echo "<th><label for='salasana'>" . t("Syötä pankkiyhteyden salasana") . "</label></th>";

echo "<td><input type='password' name='salasana' id='salasana'/></td>";

echo "</tr>";