PHP GetFields函数代码示例

function BuatFooter($khs, $mhsw, $p)
{
    global $arrID;
    $t = 6;
    // Yang diambil
    $p->Cell(100, $t, "Jumlah SKS yang diambil:", 'LB', 0, 'R');
    $p->Cell(10, $t, $khs['SKS'], 'B', 0, 'C');
    $p->Cell(82, $t, ' ', 'BR', 1);
    // Yang sudah ditempuh
    $jumkrs = GetaField('krs', "MhswID='{$mhsw['MhswID']}' and TahunID < '{$khs['TahunID']}' and Tinggi='*' and KodeID", KodeID, "sum(SKS)");
    $p->Cell(100, $t, "Jumlah SKS yang telah ditempuh:", 'LB', 0, 'R');
    $p->Cell(10, $t, $jumkrs, 'B', 0, 'C');
    $p->Cell(82, $t, ' ', 'BR', 1);
    // Tanda tangan
    $pjbt = GetFields('pejabat', "KodeID='" . KodeID . "' and KodeJabatan", 'PUKET1', "*");
    $p->Ln(4);
    $p->Cell(10);
    $p->Cell(50, $t, $arrID['Kota'] . ", " . date('d M Y'), 0, 1);
    $p->Cell(10);
    $p->Cell(50, $t, "Mengetahui,", 0, 0);
    $p->Cell(60);
    $p->Cell(50, $t, "Mahasiswa,", 0, 1);
    $p->Ln(20);
    $p->Cell(10);
    $p->SetFont('Helvetica', 'B', 9);
    $p->Cell(50, $t, $mhsw['PA'], 0, 0);
    $p->Cell(60);
    $p->SetFont('Helvetica', '', 9);
    $p->Cell(50, $t, ucwords(strtolower($mhsw['Nama'])), 0, 1);
    $p->Cell(10);
    $p->SetFont('Helvetica', 'B', 9);
    $p->Cell(50, $t, 'Penasehat Akademik', 0, 0);
    //$pjbt['Jabatan']
}

function Gagalkan($jdwl)
{
    $id = $_REQUEST['id'];
    $NilaiGagal = $_REQUEST['NilaiGagal'];
    if (empty($NilaiGagal)) {
        echo ErrorMsg("Nilai Belum Diset", "Anda harus mengeset nilai gagal penilaian dosen untuk matakuliah ini.<br>\r\n      Proses Gagal Nilai Dosen tidak dilakukan.");
    } else {
        // Gagalkan jadwal
        $Nilai = GetFields('nilai', 'NilaiID', $NilaiGagal, '*');
        $BobotNilai = $Nilai['Bobot'];
        $GradeNilai = $Nilai['Nama'];
        $CatatanGagal = sqling($_REQUEST['CatatanGagal']);
        $s = "update jadwalremedial set Gagal='Y', Final = 'Y', \r\n      CatatanGagal = '{$CatatanGagal}', NilaiGagal = '{$GradeNilai}'\r\n      where JadwalID = '{$id}' ";
        $r = _query($s);
        // Set semua nilai mahasiswa
        $s1 = "update krsremedial set GradeNilai='{$GradeNilai}', BobotNilai={$BobotNilai}, Final='Y'\r\n      where JadwalRemedialID='{$id}' and NA = 'N' ";
        $r1 = _query($s1);
        // Anggap Remedial sudah beres dan bisa di-remedialkan lagi bila diperlukan lagi nanti
        $s = "select KRSID from krsremedial where JadwalRemedialID='{$JadwalRemedialID}' and KodeID='" . KodeID . "'";
        $r = _query($s);
        while ($w = _fetch_array($r)) {
            $s1 = "update krs set SedangRemedial = 'N' where KRSID='{$w['KRSID']}' and KodeID='" . KodeIID . "'";
            $r1 = _query($s1);
        }
        // Kembali
        TutupScript($id);
    }
}

function KoreksiKelas()
{
    $jid = $_REQUEST['jid'];
    $jdwl = GetFields("jadwal j \r\n    left outer join dosen d on j.DosenID=d.Login\r\n    left outer join hari h on j.HariID=h.HariID", "j.JadwalID", $jid, "j.*, h.Nama as HR, concat(d.Nama, ', ', d.Gelar) as DSN,\r\n    time_format(j.JamMulai, '%H:%i') as JM,\r\n    time_format(j.JamSelesai, '%H:%i') as JS");
    TampilkanHeaderKoreksiKelas($jdwl);
    TampilkanDaftarMhsw($jdwl);
}

function VirtualBipotMhsw($MhswID, $BIPOTID)
{
    // Ambil BIPOT-nya
    $s = "select * \n    from bipot2 \n    where BIPOTID = '{$BIPOTID}'\n      and Otomatis = 'Y'\n      and NA = 'N'\n    order by TrxID, Prioritas";
    $r = _query($s);
    $total = 0;
    $mhsw = GetFields('mhsw', "KodeID='" . KodeID . "' and MhswID", $MhswID, "BIPOTID, GradeNilai, StatusMhswID, StatusAwalID");
    while ($w = _fetch_array($r)) {
        $oke = true;
        // Apakah sesuai dengan status awalnya?
        $pos = strpos($w['StatusAwalID'], "." . $mhsw['StatusAwalID'] . ".");
        $oke = $oke && !($pos === false);
        // Apakah grade-nya?
        if ($oke) {
            if ($w['GunakanGradeNilai'] == 'Y') {
                $pos = strpos($w['GradeNilai'], "." . $mhsw['GradeNilai'] . ".");
                $oke = $oke && !($pos === false);
            }
        }
        // Simpan data
        if ($oke) {
            // Cek apakah memakai script atau tidak?
            if ($w['GunakanScript'] == 'Y') {
                // BipotGunakanScript($pmb, '', $w, $ada, 0);
            } else {
                // Jika tidak ada duplikasi, maka akan di-insert. Tapi jika sudah ada, maka dicuekin aja.
                $total += $w['Jumlah'];
            }
            // end else
        }
        // end if $oke
    }
    // end while
    return $total;
}

function CetakPresensiMhsw($id, $p)
{
    $jdwl = GetFields("jadwal j\r\n    left outer join dosen d on d.Login = j.DosenID and d.KodeID = '" . KodeID . "'\r\n    left outer join prodi prd on prd.ProdiID = j.ProdiID and prd.KodeID = '" . KodeID . "'\r\n    left outer join program prg on prg.ProgramID = j.ProgramID and prg.KodeID = '" . KodeID . "'\r\n    left outer join mk mk on mk.MKID = j.MKID\r\n    left outer join hari huas on huas.HariID = date_format(j.UASTanggal, '%w')\r\n    left outer join jenisjadwal jj on jj.JenisJadwalID = j.JenisJadwalID \r\n\tLEFT OUTER JOIN kelas k ON k.KelasID = j.NamaKelas\r\n\t", "j.JadwalID", $id, "j.*, concat(d.Nama, ', ', d.Gelar) as DSN,\r\n    prd.Nama as _PRD, prg.Nama as _PRG,\r\n    mk.Sesi,\r\n    date_format(j.UASTanggal, '%d-%m-%Y') as _UASTanggal,\r\n    date_format(j.UASTanggal, '%w') as _UASHari,\r\n    huas.Nama as HRUAS,\r\n    LEFT(j.UASJamMulai, 5) as _UASJamMulai, LEFT(j.UASJamSelesai, 5) as _UASJamSelesai,\r\n\tjj.Nama as _NamaJenisJadwal, jj.Tambahan, k.Nama AS namaKelas\r\n    ");
    BuatHeaderDulu($jdwl, $p);
    BuatIsinya($jdwl, $p);
    BuatFooter($jdwl, $p);
}

function SyaratSav()
{
    $md = $_REQUEST['md'] + 0;
    $Nama = sqling($_REQUEST['Nama']);
    $_StatusAwalID = array();
    $_StatusAwalID = $_REQUEST['StatusAwalID'];
    $StatusAwalID = empty($_StatusAwalID) ? '' : "." . implode('.', $_StatusAwalID) . ".";
    $_ProdiID = array();
    $_ProdiID = $_REQUEST['ProdiID'];
    $ProdiID = empty($_ProdiID) ? '' : "." . implode('.', $_ProdiID) . ".";
    $NA = empty($_REQUEST['NA']) ? 'N' : $_REQUEST['NA'];
    if ($md == 0) {
        $s = "update pmbsyarat set ProdiID='{$ProdiID}', StatusAwalID='{$StatusAwalID}', NA='{$NA}'\r\n      where PMBSyaratID='{$_REQUEST['syid']}' and KodeID='{$_SESSION['KodeID']}' ";
        $r = _query($s);
    } else {
        $ada = GetFields('pmbsyarat', "KodeID='{$_SESSION['KodeID']}' and PMBSyaratID", $_REQUEST['syid'], '*');
        if (empty($ada)) {
            $s = "insert into pmbsyarat (PMBSyaratID, KodeID, Nama, StatusAwalID, ProdiID, NA)\r\n        values ('{$_REQUEST['syid']}', '{$_SESSION['KodeID']}', '{$Nama}', '{$StatusAwalID}', '{$ProdiID}', '{$NA}')";
            $r = _query($s);
        } else {
            echo ErrorMsg("Gagal Simpan", "Anda tidak bisa menyimpan syarat dengan ID <b>{$_REQUEST['syid']}</b> karena telah digunakan:\r\n      <p><table class=bsc cellspacing=1 cellpadding=4>\r\n      <tr><td class=ul>ID</td><td class=ul><b>{$ada['PMBSyaratID']}</b></td></tr>\r\n      <tr><td class=ul>Nama</td><td class=ul><b>{$ada['Nama']}</b></td></tr>\r\n      </table></p>");
        }
    }
    DftrSyarat();
}

function cekkss()
{
    $mhswid = $_REQUEST['mhswid'];
    $khsid = $_REQUEST['khsid'];
    $tahun = $_REQUEST['tahun'];
    $khs = GetFields('khs', 'KHSID', $khsid, '*');
    $balance = $khs['Biaya'] - $khs['Bayar'] + $khs['Tarik'] - $khs['Potongan'];
    // cek sudah lunas atau belum
    if ($balance > 0) {
        $acc = GetFields('keusetup', 'NA', 'N', '*');
        $htg = GetaField('bipotmhsw', "MhswID='{$mshwid}' and TahunID='{$tahun}' and BIPOTNamaID", $acc['HutangNext'], "Jumlah*Besar") + 0;
        if ($htg > 0) {
            $Nama = GetaField('bipotnama', 'BIPOTNamaID', $acc['HutangNext'], 'Nama');
            $_htg = number_format($htg);
            echo ErrorMsg("Belum Lunas", "Mahasiswa tidak dapat mencetak KSS karena masih memiliki <b>{$Nama}</b> sebesar <b>{$_htg}</b>");
            CetakKSS();
        } else {
            cetakkssgo();
        }
    } else {
        // cek apakah ada KRS gagal?
        $ggl = GetaField("krs", "NA='Y' and KHSID", $khsid, "count(KRSID)") + 0;
        if ($ggl > 0) {
            echo ErrorMsg("Tidak Dapat Dicetak", "KSS tidak dapat dicetak karena masih ada <b>{$ggl}</b> matakuliah yang gagal KRS.<br />\r\n        Hapus terlebih dahulu matakuliah yg gagal baru kemudian cetak KSS.");
            CetakKSS();
        } else {
            cetakkssgo();
        }
    }
}

function RSSAV()
{
    $md = $_REQUEST['md'] + 0;
    $RSID = $_REQUEST['RSID'];
    $Nama = sqling($_REQUEST['Nama']);
    $Alamat = sqling($_REQUEST['Alamat']);
    $Kota = sqling($_REQUEST['Kota']);
    $KodePos = sqling($_REQUEST['KodePos']);
    $Propinsi = sqling($_REQUEST['Propinsi']);
    $Negara = sqling($_REQUEST['Negara']);
    $Telephone = sqling($_REQUEST['Telephone']);
    $Fax = sqling($_REQUEST['Fax']);
    $Website = sqling($_REQUEST['Website']);
    $Email = sqling($_REQUEST['Email']);
    $Kontak = sqling($_REQUEST['Kontak']);
    $JabatanKontak = sqling($_REQUEST['JabatanKontak']);
    $HandphoneKontak = sqling($_REQUEST['HandphoneKontak']);
    $EmailKontak = sqling($_REQUEST['EmailKontak']);
    $NA = empty($_REQUEST['NA']) ? 'N' : $_REQUEST['NA'];
    if ($md == 0) {
        $s = "update rumahsakit\r\n      set Nama='{$Nama}',\r\n      Alamat='{$Alamat}', Kota='{$Kota}',\r\n      KodePos='{$KodePos}', Propinsi='{$Propinsi}',\r\n      Negara='{$Negara}', Telephone='{$Telephone}', Fax='{$Fax}',\r\n      Website='{$Website}', Email='{$Email}',\r\n      Kontak='{$Kontak}', JabatanKontak='{$JabatanKontak}',\r\n      HandphoneKontak='{$HandphoneKontak}', EmailKontak='{$EmailKontak}',\r\n      NA='{$NA}'\r\n      where RSID='{$RSID}' ";
        $r = _query($s);
        TampilkanDaftarRS();
    } else {
        $ada = GetFields("rumahsakit", "RSID", $RSID, "RSID, Nama");
        if (empty($ada)) {
            $s = "insert into rumahsakit\r\n        (RSID, Nama, Alamat, Kota, KodePos, Propinsi,\r\n        Negara, Telephone, Fax,\r\n        Website, Email,\r\n        Kontak, JabatanKontak,\r\n        HandphoneKontak, EmailKontak, NA)\r\n        values\r\n        ('{$RSID}', '{$Nama}', '{$Alamat}', '{$Kota}', '{$KodePos}', '{$Propinsi}',\r\n        '{$Negara}', '{$Telephone}', '{$Fax}',\r\n        '{$Website}', '{$Email}',\r\n        '{$Kontak}', '{$JabatanKontak}',\r\n        '{$Handphone}', '{$EmailKontak}', '{$NA}')";
            $r = _query($s);
            echo "<script>window.location='?mnux=rumahsakit';</script>";
        } else {
            echo ErrorMsg("Tidak Dapat Disimpan", "Data Rumahsakit tidak dapat disimpan karena Kode: <font size=+1>{$RSID}</font>\r\n      telah digunakan oleh <b>{$ada['Nama']}</b>.<br />\r\n      Gunakan kode lain.\r\n      <hr size=1>\r\n      Pilihan: <a href='?mnux=rumahsakit'>Kembali</a>");
        }
    }
}

function Simpan($md, $id, $bck)
{
    TutupScript();
    $Nama = sqling($_REQUEST['Nama']);
    $p = array();
    $p = $_REQUEST['ProdiID'];
    if (!empty($p)) {
        $ProdiID = implode('.', $p);
        $ProdiID = empty($ProdiID) ? '' : '.' . $ProdiID . '.';
    } else {
        $ProdiID = '';
    }
    $Keterangan = sqling($_REQUEST['Keterangan']);
    $NA = empty($_REQUEST['NA']) ? 'N' : 'Y';
    if ($md == 0) {
        $s = "update pmbsyarat\n      set Nama = '{$Nama}',\n          ProdiID = '{$ProdiID}',\n          Keterangan = '{$Keterangan}',\n          NA = '{$NA}',\n          LoginEdit = '{$_SESSION['_Login']}',\n          TanggalEdit = now()\n      where KodeID = '" . KodeID . "' and PMBSyaratID = '{$id}' ";
        $r = _query($s);
        echo "<script>ttutup('{$_SESSION['mnux']}');</script>";
    } elseif ($md == 1) {
        // Cek ID-nya dulu
        $ada = GetFields('pmbsyarat', "KodeID='" . KodeID . "' and PMBSyaratID", $id, '*');
        if (!empty($ada)) {
            die(ErrorMsg('Error', "Syarat dengan kode <b>{$id}</b> sudah ada.<br />\n        Gunakan kode yang lain.\n        <hr size=1 color=silver />\n        <input type=button name='Tutup' value='Tutup' onClick=\"window.close()\" />"));
        }
        $s = "insert into pmbsyarat\n      (PMBSyaratID, KodeID, Nama, ProdiID,\n      Keterangan, LoginBuat, TanggalBuat, NA)\n      values\n      ('{$id}', '" . KodeID . "', '{$Nama}', '{$ProdiID}',\n      '{$Keterangan}', '{$_SESSION['_Login']}', now(), '{$NA}')";
        $r = _query($s);
        echo "<script>ttutup('{$_SESSION['mnux']}');</script>";
    } else {
        die(ErrorMsg('Error', "Mode edit tidak ditemukan."));
    }
}

function KampSav()
{
    $md = $_REQUEST['md'] + 0;
    $KampusID = $_REQUEST['KampusID'];
    $Nama = sqling($_REQUEST['Nama']);
    $KodeID = $_REQUEST['KodeID'];
    $Alamat = sqling($_REQUEST['Alamat']);
    $Kota = sqling($_REQUEST['Kota']);
    $Telepon = sqling($_REQUEST['Telepon']);
    $Fax = sqling($_REQUEST['Fax']);
    $NA = empty($_REQUEST['NA']) ? 'N' : $_REQUEST['NA'];
    // simpan
    if ($md == 0) {
        $s = "update kampus set Nama='{$Nama}', KodeID='{$KodeID}',\r\n      Alamat='{$Alamat}', Kota='{$Kota}', Telepon='{$Telepon}', Fax='{$Fax}', NA='{$NA}'\r\n      where KampusID='{$KampusID}' ";
        $r = _query($s);
    } else {
        $ada = GetFields('kampus', 'KampusID', $KampusID, '*');
        if (!empty($ada)) {
            echo ErrorMsg("Gagal Simpan", "Kampus dengan kode: <b>{$KampusID}</b> telah ada dengan nama <b>{$ada['Nama']}</b>.<br>\r\n      Gunakan kode kampus lain.");
        } else {
            $s = "insert into kampus (KampusID, Nama, KodeID,\r\n        Alamat, Kota, Telepon, Fax, NA)\r\n        values ('{$KampusID}', '{$Nama}', '{$KodeID}',\r\n        '{$Alamat}', '{$Kota}', '{$Telepon}', '{$Fax}', '{$NA}')";
            $r = _query($s);
        }
    }
    DftrKampus();
}

function PRC()
{
    echo "<body bgcolor=#EEFFFF>";
    $tahun = $_REQUEST['tahun'];
    $prodi = $_REQUEST['prodi'];
    $prid = $_REQUEST['prid'];
    $pss = $_SESSION['THN' . $prodi . 'POS'];
    $mhswid = $_SESSION['THN' . $prodi . $pss];
    // Jika ada data
    if (!empty($mhswid)) {
        echo "<p>#<font size=+2>" . $pss . "</font> &raquo; <b>{$tahun}</b> &raquo; " . $_SESSION['THN' . $prodi . $pss] . "</p><hr>";
        $sdh = GetFields('khs', "MhswID='{$mhswid}' and TahunID", $tahun, "KHSID, MhswID");
        if (empty($sdh)) {
            $def = GetaField('statusmhsw', 'Def', 'Y', 'StatusMhswID');
            $sesi = GetaField('khs', 'MhswID', $w['MhswID'], "max(Sesi)") + 1;
            $mhsw = GetFields('mhsw', "MhswID", $mhswid, "BIPOTID");
            $sp = "insert into khs (TahunID, KodeID, ProgramID, ProdiID,\r\n        MhswID, StatusMhswID, Sesi, BIPOTID,\r\n        LoginBuat, TanggalBuat)\r\n        values ('{$tahun}', '{$_SESSION['KodeID']}', '{$w['ProgramID']}', '{$prodi}',\r\n        '{$mhswid}', '{$def}', '{$sesi}', '{$mhsw['BIPOTID']}',\r\n        '{$_SESSION['_Login']}', now()  )";
            //echo "<pre>$sp</pre>";
            //$rp = _query($sp);
            echo "<p><font color=green>DIPROSES</font></p>";
        } else {
            echo "<p><font color=gray>Sudah pernah diproses</font></p>";
        }
    }
    // refresh page
    if ($_SESSION['THN' . $prodi . 'POS'] < $_SESSION['THN' . $prodi]) {
        echo "<script type='text/javascript'>window.onload=setTimeout('window.location.reload()', 2);</script>";
    } else {
        // update data tahun
        $st = "update tahun set ProsesBuka=ProsesBuka+1\r\n      where TahunID='{$tahun}' and ProgramID='{$prid}' and ProdiID='{$prodi}'";
        $rt = _query($st);
        echo "<p>Proses buka TAHUN akademik <b>{$tahun}</b> sudah <font size=+2>SELESAI</font></p>";
    }
    $_SESSION['THN' . $prodi . 'POS']++;
}

 function Header()
 {
     $mrg = 19;
     $pjg = 150;
     $identitas = GetFields('identitas', "Kode", KodeID, '*');
     $logo = file_exists("../img/logo.jpg") ? "../img/logo.jpg" : "img/logo.jpg";
     //$this->Image($logo, 18, 14, 24);
     //$this->SetFont("Times", '', 11);
     //$this->Cell($mrg);
     //$this->Cell($pjg, 6, $identitas['Yayasan'], 0, 1, 'C');
     $this->SetFont("Times", 'B', 16);
     $this->Cell($mrg);
     $this->Cell($pjg, 7, $identitas['Nama'], 0, 1, 'C');
     $this->SetFont("Times", 'I', 10);
     $this->Cell($mrg);
     $this->Cell($pjg, 5, $identitas['Alamat1'] . ' ' . $identitas['Alamat2'], 0, 1, 'C');
     //$this->Cell($mrg);
     //$this->Cell($pjg, 5, $identitas['Alamat2'], 0, 1, 'C');
     //$this->Cell($pjg, 5, $identitas['Kota'], 0, 1, 'C');
     $this->SetFont("Times", 'I', 7);
     $this->Cell($mrg);
     $this->Cell($pjg, 5, "Telp. " . $identitas['Telepon'] . ", Fax. " . $identitas['Fax'] . ", Website:" . $identitas['Website'] . ", Email:" . $identitas['Email'], 0, 1, 'C');
     $this->Cell(5);
     $this->Cell(180, 0, "", 1, 1);
     $this->Ln(2);
 }

function TampilkanPresensiMhsw($p)
{
    $s = "select pm.*, mhsw.Nama\r\n    from presensimhsw pm\r\n      left outer join mhsw on mhsw.MhswID = pm.MhswID and mhsw.KodeID = '" . KodeID . "'\r\n    where pm.PresensiID = '{$p['PresensiID']}'\r\n    order by pm.MhswID";
    $r = _query($s);
    $def = GetFields('jenispresensi', 'Def', 'Y', '*');
    $opt0 = GetOption2('jenispresensi', "Nama", 'JenisPresensiID', $def['JenisPresensiID'], '', 'JenisPresensiID');
    echo "<table class=box cellspacing=1 width=100%>";
    echo "<script>\r\n  function ttutup() {\r\n    opener.location='../index.php?mnux={$_SESSION['mnux']}&gos=Edit&JadwalID={$p['JadwalID']}';\r\n    self.close();\r\n    return false;\r\n  }\r\n  </script>";
    echo "<tr>\r\n    <form action='../{$_SESSION['mnux']}.mhswedit.php' method=POST>\r\n    <input type=hidden name='gos' value='SimpanSemua' />\r\n    <input type=hidden name='pid' value='{$p['PresensiID']}' />\r\n    \r\n    <td class=ul colspan=5>Set semua ke:\r\n    <select name='Stt'>{$opt0}</select>\r\n    <input type=submit name='SetStt' value='Set Status' />\r\n    <input type=button name='Refresh' value='Refresh' \r\n      onClick=\"location='../{$_SESSION['mnux']}.mhswedit.php?pid={$p['PresensiID']}'\" />\r\n    <input type=button name='Tutup' value='Tutup' onClick=\"ttutup()\" />\r\n    </td>\r\n    \r\n    </form>\r\n    </tr>";
    $n = 0;
    $arr = GetArrPre();
    while ($w = _fetch_array($r)) {
        $n++;
        $optpre = GetOptPre($arr, $w['JenisPresensiID']);
        echo "\r\n      <tr><td class=inp width=10>{$n}</td>\r\n          <td class=inp1 width=94><b>{$w['MhswID']}</b></td>\r\n          <td class=ul1 width=260>{$w['Nama']}</td>\r\n          <td class=ul><select id='PresensiMhsw_{$w['PresensiMhswID']}'\r\n            onChange='javascript:SetPresensiMhsw({$w['PresensiMhswID']})'>{$optpre}</select></td>\r\n      </tr>";
    }
    echo <<<SCR
  </table>
  <script>
  function SetPresensiMhsw(id) {
    var status = document.getElementById("PresensiMhsw_"+id).value;
    lnk = "../{$_SESSION['mnux']}.mhswedit.save.php?id="+id+"&st="+status;
    win2 = window.open(lnk, "", "width=0, height=0, scrollbars, status");
    if (win2.opener == null) childWindow.opener = self;
  }
  </script>
SCR;
}

function Edit()
{
    $mhsw = GetFields('mhsw', "KodeID='" . KodeID . "' and MhswID", $_SESSION['MhswID'], '*');
    $optbpt = GetOption2('bipot', 'Tahun', 'Tahun Desc', $mhsw['BIPOTID'], "KodeID='" . KodeID . "' and ProgramID='{$mhsw['ProgramID']}' and ProdiID='{$mhsw['ProdiID']}'", 'BIPOTID');
    echo <<<ESD
  <table class=bsc width=100%>
  <form action='../{$_SESSION['mnux']}.bipotmhsw.php' method=POST>
  <input type=hidden name='gos' value='Simpan' />
  <input type=hidden name='MhswID' value='{$_SESSION['MhswID']}' />
  
  <tr><td class=inp>NIM:</td>
      <td class=ul1><b>{$mhsw['MhswID']}</b></td>
      </tr>
  <tr><td class=inp>Mahasiswa:</td>
      <td class=ul1><b>{$mhsw['Nama']}</b></td>
      </tr>
  <tr><td class=inp>Angkatan:</td>
      <td class=ul1><b>{$mhsw['TahunID']}</b></td>
      </tr>
  <tr><td class=inp>Bipot:</td>
      <td class=ul1>
      <select name='BIPOTID'>{$optbpt}</select>
      </td></tr>
  <tr><td class=ul1 colspan=2 align=center>
      <input type=submit name='Simpan' value='Simpan' />
      <input type=button name='Batal' value='Batal'
        onClick="window.close()" />
      </td></tr>
  
  </form>
  </table>
ESD;
}

function HeaderLogo($jdl, $p, $orientation = 'P')
{
    $pjg = 110;
    $logo = file_exists("../img/logo.jpg") ? "../img/logo.jpg" : "img/logo.jpg";
    $identitas = GetFields('identitas', 'Kode', KodeID, 'Nama, Alamat1, Telepon, Fax');
    $p->Image($logo, 12, 8, 18);
    $p->SetY(5);
    $p->SetFont("Helvetica", '', 8);
    $p->Cell($pjg, 5, $identitas['Yayasan'], 0, 1, 'C');
    $p->SetFont("Helvetica", 'B', 10);
    $p->Cell($pjg, 7, $identitas['Nama'], 0, 0, 'C');
    //Judul
    if ($orientation == 'L') {
        $p->SetFont("Helvetica", 'B', 16);
        $p->Cell(20, 7, '', 0, 0);
        $p->Cell($pjg, 7, $jdl, 0, 1, 'C');
    } else {
        $p->SetFont("Helvetica", 'B', 12);
        $p->Cell(80, 7, $jdl, 0, 1, 'R');
    }
    $p->SetFont("Helvetica", 'I', 6);
    $p->Cell($pjg, 3, $identitas['Alamat1'], 0, 1, 'C');
    $p->Cell($pjg, 3, "Telp. " . $identitas['Telepon'] . ", Fax. " . $identitas['Fax'], 0, 1, 'C');
    $p->Ln(3);
    if ($orientation == 'L') {
        $length = 275;
    } else {
        $length = 190;
    }
    $p->Cell($length, 0, '', 1, 1);
    $p->Ln(2);
}