<?php

/*******************************************************************

    App. Name     : SISTEM INFORMASI MONITORING DAN EVALUASI
    Module        : /apps/php/mon/elaksa_renja.php
    Desc.         : PHP - Evaluasi Pelaksanaan Renja
    Created By    : Siau Pheng (siaupheng@3fonia.com).
    Created Date  : December 7th, 2011.
    Last Modified : April 12th, 2017.

    (c) 2011 - 2017, 3FONIA Software; WWW.3FONIA.COM.

*******************************************************************/

require_once(dirname(__FILE__)."/../../../../../modules3/web.auth.php");
require_once(dirname(__FILE__)."/../../../../../modules3/web.table.php");
require_once(dirname(__FILE__)."/../../../../../modules3/web.form.php");
require_once(dirname(__FILE__)."/../../../../../modules3/web.misc.php");
require_once(dirname(__FILE__)."/../../../../../modules3/data.json.php");
require_once(dirname(__FILE__)."/../../../../../modules3/web.print.php");
require_once(dirname(__FILE__)."/../func.emonev.php");

$db = DB();
$ajson = array();
$data = $ap->getParam("data");
$mode = $ap->getParam("mode");
$thn_renja = $_SESSION['__WEB_APP']['RENC_THN'];
$id_opd = $ap->getParam("OPDID", 0);
$id_upt = $ap->getParam("UPTID", 0);

if ( $data == "tabel-opd" || $data == "tabel-upt" || $data == "tabel-output" ) {
    if ( $data == "tabel-opd" ) {
        $qsql = " S.Aktif=1";
    } else if ( $data == "tabel-upt" ) {
        $qsql = " U.Aktif=1";
        $qsql .= ($id_opd==0) ? "" : " AND U.OPDID='".$id_opd."'";
    } else if ( $data == "tabel-output" ) {
        $qsql = " Tahun='".$thn_renja."'";
        $qsql .= ($id_opd==0) ? "" : " AND OPDID='".$id_opd."'";
        $qsql .= ($id_upt==0) ? "" : " AND UPTID='".$id_upt."'";

        $qsql .= (in_array($_SESSION['__WEB_USER']['Level'],array(3,4))) ? " AND OPDID IN (".$_SESSION['__WEB_USER']['AK_OPD'].")" : "";
        $qsql .= ($_SESSION['__WEB_USER']['Level']==4) ? " AND UPTID IN (".$_SESSION['__WEB_USER']['AK_UPT'].")" : "";
    }
}

if ( $data == "print" || $data == "excel"  || $data == "tabel-output" ) {
    $tahun = $ap->getParam("Tahun", $_SESSION['__WEB_APP']['RENC_THN']);
    $is_rutin = $ap->getParam("Cetak_Rutin", 1);
    $nama_opd = "Kabupaten Mempawah";
    $k_bu = "0.00";
    if ($id_opd>0) {
        $db->Query("SELECT Nama_OPD,K_BidangU FROM vi_para_opd WHERE OPDID='".$id_opd."'");
        if ($db->Next()) {
            $nama_opd = ucwords(strtolower($db->Row("Nama_OPD")));
            $k_bu = $db->Row("K_BidangU");
        }
    }

    $tabel_data = "dpa_detail"; $tsql = "";
    if ($id_opd>0) $tsql .= " AND T.OPDID='".$id_opd."'";
    if ($id_upt>0) $tsql .= " AND T.UPTID='".$id_upt."'";
    if ($is_rutin>1) $tsql .= " AND T.ProgID>7";

    // proses rekap database
    Report_Empty("laksa_urus");
    Report_Empty("laksa_bidu");
    Report_Empty("laksa_opd");
    Report_Empty("laksa_upt");
    Report_Empty("laksa_prog");
    
    // insert urusan
    $db->Query("INSERT INTO rep_laksa_urus SELECT T.Tahun,BU.K_Urusan,0,0,SUM(IF(T.Eval_Sesuai=1,1,0)),SUM(IF(T.Eval_Sesuai=2,1,0)),'".user_unix()."','".user_id()."' FROM ".$tabel_data." T LEFT JOIN para_program P ON (T.ProgID=P.ProgID) LEFT JOIN para_bidang_u BU ON (BU.K_BidangU=IF(P.K_BidangU='0.00','".$k_bu."',P.K_BidangU)) WHERE T.Tahun='".$tahun."'".$tsql." GROUP BY T.Tahun,BU.K_Urusan");
    // insert bidang urusan
    $db->Query("INSERT INTO rep_laksa_bidu SELECT T.Tahun,IF(P.K_BidangU='0.00','".$k_bu."',P.K_BidangU) K_BidangU,0,0,SUM(IF(T.Eval_Sesuai=1,1,0)),SUM(IF(T.Eval_Sesuai=2,1,0)),'".user_unix()."','".user_id()."' FROM ".$tabel_data." T LEFT JOIN para_program P ON (T.ProgID=P.ProgID) WHERE T.Tahun='".$tahun."'".$tsql." GROUP BY T.Tahun,IF(P.K_BidangU='0.00','".$k_bu."',P.K_BidangU)");
    // insert opd
    $db->Query("INSERT INTO rep_laksa_opd SELECT T.Tahun,T.OPDID,0,0,SUM(IF(T.Eval_Sesuai=1,1,0)),SUM(IF(T.Eval_Sesuai=2,1,0)),'".user_unix()."','".user_id()."' FROM ".$tabel_data." T WHERE T.Tahun='".$tahun."'".$tsql." GROUP BY T.Tahun,T.OPDID");
    // insert upt
    $db->Query("INSERT INTO rep_laksa_upt SELECT T.Tahun,T.OPDID,T.UPTID,0,0,SUM(IF(T.Eval_Sesuai=1,1,0)),SUM(IF(T.Eval_Sesuai=2,1,0)),'".user_unix()."','".user_id()."' FROM ".$tabel_data." T WHERE T.Tahun='".$tahun."'".$tsql." GROUP BY T.Tahun,T.OPDID,T.UPTID");
    // insert program
    $db->Query("INSERT INTO rep_laksa_prog SELECT T.Tahun,T.OPDID,T.UPTID,T.ProgID,0,0,SUM(IF(T.Eval_Sesuai=1,1,0)),SUM(IF(T.Eval_Sesuai=2,1,0)),'".user_unix()."','".user_id()."' FROM ".$tabel_data." T WHERE T.Tahun='".$tahun."'".$tsql." GROUP BY T.Tahun,T.OPDID,T.UPTID,T.ProgID");

    $tsql = "";
    if ($id_opd>0) $tsql .= " AND OPDID='".$id_opd."'";
    if ($id_upt>0) $tsql .= " AND UPTID='".$id_upt."'";
    if ($is_rutin>1) $tsql .= " AND ProgID>7";
    $db->Query("SELECT A.K_RKA,A.K_Urusan KO_URUSAN,A.K_BidangU KO_FUNGSI,A.K_OPD KO_OPD,A.K_UPT KO_UPT,A.K_Prog KO_PROGRAM,CONCAT(A.K_Prog,'.',A.K_Keg) KO_KEG,UCASE(A.N_Urusan) N_URUSAN,A.N_BidangU N_FUNGSI,A.N_OPD,A.N_UPT,A.N_Prog N_PROGRAM,A.N_Keg,A.Lokasi,B.Lokasi LokasiR,A.B_Total PAGU,A.T_Hasil,B.Indi_Hasil T_HasilR,A.T_Keluar,B.Ini_Target T_KeluarR,B.Ini_Pagu PAGUR,A.Eval_Sesuai,A.Eval_Evaluasi,A.Eval_Tindak,A.Eval_Lanjut,RU.*,RB.*,RO.*,RT.*,RP.* FROM (SELECT T.*,PR.K_Prog,PR.Prog_Indi,PR.Prog_Target,S.K_OPD,S.N_OPD,U.N_UPT,P.N_Urut,P.N_Prog,IF(ISNULL(R.K_Urusan),S.K_Urusan,R.K_Urusan) K_Urusan,IF(ISNULL(R.K_Urusan),S.N_Urusan,R.N_Urusan) N_Urusan,IF(ISNULL(R.K_Urusan),S.K_BidangU,BU.K_BidangU) K_BidangU,IF(ISNULL(R.K_Urusan),S.N_BidangU,BU.N_BidangU) N_BidangU FROM (SELECT * FROM ".$tabel_data." WHERE Tahun='".$tahun."'".$tsql.") T LEFT JOIN dpa_prog PR ON (T.Tahun=PR.Tahun AND T.OPDID=PR.OPDID AND T.UPTID=PR.UPTID AND T.ProgID=PR.ProgID) LEFT JOIN vi_para_opd S ON (T.OPDID=S.OPDID) LEFT JOIN para_upt U ON (T.UPTID=U.UPTID) LEFT JOIN para_program P ON (T.ProgID=P.ProgID) LEFT JOIN para_bidang_u BU ON (P.K_BidangU=BU.K_BidangU) LEFT JOIN para_urusan R ON (BU.K_Urusan=R.K_Urusan)) A LEFT JOIN (SELECT * FROM renja_detail WHERE Tahun='".$tahun."'".$tsql.") B ON (A.RKegID=B.RKegID) LEFT JOIN rep_laksa_urus RU ON (A.K_Urusan=RU.K_Urusan AND A.Tahun=RU.Tahun AND RU.UserID='".user_id()."' AND RU.Unix='".user_unix()."') LEFT JOIN rep_laksa_bidu RB ON (A.K_BidangU=RB.K_BidangU AND A.Tahun=RB.Tahun AND RB.UserID='".user_id()."' AND RB.Unix='".user_unix()."') LEFT JOIN rep_laksa_opd RO ON (A.OPDID=RO.OPDID AND A.Tahun=RO.Tahun AND RO.UserID='".user_id()."' AND RO.Unix='".user_unix()."') LEFT JOIN rep_laksa_upt RT ON (A.OPDID=RT.OPDID AND A.UPTID=RT.UPTID AND A.Tahun=RT.Tahun AND RT.UserID='".user_id()."' AND RT.Unix='".user_unix()."') LEFT JOIN rep_laksa_prog RP ON (A.ProgID=RP.ProgID AND A.OPDID=RP.OPDID AND A.UPTID=RP.UPTID AND A.Tahun=RP.Tahun AND RP.UserID='".user_id()."' AND RP.Unix='".user_unix()."') ORDER BY A.K_Urusan, A.K_BidangU, A.N_Urut, A.K_Prog, A.K_UPT, A.K_Keg");
}

if ( $data == "tabel-opd" ) {
    $obj = new cGRIDTABLE();
    $obj->set_query("SELECT S.* FROM vi_para_opd S WHERE ".$qsql);
    $obj->add_field("OPDID", "OPD", "hidden");
    $obj->add_field("Nama_OPD", "Nama OPD", "hidden");
    $obj->add_field("K_OPD", "Kode", "center");
    $obj->add_field("N_OPD", "Nama Perangkat Daerah", "left autowrap");
    $obj->set_field_order("K_OPD", "A");
    $obj->add_row_btn("folder", "Unit / UPTD", "ELaksaRKPDJS.opd_select");
    $obj->set_func_navi("ELaksaRKPDJS.data_query('tabel-opd')");
    $obj->set_textbtn(true);
    $ajson[] = $obj->json_table("divOPD");

} else if ( $data == "tabel-upt" ) {
    $obj = new cGRIDTABLE();
    $obj->set_query("SELECT U.* FROM vi_para_upt U WHERE ".$qsql);
    $obj->add_field("UPTID", "UPT", "hidden");
    $obj->add_field("Nama_UPT", "Nama UPT", "hidden");
    $obj->add_field("K_UPT", "Kode", "center");
    $obj->add_field("N_UPT", "Nama Unit / UPTD", "left autowrap");
    $obj->set_field_order("K_UPT", "A");
    $obj->add_row_btn("folder", "Output", "ELaksaRKPDJS.upt_select");
    $obj->set_func_navi("ELaksaRKPDJS.data_query('tabel-upt')");
    $obj->set_textbtn(true);
    $ajson[] = $obj->json_table("divUPT");

} else if ( $data == "tabel-output" ) {
    $header = '<hr>
<table width="100%" class="garis">
<tr><td width="50" class="center bold" rowspan="3">Kode</td><td width="100" class="center bold" rowspan="3">Urusan/Bidang Urusan<br>Pemerintahan Daerah<br>dan Program/Kegiatan</td><td width="100" class="center bold" rowspan="2" colspan="2">Indikator Kinerja<br>Program/Kegiatan</td><td width="100" class="center bold" colspan="6">Rencana Tahun '.$thn_renja.'</td><td width="100" class="center bold" colspan="6">Prakiraan Maju Tahun '.($thn_renja+1).'</td><td width="100" class="center bold" rowspan="2" colspan="2">Kesesuaian</td><td width="100" class="center bold" rowspan="3">Evaluasi</td><td width="100" class="center bold" rowspan="3">Tindak Lanjut</td><td width="100" class="center bold" rowspan="3">Hasil Tindak Lanjut</td></tr>
<tr><td width="100" class="center bold" colspan="2">Lokasi</td><td width="100" class="center bold" colspan="2">Target Capaian Kinerja</td><td width="100" class="center bold" colspan="2">Dana</td><td width="100" class="center bold" colspan="2">Lokasi</td><td width="100" class="center bold" colspan="2">Target Capaian Kinerja</td><td width="100" class="center bold" colspan="2">Dana</td></tr>
<tr><td width="50" class="center bold">Renja</td><td width="50" class="center bold">RKA</td><td width="50" class="center bold">Renja</td><td width="50" class="center bold">RKA</td><td width="50" class="center bold">Renja</td><td width="50" class="center bold">RKA</td><td width="50" class="center bold">Renja</td><td width="50" class="center bold">RKA</td><td width="50" class="center bold">Renja</td><td width="50" class="center bold">RKA</td><td width="50" class="center bold">Renja</td><td width="50" class="center bold">RKA</td><td width="50" class="center bold">Renja</td><td width="50" class="center bold">RKA</td><td width="50" class="center bold">Ya</td><td width="50" class="center bold">Tidak</td></tr>
<tr><td class="center">1</td><td class="center">2</td><td class="center">3</td><td class="center">4</td><td class="center">5</td><td class="center">6</td><td class="center">7</td><td class="center">8</td><td class="center">9</td><td class="center">10</td><td class="center">11</td><td class="center">12</td><td class="center">13</td><td class="center">14</td><td class="center">15</td><td class="center">16</td><td class="center">17</td><td class="center">18</td><td class="center">19</td><td class="center">20</td><td class="center">21</td></tr>';
    $_sub = '<tr><td class="left" nowrap>%s</td><td colspan="15" class="left">%s</td><td class="right">%s</td><td class="right">%s</td><td colspan="3" class="left">%s</td</tr>';
    $_line = '<tr><td class="left" nowrap>%s</td><td class="left">%s</td><td class="left">%s</td><td class="left">%s</td><td class="left">%s</td><td class="left">%s</td><td class="left">%s</td><td class="left">%s</td><td class="right">%s</td><td class="right">%s</td><td class="left">%s</td><td class="left">%s</td><td class="left">%s</td><td class="left">%s</td><td class="right">%s</td><td class="right">%s</td><td class="center">%s</td><td class="center">%s</td><td class="left">%s</td><td class="left">%s</td><td class="left">%s</td></tr>';
    $body = $urus = $fung = $opd = $upt = $prog = "";
    while ($db->Next()) {
        if ($urus <> $db->Row("KO_URUSAN")) {
            $body .= sprintf($_sub, $db->Row("KO_URUSAN"), $db->Row("N_URUSAN"), rupiah($db->Row("URUS_YA")), rupiah($db->Row("URUS_TIDAK")), "");
            $urus = $db->Row("KO_URUSAN");
        }
        if ($fung <> $db->Row("KO_FUNGSI")) {
            $body .= sprintf($_sub, $db->Row("KO_FUNGSI"), $db->Row("N_FUNGSI"), rupiah($db->Row("BIDU_YA")), rupiah($db->Row("BIDU_TIDAK")), "");
            $fung = $db->Row("KO_FUNGSI");
        }
        if ($opd <> $db->Row("KO_OPD")) {
            $body .= sprintf($_sub, $db->Row("KO_OPD"), $db->Row("N_OPD"), rupiah($db->Row("OPD_YA")), rupiah($db->Row("OPD_TIDAK")), "");
            $opd = $db->Row("KO_OPD");
        }
        if ($upt <> $db->Row("KO_UPT")) {
            $body .= sprintf($_sub, $db->Row("KO_UPT"), $db->Row("N_UPT"), rupiah($db->Row("UPT_YA")), rupiah($db->Row("UPT_TIDAK")), "");
            $upt = $db->Row("KO_UPT");
        }
        if ($prog <> $db->Row("KO_PROGRAM")) {
            $body .= sprintf($_sub, $db->Row("KO_PROGRAM"), $db->Row("N_PROGRAM"), rupiah($db->Row("PROG_YA")), rupiah($db->Row("PROG_TIDAK")), "");
            $prog = $db->Row("KO_PROGRAM");
        }
        $body .= sprintf($_line, $db->Row("KO_KEG"), $db->Row("N_Keg"), $db->Row("T_HasilR"), $db->Row("T_Hasil"), $db->Row("LokasiR"), $db->Row("Lokasi"), $db->Row("T_KeluarR"), $db->Row("T_Keluar"), rupiah($db->Row("PAGUR")), rupiah($db->Row("PAGU")), "", "", "", "", "", "", ($db->Row("Eval_Sesuai")==1?"V":""), ($db->Row("Eval_Sesuai")==2?"V":""), $db->Row("Eval_Evaluasi"), $db->Row("Eval_Tindak"), $db->Row("Eval_Lanjut"));
    }
    echo $header . $body . "</table>";

} else if ( $data == "default") {
    echo '
    <div class="fade-in">
    <div class="card"><div class="card-header custom-style">Evaluasi Pelaksanaan RKPD // Tahun '.$thn_renja.'</div><div class="card-body">
    <div class="form-row mb-1">
        <div class="col">
            <div class="input-group">
                <input class="form-control" id="Nama_OPD" placeholder="Nama Perangkat Daerah" type="text" readonly>
                <input id="OPDID" type="hidden" value="0">
                <span class="input-group-append">
                    <button class="btn btn-info btn-ganti" type="button" id="butOPD"><span><i class="bi-arrow-left-right"></span></i>OPD</button>
                </span>
            </div>
        </div>
    </div>
    <div class="form-row mb-1">
        <div class="col">
            <div class="input-group">
                <input class="form-control" id="Nama_UPT" placeholder="Nama Unit / UPTD " type="text" readonly>
                <input id="UPTID" type="hidden" value="0">
                <span class="input-group-append">
                    <button class="btn btn-info btn-ganti" type="button" id="butUPT"><span><i class="bi-arrow-left-right"></span></i>UPTD</button>
                </span>
            </div>
        </div>
    </div>
    <div id="divOPD">&nbsp;</div>
    <div id="divUPT">&nbsp;</div>
    <div id="divOUTPUT">&nbsp;</div>
    </div></div>
    </div>';
}

send_json($ajson);
?>