function TampilkanDataBIPOT($gels, $gel, $pmb) { HapusBIPOTScript(); $s = "select bm.*, s.Nama as _saat,\r\n format(bm.Jumlah, 0) as JML,\r\n format(bm.TrxID*bm.Besar, 0) as BSR,\r\n format(bm.Dibayar, 0) as BYR\r\n from bipotmhsw bm\r\n left outer join bipot2 b2 on bm.BIPOT2ID = b2.BIPOT2ID\r\n left outer join saat s on b2.SaatID = s.SaatID\r\n where bm.PMBMhswID = 0\r\n and bm.KodeID = '" . KodeID . "'\r\n and bm.PMBID = '{$pmb['PMBID']}'\r\n order by b2.Prioritas, bm.TrxID, bm.BIPOTMhswID"; $r = _query($s); $n = 0; echo "<table class=box cellspacing=1 align=center width=800>"; echo "<tr>\r\n <th class=ttl colspan=10>Daftar Biaya & Potongan (BIPOT)</th>\r\n </tr>"; echo "<tr>\r\n <th class=ttl colspan=2>#</th>\r\n <th class=ttl>Keterangan</th>\r\n <th class=ttl>Jumlah ×<br />Besar</th>\r\n <th class=ttl>Total</th>\r\n <th class=ttl>Dibayar</th>\r\n <th class=ttl>Catatan</th>\r\n <th class=ttl>×</th>\r\n </tr>"; while ($w = _fetch_array($r)) { $n++; $sub = $w['Jumlah'] * $w['Besar'] * $w['TrxID']; $_sub = number_format($sub); $ttl += $sub; $byr += $w['Dibayar']; if ($_SESSION['_LevelID'] == 1) { //if($w['Dibayar']>0){ $del = $w['Dibayar'] > 0 ? ' ' : "<a href='#' onClick=\"BIPOTDELCONF({$w['BIPOTMhswID']}, '{$pmb['PMBID']}')\"><img src='img/del.gif' /></a>"; } $TambahanNama = empty($w['TambahanNama']) ? "" : "({$w['TambahanNama']})"; echo "<tr>\r\n <td class=inp width=15>{$n}</td>\r\n <td class=ul width=10>\r\n <a href='#' onClick=\"javascript:BIPOTEdit('{$pmb['PMBID']}', 0, {$w['BIPOTMhswID']})\"><img src='img/edit.png' /></a>\r\n </td>\r\n <td class=ul>\r\n {$w['Nama']} {$TambahanNama}<br />\r\n <div align=right><sub>{$w['_saat']}</sub></div>\r\n </td>\r\n <td class=ul norwap>\r\n <sup>{$w['JML']} ×</sup><br />\r\n <div align=right>{$w['BSR']}</div>\r\n </td>\r\n <td class=ul align=right nowrap>{$_sub}</td>\r\n <td class=ul align=right nowrap>\r\n {$w['BYR']} <!--\r\n <a href='#' onClick=\"javascript:ByrEdit('{$pmb['PMBID']}', 1, 0, {$w['PMBMhswID']})\"><img src='img/edit.png' /></a>\r\n -->\r\n </td>\r\n <td class=ul1>{$w['Catatan']} </td>\r\n <td class=ul1 align=center width=10>\r\n {$del}\r\n </td>\r\n </tr>"; } $TTL = number_format($ttl); $BYR = number_format($byr); $SS = number_format($ttl - $byr); echo "<tr><td bgcolor=silver colspan=10 height=1></td></tr>"; echo "<tr>\r\n <td class=ul1 colspan=4 align=right><b>Total:</td>\r\n <td class=ul1 align=right><b>{$TTL}</b></td>\r\n <td class=ul1 align=right><b>{$BYR}</b></td>\r\n <td class=ul1 colspan=2>Sisa: <font size=+1>{$SS}</font></td>\r\n </tr>"; echo "</table>"; }
function TampilkanDataBIPOT($gels, $gel, $pmb) { HapusBIPOTScript(); $s = "select bm.*, s.Nama as _saat,\r\n format(bm.Jumlah, 0) as JML,\r\n format(bm.TrxID*bm.Besar, 0) as BSR,\r\n format(bm.Dibayar, 0) as BYR\r\n from bipotmhsw bm\r\n left outer join bipot2 b2 on bm.BIPOT2ID = b2.BIPOT2ID\r\n left outer join saat s on b2.SaatID = s.SaatID\r\n where bm.PMBMhswID = 0\r\n and bm.KodeID = '" . KodeID . "'\r\n and bm.PMBID = '{$pmb['PMBID']}'\r\n order by bm.TagihanID, b2.Prioritas, bm.TrxID DESC, bm.BIPOTMhswID "; //order by b2.Prioritas, bm.TrxID DESC, bm.BIPOTMhswID $r = _query($s); $n = 0; echo "<table class=box cellspacing=1 align=center width=900>"; echo "<tr>\r\n <th class=ttl colspan=10>Daftar Biaya & Potongan (BIPOT)</th>\r\n </tr>"; echo "<tr>\r\n <th class=ttl colspan=2>#</th>\r\n <th class=ttl>Keterangan</th>\r\n <th class=ttl>Jumlah ×<br />Besar</th>\r\n <th class=ttl>Total</th>\r\n <th class=ttl>Dibayar</th>\r\n <th class=ttl>Catatan</th>\r\n <th class=ttl colspan=2>×</th> \r\n </tr>"; while ($w = _fetch_array($r)) { $n++; $sub = $w['Jumlah'] * $w['Besar'] * $w['TrxID']; $_sub = number_format($sub); $ttl += $sub; $byr += $w['Dibayar']; if ($_SESSION['_LevelID'] == 1 || $_SESSION['_LevelID'] == 70) { // hanya superuser atau ka. keu if ($pmb['PrintTagihan'] >= 1) { $edit = ""; //($w[BYR] == 0 || $w[TrxID] == -1)? "<a href='#' onClick=\"javascript:BIPOTEdit('$mhsw[MhswID]', '$khs[TahunID]', 0, $w[BIPOTMhswID])\"><img src='img/edit.png' /> </a>" : ""; $del = ""; //($w[BYR] == 0 || $w[TrxID] == -1)? "<a href='#' onClick=\"BIPOTDELCONF($w[BIPOTMhswID], '$mhsw[MhswID]', '$khs[TahunID]')\"><img src='img/del.gif' /></a>" : ""; } else { $byrm2 = GetFields('bayarmhsw2', "BIPOTMhswID='{$w['BIPOTMhswID']}' and NA", 'N', 'BayarMhswID, Jumlah'); $byrm_jml = GetaField('bayarmhsw', "BayarMhswID='{$byrm2['BayarMhswID']}' and NA", 'N', 'Jumlah') + 0; $edit = "<a href='#' onClick=\"javascript:BIPOTEdit('{$pmb['PMBID']}', 0, {$w['BIPOTMhswID']})\"><img src='img/edit.png' title='Untuk Mengedit Biaya/Potongan' /></a>"; //$del = ($w['Dibayar']>0)? ' ':"<a href='#' onClick=\"BIPOTDELCONF($w[BIPOTMhswID], '$pmb[PMBID]')\"><img src='img/del.gif' /></a>"; $del = "<a href='#' onClick=\"BIPOTDELCONF({$w['BIPOTMhswID']}, '{$pmb['PMBID']}')\"><img src='img/del.gif' /></a>"; } } else { $edit = ""; //($w[BYR] == 0 || $w[TrxID] == -1)? "<a href='#' onClick=\"javascript:BIPOTEdit('$mhsw[MhswID]', '$khs[TahunID]', 0, $w[BIPOTMhswID])\"><img src='img/edit.png' /> </a>" : ""; $del = ""; //($w[BYR] == 0 || $w[TrxID] == -1)? "<a href='#' onClick=\"BIPOTDELCONF($w[BIPOTMhswID], '$mhsw[MhswID]', '$khs[TahunID]')\"><img src='img/del.gif' /></a>" : ""; } $TambahanNama = empty($w['TambahanNama']) ? "" : "({$w['TambahanNama']})"; $TombolTambahBipot2 = ""; if ($w['TrxID'] == 1) { $TombolTambahBipot2 = "<a href='#' onClick=\"javascript:BIPOTEdit2('{$pmb['PMBID']}', 1, 0 , {$w['TagihanID']})\"><img src='img/N.gif' title='Untuk Menginputkan Potongan' /></a>"; } echo "<tr>\r\n <td class=inp width=15>{$n}</td>\r\n <td class=ul width=10>{$TombolTambahBipot2}</td>\r\n <td class=ul>{$w['Nama']} {$TambahanNama}<br /><div align=right><sub>{$w['_saat']}</sub></div></td>\r\n <td class=ul norwap><sup>{$w['JML']} ×</sup><br /><div align=right>{$w['BSR']}</div></td>\r\n <td class=ul align=right nowrap>{$_sub}</td>\r\n <td class=ul align=right nowrap>{$w['BYR']}</td>\r\n <td class=ul > {$w['Catatan']} </td>\r\n <td class=ul1 align=center width=15>{$edit}</td>\r\n <td class=ul1 align=center width=15>{$del}</td>\r\n </tr>"; } $TTL = number_format($ttl); $BYR = number_format($byr); $SS = number_format($ttl - $byr); echo "<tr><td bgcolor=silver colspan=10 height=1></td></tr>"; echo "<tr>\r\n <td class=ul1 colspan=4 align=right><b>Total:</td>\r\n <td class=ul1 align=right><b>{$TTL}</b></td>\r\n <td class=ul1 align=right><b>{$BYR}</b></td>\r\n <td class=ul1 colspan=2>Sisa: <font size=+1>{$SS}</font></td>\r\n </tr>"; echo "</table>"; }