function loppu($firstpage, $saldovahvistus)
{
global $pdf, $yhtiorow, $kukarow, $sivu, $rectparam, $norm, $pieni, $kieli, $lask, $kala, $bold;
if ($sivu > 1 and $lask > 28 or $sivu == 1 and $lask > 19) {
$sivu++;
$lask = 1;
$firstpage = alku($saldovahvistus);
}
$kala = 270;
//Pankkiyhteystiedot
$pdf->draw_rectangle($kala, 30, $kala - 45, 565, $firstpage, $rectparam);
$pdf->draw_text(40, $kala - 8, t("Pankkiyhteys", $kieli), $firstpage, $pieni);
$pdf->draw_text(40, $kala - 18, $yhtiorow["pankkinimi1"] . " " . $yhtiorow["pankkitili1"], $firstpage, $norm);
$pdf->draw_text(40, $kala - 28, $yhtiorow["pankkinimi2"] . " " . $yhtiorow["pankkitili2"], $firstpage, $norm);
$pdf->draw_text(40, $kala - 38, $yhtiorow["pankkinimi3"] . " " . $yhtiorow["pankkitili3"], $firstpage, $norm);
$pdf->draw_text(230, $kala - 18, empty($yhtiorow["pankkiiban1"]) ? '' : 'IBAN: ' . $yhtiorow["pankkiiban1"], $firstpage, $norm);
$pdf->draw_text(230, $kala - 28, empty($yhtiorow["pankkiiban2"]) ? '' : 'IBAN: ' . $yhtiorow["pankkiiban1"], $firstpage, $norm);
$pdf->draw_text(230, $kala - 38, empty($yhtiorow["pankkiiban3"]) ? '' : 'IBAN: ' . $yhtiorow["pankkiiban1"], $firstpage, $norm);
$pdf->draw_text(430, $kala - 18, empty($yhtiorow["pankkiswift1"]) ? '' : 'SWIFT: ' . $yhtiorow["pankkiswift1"], $firstpage, $norm);
$pdf->draw_text(430, $kala - 28, empty($yhtiorow["pankkiswift2"]) ? '' : 'SWIFT: ' . $yhtiorow["pankkiswift2"], $firstpage, $norm);
$pdf->draw_text(430, $kala - 38, empty($yhtiorow["pankkiswift3"]) ? '' : 'SWIFT: ' . $yhtiorow["pankkiswift3"], $firstpage, $norm);
$kala = 225;
//Alimmat kolme laatikkoa, yhtiötietoja
$pdf->draw_rectangle($kala, 30, $kala - 50, 565, $firstpage, $rectparam);
$pdf->draw_rectangle($kala, 207, $kala - 50, 565, $firstpage, $rectparam);
$pdf->draw_rectangle($kala, 394, $kala - 50, 565, $firstpage, $rectparam);
$pdf->draw_text(40, $kala - 13, $yhtiorow["nimi"], $firstpage, $pieni);
$pdf->draw_text(40, $kala - 23, $yhtiorow["osoite"], $firstpage, $pieni);
$pdf->draw_text(40, $kala - 33, $yhtiorow["postino"] . " " . $yhtiorow["postitp"], $firstpage, $pieni);
$pdf->draw_text(40, $kala - 43, $yhtiorow["maa"], $firstpage, $pieni);
$pdf->draw_text(217, $kala - 13, t("Puhelin", $kieli) . ":", $firstpage, $pieni);
$pdf->draw_text(247, $kala - 13, $yhtiorow["puhelin"], $firstpage, $pieni);
$pdf->draw_text(217, $kala - 23, t("Fax", $kieli) . ":", $firstpage, $pieni);
$pdf->draw_text(247, $kala - 23, $yhtiorow["fax"], $firstpage, $pieni);
$pdf->draw_text(217, $kala - 33, t("Email", $kieli) . ":", $firstpage, $pieni);
$pdf->draw_text(247, $kala - 33, $yhtiorow["email"], $firstpage, $pieni);
$pdf->draw_text(404, $kala - 13, t("Y-tunnus", $kieli) . ":", $firstpage, $pieni);
$pdf->draw_text(444, $kala - 13, $yhtiorow["ytunnus"], $firstpage, $pieni);
$pdf->draw_text(404, $kala - 23, t("Kotipaikka", $kieli) . ":", $firstpage, $pieni);
$pdf->draw_text(444, $kala - 23, $yhtiorow["kotipaikka"], $firstpage, $pieni);
$pdf->draw_text(404, $kala - 33, t("Enn.per.rek", $kieli), $firstpage, $pieni);
$pdf->draw_text(404, $kala - 43, t("Alv.rek", $kieli), $firstpage, $pieni);
$kala = 162;
//Katkoviiva
$y = array();
$y[0] = $y[1] = $kala;
$how_many_lines = 70;
$page_width = $pdf->currentPage['width'];
$margin_width = 30;
$line_and_empty_space_width = ($page_width - $margin_width * 2) / $how_many_lines;
for ($i = $margin_width; $i <= $page_width - $margin_width; $i = $i + $line_and_empty_space_width) {
$x[0] = $i;
$line_width = $line_and_empty_space_width * 0.75;
$x[1] = $i + $line_width;
$pdf->draw_line($x, $y, $firstpage, $rectparam);
}
$pdf->draw_text(30, $kala - 20, t('Saldovahvistus', $kieli), $firstpage, $bold);
$pdf->draw_text(30, $kala - 40, t("Todistamme että %s velka / ennakkomaksu %s %s on", $kieli, $saldovahvistus['asiakas']['nimi'], $yhtiorow['nimi'], date('d.m.Y', strtotime($saldovahvistus['tiliotepvm']))), $firstpage, $bold);
$x[0] = 30;
$x[1] = 230;
$y[0] = $y[1] = $kala - 70;
$pdf->draw_line($x, $y, $firstpage, $rectparam);
$pdf->draw_text(235, $kala - 70, $saldovahvistus['valkoodi'], $firstpage, $bold);
$pdf->draw_text(30, $kala - 90, t('Nimi', $kieli) . ':', $firstpage, $bold);
$y[0] = $y[1] = $kala - 90;
$x[0] = 100;
$x[1] = 320;
$pdf->draw_line($x, $y, $firstpage, $rectparam);
$pdf->draw_text(30, $kala - 110, t('Allekirjoitus', $kieli) . ':', $firstpage, $bold);
$y[0] = $y[1] = $kala - 110;
$x[0] = 100;
$x[1] = 320;
$pdf->draw_line($x, $y, $firstpage, $rectparam);
$pdf->draw_text(30, $kala - 130, t('Puhelin', $kieli) . ':', $firstpage, $bold);
$y[0] = $y[1] = $kala - 130;
$x[0] = 100;
$x[1] = 320;
$pdf->draw_line($x, $y, $firstpage, $rectparam);
}
function rivi($firstpage, $osasto, $try, $tuote, $ryhma, $ale, $alelaji)
{
global $pdf, $kala, $rectparam, $norm, $norm_bold, $pieni;
static $edosasto;
if ($kala < 80) {
$firstpage = alku();
$kala = 760;
}
// Vaihdetaan osastoa
if ($osasto != $edosasto) {
$kala -= 15;
$pdf->draw_text(30, $kala, $osasto, $firstpage, $norm_bold);
$kala -= 25;
}
$edosasto = $osasto;
if ($tuote == " - ") {
$pdf->draw_text(30, $kala, $try, $firstpage, $norm);
} else {
$pdf->draw_text(60, $kala, $tuote, $firstpage, $norm);
}
$pdf->draw_text(310, $kala, sprintf('%10s', $ryhma), $firstpage, $norm);
$pdf->draw_text(420, $kala, sprintf('%10s', sprintf('%.2d', $ale)) . "%", $firstpage, $norm);
if ($yhtiorow['myynnin_alekentat'] > 1 and trim($alelaji) != '') {
$pdf->draw_text(500, $kala, sprintf('%10s', t("Ale") . $alelaji), $firstpage, $norm);
}
$kala -= 15;
}
function generoi_pdf_tiedostot(&$data_array, $params, $kieli)
{
global $pdf, $asiakasrow, $yhtiorow, $sivu, $norm, $pieni, $pvm, $alkuvv, $alkukk, $alkupp, $loppuvv, $loppukk, $loppupp, $kala, $sivu, $lask, $sumkpled, $sumkplva, $sumed, $sumva, $asiakas_numero;
$alkuvv = $params['alkuvv'];
$alkukk = $params['alkukk'];
$alkupp = $params['alkupp'];
$loppuvv = $params['loppuvv'];
$loppukk = $params['loppukk'];
$loppupp = $params['loppupp'];
$pdf_tiedostot = array();
$i = 0;
echo '<br/>' . t('Tehdään pdf tiedostot') . '<br/>';
$bar2 = new ProgressBar();
$bar2->initialize(count($data_array) - 1);
foreach ($data_array as &$data) {
$bar2->increase();
$pdf = new pdffile();
$pdf->set_default('margin-top', 0);
$pdf->set_default('margin-bottom', 0);
$pdf->set_default('margin-left', 0);
$pdf->set_default('margin-right', 0);
// defaultteja layouttiin
$kala = 575;
$lask = 1;
$sivu = 1;
$asiakasrow = $data['asiakasrow'];
// kirjotetaan header
$firstpage = alku("osasto");
$firstpage = rivi_kaikki($firstpage, 'osasto', $data['tilaukset_ilman_try'], $params);
$sumkpled = $data['summat_ilman_try']['sumkpled'];
$sumkplva = $data['summat_ilman_try']['sumkplva'];
$sumed = $data['summat_ilman_try']['sumed'];
$sumva = $data['summat_ilman_try']['sumva'];
// kirjotetaan footer
loppu($firstpage, "dontsend");
// defaultteja layouttiin
$kala = 575;
$lask = 1;
$sivu = 1;
// uus pdf header
$firstpage = alku();
$firstpage = rivi_kaikki($firstpage, '', $data['tilaukset_try']);
$sumkpled = $data['summat_try']['sumkpled'];
$sumkplva = $data['summat_try']['sumkplva'];
$sumed = $data['summat_try']['sumed'];
$sumva = $data['summat_try']['sumva'];
$asiakas_numero = $data['asiakasrow']['asiakasnro'];
// kirjotetaan footer ja palautetaan luodun tiedoston polku
$pdf_tiedostot[] = loppu($firstpage);
$data['tiedosto'] = $pdf_tiedostot[$i];
$i++;
}
return $pdf_tiedostot;
}
if ($tee == 'tarjous') {
$query = "SELECT lasku.tunnus laskutunnus, asiakas.*\n from lasku, asiakas\n where lasku.yhtio = asiakas.yhtio and\n lasku.liitostunnus = asiakas.tunnus and\n lasku.yhtio = '{$kukarow['yhtio']}' and\n lasku.tila = 'B' and\n lasku.liitostunnus = '{$kukarow['oletus_asiakas']}' and\n lasku.alatila = '{$ostoskori}'";
$result = pupe_query($query);
if (mysql_num_rows($result) == 1) {
$laskurow = mysql_fetch_array($result);
$query = "SELECT *, concat(rpad(upper(hyllyalue), 5, '0'),lpad(upper(hyllynro), 5, '0'),lpad(upper(hyllyvali), 5, '0'),lpad(upper(hyllytaso), 5, '0')) sorttauskentta\n FROM tilausrivi\n WHERE otunnus = '{$laskurow['laskutunnus']}'\n and yhtio = '{$kukarow['yhtio']}'\n ORDER BY tunnus";
$result = pupe_query($query);
//kuollaan jos yhtään riviä ei löydy
if (mysql_num_rows($result) == 0) {
echo t("Laskurivejä ei löytynyt");
exit;
}
require_once "tulosta_tarjous.inc";
$sivu = 1;
// aloitellaan laskun teko
$firstpage = alku();
while ($row = mysql_fetch_array($result)) {
rivi($firstpage);
}
loppu($firstpage);
alvierittely($firstpage);
//keksitään uudelle failille joku varmasti uniikki nimi:
list($usec, $sec) = explode(' ', microtime());
mt_srand((double) $sec + (double) $usec * 100000);
$pdffilenimi = "/tmp/tarjous-" . md5(uniqid(mt_rand(), true)) . ".pdf";
//kirjoitetaan pdf faili levylle..
$fh = fopen($pdffilenimi, "w");
if (fwrite($fh, $pdf->generate()) === FALSE) {
die("PDF kirjoitus epäonnistui {$pdffilenimi}");
}
fclose($fh);
$lisavarattu = "";
}
$liitostunnus_query = "SELECT DISTINCT lasku.liitostunnus FROM tilausrivi\n JOIN lasku ON (lasku.yhtio = tilausrivi.yhtio AND lasku.tunnus = tilausrivi.otunnus AND lasku.yhtio_toimipaikka = {$toimrow['tunnus']})\n WHERE tilausrivi.yhtio = '{$yhtiorow['yhtio']}'\n AND tilausrivi.tyyppi = 'L'\n AND tilausrivi.var = 'J'\n AND tilausrivi.keratty = ''\n AND tilausrivi.uusiotunnus = 0\n AND tilausrivi.kpl = 0\n AND tilausrivi.jt {$lisavarattu} > 0";
$liitostunnus_result = pupe_query($liitostunnus_query);
while ($liitostunnus_row = mysql_fetch_array($liitostunnus_result)) {
$asiakasquery = "SELECT nimi, osoite, postino, postitp, maa, ytunnus, email, kieli, tunnus FROM asiakas WHERE yhtio='{$yhtiorow['yhtio']}' AND tunnus={$liitostunnus_row['liitostunnus']}";
$asiakasresult = pupe_query($asiakasquery);
$asiakasrow = mysql_fetch_array($asiakasresult);
if ($asiakasrow["email"] != "") {
$jtquery = "SELECT tilausrivi.nimitys, tilausrivi.otunnus, tilausrivi.tuoteno, tilausrivi.laadittu, tilausrivi.tilkpl\n FROM tilausrivi USE INDEX (yhtio_tyyppi_var_keratty_kerattyaika_uusiotunnus)\n JOIN lasku USE INDEX (PRIMARY) ON (lasku.yhtio = tilausrivi.yhtio and lasku.yhtio_toimipaikka = {$toimrow['tunnus']} and lasku.tunnus = tilausrivi.otunnus and lasku.osatoimitus = '' AND lasku.liitostunnus = '{$asiakasrow['tunnus']}')\n WHERE tilausrivi.yhtio = '{$yhtiorow['yhtio']}'\n AND tilausrivi.tyyppi = 'L'\n AND tilausrivi.var = 'J'\n AND tilausrivi.keratty = ''\n AND tilausrivi.uusiotunnus = 0\n AND tilausrivi.kpl = 0\n AND tilausrivi.jt {$lisavarattu} > 0\n ORDER BY tilausrivi.otunnus";
$jtresult = pupe_query($jtquery);
if (mysql_num_rows($jtresult) > 0) {
require_once '../pdflib/phppdflib.class.php';
require "jt-raportti_pdf.inc";
$pdf = new pdffile();
$pdf->set_default('margin-top', 0);
$pdf->set_default('margin-bottom', 0);
$pdf->set_default('margin-left', 0);
$pdf->set_default('margin-right', 0);
list($page[$sivu], $kalakorkeus) = alku($pdf);
while ($jtrow = mysql_fetch_array($jtresult)) {
list($page[$sivu], $kalakorkeus) = rivi($pdf, $page[$sivu], $kalakorkeus, $jtrow);
}
// echo "$laskuri ";
print_pdf($pdf, 1);
// $laskuri++;
}
}
}
}
}
function rivi($firstpage, $summa, $korko)
{
global $firstpage, $pdf, $yhtiorow, $kukarow, $row, $kala, $sivu, $lask, $rectparam, $norm, $pieni, $lask, $kieli, $karhutunnus, $karhukertanro;
// siirrytäänkö uudelle sivulle?
if ($kala < 153) {
$sivu++;
loppu($firstpage, '', '');
$firstpage = alku();
$lask = 1;
}
// ei anneta negatiivisia korkoja
$row['korko'] = $row['summa'] >= 0 ? $row['korko'] : 0.0;
$pdf->draw_text(30, $kala, $row["laskunro"] . " / " . $row["viite"], $firstpage, $norm);
if (!empty($karhutunnus)) {
$query = "SELECT count(distinct ktunnus) ktun\n FROM karhu_lasku\n JOIN karhukierros ON (karhukierros.tunnus = karhu_lasku.ktunnus AND karhukierros.tyyppi = '')\n WHERE ltunnus = {$row['tunnus']}\n AND ktunnus <= {$karhutunnus}";
$karhukertares = pupe_query($query);
$karhukertarow = mysql_fetch_assoc($karhukertares);
$karhukertanro = $karhukertarow["ktun"];
$query = "SELECT\n max(karhukierros.pvm) as kpvm\n FROM karhu_lasku\n JOIN karhukierros ON (karhukierros.tunnus = karhu_lasku.ktunnus AND karhukierros.tyyppi = '')\n WHERE ltunnus = {$row['tunnus']}\n AND ktunnus < {$karhutunnus}";
$karhukertares = pupe_query($query);
$karhukertarow = mysql_fetch_assoc($karhukertares);
$karhuedpvm = $karhukertarow["kpvm"];
} else {
$karhukertanro = $row["karhuttu"] + 1;
$karhuedpvm = $row["kpvm"];
}
if ($yhtiorow['maksukehotus_kentat'] == 'J' or $yhtiorow['maksukehotus_kentat'] == 'L') {
$pdf->draw_text(130, $kala, tv1dateconv($row["tapvm"]), $firstpage, $norm);
$pdf->draw_text(190, $kala, tv1dateconv($row["erpcm"]), $firstpage, $norm);
$oikpos = $pdf->strlen($row["ika"], $norm);
$pdf->draw_text(270 - $oikpos, $kala, $row["ika"], $firstpage, $norm);
if ($row["valkoodi"] != $yhtiorow["valkoodi"]) {
$oikpos = $pdf->strlen($row["summa_valuutassa"], $norm);
$pdf->draw_text(460 - $oikpos, $kala, $row["summa_valuutassa"], $firstpage, $norm);
} else {
$oikpos = $pdf->strlen($row["summa"], $norm);
$pdf->draw_text(460 - $oikpos, $kala, $row["summa"], $firstpage, $norm);
}
if ($yhtiorow["maksukehotus_kentat"] == "" or $yhtiorow["maksukehotus_kentat"] == "J") {
$pdf->draw_text(295, $kala, tv1dateconv($karhuedpvm), $firstpage, $norm);
$oikpos = $pdf->strlen($karhukertanro, $norm);
$pdf->draw_text(385 - $oikpos, $kala, $karhukertanro, $firstpage, $norm);
}
$oikpos = $pdf->strlen(sprintf('%.2f', $row["korko"]), $norm);
$pdf->draw_text(515 - $oikpos, $kala, $row["korko"], $firstpage, $norm);
$oikpos = $pdf->strlen(sprintf('%.2f', $row["summa"] + $row["korko"]), $norm);
$pdf->draw_text(565 - $oikpos, $kala, sprintf('%.2f', $row["summa"] + $row["korko"]), $firstpage, $norm);
} else {
$pdf->draw_text(180, $kala, tv1dateconv($row["tapvm"]), $firstpage, $norm);
$pdf->draw_text(240, $kala, tv1dateconv($row["erpcm"]), $firstpage, $norm);
$oikpos = $pdf->strlen($row["ika"], $norm);
$pdf->draw_text(338 - $oikpos, $kala, $row["ika"], $firstpage, $norm);
if ($row["valkoodi"] != $yhtiorow["valkoodi"]) {
$oikpos = $pdf->strlen($row["summa_valuutassa"], $norm);
$pdf->draw_text(500 - $oikpos, $kala, $row["summa_valuutassa"] . " " . $row["valkoodi"], $firstpage, $norm);
} else {
$oikpos = $pdf->strlen($row["summa"], $norm);
$pdf->draw_text(500 - $oikpos, $kala, $row["summa"] . " " . $row["valkoodi"], $firstpage, $norm);
}
if ($yhtiorow["maksukehotus_kentat"] == "" or $yhtiorow["maksukehotus_kentat"] == "J") {
$pdf->draw_text(365, $kala, tv1dateconv($karhuedpvm), $firstpage, $norm);
$oikpos = $pdf->strlen($karhukertanro, $norm);
$pdf->draw_text(560 - $oikpos, $kala, $karhukertanro, $firstpage, $norm);
}
}
$kala = $kala - 13;
$lask++;
if ($row["valkoodi"] != $yhtiorow["valkoodi"]) {
$summa += $row["summa_valuutassa"];
} else {
$summa += $row["summa"];
}
$korko += $row["korko"];
$palautus = array("korko" => $korko, "summa" => $summa);
return $palautus;
}
$pdf->draw_text($left - $oikpos2 + $lev, $bottom + 8, $sarakenimi, $firstpage, $b);
$pdf->draw_text($left - $oikpos1 + $lev, $bottom, $kaudet[$i], $firstpage, $b);
$left += $saraklev;
}
}
$bottom -= $rivikork;
}
}
alku();
}
// Kirjoitetaan exceli ja/tai pdf:ä
if (isset($teepdf) and $teepdf == "OK" or isset($teexls) and $teexls == "OK") {
$excelrivi = 1;
foreach ($rivit_px as $sarakkeet_px) {
if (isset($teepdf) and $teepdf == "OK" and $bottom < 20) {
alku();
}
$pi = 0;
foreach ($sarakkeet_px as $arvo) {
if ($pi == 0) {
$sisennys = 10 + (strlen($arvo) - 1) * 3;
if ($sarakkeet_px[1] != "") {
$nimi = $sarakkeet_px[1] . " - " . $sarakkeet_px[2];
} else {
$nimi = $sarakkeet_px[2];
}
if (isset($teexls) and $teexls == "OK") {
$worksheet->writeString($excelrivi, $pi, $nimi, $format_bold);
}
if (isset($teepdf) and $teepdf == "OK") {
$pdf->draw_text($sisennys, $bottom, $nimi, $firstpage, $b);
function loppu($firstpage, $summat)
{
global $pdf, $yhtiorow, $kukarow, $sivu, $rectparam, $norm, $pieni, $kieli, $lask, $kala;
if (count($summat) > 1 and $lask > 35) {
$sivu++;
loppu($firstpage, array());
$firstpage = alku();
$kala = 605;
$lask = 1;
}
//yhteensärivi
$pdf->draw_rectangle(110, 394, 90, 580, $firstpage, $rectparam);
$pdf->draw_rectangle(110, 540, 90, 580, $firstpage, $rectparam);
if (count($summat) > 1) {
$oikpos = $pdf->strlen("----------------", $norm);
$pdf->draw_text(480 - $oikpos, $kala, "----------------", $firstpage, $norm);
$kala = $kala - 13;
}
foreach ($summat as $valuutta => $summa) {
if (count($summat) == 1) {
$pdf->draw_text(404, 92, t("YHTEENSÄ", $kieli) . ":", $firstpage, $norm);
$pdf->draw_text(464, 92, sprintf('%.2f', $summa), $firstpage, $norm);
$pdf->draw_text(550, 92, $valuutta, $firstpage, $norm);
} else {
$pdf->draw_text(300, $kala, $valuutta, $firstpage, $norm);
$summa = sprintf('%.2f', $summa);
$oikpos = $pdf->strlen($summa, $norm);
$pdf->draw_text(480 - $oikpos, $kala, $summa, $firstpage, $norm);
$kala = $kala - 13;
}
}
//Pankkiyhteystiedot
$pdf->draw_rectangle(90, 20, 20, 580, $firstpage, $rectparam);
$pdf->draw_text(30, 82, t("Pankkiyhteys", $kieli), $firstpage, $pieni);
$pdf->draw_text(30, 72, $yhtiorow["pankkiiban1"] . " " . $yhtiorow["pankkiswift1"], $firstpage, $norm);
$pdf->draw_text(217, 72, $yhtiorow["pankkiiban2"] . " " . $yhtiorow["pankkiswift2"], $firstpage, $norm);
$pdf->draw_text(404, 72, $yhtiorow["pankkiiban3"] . " " . $yhtiorow["pankkiswift3"], $firstpage, $norm);
//Alimmat kolme laatikkoa, yhtiötietoja
$pdf->draw_rectangle(70, 20, 20, 580, $firstpage, $rectparam);
$pdf->draw_rectangle(70, 207, 20, 580, $firstpage, $rectparam);
$pdf->draw_rectangle(70, 394, 20, 580, $firstpage, $rectparam);
$pdf->draw_text(30, 55, $yhtiorow["nimi"], $firstpage, $pieni);
$pdf->draw_text(30, 45, $yhtiorow["osoite"], $firstpage, $pieni);
$pdf->draw_text(30, 35, $yhtiorow["postino"] . " " . $yhtiorow["postitp"], $firstpage, $pieni);
$pdf->draw_text(30, 25, $yhtiorow["maa"], $firstpage, $pieni);
$pdf->draw_text(217, 55, t("Puhelin", $kieli) . ":", $firstpage, $pieni);
$pdf->draw_text(252, 55, $yhtiorow["puhelin"], $firstpage, $pieni);
$pdf->draw_text(217, 45, t("Fax", $kieli) . ":", $firstpage, $pieni);
$pdf->draw_text(252, 45, $yhtiorow["fax"], $firstpage, $pieni);
$pdf->draw_text(217, 35, t("Email", $kieli) . ":", $firstpage, $pieni);
$pdf->draw_text(252, 35, $yhtiorow["email"], $firstpage, $pieni);
$pdf->draw_text(404, 55, t("Y-tunnus", $kieli) . ":", $firstpage, $pieni);
$pdf->draw_text(450, 55, $yhtiorow["ytunnus"], $firstpage, $pieni);
$pdf->draw_text(404, 45, t("Kotipaikka", $kieli) . ":", $firstpage, $pieni);
$pdf->draw_text(450, 45, $yhtiorow["kotipaikka"], $firstpage, $pieni);
$pdf->draw_text(404, 35, t("Enn.per.rek", $kieli), $firstpage, $pieni);
$pdf->draw_text(404, 25, t("Alv.rek", $kieli), $firstpage, $pieni);
}
function rivi($firstpage, $summa)
{
global $firstpage, $pdf, $row, $kala, $sivu, $lask, $rectparam, $norm, $pieni, $lask, $kieli, $karhukertanro, $yhtiorow, $kukarow;
if ($lask == 29 and $sivu == 1 or $lask == 37 and $sivu > 1) {
$sivu++;
loppu($firstpage, '');
$firstpage = alku();
$kala = 605;
$lask = 1;
}
$pdf->draw_text(30, $kala, $row["laskunro"] . " / " . $row["viite"], $firstpage, $norm);
$pdf->draw_text(180, $kala, tv1dateconv($row["tapvm"]), $firstpage, $norm);
$pdf->draw_text(240, $kala, tv1dateconv($row["erpcm"]), $firstpage, $norm);
$oikpos = $pdf->strlen($row["ika"], $norm);
$pdf->draw_text(338 - $oikpos, $kala, $row["ika"], $firstpage, $norm);
$pdf->draw_text(365, $kala, tv1dateconv($row["kpvm"]), $firstpage, $norm);
if ($row["valkoodi"] != $yhtiorow["valkoodi"]) {
$oikpos = $pdf->strlen($row["summa_valuutassa"], $norm);
$pdf->draw_text(500 - $oikpos, $kala, $row["summa_valuutassa"] . " " . $row["valkoodi"], $firstpage, $norm);
$summa += $row["summa_valuutassa"];
} else {
$oikpos = $pdf->strlen($row["summa"], $norm);
$pdf->draw_text(500 - $oikpos, $kala, $row["summa"] . " " . $row["valkoodi"], $firstpage, $norm);
$summa += $row["summa"];
}
if ($karhukertanro == "") {
$karhukertanro = $row["karhuttu"] + 1;
}
$oikpos = $pdf->strlen($karhukertanro, $norm);
$pdf->draw_text(560 - $oikpos, $kala, $karhukertanro, $firstpage, $norm);
$kala = $kala - 13;
$lask++;
return $summa;
}
