function fnEdit()
{
    global $ci;
    $Institusi = GetaField('identitas', 'Kode', KodeID, 'Nama');
    // hardcode
    $_REQUEST['id'] = 0;
    $_REQUEST['md'] = 1;
    $gel = sqling(@$_REQUEST['gel']);
    $md = $_REQUEST['md'] + 0;
    $id = $_REQUEST['id'];
    $g = $ci->pmbperiod_model->get_active(array('PMBPeriodID' => $gel));
    if (empty($g) || $g['NA'] == 'Y') {
        die(ErrorMsg("Error", "Gelombang tidak ditemukan atau sudah tidak aktif.<br />Hubungi Sysadmin untuk informasi lebih lanjut.<hr size=1 color=silver /><input type=button name='btnClose' value='Tutup' onClick='window.close()' />"));
    }
    if ($md == 0) {
        $w = GetFields('aplikan', "AplikanID='{$id}' and KodeID", KodeID, '*');
        if (empty($w)) {
            die(ErrorMsg('Error', "Data aplikan dengan nomer: <b>{$id}</b> tidak ditemukan.<br />\r\n      Hubungi Sysadmin untuk informasi lebih lanjut.\r\n      <hr size=1 color=silver />\r\n      <input type=button name='btnClose' value='Tutup' onClick='window.close()' />"));
        }
        $jdl = "Edit Data Aplikan - {$w['PMBPeriodID']}";
        $_id = "<font size=+1>{$id}</font>";
    } elseif ($md == 1) {
        $w = array();
        $w['TanggalLahir'] = date('Y-m-d');
        $w['TanggalBuat'] = date('Y-m-d');
        $w['TanggalEdit'] = date('Y-m-d');
        $w['Kelamin'] = 'P';
        $w['SudahBekerja'] = 'N';
        $jdl = "Tambah Data Aplikan - " . $g['PMBPeriodID'];
        $_id = "<font color=red>[ Autogenerated ]</font>";
    } else {
        die(ErrorMsg("Error", "Mode edit <b>{$md}</b> tidak dikenali oleh sistem.<br />Hubungi Sysadmin untuk informasi lebih lanjut. <hr size=1 color=silver /> <input type=button name='btnClose' value='Tutup' onClick='window.close()' />"));
    }
    // replace title
    $jdl = 'Biodata Pendaftar';
    echo <<<ESD
  <SCRIPT LANGUAGE="JavaScript1.2">
  <!--
  function carisekolah(frm){
    lnk = "carisekolah.php?SekolahID="+frm.AsalSekolah.value+"&Cari="+frm.NamaSekolah.value;
\twin2 = window.open(lnk, "", "width=600, height=600, scrollbars, status");
    win2.creator = frm;
  }
  function caript(frm){
    lnk = "cariperguruantinggi.php?SekolahID="+frm.AsalSekolah.value+"&Cari="+frm.NamaSekolah.value;
\twin2 = window.open(lnk, "", "width=600, height=600, scrollbars, status");
    win2.creator = frm;
  }
  function tambahsekolah(frm) {
\tlnk = "pmbasalsek.edit.php?md=1";
\twin2 = window.open(lnk, "", "width=600, height=600, scrollbars, status");
    win2.creator = self;
  }
  function tambahpt(frm) {
\tlnk = "pmbasalpt.edit.php?md=1";
\twin2 = window.open(lnk, "", "width=600, height=600, scrollbars, status");
    win2.creator = self;
  }
  function ChooseThis(name, target)
  {\tvar count = data.JumlahSumberInfo.value;
\tif(document.getElementById(name+target).checked == true)
\t{\tfor(var i = 0; i < count; i++)
\t\t{\tdocument.getElementById(name+i).checked = false;
\t\t}
\t\tdocument.getElementById(name+target).checked = true;
\t}
  }
  -->
  </script>
ESD;
    // Parameter
    $NamaSekolah = GetaField('asalsekolah', 'SekolahID', @$w['AsalSekolah'], "concat(Nama, ', ', Kota)");
    $optkelamin = GetRadio("select Kelamin, Nama, concat(Kelamin, ' - ', Nama) as _kel from kelamin where NA='N'", 'Kelamin', "_kel", 'Kelamin', @$w[Kelamin], ', ');
    $TanggalLahir = GetDateOption($w['TanggalLahir'], 'TGL');
    $TanggalDaftar = GetDateOption($w['TanggalEdit'], 'TGLBuat');
    $optagama = GetOption2('agama', "concat(Agama, ' - ', Nama)", 'Agama', @$w['Agama'], '', 'Agama');
    $optpendidikan = GetOption2('pendidikanortu', 'Nama', 'Pendidikan', @$w['PendidikanAyah'], '', 'Pendidikan');
    $optpekerjaan = GetOption2('pekerjaanortu', 'Nama', 'Nama', @$w['PekerjaanAyah'], '', 'Pekerjaan');
    $SumberInformasi = GetSumberInformasi(@$w['SumberInformasi']);
    $PilihanProgram = GetOption2('program', "concat(ProgramID, ' - ', Nama)", 'ProgramID', @$w['ProgramID'], '', 'ProgramID');
    $sudahbekerjachecked = @$w['SudahBekerja'] == 'Y' ? 'checked' : '';
    // presenter
    if (isset($_SESSION['username']) && !empty($_SESSION['username'])) {
        $optpresenter = GetOption2('presenter', "concat(PresenterID, ' - ', Nama)", 'PresenterID', @$w['PresenterID'], '', 'PresenterID');
    } else {
        $optpresenter = '<option value="132" seleceted>132 - Web</option>';
    }
    // Tampilkan
    CheckFormScript("PresenterID,Program,Nama,Kelamin,AsalSekolah,TahunLulus,NilaiSekolah,TempatLahir");
    // make sure variable exist
    $w['CatatanPresenter'] = isset($w['CatatanPresenter']) ? $w['CatatanPresenter'] : '';
    $w['Nama'] = isset($w['Nama']) ? $w['Nama'] : '';
    $w['TempatLahir'] = isset($w['TempatLahir']) ? $w['TempatLahir'] : '';
    $w['Alamat'] = isset($w['Alamat']) ? $w['Alamat'] : '';
    $w['Kota'] = isset($w['Kota']) ? $w['Kota'] : '';
    $w['Propinsi'] = isset($w['Propinsi']) ? $w['Propinsi'] : '';
    $w['KodePos'] = isset($w['KodePos']) ? $w['KodePos'] : '';
    $w['RT'] = isset($w['RT']) ? $w['RT'] : '';
    $w['RW'] = isset($w['RW']) ? $w['RW'] : '';
    $w['Telepon'] = isset($w['Telepon']) ? $w['Telepon'] : '';
    $w['Handphone'] = isset($w['Handphone']) ? $w['Handphone'] : '';
    $w['Email'] = isset($w['Email']) ? $w['Email'] : '';
    $w['AsalSekolah'] = isset($w['AsalSekolah']) ? $w['AsalSekolah'] : '';
    $w['AlamatSekolah'] = isset($w['AlamatSekolah']) ? $w['AlamatSekolah'] : '';
    $w['JurusanSekolah'] = isset($w['JurusanSekolah']) ? $w['JurusanSekolah'] : '';
    $w['TahunLulus'] = isset($w['TahunLulus']) ? $w['TahunLulus'] : '';
    $w['NilaiSekolah'] = isset($w['NilaiSekolah']) ? $w['NilaiSekolah'] : '';
    $w['ProdiID'] = isset($w['ProdiID']) ? $w['ProdiID'] : '';
    $w['NamaAyah'] = isset($w['NamaAyah']) ? $w['NamaAyah'] : '';
    $w['Catatan'] = isset($w['Catatan']) ? $w['Catatan'] : '';
    echo <<<ESD
  <table class=bsc cellspacing=1 width=100% />
  <form name='data' action='?' method=POST onSubmit="return CheckForm(this)">
  <input type=hidden name='gos' value='fnSave' />
  <input type=hidden name='md' value='{$md}' />
  <input type=hidden name='gel' value='{$g['PMBPeriodID']}' />
  <input type=hidden name='id' value='{$id}' />
  
  <tr><th class=ttl colspan=2>{$jdl}</th></tr>
  <tr><td class=inp>Nomer Aplikan :</td>
\t  <td class=ul1>{$_id}</td>
      </tr>
  <tr><td class=inp>Tanggal Daftar :</td>
      <td class=ul1>{$TanggalDaftar}</td>
      </tr>
  <tr><td class=inp>Presenter: </td>
\t  <td class=ul1><select name='PresenterID'>{$optpresenter}</select></td>
\t  </tr>
  <tr style="display: none;"><td class=inp>Catatan Presenter: </td>
\t  <td class=ul1>
      <textarea name='CatatanPresenter' cols=30 rows=3>{$w['CatatanPresenter']}</textarea>
      </td>
  <tr><td bgcolor=green colspan=2 height=1></td></tr>
  
  <tr><td class=inp>Nama :</td>
      <td class=ul1>
      <input type=text name='Nama' value='{$w['Nama']}' size=30 maxlength=50 />
      </td>
      </tr>
  <tr><td class=inp>Jenis Kelamin :</td>
      <td class=ul1>{$optkelamin}</td>
      </tr>
  <tr><td class=inp>Tempat Lahir :</td>
      <td class=ul1>
      <input type=text name='TempatLahir' value='{$w['TempatLahir']}' size=30 maxlength=50 />
      </td>
      </tr>
  <tr><td class=inp>Tanggal Lahir :</td>
      <td class=ul1>
      {$TanggalLahir}
      </td>
      </tr>
  <tr><td class=inp>Alamat :</td>
      <td class=ul1>
      <input type=text name='Alamat' value='{$w['Alamat']}' size=40 maxlength=200 />
      </td>
      </tr>
  <tr><td class=inp>Kota :</td>
      <td class=ul1>
      <input type=text name='Kota' value='{$w['Kota']}' size=30 maxlength=50 /> 
      </tr>
  <tr><td class=inp>Propinsi/Kode Pos: </td>
      <td class=ul1>
\t  <input type=text name='Propinsi' value='{$w['Propinsi']}' size=30 maxlength=50 />/
      <input type=text name='KodePos' value='{$w['KodePos']}' size=10 maxlength=50 />
      </td>
      </tr>
  <tr><td class=inp>RT / RW :</td>
      <td class=ul1>
      <input type=text name='RT' value='{$w['RT']}' size=5 maxlength=5 /> /
      <input type=text name='RW' value='{$w['RW']}' size=5 maxlength=5 />
      </td>
      </tr>
  <tr><td class=inp>Telepon / Ponsel :</td>
      <td class=ul1>
      <input type=text name='Telepon' value='{$w['Telepon']}' size=20 maxlength=50 /> /
      <input type=text name='Handphone' value='{$w['Handphone']}' size=20 maxlength=50 />
      </td>
      </tr>
  <tr><td class=inp>E-mail :</td>
      <td class=ul1>
      <input type=text name='Email' value='{$w['Email']}' size=40 maxlength=50 />
      </td>
      </tr>
  
  <tr><th class=ttl colspan=2>Pendidikan Terakhir</th></tr>
  <tr><td class=inp>ID Sekolah :</td>
      <td class=ul1>
\t\t<input type='text' name='AsalSekolah' value='{$w['AsalSekolah']}' size=20 maxlength=50 disabled>
\t\t<input type='hidden' name='SavAsalSekolah' value='{$w['AsalSekolah']}' ></td>
\t  </tr>
  <tr><td class=inp>Nama Sekolah :</td>
\t  <td class=ul1><input type=text name='NamaSekolah' value='{$NamaSekolah}' size=50 maxlength=255>
\t  <br><input type="button" onClick="javascript:data.AsalSekolah.value='';data.NamaSekolah.value='';" value="Reset" />
\t\t<input type="button" onClick='javascript:carisekolah(data)' value="Cari Sekolah" />
\t\t<input type="button" onClick='javascript:caript(data)' value="Cari Perguruan Tinggi" />
\t\t<!--
\t\t<input type="button" onClick='javascript:tambahsekolah(data)' value="Tambah Institusi" />
\t\t-->
\t\t<br /><br />
\t    <div class="info"><b>TIPS</b>
\t\t<ul>
\t\t<li>Masukkan <b>nama sekolah parsial</b> diikuti dengan <b>tanda koma</b> dan <b>nama kota</b> di mana sekolah terebut berada. <br \\>
\t\t\tContoh: 'Budi Utomo, Jakarta' ATAU 'Negeri 1, Surabaya'.
\t\t</li>
\t\t<li><b>Hindari penggunaan kata-kata umum</b>, seperti SMA, SMU, SLTA, SEKOLAH, SCHOOL, dll. <br \\>
\t\t\t\t\t  Gunakan kata-kata yang dapat mengidentifikasi sekolah yang dicari secara unik.
\t\t</li>
\t\t</ul>
\t\t</div>
\t\t
\t\t</td></tr>
      </tr>
  <tr><td class=inp>Alamat Sekolah:</td>
\t  <td class=ul1><input type=text name='AlamatSekolah' value='{$w['AlamatSekolah']}' size=50 maxlength=255>
  <tr><td class=inp>Jurusan Sekolah :</td>
      <td class=ul1>
      <input type=text name='JurusanSekolah' value='{$w['JurusanSekolah']}' size=40 maxlength=50 />
      </td>
      </tr>
      
  <tr><td class=inp>Tahun Lulus :</td>
      <td class=ul1>
      <input type=text name='TahunLulus' value='{$w['TahunLulus']}' size=5 maxlength=5 />
      </td>
  <tr><td class=inp>Nilai UAN :</td>
      <td class=ul1>
      <input type=text name='NilaiSekolah' value='{$w['NilaiSekolah']}' size=5 maxlength=5 />
      </td>
      </tr>
  <tr><td class=inp>Sudah Bekerja?</td>
\t  <td class=ul1>
\t\t\t<input type=checkbox name='SudahBekerja' value='Y' {$sudahbekerjachecked}>
      </td>
  </tr>
\t  
  <tr><th class=ttl colspan=2>Data Orangtua/Wali</th></tr>
  <tr><td class=inp>Nama Orangtua/Wali :</td>
      <td class=ul1>
      <input type=text name='NamaAyah' value='{$w['NamaAyah']}' size=30 maxlength=50 />
      </td>
      </tr>
  <tr><td class=inp>Pendidikan Terakhir :</td>
      <td class=ul1>
      <select name='PendidikanAyah'>{$optpendidikan}</select>
      </td>
      </tr>
  <tr><td class=inp>Pekerjaan :</td>
      <td class=ul1>
      <select name='PekerjaanAyah'>{$optpekerjaan}</select>
      </td>
      </tr>

  <tr><th class=ttl colspan=2>Pilihan Program Studi</th></tr>
ESD;
    $s1 = "select DISTINCT(j.JenjangID), j.Nama, j.Keterangan \r\n\t\t\tfrom prodi p left outer join jenjang j on p.JenjangID=j.JenjangID\r\n\t\t\twhere p.KodeID='" . KodeID . "' and p.NA='N' order by p.JenjangID DESC";
    $r1 = _query($s1);
    $_Jenjang = "928rlaisfav9sfap";
    while ($w1 = _fetch_array($r1)) {
        $Pilihan = GetPilihanProdi($w1['JenjangID'], $w['ProdiID']);
        echo "<tr><td class=inp>&bull; {$w1['Keterangan']} ({$w1['Nama']}) :</td>\r\n\t\t\t  <td class=ul1>{$Pilihan}</td>\r\n\t\t\t  </tr>";
    }
    echo <<<ESD
  <tr><td class=inp>Program : </td>
\t  <td class=ul1><select name='Program'>{$PilihanProgram}</select></td>
\t  </tr>
  
  <tr><td class=inp valign=top>
      Atas inisiatif siapa Sdr/i datang ke<br />{$Institusi}?
      </td>
      <td class=ul1>
      <textarea name='Catatan' cols=30 rows=3>{$w['Catatan']}</textarea>
      </td>
      </tr>
  
  <tr><td class=inp valign=top>Sumber Informasi :</td>
      <td class=ul1>
      {$SumberInformasi}
      </td>
      </tr>
  
  <tr><td class=ul1 colspan=2 align=center>
      <input type=submit name='btnSimpan' value='Simpan' />
      <input type=button name='btnBatal' value='Batal'
        onClick="window.close()" />
      </td>
      </tr>
  </form>
  </table>
ESD;
}
Exemple #2
0
function Edit($md, $gel, $id)
{
    $jdl = 'Edit Data Aplikan';
    $w = GetFields('aplikan', "AplikanID='{$id}' and KodeID", KodeID, '*');
    CekSudahProsesNIM($w);
    $_AplikanID = "<b>{$w['AplikanID']}</b>";
    echo <<<ESD
  <SCRIPT LANGUAGE="JavaScript1.2">
  function carisekolah(frm){
    lnk = "pmb/carisekolah.php?SekolahID="+frm.AsalSekolah.value+"&Cari="+frm.NamaSekolah.value;
\twin2 = window.open(lnk, "", "width=600, height=600, scrollbars, status");
    win2.creator = frm;
  }
  function caript(frm){
    lnk = "pmb/cariperguruantinggi.php?SekolahID="+frm.AsalSekolah.value+"&Cari="+frm.NamaSekolah.value;
\twin2 = window.open(lnk, "", "width=600, height=600, scrollbars, status");
    win2.creator = frm;
  }
  function ChooseThis(name, target)
  {\tvar count = data.JumlahSumberInfo.value;
\tif(document.getElementById(name+target).checked == true)
\t{\tfor(var i = 0; i < count; i++)
\t\t{\tdocument.getElementById(name+i).checked = false;
\t\t}
\t\tdocument.getElementById(name+target).checked = true;
\t}
  }
  </script>
ESD;
    // Parameters
    $NamaSekolah = GetaField('asalsekolah', 'SekolahID', $w['AsalSekolah'], "concat(Nama, ', ', Kota)");
    $optkelamin = GetRadio("select Kelamin, Nama, concat(Kelamin, ' - ', Nama) as _kel from kelamin where NA='N'", 'Kelamin', "_kel", 'Kelamin', $w[Kelamin], ', ');
    $TanggalLahir = GetDateOption($w['TanggalLahir'], 'TGL');
    $TanggalDaftar = GetDateOption($w['TanggalEdit'], 'TGLBuat');
    $optagama = GetOption2('agama', "concat(Agama, ' - ', Nama)", 'Agama', $w['Agama'], '', 'Agama');
    $optpendidikan = GetOption2('pendidikanortu', 'Nama', 'Pendidikan', $w['PendidikanAyah'], '', 'Pendidikan');
    $optpekerjaan = GetOption2('pekerjaanortu', 'Nama', 'Nama', $w['PekerjaanAyah'], '', 'Pekerjaan');
    $SumberInformasi = GetSumberInformasi($w['SumberInformasi']);
    $PilihanProgram = GetOption2('program', "concat(ProgramID, ' - ', Nama)", 'ProgramID', $w['ProgramID'], '', 'ProgramID');
    $optpresenter = GetOption2('presenter', "concat(PresenterID, ' - ', Nama)", 'PresenterID', $w['PresenterID'], '', 'PresenterID');
    $sudahbekerjachecked = $w['SudahBekerja'] == 'Y' ? 'checked' : '';
    // Tampilkan
    CheckFormScript("PresenterID,Program,Nama,Kelamin,AsalSekolah,TahunLulus,NilaiSekolah,TempatLahir");
    TampilkanJudul($jdl);
    echo <<<ESD
  <table class=bsc cellspacing=1 width=800>
  <form name='data' action='?mnux={$_SESSION['mnux']}' method=POST onSubmit="return CheckForm(this)" />
  <input type=hidden name='gel' value='{$gel}' />
  <input type=hidden name='gos' value='Simpan' />
  <input type=hidden name='id' value='{$id}' />  
  
  <tr>
      <td class=inp>No. Peserta:</td>
      <td class=ul1>{$_AplikanID}</td>
\t  
  <tr><td class=inp>Presenter: </td>
\t  <td class=ul1><select name='PresenterID'>{$optpresenter}</select></td>
\t  </tr>
  <tr><td bgcolor=green colspan=2 height=1></td></tr>
  
  <tr><td class=inp>Nama :</td>
      <td class=ul1>
      <input type=text name='Nama' value='{$w['Nama']}' size=30 maxlength=50 />
      </td>
      </tr>
  <tr><td class=inp>Jenis Kelamin :</td>
      <td class=ul1>{$optkelamin}</td>
      </tr>
  <tr><td class=inp>Tempat Lahir :</td>
      <td class=ul1>
      <input type=text name='TempatLahir' value='{$w['TempatLahir']}' size=30 maxlength=50 />
      </td>
      </tr>
  <tr><td class=inp>Tanggal Lahir :</td>
      <td class=ul1>
      {$TanggalLahir}
      </td>
      </tr>
  <tr><td class=inp>Alamat :</td>
      <td class=ul1>
      <input type=text name='Alamat' value='{$w['Alamat']}' size=40 maxlength=200 />
      </td>
      </tr>
  <tr><td class=inp>Kota :</td>
      <td class=ul1>
      <input type=text name='Kota' value='{$w['Kota']}' size=30 maxlength=50 /> 
      </tr>
  <tr><td class=inp>Propinsi/Kode Pos: </td>
      <td class=ul1>
\t  <input type=text name='Propinsi' value='{$w['Propinsi']}' size=30 maxlength=50 />/
      <input type=text name='KodePos' value='{$w['KodePos']}' size=10 maxlength=50 />
      </td>
      </tr>
  <tr><td class=inp>RT / RW :</td>
      <td class=ul1>
      <input type=text name='RT' value='{$w['RT']}' size=5 maxlength=5 /> /
      <input type=text name='RW' value='{$w['RW']}' size=5 maxlength=5 />
      </td>
      </tr>
  <tr><td class=inp>Telepon / Ponsel :</td>
      <td class=ul1>
      <input type=text name='Telepon' value='{$w['Telepon']}' size=20 maxlength=50 /> /
      <input type=text name='Handphone' value='{$w['Handphone']}' size=20 maxlength=50 />
      </td>
      </tr>
  <tr><td class=inp>E-mail :</td>
      <td class=ul1>
      <input type=text name='Email' value='{$w['Email']}' size=40 maxlength=50 />
      </td>
      </tr>
  
  <tr><th class=ttl colspan=2>Pendidikan Terakhir</th></tr>
  <tr><td class=inp>ID Sekolah :</td>
      <td class=ul1>
\t\t<input type='text' name='AsalSekolah' value='{$w['AsalSekolah']}' size=20 maxlength=50 disabled>
\t\t<input type='hidden' name='SavAsalSekolah' value='{$w['AsalSekolah']}' ></td>
\t  </tr>
  <tr><td class=inp>Nama Sekolah :</td>
\t  <td class=ul1><input type=text name='NamaSekolah' value='{$NamaSekolah}' size=50 maxlength=255>
\t  <br><input type="button" onClick="javascript:data.AsalSekolah.value='';data.NamaSekolah.value='';" value="Reset" />
\t\t<input type="button" onClick='javascript:carisekolah(data)' value="Cari Sekolah" />
\t\t<input type="button" onClick='javascript:caript(data)' value="Cari Perguruan Tinggi" />
\t\t<!--
\t\t<input type="button" onClick='javascript:tambahsekolah(data)' value="Tambah Institusi" />
\t\t-->
\t\t<br /><br />
\t    <div class="info"><b>TIPS</b>
\t\t<ul>
\t\t<li>Masukkan <b>nama sekolah parsial</b> diikuti dengan <b>tanda koma</b> dan <b>nama kota</b> di mana sekolah terebut berada. <br \\>
\t\t\tContoh: 'Budi Utomo, Jakarta' ATAU 'Negeri 1, Surabaya'.
\t\t</li>
\t\t<li><b>Hindari penggunaan kata-kata umum</b>, seperti SMA, SMU, SLTA, SEKOLAH, SCHOOL, dll. <br \\>
\t\t\t\t\t  Gunakan kata-kata yang dapat mengidentifikasi sekolah yang dicari secara unik.
\t\t</li>
\t\t</ul>
\t\t</div>
\t\t</td></tr>
      </tr>
  <tr><td class=inp>Alamat Sekolah :</td>
\t  <td class=ul1><input type=text name='AlamatSekolah' value='{$w['AlamatSekolah']}'></td></tr>
  <tr><td class=inp>Jurusan Sekolah :</td>
      <td class=ul1>
      <input type=text name='JurusanSekolah' value='{$w['JurusanSekolah']}' size=40 maxlength=50 />
      </td>
      </tr>
      
  <tr><td class=inp>Tahun Lulus :</td>
      <td class=ul1>
      <input type=text name='TahunLulus' value='{$w['TahunLulus']}' size=5 maxlength=5 />
      </td>
      </tr>
  <tr><td class=inp>Nilai UAN :</td>
      <td class=ul1>
      <input type=text name='NilaiSekolah' value='{$w['NilaiSekolah']}' size=5 maxlength=5 />
      </td>
      </tr>
  <tr><td class=inp>Sudah Bekerja?</td>
\t  <td class=ul1>
\t\t<input type=checkbox name='SudahBekerja' value='Y' {$sudahbekerjachecked}>
\t  </td>
  </tr>
      
  <tr><th class=ttl colspan=2>Data Orangtua/Wali</th></tr>
  <tr><td class=inp>Nama Orangtua/Wali :</td>
      <td class=ul1>
      <input type=text name='NamaAyah' value='{$w['NamaAyah']}' size=30 maxlength=50 />
      </td>
      </tr>
  <tr><td class=inp>Pendidikan Terakhir :</td>
      <td class=ul1>
      <select name='PendidikanAyah'>{$optpendidikan}</select>
      </td>
      </tr>
  <tr><td class=inp>Pekerjaan :</td>
      <td class=ul1>
      <select name='PekerjaanAyah'>{$optpekerjaan}</select>
      </td>
      </tr>

  <tr><th class=ttl colspan=2>Pilihan Program Studi</th></tr>
ESD;
    $s1 = "select DISTINCT(j.JenjangID), j.Nama, j.Keterangan \r\n\t\t\tfrom prodi p left outer join jenjang j on p.JenjangID=j.JenjangID\r\n\t\t\twhere p.KodeID='" . KodeID . "' and p.NA='N' order by j.JenjangID DESC";
    $r1 = _query($s1);
    $_Jenjang = "928rlaisfav9sfap";
    while ($w1 = _fetch_array($r1)) {
        $Pilihan = GetPilihanProdi($w1['JenjangID'], $w['ProdiID']);
        echo "<tr><td class=inp>&bull; {$w1['Keterangan']} ({$w1['Nama']}) :</td>\r\n\t\t\t  <td class=ul1>{$Pilihan}</td>\r\n\t\t\t  </tr>";
    }
    echo <<<ESD
  <tr><td class=inp>Program : </td>
\t  <td class=ul1><select name='Program'>{$PilihanProgram}</select></td>
\t  </tr>
  
  <tr><td class=inp valign=top>
      Atas inisiatif siapa Sdr/i datang ke<br />{$Institusi}?
      </td>
      <td class=ul1>
      <textarea name='Catatan' cols=30 rows=3>{$w['Catatan']}</textarea>
      </td>
      </tr>
  
  <tr><td class=inp valign=top>Sumber Informasi :</td>
      <td class=ul1>
      {$SumberInformasi}
      </td>
      </tr>
  
  <tr><td class=ul1 colspan=2 align=center>
      <input type=submit name='btnSimpan' value='Simpan' />
      <input type=reset name='btnReset' value='Reset' />
      </td>
      </tr>
  </form>
  </table>
ESD;
}