Ejemplo n.º 1
0
function Edit($MhswID, $KHSID, $md, $BayarID)
{
    $mhsw = GetFields('mhsw', "KodeID='" . KodeID . "' and MhswID", $MhswID, '*');
    $khs = GetFields('khs', 'KHSID', $KHSID, '*');
    if ($md == 0) {
        $jdl = "Edit Pembayaran";
        $w = GetFields('bayarmhsw', 'BayarMhswID', $BayarID, '*');
    } elseif ($md == 1) {
        $jdl = "Tambah Penarikan";
        $w = array();
        $rekening_def = GetaField('rekening', "Def = 'Y' and NA", 'N', 'RekeningID');
        $w['RekeningID'] = $rekening_def;
        $w['Tanggal'] = date('Y-m-d');
    } else {
        die(ErrorMsg('Error', "Mode edit <b>{$md}</b> tidak dikenali.<br />\r\n    Hubungi Sysadmin untuk informasi lebih lanjut.\r\n    <hr size=1 color=silver />\r\n    <input type=button name='Tutup' value='Tutup' onClick=\"window.close()\" />"));
    }
    // Tampilkan
    BayarScript();
    CheckFormScript('RekeningID,Bank');
    $optrek = GetOption2('rekening', "concat(RekeningID, ' - ', Nama)", 'RekeningID', $w['RekeningID'], "KodeID='" . KodeID . "'", 'RekeningID');
    $optTanggal = GetDateOption($w['Tanggal'], 'Tanggal');
    TampilkanJudul($jdl);
    echo "\r\n  <table class=box cellspacing=1 width=100%>\r\n  <form name='frmBayar' action='../{$_SESSION['mnux']}.tarik.php' method=POST onSubmit=\"return CheckForm(this)\">\r\n  <input type=hidden name='gos' value='Simpan' />\r\n  <input type=hidden name='MhswID' value='{$MhswID}' />\r\n  <input type=hidden name='KHSID' value='{$KHSID}' />\r\n  <input type=hidden name='md' value='{$md}' />\r\n  <input type=hidden name='BayarID' value='{$BayarID}' />\r\n  \r\n  <tr><td class=inp>Ditarik oleh:</td>\r\n      <td class=ul1 colspan=3>\r\n        <font size=+1>{$mhsw['Nama']}</font> <sup>(NIM: {$MhswID})</sup>\r\n      </td>\r\n      </tr>\r\n  <tr><td class=inp>Dari Rekening:</td>\r\n      <td class=ul1><select name='RekeningID'>{$optrek}</select></td>\r\n      <td class=inp>Tgl Setor:</td>\r\n      <td class=ul1>{$optTanggal}</td>\r\n      </tr>\r\n  <tr><td class=inp>Ditarik Dari:</td>\r\n      <td class=ul1><input type=text name='Bank' value='{$w['Bank']}' size=30 maxlength=50 /> <a href='#' onClick=\"javascript:SetCash()\">Set CASH</a><br />\r\n        <sup>Isi dengan `CASH` bila dibayarkan dengan Tunai</sup>\r\n      </td>\r\n      <td class=inp>No. Bukti Tarik:</td>\r\n      <td class=ul1><input type=text name='BuktiSetoran' value='{$w['BuktiSetoran']}'\r\n        size=30 maxlength=50 /><br />\r\n        <sup>Kosongkan jika pembayaran cash</sup>\r\n      </td>\r\n      </tr>\r\n  <tr><td class=inp>Catatan:</td>\r\n      <td class=ul1 colspan=3><input type=text name='Keterangan' value='{$w['Keterangan']}'\r\n        size=90 maxlength=50 />\r\n      </td>\r\n      </tr>\r\n  </table>";
    TampilkanDetailBiaya($MhswID, $mhsw, $khs, $md);
}
Ejemplo n.º 2
0
function Edit($pmbid, $md, $bayar, $bipotmhsw)
{
    $pmb = GetFields('pmb', "KodeID='" . KodeID . "' and PMBID", $pmbid, '*');
    if ($md == 0) {
        $jdl = "Edit Pembayaran";
        $w = GetFields('bayarmhsw', 'BayarMhswID', $bayar, '*');
    } elseif ($md == 1) {
        $jdl = "Tambah Pembayaran";
        $w = array();
    } else {
        die(ErrorMsg('Error', "Mode edit <b>{$md}</b> tidak dikenali.<br />\n    Hubungi Sysadmin untuk informasi lebih lanjut.\n    <hr size=1 color=silver />\n    <input type=button name='Tutup' value='Tutup' onClick=\"window.close()\" />"));
    }
    // Tampilkan
    BayarScript();
    CheckFormScript('RekeningID,Bank');
    $optrek = GetOption2('rekening', "concat(RekeningID, ' - ', Nama)", 'RekeningID', $w['RekeningID'], "KodeID='" . KodeID . "'", 'RekeningID');
    echo "<table class=box cellspacing=1 width=100%>\n  <form name='frmBayar' action='../{$_SESSION['mnux']}.bayar.php' method=POST onSubmit=\"return CheckForm(this)\">\n  <input type=hidden name='gos' value='Simpan' />\n  <input type=hidden name='pmbid' value='{$pmbid}' />\n  <input type=hidden name='md' value='{$md}' />\n  <input type=hidden name='bayar' value='{$bayar}' />\n  <input type=hidden name='bipotmhsw' value='{$bipotmhsw}' />\n  \n  <tr><th class=ttl colspan=2>{$jdl}</th></tr>\n  <tr><td class=inp>Dibayar oleh:</td>\n      <td class=ul1><sup>{$pmbid}</sup> <font size=+1>{$pmb['Nama']}</font></td>\n      </tr>\n  <tr><td class=inp>Ke Rekening:</td>\n      <td class=ul1><select name='RekeningID'>{$optrek}</select></td>\n      </tr>\n  <tr><td class=inp>Dibayar Dari Bank:</td>\n      <td class=ul1><input type=text name='Bank' value='{$w['Bank']}' size=30 maxlength=50 /> <a href='#' onClick=\"javascript:SetCash()\">Set CASH</a><br />\n        Isi dengan `CASH` bila dibayarkan dengan Tunai.\n      </td>\n      </tr>\n  <tr><td class=inp>No. Bukti Setor:</td>\n      <td class=ul1><input type=text name='BuktiSetoran' value='{$w['BuktiSetoran']}'\n        size=30 maxlength=50 /><br />\n        Kosongkan jika pembayaran cash.\n      </td>\n      </tr>\n  <tr><td class=inp>Catatan:</td>\n      <td class=ul1><input type=text name='Keterangan' value='{$w['Keterangan']}'\n        size=30 maxlength=50 />\n      </td>\n      </tr>\n  </table>";
    TampilkanDetailBiaya($pmbid, $pmb, $md);
}
Ejemplo n.º 3
0
$pdf->SetAutoPageBreak(true, 5);
if (empty($MhswID)) {
    $s = "select MhswID from khs where TahunID='{$TahunID}' and KodeID='" . KodeID . "' order by MhswID";
    $r = _query($s);
    while ($w = _fetch_array($r)) {
        $pdf->AddPage();
        HeaderLogo('TAGIHAN ADMINISTRASI', $pdf, 'P');
        BuatHeader($TahunID, $w['MhswID'], $pdf);
        TampilkanDetailBiaya($TahunID, $w['MhswID'], $pdf);
        BuatFooter($TahunID, $w['MhswID'], $pdf);
    }
} else {
    $pdf->AddPage();
    HeaderLogo('TAGIHAN ADMINISTRASI', $pdf, 'P');
    BuatHeader($TahunID, $MhswID, $pdf);
    TampilkanDetailBiaya($TahunID, $MhswID, $pdf);
    BuatFooter($TahunID, $MhswID, $pdf);
}
$pdf->Output();
// *** functions ***
function BuatFooter($TahunID, $MhswID, $p)
{
    $t = 5;
    $p->Ln(2 * $t);
    $identitas = GetFields('identitas', 'Kode', KodeID, '*');
    $arr = array();
    $arr[] = array('', $identitas['Kota'] . ', ' . date('d M Y'));
    $arr[] = array('Mengetahui,', 'Mahasiswa,');
    $arr[] = array('', '');
    $arr[] = array('', '');
    $arr[] = array('', '');
Ejemplo n.º 4
0
$pdf->SetAutoPageBreak(true, 5);
if (empty($PMBID)) {
    $s = "select PMBID from pmb where KodeID='" . KodeID . "' order by PMBID";
    $r = _query($s);
    while ($w = _fetch_array($r)) {
        $pdf->AddPage();
        HeaderLogo('TAGIHAN ADMINISTRASI', $pdf, 'P');
        BuatHeader($w['PMBID'], $pdf);
        TampilkanDetailBiaya($w['PMBID'], $pdf);
        BuatFooter($w['PMBID'], $pdf);
    }
} else {
    $pdf->AddPage();
    HeaderLogo('TAGIHAN ADMINISTRASI', $pdf, 'P');
    BuatHeader($PMBID, $pdf);
    TampilkanDetailBiaya($PMBID, $pdf);
    BuatFooter($PMBID, $pdf);
}
$pdf->Output();
// *** functions ***
function BuatFooter($PMBID, $p)
{
    $t = 5;
    $p->Ln(2 * $t);
    $identitas = GetFields('identitas', 'Kode', KodeID, '*');
    $arr = array();
    $arr[] = array('', $identitas['Kota'] . ', ' . date('d M Y'));
    $arr[] = array('Mengetahui,', 'Mahasiswa,');
    $arr[] = array('', '');
    $arr[] = array('', '');
    $arr[] = array('', '');