PageRenderTime 49ms CodeModel.GetById 11ms RepoModel.GetById 1ms app.codeStats 0ms

/sysfo/jdwlkuliah.php

https://bitbucket.org/justmyfreak/sisfokampus
PHP | 426 lines | 405 code | 12 blank | 9 comment | 97 complexity | 91dfe6738825edbc965c532e3671f5d7 MD5 | raw file
    

  1. <?php


    2. 

  2.   // Author: E. Setio Dewo, setio_dewo@telkom.net, Mei 2003


    3. 

  3.   


    4. 

  4.   // *** Fungsi2 ***


    5. 

  5. function Jadwal($thn, $kdj, $kdp='') {


    6. 

  6.   global $strCantQuery, $prn;


    7. 

  7. 	if (!isset($prn)) $prn = 0;


    8. 

  8. 	function HitungMhsw($jid) {


    9. 

  9. 	  global $strCantQuery;


    10. 

  10. 	  $s = "select count(*) as JML from krs where IDJadwal=$jid";


    11. 

  11. 	  $r = mysql_query($s) or die("$strCantQuery: $s");


    12. 

  12. 	  return mysql_result($r, 0, 'JML');


    13. 

  13. 	}


    14. 

  14. 	if (!empty($kdp)) $strprg = "and jd.Program='$kdp'";


    15. 

  15. 	else $strprg = '';


    16. 

  16. 	if ($prn == 0) {


    17. 

  17. 	  $snm = session_name(); $sid = session_id();


    18. 

  18. 	  echo "<a href='sysfo.php?syxec=jdwlkuliah&md=1'>Tambah Jadwal</a> | ";


    19. 

  19. 	  SimplePrinter("print.php?print=sysfo/jdwlkuliah.php&prn=1&$snm=$sid", 'Cetak Jadwal');


    20. 

  20. 	}


    21. 

  21. 	$tjdwl = ($prn == 0)? '' : ' and jd.Terjadwal="Y" ';


    22. 

  22. 	$s = "select jd.ID, jd.KodeRuang, jd.Tahun, jd.Terjadwal, jd.KodeFakultas, jd.KodeJurusan,


    23. 

  23. 	  jd.IDMK, jd.KodeMK, jd.SKS, jd.Global, jd.Program, jd.JamMulai, jd.JamSelesai,


    24. 

  24. 	  jd.KodeKampus, jd.KodeRuang,


    25. 

  25. 	  TIME_FORMAT(JamMulai, '%H:%i') as jm, TIME_FORMAT(JamSelesai, '%H:%i') as js,


    26. 

  26. 	  jd.Global, h.Nama as HR, mk.ID as MKID, mk.Kode as KodeMK, mk.Nama_Indonesia as MK, mk.SKS, 


    27. 

  27. 	  concat(d.Name, ', ', d.Gelar) as Dosen, pr.Nama_Indonesia as PRG, r.Kapasitas


    28. 

  28. 	  from jadwal jd left outer join hari h on jd.Hari=h.ID


    29. 

  29. 	  left outer join matakuliah mk on jd.IDMK=mk.ID


    30. 

  30. 	  left outer join dosen d on jd.IDDosen=d.ID


    31. 

  31. 	  left outer join program pr on jd.Program=pr.Kode


    32. 

  32. 	  left outer join ruang r on jd.KodeRuang=r.Kode


    33. 

  33. 	  where jd.Tahun='$thn' and jd.KodeJurusan='$kdj' $strprg $tjdwl


    34. 

  34. 	  order by jd.Terjadwal, jd.Hari, jd.JamMulai";


    35. 

  35. 


    36. 

  36. 	$r = mysql_query($s) or die ("$strCantQuery: $s<br>".mysql_error());


    37. 

  37. 	if ($prn == 0) $strkaps0 = "<th class=ttl>Kaps</th><th class=ttl>Mhsw</th><th class=ttl>Cover</th>"; else $strkaps0 = '';


    38. 

  38. 	echo "<table class=box cellspacing=0 cellpadding=4>";


    39. 

  39.     $hd = "<tr><th class=ttl>Jam</th>


    40. 

  40. 	  <th class=ttl>Ruang</th><th class=ttl>Kampus</th>


    41. 

  41. 	  <th class=ttl>KodeMK</th><th class=ttl>Mata Kuliah</th>


    42. 

  42. 	  <th class=ttl>Program</th>


    43. 

  43. 	  <th class=ttl>SKS</th>


    44. 

  44. 	  <th class=ttl>Dosen</th>


    45. 

  45. 	  $strkaps0 </tr>";


    46. 

  46.     $_hr = -1; $terjadwal = '';


    47. 

  47.     $arrterjadwal = array('Y'=>'Terjadwal', 'N'=>'Tidak Terjadwal');


    48. 

  48. 	while ($row = mysql_fetch_array($r)) {


    49. 

  49. 	  $hr = $row['HR'];


    50. 

  50. 	  $rng = $row['KodeRuang'];


    51. 

  51. 	  $kmps = $row['KodeKampus'];


    52. 

  52. 	  $jm = $row['jm']; $js = $row['js'];


    53. 

  53. 	  $jid = $row['ID'];


    54. 

  54. 	  $kmk = $row['KodeMK'];


    55. 

  55. 	  $mk = $row['MK'];


    56. 

  56. 	  $kl = $row['PRG'];


    57. 

  57. 	  if (empty($kl)) $kl = '&nbsp;';


    58. 

  58. 	  $sks = $row['SKS'];


    59. 

  59. 	  $dsn = $row['Dosen'];


    60. 

  60. 	  $kps = $row['Kapasitas'];


    61. 

  61. 	  $mhsw = HitungMhsw($jid);


    62. 

  62. 	  $ass = GetAssDsn($row['ID']);


    63. 

  63. 	  if (($prn == 0) && ($terjadwal != $row['Terjadwal'])) {


    64. 

  64. 	    $terjadwal = $row['Terjadwal'];


    65. 

  65. 	    $str = $arrterjadwal[$terjadwal];


    66. 

  66. 	    echo "<tr><td class=uline colspan=10><h3>$str</td></tr>";


    67. 

  67. 	  }


    68. 

  68. 	  if ($prn == 0) {


    69. 

  69. 	    $strkaps = "<td class=lst align=right>$kps</td>


    70. 

  70. 		<td class=lst align=right><a href='sysfo.php?syxec=jdwlkuliah&md1=0&jid=$row[ID]&mkid=$row[MKID]'>$mhsw</a></td>


    71. 

  71. 		<td class=lst align=center><a href='print.php?print=sysfo/cetakcoverabsen.php&jid=$row[ID]' target=_blank title='Cetak Cover Absen'><img src='image/printer.gif' border=0></a></td>";


    72. 

  72. 		$streditdsn = "<a href='sysfo.php?syxec=editassdsn&jid=$jid'><img src='image/edit.png' border=0></a>";


    73. 

  73. 		$streditmk = "<a href='sysfo.php?syxec=jdwlkuliah&md=0&jid=$jid'><img src='image/edit.png' border=0></a> ";


    74. 

  74. 	  }


    75. 

  75. 	  else {


    76. 

  76. 	    $strkaps = '';


    77. 

  77. 	    $streditdsn = '';


    78. 

  78. 	    $streditmk = '';


    79. 

  79. 	  }


    80. 

  80. 	  if ($_hr != $hr) {


    81. 

  81. 	    $_hr = $hr;


    82. 

  82. 	    echo "<tr><td colspan=7><h3>$hr</td></tr>";


    83. 

  83. 	    echo $hd;


    84. 

  84. 	  }


    85. 

  85. 	  echo "<tr><td class=lst>$jm-$js</td>


    86. 

  86. 	    <td class=lst>$rng</td><td class=lst>$kmps</td>


    87. 

  87. 	    <td class=lst>$streditmk$kmk</td>


    88. 

  88. 	    <td class=lst>$mk</td>


    89. 

  89. 	    <td class=lst>$kl</td>


    90. 

  90. 	    <td class=lst align=right>$sks</td> 


    91. 

  91. 	    <td class=lst>$streditdsn $dsn $ass</td>


    92. 

  92. 		$strkaps</tr>";


    93. 

  93. 	}


    94. 

  94. 	echo "<tr><td height=2></td></tr></table>";


    95. 

  95. }


    96. 

  96. function GetAssDsn($jid) {


    97. 

  97.   $str = '';


    98. 

  98.   $s = "select jad.*, concat(dsn.Name, ', ', dsn.Gelar) as DSN


    99. 

  99.     from jadwalassdsn jad


    100. 

  100.     left outer join dosen dsn on jad.IDDosen=dsn.ID


    101. 

  101.     where jad.IDJadwal='$jid' and jad.NotActive='N'


    102. 

  102.     order by dsn.Name";


    103. 

  103.   $r = mysql_query($s) or die("Gagal: $s<br>".mysql_error());


    104. 

  104.   $n = 0;


    105. 

  105.   while ($w = mysql_fetch_array($r)) {


    106. 

  106.     $n++;


    107. 

  107.     $str .= "<br>- $w[DSN]";


    108. 

  108.   }


    109. 

  109.   return $str;


    110. 

  110. }


    111. 

  111. function JadwalForm($thn, $kdj, $md, $kurid, $jid) {


    112. 

  112.   global $strCantQuery;


    113. 

  113. 	if ($md == 0) {


    114. 

  114. 	  $s = "select *,TIME_FORMAT(JamMulai, '%H:%i') as jm, TIME_FORMAT(JamSelesai, '%H:%i') as js


    115. 

  115. 	    from jadwal where ID=$jid limit 1";


    116. 

  116. 	  $r = mysql_query($s) or die ("$strCantQuery: $s");


    117. 

  117. 	  $thn = mysql_result($r, 0, 'Tahun');


    118. 

  118.       $Terjadwal = mysql_result($r, 0, 'Terjadwal');


    119. 

  119. 	  $kdf = mysql_result($r, 0, 'KodeFakultas');


    120. 

  120. 	  $kdj = mysql_result($r, 0, 'KodeJurusan');


    121. 

  121. 	  $IDMK = mysql_result($r, 0, 'IDMK');


    122. 

  122. 	  $IDDosen = mysql_result($r, 0, 'IDDosen');


    123. 

  123. 	  $Program = mysql_result($r, 0, 'Program');


    124. 

  124. 	  $Hari = mysql_result($r, 0, 'Hari');


    125. 

  125. 	  $JamMulai = mysql_result($r, 0, 'jm');


    126. 

  126. 	  $JamSelesai = mysql_result($r, 0, 'js');


    127. 

  127. 	  //$KodeKampus = mysql_result($r, 0, 'KodeKampus');


    128. 

  128. 	  $KodeRuang = mysql_result($r, 0, 'KodeRuang');


    129. 

  129. 	  $jdl = 'Edit Jadwal';


    130. 

  130. 	  $Rencana = mysql_result($r, 0, 'Rencana');


    131. 

  131. 	  $Realisasi = mysql_result($r, 0, 'Realisasi');


    132. 

  132. 	  if (mysql_result($r, 0, 'Global') == 'Y') $glob = 'checked'; else $glob = '';


    133. 

  133. 	  $ada = GetaField("krs", "IDJadwal", $jid, "count(ID)")+0;


    134. 

  134. 	  if ($ada > 1) $ro = "<tr><th class=wrn colspan=2>Tidak dpt Diubah krn sudah ada mhsw yg mengambil</th></tr>";


    135. 

  135. 	  else $ro = '';


    136. 

  136. 	}


    137. 

  137. 	elseif ($md == 1) {


    138. 

  138. 	  $kdf = GetaField('jurusan', 'Kode', $kdj, 'KodeFakultas');


    139. 

  139. 	  $IDMK = 0;


    140. 

  140. 	  $IDDosen = 0;


    141. 

  141. 	  $Program = '';


    142. 

  142. 	  $Hari = 1;


    143. 

  143. 	  $JamMulai = '06:00';


    144. 

  144. 	  $JamSelesai = '07:00';


    145. 

  145. 	  //$KodeKampus = '';


    146. 

  146. 	  $KodeRuang = '';


    147. 

  147. 	  $Terjadwal = 'Y';


    148. 

  148. 	  $jdl = 'Tambah Jadwal';


    149. 

  149. 	  $Rencana = 0;


    150. 

  150. 	  $Realisasi = 0;


    151. 

  151. 	  $glob = '';


    152. 

  152. 	  $ro = '';


    153. 

  153. 	}


    154. 

  154. 	else {


    155. 

  155. 	  $kdf = GetaField('jurusan', 'Kode', $kdj, 'KodeFakultas');


    156. 

  156. 	  $IDMK = $_REQUEST['IDMK'];


    157. 

  157. 	  $Terjadwal = 'Y';


    158. 

  158. 	  $IDDosen = $_REQUEST['IDDosen'];


    159. 

  159. 	  $Program = $_REQUEST['Program'];


    160. 

  160. 	  $Hari = $_REQUEST['Hari'];


    161. 

  161. 	  $JamMulai = $_REQUEST['JamMulai'];


    162. 

  162. 	  $JamSelesai = $_REQUEST['JamSelesai'];


    163. 

  163. 	  if (isset($_REQUEST['KodeRuang'])) $KodeRuang = $_REQUEST['KodeRuang'];


    164. 

  164. 	  else $KodeRuang = '';


    165. 

  165. 	  $jdl = "Penjadwalan Gagal";


    166. 

  166. 	  $Rencana = $_REQUEST['Rencana'];


    167. 

  167. 	  $Realisasi = $_REQUEST['Realisasi'];


    168. 

  168. 	  if (isset($_REQUEST['glob']) && $_REQUEST['glob'] == 'Y') $glob = 'checked'; else $glob='';


    169. 

  169. 	  $ro = '';


    170. 

  170. 	}


    171. 

  171. 	$oHari = $Hari;


    172. 

  172. 	$ojm = $JamMulai;


    173. 

  173. 	$ojs = $JamSelesai;


    174. 

  174. 	//function GetOption($_table, $_field, $_order='', $_default='', $_where='', $_value='') {


    175. 

  175. 	$sid = session_id(); $snm = session_name();


    176. 

  176. 	$strTerjadwal = ($Terjadwal == 'Y') ? 'checked' : '';


    177. 

  177. 	$optmk = GetOption2('matakuliah', "concat(Kode, ' -- ', Nama_Indonesia)", 'Kode', $IDMK, "KurikulumID=$kurid", 'ID');


    178. 

  178. 	$optds = GetOption2('dosen', "concat(Name, ', ', Gelar)", 'Name', $IDDosen, "NotActive='N'", 'ID');


    179. 

  179. 	$optrg = GetOption2('ruang', "concat(KodeKampus, ' -- ', Kode)", 'KodeKampus,Kode', $KodeRuang, '', 'Kode');


    180. 

  180. 	$opthr = GetOption2('hari', 'Nama', 'ID', $Hari, '', 'ID');


    181. 

  181. 	$optprg = GetOption2('program', "concat(Kode, ' -- ', Nama_Indonesia)", 'Kode', $Program, '', 'Kode');


    182. 

  182. 	echo <<<EOF


    183. 

  183. 	  <form name=f1 action='sysfo.php' method=GET>


    184. 

  184. 	  <input type=hidden name='syxec' value='jdwlkuliah'>


    185. 

  185. 	  <input type=hidden name='md' value='$md'>


    186. 

  186. 	  <input type=hidden name='thn' value='$thn'>


    187. 

  187. 	  <input type=hidden name='kdj' value='$kdj'>


    188. 

  188. 	  <input type=hidden name='jid' value='$jid'>


    189. 

  189. 	  <table class=box cellspacing=0 cellpadding=3>$ro


    190. 

  190. 	  <tr><th class=ttl colspan=2>$jdl</th></tr>


    191. 

  191. 	  <tr><td class=uline>Mata Kuliah</td><td class=uline><select name='IDMK'>$optmk</select></td></tr>


    192. 

  192. 	  <tr><td class=uline>Terjadwal</td><td class=uline><input type=checkbox name='Terjadwal' value='Y' $strTerjadwal> Dijadwalkan untuk kuliah. Kosongkan jika tidak dijadwalkan.</td></tr>


    193. 

  193. 	  <tr><td class=uline>Ditawarkan Global</td><td class=uline><input type=checkbox name='glob' value='Y' $glob> Semua Jurusan dpt Mengambil</td></tr>


    194. 

  194. 	  <tr><td class=uline>Dosen</td><td class=uline><select name='IDDosen'>$optds</select></td></tr>


    195. 

  195. 	  <tr><td class=uline>Ruang</td><td class=uline><select name='KodeRuang'>$optrg</select></td></tr>


    196. 

  196. 	  <tr><td class=uline>Program</td><td class=uline><select name='Program'>$optprg</select></td></tr>


    197. 

  197. 	  <tr><td class=uline>Hari</td><td class=uline><select name='Hari'>$opthr</select></td></tr>


    198. 

  198. 	  <tr><td class=uline>Jam Mulai</td><td class=uline><input type=text name='JamMulai' value='$JamMulai' size=6 maxlength=5></td></tr>


    199. 

  199. 	  <tr><td class=uline>Jam Selesai</td><td class=uline><input type=text name='JamSelesai' value='$JamSelesai' size=6 maxlength=5></td></tr>


    200. 

  200. 	  <tr><td class=uline>Rencana Tatap Muka</td><td class=uline><input type=text name='Rencana' value='$Rencana' size=3 maxlength=3></td></tr>


    201. 

  201. 	  <tr><td class=uline>Realisasi Tatap Muka</td><td class=uline><input type=text name='Realisasi' value='$Realisasi' size=3 maxlength=3></td></tr>


    202. 

  202. 	  <tr><td class=uline colspan=2><input type=submit name='prcjdwl' value='Simpan'>&nbsp;


    203. 

  203. 	  <input type=reset name='Reset' value='Reset'>&nbsp;


    204. 

  204. 	  <input type=button name='balik' value='Kembali' onClick="location='sysfo.php?syxec=jdwlkuliah&PHPSESSID=$sid'">&nbsp;


    205. 

  205. 	  <input type=button name='prcdel' value='Hapus' onClick="location='sysfo.php?syxec=jdwlkuliah&del=$jid&PHPSESSID=$sid'">


    206. 

  206. 	  </td></tr><tr><td height=2></td></tr>


    207. 

  207. 	  </table></form>


    208. 

  208. EOF;


    209. 

  209. }


    210. 

  210. function GetErrorRuang($r, $msg) {


    211. 

  211.   for ($i=0; $i < mysql_num_rows($r); $i++) {


    212. 

  212. 	  $strmk = GetFields('matakuliah', 'ID', mysql_result($r, $i, 'IDMK'), 'Kode,Nama_Indonesia');


    213. 

  213. 	  $str1 = "<li>$msg<br>". 


    214. 

  214. 	    GetaField('hari', 'ID', mysql_result($r, $i, 'Hari'), 'Nama'). ' '.


    215. 

  215. 	    mysql_result($r, $i, 'JamMulai').' - '.mysql_result($r, $i, 'JamSelesai'). ' : '.


    216. 

  216. 	    $strmk['Kode'] . ' - '. $strmk['Nama_Indonesia'] . ' dari '.


    217. 

  217. 		mysql_result($r, $i, 'KodeFakultas') . ' : ' . mysql_result($r, $i, 'KodeJurusan').


    218. 

  218. 		'</li>';


    219. 

  219. 	}


    220. 

  220. 	return $str1;


    221. 

  221. }


    222. 

  222. function CheckRuang ($thn, $jid, $kdk, $kdr, $hr, $jm, $js) {


    223. 

  223.   global $strCantQuery, $fmtErrorMsg;


    224. 

  224. 	$sm = "select * from jadwal where KodeKampus='$kdk' and KodeRuang='$kdr' and Hari='$hr' and


    225. 

  225. 	  JamMulai <= '$jm:00' and '$jm:00' <= JamSelesai and ID<>'$jid' and Tahun='$thn'";


    226. 

  226. 	$rm = mysql_query($sm) or die ("$strCantQuery: $sm");


    227. 

  227. 	$hm = mysql_num_rows($rm);


    228. 

  228. 	if ($hm > 0) $str1 = GetErrorRuang($rm, '<b>Jam Mulai Bentrok.</b>');


    229. 

  229. 	else $str1 = '';


    230. 

  230. 	


    231. 

  231. 	$ss = "select * from jadwal where KodeKampus='$kdk' and KodeRuang='$kdr' and Hari=$hr and


    232. 

  232. 	  JamMulai <= '$js' and '$js' <= JamSelesai and ID<>$jid and Tahun='$_SESSION[thn]' ";


    233. 

  233. 	$rs = mysql_query($ss) or die ("$strCantQuery: $ss");


    234. 

  234. 	$hs = mysql_num_rows($rs);


    235. 

  235. 	if ($hs > 0) $str2 = GetErrorRuang($rs, '<b>Jam Selesai Bentrok.</b>');


    236. 

  236. 	else $str2 = '';


    237. 

  237. 	


    238. 

  238. 	if (!($hm == 0 && $hs ==0))	DisplayHeader($fmtErrorMsg, "Tidak dapat dijadwalkan di <b>$kdk - $kdr</b>.<br>


    239. 

  239. 	  Ruang telah dipakai oleh : <br><ul> $str1 $str2 </ul><hr size=1 color=silver>


    240. 

  240. 	  Opsi: <a href='sysfo.php?$_SERVER[QUERY_STRING]&gabung=1'>Gabungkan dengan jadwal di atas</a>");


    241. 

  241. 	return ($hm == 0) && ($hs == 0);


    242. 

  242. }


    243. 

  243. function PrcJdwl($kdj) {


    244. 

  244.   global $strCantQuery, $fmtErrorMsg, $md, $strTahunNotActive, $thn;


    245. 

  245. 	//$thn = $_REQUEST['thn'];


    246. 

  246. 	if (!isTahunAktif($thn, $kdj)) {


    247. 

  247. 	  DisplayHeader($fmtErrorMsg, $strTahunNotActive);


    248. 

  248. 	  $md = -1;


    249. 

  249. 	}


    250. 

  250. 	else {


    251. 

  251.     $md = $_REQUEST['md'];


    252. 

  252. 


    253. 

  253. 	$kdj = $_REQUEST['kdj'];


    254. 

  254. 	$kdf = GetaField('jurusan', 'Kode', $kdj, 'KodeFakultas');


    255. 

  255. 	$jid = $_REQUEST['jid'];


    256. 

  256. 	$Terjadwal = (!empty($_REQUEST['Terjadwal']) && ($_REQUEST['Terjadwal'] == 'Y'))? 'Y' : 'N';


    257. 

  257. 	$IDMK = $_REQUEST['IDMK'];


    258. 

  258. 	$arrmk = GetFields('matakuliah', 'ID', $IDMK, 'Kode, SKS, Nama_Indonesia');


    259. 

  259. 	$KDMK = $arrmk['Kode'];


    260. 

  260. 	$SKS = $arrmk['SKS'];


    261. 

  261. 	$IDDosen = $_REQUEST['IDDosen'];


    262. 

  262. 	$Program = $_REQUEST['Program'];


    263. 

  263. 	$KodeRuang = $_REQUEST['KodeRuang'];


    264. 

  264. 	$KodeKampus = GetaField('ruang', 'Kode', $KodeRuang, 'KodeKampus');


    265. 

  265. 	$Hari = $_REQUEST['Hari'];


    266. 

  266. 	$jm = $_REQUEST['JamMulai'];


    267. 

  267. 	$js = $_REQUEST['JamSelesai'];


    268. 

  268. 	$unip = $_SESSION['unip'];


    269. 

  269. 	$Rencana = $_REQUEST['Rencana'];


    270. 

  270. 	$Realisasi = $_REQUEST['Realisasi'];


    271. 

  271. 	if (isset($_REQUEST['glob'])) $glob = $_REQUEST['glob']; else $glob = 'N';


    272. 

  272. 	// Apakah gabungan?


    273. 

  273. 	$oke = (!empty($_REQUEST['gabung']) && $_REQUEST['gabung'] ==1) ? true : false;


    274. 

  274. 	$oke = ($Terjadwal == 'Y')? $oke : true;


    275. 

  275. 	if (!$oke) $oke = CheckRuang($thn, $jid, $KodeKampus, $KodeRuang, $Hari, $jm, $js);


    276. 

  276. 	if ($oke) {


    277. 

  277. 	  if ($md == 0 || $md == 2) {


    278. 

  278. 	    $s = "update jadwal set IDMK='$IDMK', KodeMK='$arrmk[Kode]', NamaMK='$arrmk[Nama_Indonesia]', Terjadwal='$Terjadwal',


    279. 

  279. 	      IDDosen='$IDDosen', Global='$glob', Program='$Program', Hari='$Hari', JamMulai='$jm', JamSelesai='$js', 


    280. 

  280. 	      KodeKampus='$KodeKampus', KodeRuang='$KodeRuang', Rencana='$Rencana', Realisasi='$Realisasi'


    281. 

  281. 		  where ID=$jid  "; 


    282. 

  282. 	  }


    283. 

  283. 	  elseif ($md == 1 || $md == 3) {


    284. 

  284. 	    $s = "insert into jadwal (Tahun, Terjadwal, KodeFakultas, KodeJurusan, IDMK, KodeMK, NamaMK, 


    285. 

  285. 		  Global, SKS, SKSHonor, IDDosen, Program, Hari, 


    286. 

  286. 		  JamMulai, JamSelesai, KodeKampus, KodeRuang, unip, Tanggal, Rencana, Realisasi,


    287. 

  287. 		  UTSTanggal, UASTanggal, SSLTanggal) 


    288. 

  288. 		  values ('$thn', '$Terjadwal', '$kdf', '$kdj', '$IDMK', '$KDMK', '$arrmk[Nama_Indonesia]', 


    289. 

  289. 		  '$glob', '$SKS', '$SKS', '$IDDosen', '$Program', '$Hari', '$jm',


    290. 

  290. 		  '$js', '$KodeKampus', '$KodeRuang', '$unip', now(), '$Rencana', '$Realisasi',


    291. 

  291. 		  now(), now(), now())  "; 


    292. 

  292. 	  }


    293. 

  293. 	  $r = mysql_query($s) or die ("$strCantQuery: $s<br>".mysql_error());


    294. 

  294. 	  $md = -1;


    295. 

  295. 	}


    296. 

  296. 	else {


    297. 

  297. 	  if ($md == 0) $md = 2;


    298. 

  298. 	  elseif ($md == 1) $md = 3;


    299. 

  299. 	}


    300. 

  300. 	}


    301. 

  301. }


    302. 

  302. function HeaderJadwal($jid) {


    303. 

  303.   global $strCantQuery, $fmtErrorMsg;


    304. 

  304. 	$s0 = "select j.*, mk.Kode as KMK, mk.Nama_Indonesia, concat(ds.Name, ', ', ds.Gelar) as DSN,


    305. 

  305. 	  hr.Nama as HR, time_format(j.JamMulai, '%H:%i') as MUL, time_format(j.JamSelesai, '%H:%i') as SEL,


    306. 

  306. 	  r.Kapasitas, pr.Nama_Indonesia as PRG


    307. 

  307. 	  from jadwal j left join matakuliah mk on j.IDMK=mk.ID


    308. 

  308. 	  left outer join dosen ds on j.IDDosen=ds.ID


    309. 

  309. 	  left outer join hari hr on j.Hari=hr.ID


    310. 

  310. 	  left outer join ruang r on j.KodeRuang=r.Kode


    311. 

  311. 	  left outer join program pr on j.Program=pr.Kode


    312. 

  312. 	  where j.ID=$jid limit 1";


    313. 

  313. 	$r0 = mysql_query($s0) or die ("$strCantQuery: $s0<br>".mysql_error());


    314. 

  314. 	$kmk = mysql_result($r0, 0, 'KMK');


    315. 

  315. 	$mk = mysql_result($r0, 0, 'Nama_Indonesia');


    316. 

  316. 	$dsn = mysql_result($r0, 0, 'DSN');


    317. 

  317. 	$hr = mysql_result($r0, 0, 'HR');


    318. 

  318. 	$mul = mysql_result($r0, 0, 'MUL');


    319. 

  319. 	$sel = mysql_result($r0, 0, 'SEL');


    320. 

  320. 	$kmp = mysql_result($r0, 0, 'KodeKampus');


    321. 

  321. 	$rng = mysql_result($r0, 0, 'KodeRuang');


    322. 

  322. 	$kap = mysql_result($r0, 0, 'Kapasitas');


    323. 

  323. 	$kdp = mysql_result($r0, 0, 'PRG');


    324. 

  324. 	echo <<<EOF


    325. 

  325. 	  <table class=box cellspacing=1 cellpadding=4>


    326. 

  326. 	  <tr><td class=ttl>Mata Kuliah :</td><td class=uline>$kmk - $mk</td></tr>


    327. 

  327. 	  <tr><td class=ttl>Program :</td><td class=uline>$kdp</td></tr>


    328. 

  328. 	  <tr><td class=ttl>Dosen Pengampu</td><td class=uline>$dsn</td></tr>


    329. 

  329. 	  <tr><td class=ttl>Jadwal</td><td class=uline>$hr, $mul - $sel</td></tr>


    330. 

  330. 	  <tr><td class=ttl>Kampus - Ruang</td><td class=uline>$kmp - $rng</td></tr>


    331. 

  331. 	  <tr><td class=ttl>Kapasitas Ruang</td><td class=uline>$kap</td></tr>


    332. 

  332. 	  <tr><td></td></tr></table><br>


    333. 

  333. EOF;


    334. 

  334. }


    335. 

  335. function JadwalMhsw($jid, $thn) {


    336. 

  336.   global $strCantQuery, $fmtErrorMsg;


    337. 

  337. 	HeaderJadwal($jid);


    338. 

  338. 	$idmk = GetaField('jadwal', 'ID', $jid, 'IDMK');


    339. 

  339. 	$ada = GetaField('jadwal', "Tahun='$thn' and ID<>$jid and IDMK", $idmk, 'ID');


    340. 

  340. 	if (!empty($ada)) {


    341. 

  341. 	  $opt = '' ;//GetOption2("jadwal j left outer join program pr on j.Kelas=pr.Kode", 'pr.Nama_Indonesia', 'j.Kelas',


    342. 

  342. 	  //$jid, "j.IDMK=$idmk and j.Tahun='$thn'", 'j.ID', 1);


    343. 

  343. 	}


    344. 

  344. 


    345. 

  345. 	$s = "select k.*, m.Name


    346. 

  346. 	  from krs k left outer join mhsw m on k.NIM=m.NIM


    347. 

  347. 	  where k.IDJadwal=$jid order by k.NIM";


    348. 

  348. 	$r = mysql_query($s) or die("$strCantQuery: $s <br>".mysql_error());


    349. 

  349. 	$nmr = 0;


    350. 

  350. 	echo "<table class=box cellspacing=0 cellpadding=4>


    351. 

  351. 	  <tr><th class=ttl>#</th><th class=ttl>NIM</th><th class=ttl>Mahasiswa</th>


    352. 

  352. 	  <th class=ttl>Pindah</th></tr>";


    353. 

  353. 	while ($row = mysql_fetch_array($r)) {


    354. 

  354. 	  $nmr++;


    355. 

  355. 	  if (!empty($ada))


    356. 

  356. 	    $strchg = "<form action='sysfo.php' method=GET>


    357. 

  357. 		  <input type=hidden name='syxec' value='jdwlkuliah'>


    358. 

  358. 		  <input type=hidden name='jid' value=$jid>


    359. 

  359. 		  <input type=hidden name='kid' value=$row[ID]>


    360. 

  360. 		  <input type=hidden name='md1' value=0>


    361. 

  361. 		  <input type=hidden name='prcchg' value=1>


    362. 

  362. 		  <td class=uline><select name='chg' onChange='this.form.submit()'>$opt</select></td></form>";


    363. 

  363. 	  else $strchg = '<td class=uline>&nbsp;</td>';


    364. 

  364. 


    365. 

  365. 	  echo "<tr><td class=lst>$nmr</td>


    366. 

  366. 		<td class=lst>$row[NIM]</td><td class=lst>$row[Name]</td>


    367. 

  367. 		$strchg


    368. 

  368. 		</tr>";


    369. 

  369. 	}


    370. 

  370. 	echo "<tr><td height=2></td></tr></table>";


    371. 

  371. }


    372. 

  372. function PrcChg() {


    373. 

  373.   global $strCantQuery, $fmtErrorMsg;


    374. 

  374.   $jid = $_REQUEST['jid'];


    375. 

  375. 	$kid = $_REQUEST['kid'];


    376. 

  376. 	$chg = $_REQUEST['chg'];


    377. 

  377. 	if ($chg > 0) {


    378. 

  378. 	$arr = GetFields('jadwal', 'ID', $chg, 'Tahun,ID,IDMK,IDDosen');


    379. 

  379. 	$s = "update krs set Tahun='$arr[Tahun]', IDJadwal=$arr[ID],


    380. 

  380. 	  IDMK=$arr[IDMK], IDDosen=$arr[IDDosen] where ID=$kid";


    381. 

  381. 	$r = mysql_query($s) or die("$strCantQuery: $s");


    382. 

  382. 	}


    383. 

  383. }


    384. 

  384. function PrcDel() {


    385. 

  385.   global $fmtErrorMsg;


    386. 

  386.   $del = $_REQUEST['del'];


    387. 

  387.   $s = "select count(*) as JML from krs where IDJadwal='$del'";


    388. 

  388.   $r = mysql_query($s) or die("Query gagal: $s<br>".mysql_error());


    389. 

  389.   $w = mysql_fetch_array($r);


    390. 

  390.   


    391. 

  391.   if (($w['JML']+0) > 0) {


    392. 

  392. 	  $IDMK = GetaField('jadwal', 'ID', $del, 'IDMK');


    393. 

  393. 	  $MK = GetaField('matakuliah', 'ID', $IDMK, "concat(Kode, ' - ', Nama_Indonesia)");


    394. 

  394. 	  DisplayHeader($fmtErrorMsg, "Proses Hapus Dibatalkan.<hr size=1 color=silver>


    395. 

  395. 	    Mata kuliah <b>$MK</b> tidak dapat dihapus<br>


    396. 

  396.       karena telah ada mahasiswa yang mengambilnya.<br>


    397. 

  397.       Jumlah mahasiswa yg telah mengambil KRS mata kuliah ini: <b class=box>$w[JML]</b><hr size=1 color=silver>


    398. 

  398.       Pilihan: <a href='sysfo.php?syxec=jdwlkuliah&md1=0&jid=$del'>Lihat mhsw yg mengambil</a>");


    399. 

  399.   }


    400. 

  400.   else mysql_query("delete from jadwal where ID=$del");


    401. 

  401. }


    402. 

  402.   


    403. 

  403.   // *** Bagian Utama ***


    404. 

  404. $thn = GetSetVar('thn');


    405. 

  405. $kdj = GetSetVar('kdj');


    406. 

  406. $kdp = GetSetVar('kdp');


    407. 

  407. 


    408. 

  408. if (isset($_REQUEST['jid'])) $jid = $_REQUEST['jid']; else $jid = 0;


    409. 

  409. if (isset($_REQUEST['md'])) $md = $_REQUEST['md']; else $md = -1;


    410. 

  410. if (isset($_REQUEST['md1'])) $md1 = $_REQUEST['md1']; else $md1 = -1;


    411. 

  411. if (isset($_REQUEST['prn'])) $prn = $_REQUEST['prn']; else $prn = 0;


    412. 

  412. 


    413. 

  413. DisplayHeader($fmtPageTitle, 'Jadwal Kuliah');


    414. 

  414. if (isset($_REQUEST['prcjdwl'])) PrcJdwl($kdj);


    415. 

  415. if (isset($_REQUEST['prcchg'])) PrcChg();


    416. 

  416. if (isset($_REQUEST['del'])) PrcDel();


    417. 

  417. DispOptJdwl0();


    418. 

  418. 


    419. 

  419. if (!empty($thn) && !empty($kdj)) {


    420. 

  420.   if ($md1 == -1) {


    421. 

  421.     if ($prn == 0) echo GetKur4Jdwl($kdj, $kdp);


    422. 

  422.     if ($md == -1) Jadwal($thn, $kdj, $kdp);


    423. 

  423.     else JadwalForm($thn, $kdj, $md, $kurid, $jid);


    424. 

  424.   } else JadwalMhsw($jid, $thn);


    425. 

  425. }


    426. 

  426. ?>
    427.