Exemplo n.º 1
0
$kdunit = setup_kdunit_keu();
$xlevel = $_SESSION['xlevel'];
$xkdunit = $_SESSION['xkdunit'];
$xusername = $_SESSION['xusername'];
$th = $_SESSION['xth'];
if ($xlevel == 3 or $xlevel == 4 or $xlevel == 5 or $xlevel == 6 or $xlevel == 7 or $xlevel == 8) {
    $kdsatker = kd_satker($xkdunit);
    $sql = "select kdsatker from tb_unitkerja WHERE kdsatker = '{$kdsatker}' order by kdunit";
} else {
    $sql = "select kdsatker from tb_unitkerja WHERE kdsatker <> '' order by kdunit";
}
$aSatker = mysql_query($sql);
$count = mysql_num_rows($aSatker);
$jmlh = 0;
while ($Satker = mysql_fetch_array($aSatker)) {
    $pagu_satker = pagu_satker($th, $Satker['kdsatker']);
    if ($pagu_satker > 0) {
        $col[1][] = $Satker['kdsatker'];
        $col[2][] = $pagu_satker;
    }
}
?>
<table width="787" cellpadding="1" class="adminlist">
  <thead>
    <tr>
      <th rowspan="2">Unit Eselon II</th> 
      <th rowspan="2">Kode APBN</th>
      <th rowspan="2"><font color="#006600">Lembaga</font><br />Nama Satuan Kerja / <br>
        <font color="#0000FF">Nama Kegiatan</font> / <br /><font color="#993333">Output</font></th>
      <th rowspan="2">Pagu</th>
      <th colspan="13">Realisasi dan Rencana Penarikan (dalam juta rupiah)<br />
Exemplo n.º 2
0
    $pagu_10 = 0;
}
if ($Giat['RPHPAGU'] != 0) {
    $pagu_11 = $Giat['JML_11'] / $Giat['RPHPAGU'] * 100;
} else {
    $pagu_11 = 0;
}
if ($Giat['RPHPAGU'] != 0) {
    $pagu_12 = $Giat['JML_12'] / $Giat['RPHPAGU'] * 100;
} else {
    $pagu_12 = 0;
}
if ($kdsatker == '') {
    $pagu = pagu_menteri($th);
} else {
    $pagu = pagu_satker($th, $kdsatker);
}
for ($i = 1; $i <= 12; $i++) {
    if ($kdsatker == '') {
        $real_r[$i] = real_menteri_spm_sdbulan($th, $kddept, $kdunit, $i);
        if ($pagu != 0) {
            $real_p[$i] = real_menteri_spm_sdbulan($th, $kddept, $kdunit, $i) / $pagu * 100;
        } else {
            $real_p[$i] = 0;
        }
    } else {
        $real_r[$i] = real_satker_spm_sdbulan($th, $kdsatker, $i);
        if ($pagu != 0) {
            $real_p[$i] = real_satker_spm_sdbulan($th, $kdsatker, $i) / $pagu * 100;
        } else {
            $real_p[$i] = 0;
Exemplo n.º 3
0
    </tr>
    <?php 
} else {
    foreach ($col[0] as $k => $val) {
        if ($k % 2 == 1) {
            $class = "row0";
        } else {
            $class = "row1";
        }
        ?>
    <tr class="<?php 
        echo $class;
        ?>
"> 
	<?php 
        $pagu_satker = pagu_satker($th, $col[1][$k]);
        ?>
      <td width="6%" align="center"><strong><?php 
        echo $col[1][$k];
        ?>
</strong></td>
      <td width="54%" align="left"><strong><?php 
        echo nm_satker($col[1][$k]);
        ?>
</strong></td>
      <td width="12%" align="right"><strong><?php 
        echo number_format($pagu_satker, "0", ",", ".");
        ?>
</strong></td>
      <td width="11%" align="right"><strong><?php 
        echo number_format($col[2][$k], "0", ",", ".");