function alku($saldovahvistus) { global $pdf, $yhtiorow, $kukarow, $kala, $sivu, $norm, $pieni, $kieli, $bold, $sivu_numero_obj_ids; $firstpage = $pdf->new_page("a4"); tulosta_logo_pdf($pdf, $firstpage, ""); $kala = 815; //Otsikko $pdf->draw_text(280, 815, t("Saldovahvistus", $kieli), $firstpage); $sivu_numero_obj_ids[] = $pdf->draw_text(430, $kala, t("Sivu", $kieli) . " " . $sivu . ' / ', $firstpage, $norm); $pdf->draw_text(30, $kala - 65, $saldovahvistus['asiakas']["nimi"], $firstpage, $bold); $pdf->draw_text(30, $kala - 75, $saldovahvistus['asiakas']["nimitark"], $firstpage, $bold); $pdf->draw_text(30, $kala - 85, $saldovahvistus['asiakas']["osoite"], $firstpage, $bold); $pdf->draw_text(30, $kala - 95, $saldovahvistus['asiakas']["postino"] . " " . $saldovahvistus['asiakas']["postitp"], $firstpage, $bold); $pdf->draw_text(30, $kala - 105, $saldovahvistus['asiakas']["maa"], $firstpage, $bold); $kala = 710; if (!empty($saldovahvistus['paaasiakas'])) { $_chk = $saldovahvistus['asiakas']['tunnus'] != $saldovahvistus['paaasiakas']['tunnus']; if ($_chk) { $kala -= 10; $pdf->draw_text(30, $kala - 10, $saldovahvistus['paaasiakas']["nimi"], $firstpage, $bold); $pdf->draw_text(30, $kala - 20, $saldovahvistus['paaasiakas']["nimitark"], $firstpage, $bold); $pdf->draw_text(30, $kala - 30, $saldovahvistus['paaasiakas']["osoite"], $firstpage, $bold); $pdf->draw_text(30, $kala - 40, $saldovahvistus['paaasiakas']["postino"] . " " . $saldovahvistus['asiakas']["postitp"], $firstpage, $bold); $pdf->draw_text(30, $kala - 50, $saldovahvistus['paaasiakas']["maa"], $firstpage, $bold); $kala -= 10; } } $kala -= 60; $pdf->draw_text(380, 780, t("Päivämäärä", $kieli) . ': ' . date('d.m.Y'), $firstpage, $norm); //Oikea sarake $pdf->draw_text(380, 760, t("Laatija", $kieli) . ':', $firstpage, $norm); $pdf->draw_text(440, 760, $kukarow["nimi"], $firstpage, $norm); $pdf->draw_text(380, 750, t("Puhelin", $kieli) . ':', $firstpage, $norm); $pdf->draw_text(440, 750, $kukarow["puhno"], $firstpage, $norm); $pdf->draw_text(380, 740, t("Fax", $kieli) . ':', $firstpage, $norm); $pdf->draw_text(440, 740, $yhtiorow['fax'], $firstpage, $norm); $pdf->draw_text(380, 730, t("Sähköposti", $kieli) . ':', $firstpage, $norm); $pdf->draw_text(440, 730, $kukarow["eposti"], $firstpage, $norm); if ($pdf->currentPage['number'] == 0) { $string = t('Ilmoitamme että avoin saldo ', $kieli) . " " . date('d.m.Y', strtotime($saldovahvistus['tiliotepvm'])) . " " . t('on', $kieli) . ' ' . $saldovahvistus['avoin_saldo_summa'] . ' ' . $saldovahvistus['valkoodi']; $pdf->draw_text(30, $kala, $string, $firstpage, $norm); // tehdään riveistä max 90 merkkiä $viesti = wordwrap($saldovahvistus['saldovahvistus_viesti']['selitetark'], 120, "\n"); $i = 0; $rivit = array(); $rivit = explode("\n", $viesti); $kala -= 10; foreach ($rivit as $rivi) { // laitetaan $pdf->draw_text(30, $kala, $rivi, $firstpage, $norm); // seuraava rivi tulee 10 pistettä alemmas kuin tämä rivi $kala -= 10; $i++; } //Rivit alkaa täsä kohtaa $object_keys = array_keys($pdf->objects); $kala = $pdf->objects[max($object_keys)]['bottom'] - 20; } else { $kala = 650; } return $firstpage; }
function alku($viesti = null, $karhukierros_tunnus = '') { global $pdf, $asiakastiedot, $yhteyshenkilo, $yhteyshenkiloteksti, $yhtiorow, $kukarow, $kala, $sivu, $rectparam, $norm, $pieni, $boldi, $kaatosumma, $kieli, $_POST, $iso; $firstpage = $pdf->new_page("a4"); if ($yhteyshenkilo == "") { $yhteyshenkilo = $kukarow["tunnus"]; } //Haetaan yhteyshenkilon tiedot $apuqu = "SELECT *\n from kuka\n where yhtio='{$kukarow['yhtio']}' and tunnus='{$yhteyshenkilo}'"; $yres = pupe_query($apuqu); $yrow = mysql_fetch_assoc($yres); //Otsikko $pdf->draw_text(310, 815, t("Maksukehotus", $kieli), $firstpage, $iso); $pdf->draw_text(430, 815, t("Sivu", $kieli) . " " . $sivu, $firstpage, $norm); tulosta_logo_pdf($pdf, $firstpage, ""); if (isset($_POST['ekirje_laheta']) === false) { //Vasen sarake //$pdf->draw_rectangle(737, 20, 674, 300, $firstpage, $rectparam); $pdf->draw_text(50, 729, t("Laskutusosoite", $kieli), $firstpage, $pieni); if ($asiakastiedot["laskutus_nimi"] != "" and ($asiakastiedot["maksukehotuksen_osoitetiedot"] == "B" or $yhtiorow["maksukehotuksen_osoitetiedot"] == "K" and $asiakastiedot["maksukehotuksen_osoitetiedot"] == "")) { $pdf->draw_text(50, 717, $asiakastiedot["laskutus_nimi"], $firstpage, $norm); $pdf->draw_text(50, 707, $asiakastiedot["laskutus_nimitark"], $firstpage, $norm); $pdf->draw_text(50, 697, $asiakastiedot["laskutus_osoite"], $firstpage, $norm); $pdf->draw_text(50, 687, $asiakastiedot["laskutus_postino"] . " " . $asiakastiedot["laskutus_postitp"], $firstpage, $norm); $pdf->draw_text(50, 677, $asiakastiedot["laskutus_maa"], $firstpage, $norm); } else { $pdf->draw_text(50, 717, $asiakastiedot["nimi"], $firstpage, $norm); $pdf->draw_text(50, 707, $asiakastiedot["nimitark"], $firstpage, $norm); $pdf->draw_text(50, 697, $asiakastiedot["osoite"], $firstpage, $norm); $pdf->draw_text(50, 687, $asiakastiedot["postino"] . " " . $asiakastiedot["postitp"], $firstpage, $norm); $pdf->draw_text(50, 677, $asiakastiedot["maa"], $firstpage, $norm); } } else { // lähettäjä $iiso = array('height' => 11, 'font' => 'Times-Roman'); $pdf->draw_text(mm_pt(22), mm_pt(268), strtoupper($yhtiorow["nimi"]), $firstpage, $iiso); $pdf->draw_text(mm_pt(22), mm_pt(264), strtoupper($yhtiorow["nimitark"]), $firstpage, $iiso); $pdf->draw_text(mm_pt(22), mm_pt(260), strtoupper($yhtiorow["osoite"]), $firstpage, $iiso); $pdf->draw_text(mm_pt(22), mm_pt(256), strtoupper($yhtiorow["postino"] . " " . $yhtiorow["postitp"]), $firstpage, $iiso); // vastaanottaja if ($asiakastiedot["laskutus_nimi"] != "" and ($asiakastiedot["maksukehotuksen_osoitetiedot"] == "B" or $yhtiorow["maksukehotuksen_osoitetiedot"] == "K" and $asiakastiedot["maksukehotuksen_osoitetiedot"] == "")) { $pdf->draw_text(mm_pt(22), mm_pt(234), strtoupper($asiakastiedot["laskutus_nimi"]), $firstpage, $iiso); $pdf->draw_text(mm_pt(22), mm_pt(230), strtoupper($asiakastiedot["laskutus_nimitark"]), $firstpage, $iiso); $pdf->draw_text(mm_pt(22), mm_pt(226), strtoupper($asiakastiedot["laskutus_osoite"]), $firstpage, $iiso); $pdf->draw_text(mm_pt(22), mm_pt(222), strtoupper($asiakastiedot["laskutus_postino"] . " " . $asiakastiedot["laskutus_postitp"]), $firstpage, $iiso); // Laitetaan laskutus_maa asiakas_maaksi niin saadaan ilman ehtomuuttujia kyselystä oikea lopputulos. $asiakastiedot['maa'] = $asiakastiedot["laskutus_maa"]; } else { $pdf->draw_text(mm_pt(22), mm_pt(234), strtoupper($asiakastiedot["nimi"]), $firstpage, $iiso); $pdf->draw_text(mm_pt(22), mm_pt(230), strtoupper($asiakastiedot["nimitark"]), $firstpage, $iiso); $pdf->draw_text(mm_pt(22), mm_pt(226), strtoupper($asiakastiedot["osoite"]), $firstpage, $iiso); $pdf->draw_text(mm_pt(22), mm_pt(222), strtoupper($asiakastiedot["postino"] . " " . $asiakastiedot["postitp"]), $firstpage, $iiso); } // jos vastaanottaja on eri maassa kuin yhtio niin lisätään maan nimi if ($yhtiorow['maa'] != $asiakastiedot['maa']) { $query = sprintf("SELECT nimi from maat where koodi='%s' AND ryhma_tunnus = ''", mysql_real_escape_string($asiakastiedot['maa'])); $maa_result = pupe_query($query); $maa_nimi = mysql_fetch_assoc($maa_result); $pdf->draw_text(mm_pt(22), mm_pt(218), $maa_nimi['nimi'], $firstpage, $iiso); } } //Oikea sarake $pdf->draw_rectangle(760, 320, 739, 575, $firstpage, $rectparam); $pdf->draw_rectangle(760, 420, 739, 575, $firstpage, $rectparam); $pdf->draw_text(330, 752, t("Päivämäärä", $kieli), $firstpage, $pieni); if ($karhukierros_tunnus != "") { $query = "SELECT pvm\n FROM karhukierros\n WHERE tunnus = '{$karhukierros_tunnus}'\n LIMIT 1"; $pvm_result = pupe_query($query); $pvm_row = mysql_fetch_assoc($pvm_result); $paiva = substr($pvm_row["pvm"], 8, 2); $kuu = substr($pvm_row["pvm"], 5, 2); $year = substr($pvm_row["pvm"], 0, 4); } else { $pvm_row = array(); $pvm_row["pvm"] = date("Y-m-d"); $paiva = date("j"); $kuu = date("n"); $year = date("Y"); } $pdf->draw_text(330, 742, tv1dateconv($pvm_row["pvm"]), $firstpage, $norm); $pdf->draw_text(430, 752, t("Asiaa hoitaa", $kieli), $firstpage, $pieni); $pdf->draw_text(430, 742, $yrow["nimi"], $firstpage, $norm); $pdf->draw_rectangle(739, 320, 718, 575, $firstpage, $rectparam); $pdf->draw_rectangle(739, 420, 718, 575, $firstpage, $rectparam); $pdf->draw_text(330, 731, t("Eräpäivä", $kieli), $firstpage, $pieni); if ($yhtiorow['karhuerapvm'] > 0) { $seurday = date("d", mktime(0, 0, 0, $kuu, $paiva + $yhtiorow['karhuerapvm'], $year)); $seurmonth = date("m", mktime(0, 0, 0, $kuu, $paiva + $yhtiorow['karhuerapvm'], $year)); $seuryear = date("Y", mktime(0, 0, 0, $kuu, $paiva + $yhtiorow['karhuerapvm'], $year)); $pdf->draw_text(330, 721, tv1dateconv($seuryear . "-" . $seurmonth . "-" . $seurday), $firstpage, $norm); } else { $pdf->draw_text(330, 721, t("HETI", $kieli), $firstpage, $norm); } $pdf->draw_text(430, 731, t("Puhelin", $kieli), $firstpage, $pieni); $pdf->draw_text(430, 721, $yrow["puhno"], $firstpage, $norm); $pdf->draw_rectangle(718, 320, 697, 575, $firstpage, $rectparam); $pdf->draw_rectangle(718, 420, 697, 575, $firstpage, $rectparam); $pdf->draw_text(330, 710, t("Viivästykorko", $kieli), $firstpage, $pieni); $pdf->draw_text(330, 700, $yhtiorow["viivastyskorko"] * 1 . "%", $firstpage, $norm); $pdf->draw_text(430, 710, t("Sähköposti", $kieli), $firstpage, $pieni); $pdf->draw_text(430, 700, $yrow["eposti"], $firstpage, $norm); $pdf->draw_rectangle(697, 320, 676, 575, $firstpage, $rectparam); $pdf->draw_text(330, 689, t("Ytunnus/Asiakasnumero", $kieli), $firstpage, $pieni); $pdf->draw_text(330, 679, $asiakastiedot["ytunnus"], $firstpage, $norm); //Rivit alkaa täsä kohtaa $kala = 540; // lisätään karhuviesti kirjeeseen if ($sivu == 1) { //otsikko if ($yhtiorow['maksukehotus_kentat'] == 'J' or $yhtiorow['maksukehotus_kentat'] == 'L') { $pdf->draw_text(30, $kala + 30, t("Avoimet laskut", $kieli), $firstpage, $bold); } // tehdään riveistä max 90 merkkiä $viesti = wordwrap($viesti, 90, "\n"); $i = 0; $rivit = explode("\n", $viesti); $yhteyshenkiloteksti = t("Yhteyshenkilömme", $kieli) . ": {$yrow['nimi']} / {$yrow['eposti']} / {$yrow['puhno']}"; $rivit[] = ''; $rivit[] = $yhteyshenkiloteksti; foreach ($rivit as $rivi) { // laitetaan $pdf->draw_text(80, $kala, $rivi, $firstpage, $norm); // seuraava rivi tulee 10 pistettä alemmas kuin tämä rivi $kala -= 10; $i++; } } $kala -= 10; //Laskurivien otsikkotiedot //eka rivi $pdf->draw_text(30, $kala, t("Laskun numero", $kieli) . " / " . t("Viite", $kieli), $firstpage, $pieni); if ($yhtiorow['maksukehotus_kentat'] == 'J' or $yhtiorow['maksukehotus_kentat'] == 'L') { //eka rivi lisäkentillä $pdf->draw_text(130, $kala, t("Laskun pvm", $kieli), $firstpage, $pieni); $pdf->draw_text(190, $kala, t("Eräpäivä", $kieli), $firstpage, $pieni); $pdf->draw_text(245, $kala, t("Myöhässä pv", $kieli), $firstpage, $pieni); $pdf->draw_text(410, $kala, t("Laskun summa", $kieli), $firstpage, $pieni); $pdf->draw_text(495, $kala, t("Korko", $kieli), $firstpage, $pieni); $pdf->draw_text(545, $kala, t("Yhteensä", $kieli), $firstpage, $pieni); if ($yhtiorow['maksukehotus_kentat'] == 'J') { $pdf->draw_text(295, $kala, t("Viimeisin muistutuspvm", $kieli), $firstpage, $pieni); $pdf->draw_text(365, $kala, t("Perintäkerta", $kieli), $firstpage, $pieni); } } else { //eka rivi ilman lisäkenttiä $pdf->draw_text(180, $kala, t("Laskun pvm", $kieli), $firstpage, $pieni); $pdf->draw_text(240, $kala, t("Eräpäivä", $kieli), $firstpage, $pieni); $pdf->draw_text(295, $kala, t("Myöhässä pv", $kieli), $firstpage, $pieni); $pdf->draw_text(455, $kala, t("Laskun summa", $kieli), $firstpage, $pieni); if ($yhtiorow["maksukehotus_kentat"] == "") { $pdf->draw_text(360, $kala, t("Viimeisin muistutuspvm", $kieli), $firstpage, $pieni); $pdf->draw_text(525, $kala, t("Perintäkerta", $kieli), $firstpage, $pieni); } } $kala -= 15; //toka rivi if ($kaatosumma != 0 and $sivu == 1) { $pdf->draw_text(30, $kala, t("Kohdistamattomia suorituksia", $kieli), $firstpage, $norm); if ($yhtiorow['maksukehotus_kentat'] == 'J' or $yhtiorow['maksukehotus_kentat'] == 'L') { $oikpos = $pdf->strlen(sprintf("%.2f", $kaatosumma), $norm); $pdf->draw_text(565 - $oikpos, $kala, sprintf("%.2f", $kaatosumma), $firstpage, $norm); } else { $oikpos = $pdf->strlen(sprintf("%.2f", $kaatosumma), $norm); $pdf->draw_text(500 - $oikpos, $kala, sprintf("%.2f", $kaatosumma), $firstpage, $norm); } $kala -= 13; } return $firstpage; }
function alku() { global $pdf, $asiakastiedot, $yhtiorow, $kukarow, $kala, $sivu, $rectparam, $norm, $pieni, $kieli, $tito_pvm, $alatila, $on_tiliote; $firstpage = $pdf->new_page("a4"); tulosta_logo_pdf($pdf, $firstpage, ""); //Otsikko $pdf->draw_text(280, 815, t("TILIOTE", $kieli), $firstpage); $pdf->draw_text(430, 815, t("Sivu", $kieli) . " " . $sivu, $firstpage, $norm); //Vasen sarake $pdf->draw_text(50, 729, t("Laskutusosoite", $kieli), $firstpage, $pieni); if ($asiakastiedot["laskutus_nimi"] != "") { $pdf->draw_text(50, 717, $asiakastiedot["laskutus_nimi"], $firstpage, $norm); $pdf->draw_text(50, 707, $asiakastiedot["laskutus_nimitark"], $firstpage, $norm); $pdf->draw_text(50, 697, $asiakastiedot["laskutus_osoite"], $firstpage, $norm); $pdf->draw_text(50, 687, $asiakastiedot["laskutus_postino"] . " " . $asiakastiedot["laskutus_postitp"], $firstpage, $norm); $pdf->draw_text(50, 677, $asiakastiedot["laskutus_maa"], $firstpage, $norm); } else { $pdf->draw_text(50, 717, $asiakastiedot["nimi"], $firstpage, $norm); $pdf->draw_text(50, 707, $asiakastiedot["nimitark"], $firstpage, $norm); $pdf->draw_text(50, 697, $asiakastiedot["osoite"], $firstpage, $norm); $pdf->draw_text(50, 687, $asiakastiedot["postino"] . " " . $asiakastiedot["postitp"], $firstpage, $norm); $pdf->draw_text(50, 677, $asiakastiedot["maa"], $firstpage, $norm); } if ($alatila == 'T' and $asiakastiedot["laskutus_nimi"] != "") { $pdf->draw_text(50, 655, t("Ostaja", $kieli), $firstpage, $pieni); $pdf->draw_text(50, 643, $asiakastiedot["nimi"], $firstpage, $norm); $pdf->draw_text(50, 633, $asiakastiedot["nimitark"], $firstpage, $norm); $pdf->draw_text(50, 623, $asiakastiedot["osoite"], $firstpage, $norm); $pdf->draw_text(50, 613, $asiakastiedot["postino"] . " " . $asiakastiedot["postitp"], $firstpage, $norm); $pdf->draw_text(50, 603, $asiakastiedot["maa"], $firstpage, $norm); } //Oikea sarake $pdf->draw_rectangle(800, 300, 779, 580, $firstpage, $rectparam); $pdf->draw_rectangle(800, 420, 779, 580, $firstpage, $rectparam); $pdf->draw_text(310, 792, t("Tulostettu", $kieli), $firstpage, $pieni); $pdf->draw_text(310, 782, tv1dateconv(date('Y-m-d')), $firstpage, $norm); $pdf->draw_text(430, 792, t("Asiaa hoitaa", $kieli), $firstpage, $pieni); $pdf->draw_text(430, 782, $kukarow["nimi"], $firstpage, $norm); $pdf->draw_rectangle(779, 300, 758, 580, $firstpage, $rectparam); $pdf->draw_rectangle(779, 420, 758, 580, $firstpage, $rectparam); $pdf->draw_text(310, 771, t("Päivämäärä", $kieli), $firstpage, $pieni); $pdf->draw_text(310, 761, tv1dateconv($tito_pvm), $firstpage, $norm); $pdf->draw_text(430, 771, t("Puhelin", $kieli), $firstpage, $pieni); $pdf->draw_text(430, 761, $kukarow["puhno"], $firstpage, $norm); $pdf->draw_rectangle(758, 300, 737, 580, $firstpage, $rectparam); $pdf->draw_rectangle(758, 420, 737, 580, $firstpage, $rectparam); $pdf->draw_text(310, 750, t("Ytunnus/Asiakasnumero", $kieli), $firstpage, $pieni); $pdf->draw_text(310, 740, $asiakastiedot["ytunnus"], $firstpage, $norm); $pdf->draw_text(430, 750, t("Sähköposti", $kieli), $firstpage, $pieni); $pdf->draw_text(430, 740, $kukarow["eposti"], $firstpage, $norm); //Rivit alkaa täsä kohtaa $kala = ($alatila == 'T' and $asiakastiedot["laskutus_nimi"] != "") ? 570 : 620; //eka rivi $pdf->draw_text(30, $kala, t("Laskunro", $kieli), $firstpage, $pieni); $pdf->draw_text(100, $kala, t("Pvm", $kieli), $firstpage, $pieni); $pdf->draw_text(180, $kala, t("Eräpvm", $kieli), $firstpage, $pieni); $pdf->draw_text(300, $kala, t("Valuutta", $kieli), $firstpage, $pieni); $oikpos = $pdf->strlen(t("Summa", $kieli), $pieni); $pdf->draw_text(400 - $oikpos, $kala, t("Summa", $kieli), $firstpage, $pieni); $oikpos = $pdf->strlen(t("Avoinsumma", $kieli), $pieni); $pdf->draw_text(480 - $oikpos, $kala, t("Avoinsumma", $kieli), $firstpage, $pieni); if ($on_tiliote and $tito_pvm != date('Y-m-d') or !$on_tiliote) { $pdf->draw_text(510, $kala, t("Maksettu", $kieli), $firstpage, $pieni); } $kala -= 15; return $firstpage; }
function alku() { global $yhtiorow, $kukarow, $firstpage, $pdf, $bottom, $kaudet, $kaikkikaudet, $saraklev, $rivikork, $p, $b, $otsikko, $alkukausi, $yhteensasaraklev, $vaslev, $sarakkeet, $ei_yhteensa, $leveysarray; if (count($kaudet) > 5 and $kaikkikaudet == "joo" or count($sarakkeet) > 2) { $firstpage = $pdf->new_page("842x595"); $bottom = "535"; } else { $firstpage = $pdf->new_page("a4"); $bottom = "782"; } unset($data); if ((int) $yhtiorow["lasku_logo"] > 0) { $liite = hae_liite($yhtiorow["lasku_logo"], "Yllapito", "array"); $data = $liite["data"]; $isizelogo[0] = $liite["image_width"]; $isizelogo[1] = $liite["image_height"]; unset($liite); } elseif (file_exists($yhtiorow["lasku_logo"])) { $filename = $yhtiorow["lasku_logo"]; $fh = fopen($filename, "r"); $data = fread($fh, filesize($filename)); fclose($fh); $isizelogo = getimagesize($yhtiorow["lasku_logo"]); } if (isset($data) and $data) { $image = $pdf->jfif_embed($data); if (!$image) { echo t("Logokuvavirhe"); } elseif ($bottom == "535") { tulosta_logo_pdf($pdf, $firstpage, "", 575, 0, 25, 120); } else { tulosta_logo_pdf($pdf, $firstpage, "", 0, 0, 25, 120); } } else { $pdf->draw_text(10, $bottom + 30, $yhtiorow["nimi"], $firstpage); } $pdf->draw_text(200, $bottom + 30, $otsikko, $firstpage); $leveysarray = array(); $left = $vaslev; for ($i = $alkukausi; $i < count($kaudet); $i++) { foreach ($sarakkeet as $sarake) { if (strpos($sarake, "::") !== FALSE) { list($muuarray, $arvo) = explode("::", $sarake); $sarakenimi = $GLOBALS[$muuarray][$arvo]; } else { $sarakenimi = ""; } $oikpos1 = $pdf->strlen($kaudet[$i], $b); $oikpos2 = $pdf->strlen($sarakenimi, $b); if ($oikpos2 > $oikpos1) { $oikpos = $oikpos2; } else { $oikpos = $oikpos1; } if ($i + 1 == count($kaudet) and $ei_yhteensa == "") { $lev = $yhteensasaraklev; } else { $lev = $saraklev; } // Tallentaan sarakkeiden kohdat... $leveysarray[] = $left + $lev; $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; }
function alku($trattakierros_tunnus = '') { global $pdf, $asiakastiedot, $yhteyshenkilo, $yhtiorow, $kukarow, $kala, $sivu, $rectparam, $norm, $pieni, $kaatosumma, $kieli, $iso; $firstpage = $pdf->new_page("a4"); if ($yhteyshenkilo == "") { $yhteyshenkilo = $kukarow["tunnus"]; } //Haetaan yhteyshenkilon tiedot $apuqu = "SELECT *\n from kuka\n where yhtio='{$kukarow['yhtio']}' and tunnus='{$yhteyshenkilo}'"; $yres = pupe_query($apuqu); $yrow = mysql_fetch_assoc($yres); tulosta_logo_pdf($pdf, $firstpage, ""); //Otsikko $pdf->draw_text(310, 815, t("Tratta", $kieli), $firstpage, $iso); $pdf->draw_text(430, 815, t("Sivu", $kieli) . " " . $sivu, $firstpage, $norm); //Vasen sarake //$pdf->draw_rectangle(737, 20, 674, 300, $firstpage, $rectparam); $pdf->draw_text(50, 729, t("Laskutusosoite", $kieli), $firstpage, $pieni); $pdf->draw_text(50, 717, $asiakastiedot["nimi"], $firstpage, $norm); $pdf->draw_text(50, 707, $asiakastiedot["nimitark"], $firstpage, $norm); $pdf->draw_text(50, 697, $asiakastiedot["osoite"], $firstpage, $norm); $pdf->draw_text(50, 687, $asiakastiedot["postino"] . " " . $asiakastiedot["postitp"], $firstpage, $norm); $pdf->draw_text(50, 677, $asiakastiedot["maa"], $firstpage, $norm); $pdf->draw_rectangle(737, 300, 716, 580, $firstpage, $rectparam); $pdf->draw_text(310, 729, t("Ytunnus/Asiakasnumero", $kieli), $firstpage, $pieni); $pdf->draw_text(310, 718, $asiakastiedot["ytunnus"], $firstpage, $norm); //Oikea sarake $pdf->draw_rectangle(800, 300, 779, 580, $firstpage, $rectparam); $pdf->draw_rectangle(800, 420, 779, 580, $firstpage, $rectparam); $pdf->draw_text(310, 792, t("Päivämäärä", $kieli), $firstpage, $pieni); if ($trattakierros_tunnus != "") { $query = "SELECT pvm\n FROM karhukierros\n WHERE tunnus = '{$trattakierros_tunnus}'\n LIMIT 1"; $pvm_result = pupe_query($query); $pvm_row = mysql_fetch_assoc($pvm_result); $paiva = substr($pvm_row["pvm"], 8, 2); $kuu = substr($pvm_row["pvm"], 5, 2); $year = substr($pvm_row["pvm"], 0, 4); } else { $pvm_row = array(); $pvm_row["pvm"] = date("Y-m-d"); $paiva = date("j"); $kuu = date("n"); $year = date("Y"); } $pdf->draw_text(310, 782, tv1dateconv($pvm_row["pvm"]), $firstpage, $norm); $pdf->draw_text(430, 792, t("Asiaa hoitaa", $kieli), $firstpage, $pieni); $pdf->draw_text(430, 782, $yrow["nimi"], $firstpage, $norm); $pdf->draw_rectangle(779, 300, 758, 580, $firstpage, $rectparam); $pdf->draw_rectangle(779, 420, 758, 580, $firstpage, $rectparam); $pdf->draw_text(310, 771, t("Eräpäivä", $kieli), $firstpage, $pieni); $seurday = date("d", mktime(0, 0, 0, $kuu, $paiva + 7, $year)); $seurmonth = date("m", mktime(0, 0, 0, $kuu, $paiva + 7, $year)); $seuryear = date("Y", mktime(0, 0, 0, $kuu, $paiva + 7, $year)); $pdf->draw_text(310, 761, tv1dateconv($seuryear . "-" . $seurmonth . "-" . $seurday), $firstpage, $norm); $pdf->draw_text(430, 771, t("Puhelin", $kieli), $firstpage, $pieni); $pdf->draw_text(430, 761, $yrow["puhno"], $firstpage, $norm); $pdf->draw_rectangle(758, 300, 737, 580, $firstpage, $rectparam); $pdf->draw_rectangle(758, 420, 737, 580, $firstpage, $rectparam); $pdf->draw_text(310, 750, t("Viivästykorko", $kieli), $firstpage, $pieni); $pdf->draw_text(310, 740, $yhtiorow["viivastyskorko"] . "%", $firstpage, $norm); $pdf->draw_text(430, 750, t("Sähköposti", $kieli), $firstpage, $pieni); $pdf->draw_text(430, 740, $yrow["eposti"], $firstpage, $norm); //Rivit alkaa täsä kohtaa $kala = 620; //Laskurivien otsikkotiedot //eka rivi $pdf->draw_text(30, $kala, t("Laskun numero", $kieli) . " / " . t("Viite", $kieli), $firstpage, $pieni); $pdf->draw_text(180, $kala, t("Laskun pvm", $kieli), $firstpage, $pieni); $pdf->draw_text(240, $kala, t("Eräpäivä", $kieli), $firstpage, $pieni); $pdf->draw_text(295, $kala, t("Myöhässä pv", $kieli), $firstpage, $pieni); $pdf->draw_text(360, $kala, t("Viimeisin muistutuspvm", $kieli), $firstpage, $pieni); $pdf->draw_text(455, $kala, t("Laskun summa", $kieli), $firstpage, $pieni); $pdf->draw_text(525, $kala, t("Perintäkerta", $kieli), $firstpage, $pieni); $kala -= 15; //toka rivi if ($kaatosumma != 0 and $sivu == 1) { $pdf->draw_text(30, $kala, t("Kohdistamattomia suorituksia", $kieli), $firstpage, $norm); $oikpos = $pdf->strlen(sprintf("%.2f", $kaatosumma), $norm); $pdf->draw_text(500 - $oikpos, $kala, sprintf("%.2f", $kaatosumma), $firstpage, $norm); $kala -= 13; } return $firstpage; }