ubah subkeg output, tambah eviden di kinerja prog dan kinerja subkeg

apps/cfg/app.php

@@ -71,7 +71,7 @@ if (!isset($_SESSION['__WEB_APP'])) {
     if ($db->Next()) $ainfo = $db->AllRow();
     $apps['Real_Tahun_Min'] = $ainfo['Tahun_Min'];
     $apps['Real_Tahun_Max'] = $ainfo['Tahun_Max'];
-    $apps['Real_Periode'] = $ainfo['N_RPJMD'];
+    $apps['Real_Periode']   = $ainfo['Ket'];
     // Cari Kode Awal Field Realisasi, basis REAL_THN (Config)
     if ($ainfo['Tahun1']==$apps['REAL_THN']) $apps['REAL_FIELD'] = "T1_";
     if ($ainfo['Tahun2']==$apps['REAL_THN']) $apps['REAL_FIELD'] = "T2_";

apps/js/mon/kinerja.js

@@ -41,7 +41,8 @@ var KinerjaJS = {
             $('#OPDID').val(0);
             $('#ORGID').val(0);
             $('#Nama_OPD').val('');
-            $('#Hak_Real').val(1);
+            $('#Hak_Bln').val(1);
+            $('#Hak_Tw').val(1);
         }
         if (no <= 1) {
             $('#ProgID').val(0);
@@ -72,7 +73,8 @@ var KinerjaJS = {
         $('#OPDID').val(acell[0]);
         $('#ORGID').val(acell[1]);
         $('#Nama_OPD').val(acell[2]);
-        $('#Hak_Real').val(acell[3]);
+        $('#Hak_Bln').val(acell[3]);
+        $('#Hak_Tw').val(acell[4]);
         this.show_hide(2);
     },
 
@@ -86,10 +88,10 @@ var KinerjaJS = {
         $('#ProgID').val(acell[1]);
         new Request({
             url: this.PHP,
-            sendParam: ['data=detail-prog','Hak_Real','ORGID','OPDID','ProgID','DPAProgID='+acell[0]],
+            sendParam: ['data=detail-prog','Hak_Tw','ORGID','OPDID','ProgID','DPAProgID='+acell[0]],
             onSuccess: (txt) => {
                 const tombol = [{},{i:'butTutup'},{i:'butWSimpan',v:'Simpan',c:'success'}];
-                if ($('#Hak_Real').val()==0) tombol.pop();
+                if ($('#Hak_Tw').val()==0) tombol.pop();
                 this.winProg = FoniaJS.showWindow('Prog', 'Detail Capaian Program', txt, 'xl', tombol, () => {
                     $('#winProg').find('#butWSimpan').click(() => this.prog_save());
                 });
@@ -98,8 +100,11 @@ var KinerjaJS = {
     },
 
     prog_save: function(){
-        var _param = ['data=tabel-prog','mode_detail=update','Hak_Real','ORGID','OPDID','ProgID','DPAProgID'];
+        //todo: cek jika simpan dg !empty kinerja, wajib isi sumber data.
+        var _param = ['data=tabel-prog','mode_detail=update','Hak_Tw','ORGID','OPDID','ProgID','DPAProgID'];
         $(':input[id^="Prog_TW_"]').each((i,e) => { _param.push(e.id); });
+        $(':input[id^="Sumber_TW_"]').each((i,e) => { _param.push(e.id); });
+        $(':input[id^="Catat_TW_"]').each((i,e) => { _param.push(e.id); });
         new Request.JSONF({
             url: this.PHP,
             sendParam: _param,
@@ -126,10 +131,10 @@ var KinerjaJS = {
         $('#SubID').val(acell[1]);
         new Request({
             url: this.PHP,
-            sendParam: ['data=detail-sub','Hak_Real','ORGID','OPDID','ProgID','KegID','SubID='+acell[1],'DPASubID='+acell[0]],
+            sendParam: ['data=detail-sub','Hak_Bln','ORGID','OPDID','ProgID','KegID','SubID='+acell[1],'DPASubID='+acell[0]],
             onSuccess: (txt) => {
                 const tombol = [{},{i:'butTutup'},{i:'butWSimpan',v:'Simpan',c:'success'}];
-                if ($('#Hak_Real').val()==0) tombol.pop();
+                if ($('#Hak_Bln').val()==0) tombol.pop();
                 this.winDSub = FoniaJS.showWindow('DSub', 'Kinerja dan Informasi Sub Kegiatan', txt, 'xl', tombol, () => {
                     $('#winDSub').find('#butWSimpan').click(() => this.sub_save());
                 });
@@ -138,8 +143,8 @@ var KinerjaJS = {
     },
     
     sub_save: function(){
-        var _param = ['data=tabel-sub','Hak_Real','ORGID','OPDID','ProgID','KegID','SubID','DPASubID','Real_Catatan','Real_No_Kontrak','Real_Pelaksana','mode_detail=update'];
+        var _param = ['data=tabel-sub','Hak_Bln','ORGID','OPDID','ProgID','KegID','SubID','DPASubID','Real_Catatan','Real_No_Kontrak','Real_Pelaksana','DPASubOutputID','Real_TW','mode_detail=update'];
-        $(':input[id^="Output_TW_"]').each((i,e) => { _param.push(e.id); });
+        //$(':input[id^="Output_TW_"]').each((i,e) => { _param.push(e.id); });
         new Request.JSONF({
             url: this.PHP,
             sendParam: _param,
@@ -153,10 +158,10 @@ var KinerjaJS = {
     akun_ubah: function(acell){
         new Request({
             url: this.PHP,
-            sendParam: ['data=detail-akun','Hak_Real','ORGID','OPDID','ProgID','KegID','SubID','DPAAkunID='+acell[0]],
+            sendParam: ['data=detail-akun','Hak_Bln','ORGID','OPDID','ProgID','KegID','SubID','DPAAkunID='+acell[0]],
             onSuccess: (txt) => {
                 const tombol = [{},{i:'butTutup'},{i:'butWSimpan',v:'Simpan',c:'success'}];
-                if ($('#Hak_Real').val()==0) tombol.pop();
+                if ($('#Hak_Bln').val()==0) tombol.pop();
                 this.winDAkun = FoniaJS.showWindow('DAkun', 'Detail Akun', txt, 'xl', tombol, () => {
                     $('#winDAkun')
                         .find('#butWSimpan').click(() => this.akun_save()).end()
@@ -172,7 +177,7 @@ var KinerjaJS = {
                             this.oc_RealN();
                             if ((e.keyCode || e.which || 0)==13) $('#winDAkun').find('#butWSimpan').focus();
                         }).attr('title', 'Total Realisasi Non-Fisik S/D Bulan ini !').end()
-                    if (parseInt($('#Hak_Real').val())==1) FoniaJS.setFocus('#RealK_Tot');
+                    if (parseInt($('#Hak_Bln').val())==1) FoniaJS.setFocus('#RealK_Tot');
                 });
             }
         }).send();
@@ -195,7 +200,7 @@ var KinerjaJS = {
         }*/
         new Request.JSONF({
             url: this.PHP,
-            sendParam: ['data=tabel-akun','mode_detail=update','Hak_Real','ORGID','OPDID','ProgID','KegID','SubID','DPAAkunID','AkunID','RealK_Bln','RealF_Bln','RealN_Bln'],
+            sendParam: ['data=tabel-akun','mode_detail=update','Hak_Bln','ORGID','OPDID','ProgID','KegID','SubID','DPAAkunID','AkunID','RealK_Bln','RealF_Bln','RealN_Bln'],
             onSuccess: (adata) => {
                 FoniaJS.closeWindow(this.winDAkun);
                 FoniaJS.showInfo('Sukses menyimpan Realisasi Akun.');
@@ -212,22 +217,22 @@ var KinerjaJS = {
         } else if (tipe=="tabel-prog"){
             new Request.JSONF({
                 url: this.PHP,
-                sendParam: ['data=tabel-prog','Hak_Real','ORGID','OPDID']
+                sendParam: ['data=tabel-prog','Hak_Tw','ORGID','OPDID']
             }).send();
         } else if (tipe=="tabel-keg"){
             new Request.JSONF({
                 url: this.PHP,
-                sendParam: ['data=tabel-keg','Hak_Real','ORGID','OPDID','ProgID']
+                sendParam: ['data=tabel-keg','Hak_Bln','ORGID','OPDID','ProgID']
             }).send();
         } else if (tipe=="tabel-sub"){
             new Request.JSONF({
                 url: this.PHP,
-                sendParam: ['data=tabel-sub','Hak_Real','ORGID','OPDID','ProgID','KegID']
+                sendParam: ['data=tabel-sub','Hak_Bln','ORGID','OPDID','ProgID','KegID']
             }).send();
         } else if (tipe=="tabel-akun"){
             new Request.JSONF({
                 url: this.PHP,
-                sendParam: ['data=tabel-akun','Hak_Real','ORGID','OPDID','ProgID','KegID','SubID']
+                sendParam: ['data=tabel-akun','Hak_Bln','ORGID','OPDID','ProgID','KegID','SubID']
             }).send();
         }
     },

apps/js/mon/renja.js

@@ -43,7 +43,7 @@ var RenjaJS = {
             $('#AK_Bidu').val('');
             $('#K_Bidu1').val('');
             $('#Nama_OPD').val('');
-            $('#Hak_DPA').val(1);
+            $('#Hak_Renja').val(1);
         }
         if (no <= 1) {
             $('#ProgID').val(0);
@@ -76,7 +76,7 @@ var RenjaJS = {
         $('#Nama_OPD').val(acell[2]);
         $('#AK_Bidu').val(acell[3]);
         $('#K_Bidu1').val(acell[4]);
-        $('#Hak_DPA').val(acell[5]);
+        $('#Hak_Renja').val(acell[5]);
         this.show_hide(2);
     },
 
@@ -108,7 +108,7 @@ var RenjaJS = {
     prog_brow_select: function(acell) {
         new Request.JSONF({
             url: this.PHP,
-            sendParam: ['data=tabel-prog','mode_detail=insert','Hak_DPA','ORGID','OPDID','K_Bidu1','ProgID='+acell[0],'K_Bidu='+acell[1],'K_Prog='+acell[2]],
+            sendParam: ['data=tabel-prog','mode_detail=insert','Hak_Renja','ORGID','OPDID','K_Bidu1','ProgID='+acell[0],'K_Bidu='+acell[1],'K_Prog='+acell[2]],
             onSuccess: () => {
                 FoniaJS.closeWindow(this.winBProg);
                 FoniaJS.showInfo("Program baru telah ditambahkan.");
@@ -120,7 +120,7 @@ var RenjaJS = {
         $('#ProgID').val(acell[1]);
         new Request({
             url: this.PHP,
-            sendParam: ['data=detail-prog','Hak_DPA','ORGID','OPDID','ProgID','DPAProgID='+acell[0]],
+            sendParam: ['data=detail-prog','Hak_Renja','ORGID','OPDID','ProgID','DPAProgID='+acell[0]],
             onSuccess: (txt) => {
                 this.winProg = FoniaJS.showWindow('Prog', 'Detail Program', txt, 'xl', [{},{i:'butTutup'}], () => {
                     this.data_query('tabel-prog-indi');
@@ -151,7 +151,7 @@ var RenjaJS = {
     prog_indi_form: function(acell, div){
         new Request.JSON({
             url: this.PHP,
-            sendParam: ['data=detail-prog-indi','Hak_DPA','ORGID','OPDID','ProgID','DPAProgIndiID='+acell[0]],
+            sendParam: ['data=detail-prog-indi','Hak_Renja','ORGID','OPDID','ProgID','DPAProgIndiID='+acell[0]],
             onSuccess: (adata) => {
                 $(div).html(adata.html);
                 $(div)
@@ -165,7 +165,7 @@ var RenjaJS = {
         FoniaJS.showConfirm('Konfirmasi', 'Yakin akan hapus <b>"'+acell[1]+'"</b> ?', () => {
             new Request.JSONF({
                 url: this.PHP,
-                sendParam: ['data=tabel-prog-indi','mode_detail=delete','Hak_DPA','ORGID','OPDID','ProgID','DPAProgIndiID='+acell[0]],
+                sendParam: ['data=tabel-prog-indi','mode_detail=delete','Hak_Renja','ORGID','OPDID','ProgID','DPAProgIndiID='+acell[0]],
                 onSuccess: () => FoniaJS.showInfo('Proses hapus data sukses!')
             }).send();
         }, 'danger');
@@ -178,7 +178,7 @@ var RenjaJS = {
         }
         new Request.JSONF({
             url: this.PHP,
-            sendParam: ['data=tabel-prog-indi','mode_detail','Hak_DPA','ORGID','OPDID','ProgID','DPAProgIndiID','TipeDataID','Status_Indi','Text_Indi','Target_Indi','Satuan_Indi'],
+            sendParam: ['data=tabel-prog-indi','mode_detail','Hak_Renja','ORGID','OPDID','ProgID','DPAProgIndiID','TipeDataID','Status_Indi','Text_Indi','Target_Indi','Satuan_Indi'],
             onSuccess: () => FoniaJS.showInfo('Sukses menyimpan Indikator Program.')
         }).send();
     },
@@ -211,7 +211,7 @@ var RenjaJS = {
     keg_brow_select: function(acell) {
         new Request.JSONF({
             url: this.PHP,
-            sendParam: ['data=tabel-keg','mode_detail=insert','Hak_DPA','ORGID','OPDID','ProgID','KegID='+acell[0],'K_Keg='+acell[1]],
+            sendParam: ['data=tabel-keg','mode_detail=insert','Hak_Renja','ORGID','OPDID','ProgID','KegID='+acell[0],'K_Keg='+acell[1]],
             onSuccess: () => {
                 FoniaJS.closeWindow(this.winBKeg);
                 FoniaJS.showInfo("Kegiatan baru telah ditambahkan.");
@@ -247,7 +247,7 @@ var RenjaJS = {
     sub_brow_select: function(acell) {
         new Request.JSONF({
             url: this.PHP,
-            sendParam: ['data=tabel-sub','mode_detail=insert','Hak_DPA','ORGID','OPDID','ProgID','KegID','SubID='+acell[0],'K_Sub='+acell[1]],
+            sendParam: ['data=tabel-sub','mode_detail=insert','Hak_Renja','ORGID','OPDID','ProgID','KegID','SubID='+acell[0],'K_Sub='+acell[1]],
             onSuccess: () => {
                 FoniaJS.closeWindow(this.winBSub);
                 FoniaJS.showInfo("Sub Kegiatan baru telah ditambahkan.");
@@ -259,10 +259,10 @@ var RenjaJS = {
         $('#SubID').val(acell[1]);
         new Request({
             url: this.PHP,
-            sendParam: ['data=detail-sub','Hak_DPA','ORGID','OPDID','ProgID','KegID','SubID='+acell[1],'DPASubID='+acell[0]],
+            sendParam: ['data=detail-sub','Hak_Renja','ORGID','OPDID','ProgID','KegID','SubID='+acell[1],'DPASubID='+acell[0]],
             onSuccess: (txt) => {
                 const tombol = [{},{i:'butTutup'},{i:'butWSimpan',v:'Simpan',c:'success'}];
-                if ($('#Hak_DPA').val()==0) tombol.pop();
+                if ($('#Hak_Renja').val()==0) tombol.pop();
                 this.winSub = FoniaJS.showWindow('Sub', 'Detail Sub Kegiatan', txt, 'xl', tombol, () => {
                     $('#winSub').find('#butWSimpan').click(() => this.sub_save());
                     $('#formSub').validate({
@@ -270,15 +270,16 @@ var RenjaJS = {
                             required: true,
                             Waktu1: {required:true, min:1},
                             Waktu2: {required:true, min:1},
+                            Target_Output: {required:true, min:1},
                         }
                     });
-                    this.data_query('tabel-sub-output')
+                    //this.data_query('tabel-sub-output')
                 });
             }
         }).send();
     },
 
-    sub_output_batal: function(){
+    /*sub_output_batal: function(){
         var dt = $('#divSubOutputTabel').DataTable(), tr, l_row;
         tr = $('#butBatalOutput').closest('tr');
         l_row = dt.row(tr.prev('tr'));
@@ -300,7 +301,7 @@ var RenjaJS = {
     sub_output_form: function(acell, div){
         new Request.JSON({
             url: this.PHP,
-            sendParam: ['data=detail-sub-output','Hak_DPA','ORGID','OPDID','ProgID','KegID','SubID','DPASubOutputID='+acell[0]],
+            sendParam: ['data=detail-sub-output','Hak_Renja','ORGID','OPDID','ProgID','KegID','SubID','DPASubOutputID='+acell[0]],
             onSuccess: (adata) => {
                 $(div).html(adata.html);
                 $(div)
@@ -314,7 +315,7 @@ var RenjaJS = {
         FoniaJS.showConfirm('Konfirmasi', 'Yakin akan hapus <b>"'+acell[1]+'"</b> ?', () => {
             new Request.JSONF({
                 url: this.PHP,
-                sendParam: ['data=tabel-sub-output','mode_detail=delete','Hak_DPA','ORGID','OPDID','ProgID','KegID','SubID','DPASubOutputID='+acell[0]],
+                sendParam: ['data=tabel-sub-output','mode_detail=delete','Hak_Renja','ORGID','OPDID','ProgID','KegID','SubID','DPASubOutputID='+acell[0]],
                 onSuccess: () => FoniaJS.showInfo('Proses hapus data sukses!')
             }).send();
         }, 'danger');
@@ -327,16 +328,16 @@ var RenjaJS = {
         }
         new Request.JSONF({
             url: this.PHP,
-            sendParam: ['data=tabel-sub-output','mode_detail','Hak_DPA','ORGID','OPDID','ProgID','KegID','SubID','DPASubOutputID','Text_Output','Target_Output','Satuan_Output','Status_Output'],
+            sendParam: ['data=tabel-sub-output','mode_detail','Hak_Renja','ORGID','OPDID','ProgID','KegID','SubID','DPASubOutputID','Text_Output','Target_Output','Satuan_Output','Status_Output'],
             onSuccess: () => FoniaJS.showInfo('Sukses menyimpan Output Sub Kegiatan.')
         }).send();
-    },
+    },*/
 
     sub_hapus: function(acell){
         FoniaJS.showConfirm('Konfirmasi', 'Yakin akan hapus <b>"'+acell[2]+'"</b> ?', () => {
             new Request.JSONF({
                 url: this.PHP,
-                sendParam: ['data=tabel-sub','mode_detail=delete','Hak_DPA','ORGID','OPDID','ProgID','KegID','SubID','DPASubID='+acell[0]],
+                sendParam: ['data=tabel-sub','mode_detail=delete','Hak_Renja','ORGID','OPDID','ProgID','KegID','SubID','DPASubID='+acell[0]],
                 onSuccess: () => FoniaJS.showInfo('Proses hapus data sukses!')
             }).send();
         }, 'danger');
@@ -347,7 +348,7 @@ var RenjaJS = {
         if (true !== $('#formSub').validate().checkForm()) return false;
         new Request.JSONF({
             url: this.PHP,
-            sendParam: ['data=tabel-sub','mode_detail=update','Hak_DPA','ORGID','OPDID','ProgID','KegID','SubID','DPASubID','Lokasi','Waktu1','Waktu2','Pagu_Dpn'],//Pagu_Ini
+            sendParam: ['data=tabel-sub','mode_detail=update','Hak_Renja','ORGID','OPDID','ProgID','KegID','SubID','DPASubID','Lokasi','Waktu1','Waktu2','Pagu_Dpn','DPASubOutputID','Text_Output','Sasaran_Output','Target_Output','Satuan_Output','Status_Output'],
             onSuccess: () => {
                 FoniaJS.closeWindow(this.winSub);
                 FoniaJS.showInfo('Sukses menyimpan detail Sub Kegiatan.');
@@ -358,10 +359,10 @@ var RenjaJS = {
     akun_detail: function(mode, ID){
         new Request({
             url: this.PHP,
-            sendParam: ['data=detail-akun','Hak_DPA','ORGID','OPDID','ProgID','KegID','SubID','DPAAkunID='+ID],
+            sendParam: ['data=detail-akun','Hak_Renja','ORGID','OPDID','ProgID','KegID','SubID','DPAAkunID='+ID],
             onSuccess: (txt) => {
                 const tombol = [{},{i:'butTutup'},{i:'butWSimpan',v:'Simpan',c:'success'}];
-                if ($('#Hak_DPA').val()==0) tombol.pop();
+                if ($('#Hak_Renja').val()==0) tombol.pop();
                 this.winDAkun = FoniaJS.showWindow('DAkun', 'Detail Akun', txt, 900, tombol, () => {
                     $('#winDAkun').find('#butWSimpan').click(() => this.akun_save());
                     this.Hitung_Akun();
@@ -382,7 +383,7 @@ var RenjaJS = {
         FoniaJS.showConfirm('Konfirmasi', 'Yakin akan hapus <b>"'+acell[3]+'"</b> ?', () => {
             new Request.JSONF({
                 url: this.PHP,
-                sendParam: ['data=tabel-akun','mode_detail=delete','Hak_DPA','ORGID','OPDID','ProgID','KegID','SubID','DPAAkunID='+acell[0]],
+                sendParam: ['data=tabel-akun','mode_detail=delete','Hak_Renja','ORGID','OPDID','ProgID','KegID','SubID','DPAAkunID='+acell[0]],
                 onSuccess: () => FoniaJS.showInfo('Proses hapus data sukses!')
             }).send();
         }, 'danger');
@@ -391,7 +392,7 @@ var RenjaJS = {
     akun_save: function(){
         new Request.JSONF({
             url: this.PHP,
-            sendParam: ['data=tabel-akun','mode_detail','Hak_DPA','ORGID','OPDID','ProgID','KegID','SubID','AkunID','K_Akun','Volume','SatuanID','Harga_Satuan','Renc_Keu','Renc_Fisik','DPAAkunID'],
+            sendParam: ['data=tabel-akun','mode_detail','Hak_Renja','ORGID','OPDID','ProgID','KegID','SubID','AkunID','K_Akun','Volume','SatuanID','Harga_Satuan','Renc_Keu','Renc_Fisik','DPAAkunID'],
             onSuccess: () => {
                 FoniaJS.closeWindow(this.winDAkun);
                 FoniaJS.showInfo('Sukses menyimpan detail Akun.');
@@ -408,27 +409,27 @@ var RenjaJS = {
         } else if (tipe=="tabel-prog"){
             new Request.JSONF({
                 url: this.PHP,
-                sendParam: ['data=tabel-prog','Hak_DPA','ORGID','OPDID']
+                sendParam: ['data=tabel-prog','Hak_Renja','ORGID','OPDID']
             }).send();
         } else if (tipe=="tabel-prog-indi"){
             new Request.JSONF({
                 url: this.PHP,
-                sendParam: ['data=tabel-prog-indi','Hak_DPA','ORGID','OPDID','ProgID']
+                sendParam: ['data=tabel-prog-indi','Hak_Renja','ORGID','OPDID','ProgID']
             }).send();
         } else if (tipe=="tabel-keg" || tipe=="tabel-prog-indi"){
             new Request.JSONF({
                 url: this.PHP,
-                sendParam: ['data='+tipe,'Hak_DPA','ORGID','OPDID','ProgID']
+                sendParam: ['data='+tipe,'Hak_Renja','ORGID','OPDID','ProgID']
             }).send();
         } else if (tipe=="tabel-sub"){
             new Request.JSONF({
                 url: this.PHP,
-                sendParam: ['data='+tipe,'Hak_DPA','ORGID','OPDID','ProgID','KegID']
+                sendParam: ['data='+tipe,'Hak_Renja','ORGID','OPDID','ProgID','KegID']
             }).send();
         } else if (tipe=="tabel-akun" || tipe=="tabel-sub-output"){
             new Request.JSONF({
                 url: this.PHP,
-                sendParam: ['data='+tipe,'Hak_DPA','ORGID','OPDID','ProgID','KegID','SubID']
+                sendParam: ['data='+tipe,'Hak_Renja','ORGID','OPDID','ProgID','KegID','SubID']
             }).send();
         } else if (tipe=="brow-prog"){
             new Request.JSONF({
@@ -461,7 +462,7 @@ var RenjaJS = {
     oc_ProgTipe: function(){
         new Request.JSON({
             url: this.PHP,
-            sendParam: ['data=change-tipedata','Hak_DPA','TipeDataID','Status_Indi','Target_Indi'],
+            sendParam: ['data=change-tipedata','Hak_Renja','TipeDataID','Status_Indi','Target_Indi'],
             onSuccess: (ajson) => {
                 $('#inputStatus').html(ajson.status);
                 $('#inputTarget').html(ajson.target);

apps/php/func/emonev.php

@@ -83,13 +83,13 @@ function tipedata_query() {
 }
 
 function tipedata_select($id_target = "Target_Indi", $id_tipe = 0, $val_target = "", $bol_en = false, $a_input = [], $tcss = "") {
-    $ttarget = '<input type="double" class="form-control double" id="'.$id_target.'" value="'.floatval($val_target).'"'.($bol_en?:' readonly').' required=true />';
+    $ttarget = '<input type="double" class="form-control double" id="'.$id_target.'" value="'.floatval($val_target).'"'.($bol_en?'':' readonly').' required="true" />';
     if ($id_tipe == 2) { // rasio
         $atarget = ($val_target == "") ? [0,0] : explode(":", $val_target);
         for ($i = 0; $i < 10; $i++) $vtarget .= array_merge(range('a','z'),range('A','Z'))[rand(0,51)];
-        $ttarget = '<div class="input-group '.$tcss.'"><input type="number" class="form-control" id="'.$vtarget.'_b" value="'.$atarget[0].'"'.($bol_en?:' readonly').' required=true onchange="$(\'#'.$id_target.'\').val(($(\'#'.$vtarget.'_b\').val()||\'0\')+\':\'+($(\'#'.$vtarget.'_a\').val()||\'0\'));" /><span class="input-group-text">:<input type="hidden" id="'.$id_target.'" value="'.$val_target.'"></span><input type="number" class="form-control" id="'.$vtarget.'_a" value="'.$atarget[1].'"'.($bol_en?:' readonly').' required=true onchange="$(\'#'.$id_target.'\').val(($(\'#'.$vtarget.'_b\').val()||\'0\')+\':\'+($(\'#'.$vtarget.'_a\').val()||\'0\'));" /></div>';
+        $ttarget = '<div class="input-group '.$tcss.'"><input type="number" class="form-control" id="'.$vtarget.'_b" value="'.$atarget[0].'"'.($bol_en?'':' readonly').' required=true onchange="$(\'#'.$id_target.'\').val(($(\'#'.$vtarget.'_b\').val()||\'0\')+\':\'+($(\'#'.$vtarget.'_a\').val()||\'0\'));" /><span class="input-group-text">:<input type="hidden" id="'.$id_target.'" value="'.$val_target.'"></span><input type="number" class="form-control" id="'.$vtarget.'_a" value="'.$atarget[1].'"'.($bol_en?'':' readonly').' required=true onchange="$(\'#'.$id_target.'\').val(($(\'#'.$vtarget.'_b\').val()||\'0\')+\':\'+($(\'#'.$vtarget.'_a\').val()||\'0\'));" /></div>';
     } else if ($id_tipe > 2) { // enum_v2
-        $ttarget = '<select class="form-select" id="'.$id_target.'" name="'.$id_target.'"'.($bol_en?:' disabled=true').'>';
+        $ttarget = '<select class="form-select" id="'.$id_target.'" name="'.$id_target.'"'.($bol_en?'':' disabled=true').'>';
         //$ttarget .= '<option value="">-</option>'; option-tags
         foreach($a_input as $_key => $_val) {
             $ttarget .= '<option value="'.$_key.'"'.($_key==$val_target?' selected="selected"':'').'>'.$_val.'</option>';
@@ -105,7 +105,7 @@ function tipedata_status($id_target = "Status_Indi", $id_tipe = 0, $val_target =
         array_shift($astatus);
         array_pop($astatus);
     }
-    $ttarget = '<select class="form-select" id="'.$id_target.'" name="'.$id_target.'"'.($bol_en?:' disabled=true').'>';
+    $ttarget = '<select class="form-select" id="'.$id_target.'" name="'.$id_target.'"'.($bol_en?'':' disabled=true').'>';
     foreach($astatus as $_key => $_val) {
         $ttarget .= '<option value="'.$_key.'"'.($_key==$val_target?' selected="selected"':'').'>'.$_val.'</option>';
     }

apps/php/hasil/kinerja.php

@@ -132,25 +132,25 @@ if ( in_array($data, ["print","export"]) ) {
 if ( $data == "print" ) {
     $header = '<p class="judul">EVALUASI TERHADAP KINERJA RENJA PERANGKAT DAERAH LINGKUP KABUPATEN MEMPAWAH<br>RENJA PERANGKAT DAERAH '.strtoupper($aopd['N_OPD']).' KABUPATEN MEMPAWAH<br>PERIODE PELAKSANAAN : TRIWULAN '.romawi($twulan).' TAHUN ANGGARAN '.$tahun.'</p>
 <table class="garis min-65"><thead>
-<tr><th width="20" rowspan="3">No.</th><th width="50" rowspan="3">Sasaran</th><th width="100" colspan="2" rowspan="3">Urusan/Bidang Urusan Pemerintahan Daerah<br> dan Program/Kegiatan/Sub Kegiatan</th><th width="100" rowspan="3">Indikator Kinerja Program<br>(Outcome)/Kegiatan<br>(Output)</th><th width="100" rowspan="2" colspan="2">Target Kinerja dan Anggaran<br>Renja Perangkat Daerah<br> Tahun '.$tahun.'</th><th width="800" colspan="8">Realisasi Kinerja Pada Triwulan</th><th width="100" rowspan="2" colspan="2">Realisasi Capaian<br>Kinerja dan Anggaran<br>Renja Perangkat Daerah<br>Tahun '.$tahun.'</th><th width="100" rowspan="2" colspan="3">Tingkat Capaian Kinerja dan<br>Realisasi Anggaran Renja Perangkat Daerah<br> Tahun '.$tahun.'<br>(dalam %)</th><th width="100" rowspan="3">Kendala Yang<br>Dihadapi</th><th width="100" rowspan="3">Unit Perangkat Daerah<br>Penanggungjawab</th></tr>
+<tr><th width="20" rowspan="3">No.</th><th width="50" rowspan="3">Sasaran</th><th width="100" colspan="2" rowspan="3">Urusan/Bidang Urusan Pemerintahan Daerah<br> dan Program/Kegiatan/Sub Kegiatan</th><th width="100" rowspan="3">Indikator Kinerja Program<br>(Outcome)/Kegiatan<br>(Output)</th><th width="100" rowspan="2" colspan="2">Target Kinerja dan Anggaran<br>Renja Perangkat Daerah<br> Tahun '.$tahun.'</th><th width="800" colspan="8">Realisasi Kinerja Pada Triwulan</th><th width="100" rowspan="2" colspan="2">Realisasi Capaian<br>Kinerja dan Anggaran<br>Renja Perangkat Daerah<br>Tahun '.$tahun.'</th><th width="100" rowspan="2" colspan="2">Tingkat Capaian Kinerja dan<br>Realisasi Anggaran Renja Perangkat Daerah<br> Tahun '.$tahun.'<br>(dalam %)</th><th width="100" rowspan="3">Sumber Data</th><th width="100" rowspan="3">Kendala Yang<br>Dihadapi</th></tr>
 <tr><th colspan="2">I</th><th colspan="2">II</th><th colspan="2">III</th><th colspan="2">IV</th></tr>
-<tr><th width="50">K</th><th width="50">Rp</th><th width="50">K</th><th width="50">Rp</th><th width="50">K</th><th width="50">Rp</th><th width="50">K</th><th width="50">Rp</th><th width="50">K</th><th width="50">Rp</th><th width="50">K</th><th width="50">Rp</th><th width="50">K</th><th width="50">Rp</th><th width="50">(K + Rp) / 2</th></tr>
+<tr><th width="50">K</th><th width="50">Rp</th><th width="50">K</th><th width="50">Rp</th><th width="50">K</th><th width="50">Rp</th><th width="50">K</th><th width="50">Rp</th><th width="50">K</th><th width="50">Rp</th><th width="50">K</th><th width="50">Rp</th><th width="50">K</th><th width="50">Rp</th></tr>
-<tr class="sub_no"><th>1</th><th>2</th><th colspan="2">3</th><th>4</th><th colspan="2">5</th><th colspan="2">6</th><th colspan="2">7</th><th colspan="2">8</th><th colspan="2">9</th><th colspan="2">10=6+7+8+9</th><th colspan="3">11=10/5x100%</th><th>12</th><th>13</th></tr>
+<tr class="sub_no"><th>1</th><th>2</th><th colspan="2">3</th><th>4</th><th colspan="2">5</th><th colspan="2">6</th><th colspan="2">7</th><th colspan="2">8</th><th colspan="2">9</th><th colspan="2">10=6+7+8+9</th><th colspan="2">11=10/5x100%</th><th>12</th><th>13</th></tr>
 </thead><tbody>';
-    $_progkeg = '<tr class="%s"><td class="c">%s</td><td class="c">%s</td><td colspan="2">%s</td><td>%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td>&nbsp;</td><td>%s</td></tr>';
+    $_progkeg = '<tr class="%s"><td class="c">%s</td><td class="c">%s</td><td colspan="2">%s</td><td>%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td>%s</td><td>%s</td></tr>';
-    $_sub = '<tr><td>&nbsp;</td><td>&nbsp;</td><td class="c">%s</td><td>%s</td><td>%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td>%s</td><td>&nbsp;</td></tr>';
+    $_sub = '<tr><td>&nbsp;</td><td>&nbsp;</td><td class="c">%s</td><td>%s</td><td>%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td class="r">%s</td><td>&nbsp;</td><td>%s</td></tr>';
-    $_skor = '<tr><td class="r" colspan="17">%s</td><td class="c">%s</td><td class="c">%s</td><td class="c">%s</td><td>&nbsp;</td><td>&nbsp;</td></tr>';
+    $_skor = '<tr><td class="r" colspan="17">%s</td><td class="c">%s</td><td class="c">%s</td><td>&nbsp;</td><td>&nbsp;</td></tr>';
-    $atotal = ['T_13K'=>0, 'T_13RP'=>0, 'T_15K'=>0, 'T_15RP'=>0, 'Prog'=>0];
+    $atotal = ['T_13K'=>0, 'T_13RP'=>0, 'T_13KRP'=>0, 'T_15K'=>0, 'T_15RP'=>0, 'Prog'=>0];
     $body = ""; $bidu = ""; $prog = ""; $keg = ""; $no_prog = 1; $no_keg = 1; $no_sub = 1; $aprog = []; $akeg = [];
     while ($db->Next()) {
         // Catatan bagian bawah
-        if ($keg <> $db->Row("KegID") && $keg <> 0) {
+        /*if ($keg <> $db->Row("KegID") && $keg <> 0) {
-            $body .= sprintf($_skor, "Rata-rata Capaian Kinerja Kegiatan (%)", uang2($akeg['K_13K'])." %", uang2($akeg['K_13RP'])." %", uang2($akeg['K_13KRP'])." %");
+            $body .= sprintf($_skor, "Rata-rata Capaian Kinerja Kegiatan (%)", uang2($akeg['K_13K'])." %", uang2($akeg['K_13RP'])." %");
-            $body .= sprintf($_skor, "Predikat Kinerja", emonev_kinerja($akeg['K_13K']), emonev_kinerja($akeg['K_13RP']), emonev_kinerja($akeg['K_13KRP']));
+            $body .= sprintf($_skor, "Predikat Kinerja", emonev_kinerja($akeg['K_13K']), emonev_kinerja($akeg['K_13RP']));
-        }
+        }*/
         if ($prog <> $db->Row("ProgID") && $prog <> 0) {
-            $body .= sprintf($_skor, "Rata-rata Capaian Kinerja Program (%)", uang2($aprog['P_13K'])." %", uang2($aprog['P_13RP'])." %", uang2($aprog['P_13KRP'])." %");
+            $body .= sprintf($_skor, "Rata-rata Capaian Kinerja Program (%)", uang2($aprog['P_13K'])." %", uang2($aprog['P_13RP'])." %");
-            $body .= sprintf($_skor, "Predikat Kinerja", emonev_kinerja($aprog['P_13K']), emonev_kinerja($aprog['P_13RP']), emonev_kinerja($aprog['P_13KRP']));
+            $body .= sprintf($_skor, "Predikat Kinerja", emonev_kinerja($aprog['P_13K']), emonev_kinerja($aprog['P_13RP']));
         }
 
         if ($bidu <> $db->Row("K_Bidu")) {
@@ -163,15 +163,15 @@ if ( $data == "print" ) {
             $aprog = $db->AllRow();
             $db2->Query("SELECT *,IF(TipeDataID<2,ROUND(".$qp4.",2),".$qp3.") P_12K FROM dpa_prog_indi".$tsql." AND ProgID='".$aprog["ProgID"]."'");
             if ($db2->RecordCount() == 0) {
-                $body .= sprintf($_progkeg, "prog b", $no_prog++, "&nbsp;", $aprog["K_Prog2"]." ".$aprog["N_Prog"], $aprog["P_Indi"]." <i>(".$aprog["P_Satuan"].")</i>", $aprog["P_7K"], uang($aprog["P_7RP"],0), $aprog["P_TW1K"], uang($aprog["P_TW1RP"],0), $aprog["P_TW2K"], uang($aprog["P_TW2RP"],0), $aprog["P_TW3K"], uang($aprog["P_TW3RP"],0), $aprog["P_TW4K"], uang($aprog["P_TW4RP"],0), $aprog["P_12K"], uang($aprog["P_12RP"],0), uang2($aprog["P_13K"]), uang2($aprog["P_13RP"]), uang2($aprog["P_13KRP"]));
+                $body .= sprintf($_progkeg, "prog b", $no_prog++, "&nbsp;", $aprog["K_Prog2"]." ".$aprog["N_Prog"], $aprog["P_Indi"]." <i>(".$aprog["P_Satuan"].")</i>", $aprog["P_7K"], uang($aprog["P_7RP"],0), $aprog["P_TW1K"], uang($aprog["P_TW1RP"],0), $aprog["P_TW2K"], uang($aprog["P_TW2RP"],0), $aprog["P_TW3K"], uang($aprog["P_TW3RP"],0), $aprog["P_TW4K"], uang($aprog["P_TW4RP"],0), $aprog["P_12K"], uang($aprog["P_12RP"],0), uang2($aprog["P_13K"]), uang2($aprog["P_13RP"]), "&nbsp;", "&nbsp;");
             }
             $baris_indi = 1;
             while ($db2->Next()) {
                 $apindi = [];
                 if ($baris_indi == 1) {
-                    $apindi = ["prog b", $no_prog++, "&nbsp;", $aprog["K_Prog2"]." ".$aprog["N_Prog"], $db2->Row("Text_Indi")." <i>(".$db2->Row("Satuan_Indi").")</i>", $db2->Row("Target_Indi"), uang($aprog["P_7RP"],0), $db2->Row("Real_TW1"), uang($aprog["P_TW1RP"],0), ($twulan<2?"":$db2->Row("Real_TW2")), uang($aprog["P_TW2RP"],0), ($twulan<3?"":$db2->Row("Real_TW3")), uang($aprog["P_TW3RP"],0), ($twulan<4?"":$db2->Row("Real_TW4")), uang($aprog["P_TW4RP"],0), $db2->Row("P_12K"), uang($aprog["P_12RP"],0), uang2($aprog["P_13K"]), uang2($aprog["P_13RP"]), uang2($aprog["P_13KRP"]), "&nbsp;"];
+                    $apindi = ["prog b", $no_prog++, "&nbsp;", $aprog["K_Prog2"]." ".$aprog["N_Prog"], $db2->Row("Text_Indi")." <i>(".$db2->Row("Satuan_Indi").")</i>", $db2->Row("Target_Indi"), uang($aprog["P_7RP"],0), $db2->Row("Real_TW1"), uang($aprog["P_TW1RP"],0), ($twulan<2?"":$db2->Row("Real_TW2")), uang($aprog["P_TW2RP"],0), ($twulan<3?"":$db2->Row("Real_TW3")), uang($aprog["P_TW3RP"],0), ($twulan<4?"":$db2->Row("Real_TW4")), uang($aprog["P_TW4RP"],0), $db2->Row("P_12K"), uang($aprog["P_12RP"],0), uang2($aprog["P_13K"]), uang2($aprog["P_13RP"]), $db2->Row("Sumber_Data"), $db2->Row("Catatan")];
                 } else {
-                    $apindi = ["prog b", "&nbsp;", "&nbsp;", "&nbsp;", $db2->Row("Text_Indi")." <i>(".$db2->Row("Satuan_Indi").")</i>", $db2->Row("Target_Indi"), "&nbsp;", $db2->Row("Real_TW1"), "&nbsp;", ($twulan<2?"":$db2->Row("Real_TW2")), "&nbsp;", ($twulan<3?"":$db2->Row("Real_TW3")), "&nbsp;", ($twulan<4?"":$db2->Row("Real_TW4")), "&nbsp;", $db2->Row("P_12K"), "&nbsp;", "&nbsp;", "&nbsp;", "&nbsp;", "&nbsp;"];
+                    $apindi = ["prog b", "&nbsp;", "&nbsp;", "&nbsp;", $db2->Row("Text_Indi")." <i>(".$db2->Row("Satuan_Indi").")</i>", $db2->Row("Target_Indi"), "&nbsp;", $db2->Row("Real_TW1"), "&nbsp;", ($twulan<2?"":$db2->Row("Real_TW2")), "&nbsp;", ($twulan<3?"":$db2->Row("Real_TW3")), "&nbsp;", ($twulan<4?"":$db2->Row("Real_TW4")), "&nbsp;", $db2->Row("P_12K"), "&nbsp;", "&nbsp;", "&nbsp;", $db2->Row("Sumber_Data"), $db2->Row("Catatan")];
                 }
                 $body .= vsprintf($_progkeg, $apindi);
                 $baris_indi++;
@@ -183,23 +183,23 @@ if ( $data == "print" ) {
             $no_keg = 1; $keg = 0;
         }
         if ($keg <> $db->Row("KegID")) {
-            $body .= sprintf($_progkeg, "keg", "&nbsp;", $no_keg++, $db->Row("K_Keg2")." ".$db->Row("N_Keg"), $db->Row("K_Indi")." <i>(%)</i>", uang2($db->Row("K_7K")), uang($db->Row("K_7RP"),0), uang2($db->Row("K_TW1K")), uang($db->Row("K_TW1RP"),0), uang2($db->Row("K_TW2K")), uang($db->Row("K_TW2RP"),0), uang2($db->Row("K_TW3K")), uang($db->Row("K_TW3RP"),0), uang2($db->Row("K_TW4K")), uang($db->Row("K_TW4RP"),0), uang2($db->Row("K_12K")), uang($db->Row("K_12RP"),0), uang2($db->Row("K_13K")), uang2($db->Row("K_13RP")), uang2($db->Row("K_13KRP")), $aopd['N_OPD']);
+            $body .= sprintf($_progkeg, "keg", "&nbsp;", $no_keg++, $db->Row("K_Keg2")." ".$db->Row("N_Keg"), $db->Row("K_Indi")." <i>(%)</i>", "&nbsp;", uang($db->Row("K_7RP"),0), "&nbsp;", uang($db->Row("K_TW1RP"),0), "&nbsp;", uang($db->Row("K_TW2RP"),0), "&nbsp;", uang($db->Row("K_TW3RP"),0), "&nbsp;", uang($db->Row("K_TW4RP"),0), "&nbsp;", uang($db->Row("K_12RP"),0), "&nbsp;", uang2($db->Row("K_13RP")), "&nbsp;", "&nbsp;");
             $keg = $db->Row("KegID");
             $akeg = $db->AllRow();
             $no_sub = 1;
         }
-        $body .= sprintf($_sub, $no_sub++, $db->Row("K_Sub2")." ".$db->Row("N_Sub"), $db->Row("S_Indi")." <i>(".$db->Row("S_Satuan").")</i>", $db->Row("S_7K"), uang($db->Row("S_7RP"),0), $db->Row("S_TW1K"), uang($db->Row("S_TW1RP"),0), $db->Row("S_TW2K"), uang($db->Row("S_TW2RP"),0), $db->Row("S_TW3K"), uang($db->Row("S_TW3RP"),0), $db->Row("S_TW4K"), uang($db->Row("S_TW4RP"),0), $db->Row("S_12K"), uang($db->Row("S_12RP"),0), uang($db->Row("S_13K"),2), uang($db->Row("S_13RP"),2), uang($db->Row("S_13KRP"),2), $db->Row("S_Kendala"));
+        $body .= sprintf($_sub, $no_sub++, $db->Row("K_Sub2")." ".$db->Row("N_Sub"), $db->Row("S_Indi")." <i>(".$db->Row("S_Satuan").")</i>", $db->Row("S_7K"), uang($db->Row("S_7RP"),0), $db->Row("S_TW1K"), uang($db->Row("S_TW1RP"),0), $db->Row("S_TW2K"), uang($db->Row("S_TW2RP"),0), $db->Row("S_TW3K"), uang($db->Row("S_TW3RP"),0), $db->Row("S_TW4K"), uang($db->Row("S_TW4RP"),0), $db->Row("S_12K"), uang($db->Row("S_12RP"),0), uang($db->Row("S_13K"),2), uang($db->Row("S_13RP"),2), "&nbsp;", $db->Row("S_Kendala"));
-    }
-    if ($keg <> 0) {
-        $body .= sprintf($_skor, "Rata-rata Capaian Kinerja Kegiatan (%)", uang2($akeg['K_13K'])." %", uang2($akeg['K_13RP'])." %", uang2($akeg['K_13KRP'])." %");
-        $body .= sprintf($_skor, "Predikat Kinerja", emonev_kinerja($akeg['K_13K']), emonev_kinerja($akeg['K_13RP']), emonev_kinerja($akeg['K_13KRP']));
     }
+    /*if ($keg <> 0) {
+        $body .= sprintf($_skor, "Rata-rata Capaian Kinerja Kegiatan (%)", uang2($akeg['K_13K'])." %", uang2($akeg['K_13RP'])." %");
+        $body .= sprintf($_skor, "Predikat Kinerja", emonev_kinerja($akeg['K_13K']), emonev_kinerja($akeg['K_13RP']));
+    }*/
     if ($prog <> 0) {
-        $body .= sprintf($_skor, "Rata-rata Capaian Kinerja Program (%)", uang2($aprog['P_13K'])." %", uang2($aprog['P_13RP'])." %", uang2($aprog['P_13KRP'])." %");
+        $body .= sprintf($_skor, "Rata-rata Capaian Kinerja Program (%)", uang2($aprog['P_13K'])." %", uang2($aprog['P_13RP'])." %");
-        $body .= sprintf($_skor, "Predikat Kinerja", emonev_kinerja($aprog['P_13K']), emonev_kinerja($aprog['P_13RP']), emonev_kinerja($aprog['P_13KRP']));
+        $body .= sprintf($_skor, "Predikat Kinerja", emonev_kinerja($aprog['P_13K']), emonev_kinerja($aprog['P_13RP']));
     }
-    $body .= sprintf($_skor, "RATA-RATA CAPAIAN KINERJA DAN ANGGARAN DARI SELURUH PROGRAM (%)", uang2($atotal['T_13K']/$atotal['Prog'])." %", uang2($atotal['T_13RP']/$atotal['Prog'])." %", uang2($atotal['T_13KRP']/$atotal['Prog'])." %");
+    $body .= sprintf($_skor, "RATA-RATA CAPAIAN KINERJA DAN ANGGARAN DARI SELURUH PROGRAM (%)", uang2($atotal['T_13K']/$atotal['Prog'])." %", uang2($atotal['T_13RP']/$atotal['Prog'])." %");
-    $body .= sprintf($_skor, "PREDIKAT KINERJA DARI SELURUH PROGRAM", emonev_kinerja($atotal['T_13K']/$atotal['Prog']), emonev_kinerja($atotal['T_13RP']/$atotal['Prog']), emonev_kinerja($atotal['T_13KRP']/$atotal['Prog']));
+    $body .= sprintf($_skor, "PREDIKAT KINERJA DARI SELURUH PROGRAM", emonev_kinerja($atotal['T_13K']/$atotal['Prog']), emonev_kinerja($atotal['T_13RP']/$atotal['Prog']));
 
     echo $header . $body . "</tbody></table>";
 

apps/php/login.php

@@ -62,7 +62,7 @@ if ($mode == "login") {
         if ($alogin['Tahun5']==$alogin['REAL_THN']) $alogin['REAL_FIELD'] = "T5_";
         $_SESSION['__WEB_APP'] = $alogin;
 
-        $_appurl = $_GET['redir'];
+        $_appurl = $_GET['redir'] ?? "";
         if (!empty($_appurl)) {
             $_redir = $auth->redirect($_appurl);
             //jika kosong, tampilkan pesan redirect tidak diijinkan

apps/php/mon/kinerja.php

@@ -27,9 +27,10 @@ $ajson = [];
 $data = Param::Get("data");
 $mode = Param::Get("mode");
 $mode_detail = Param::Get("mode_detail");
-$emon_en = Param::Get("Hak_Real", 0);
+$bln_en = Param::Get("Hak_Bln", 0);
+$tw_en = Param::Get("Hak_Tw", 0);
 $id_rpjmd = $_SESSION['__WEB_APP']['REAL_RPJMDID'];
-$thn_renja = $_SESSION['__WEB_APP']['REAL_THN'];
+$thn_data = $_SESSION['__WEB_APP']['REAL_THN'];
 $tw_data = $_SESSION['__WEB_APP']['REAL_TW'];
 $bln_data = $_SESSION['__WEB_APP']['REAL_BLN'];
 $id_org = Param::Get("ORGID", 0);
@@ -41,7 +42,7 @@ $id_akun = Param::Get("AkunID", 0);
 $id_dpa_prog = Param::Get("DPAProgID", 0);
 
 if ( in_array($data, ["tabel-opd","tabel-prog","tabel-keg","tabel-sub","tabel-akun","detail-prog","detail-keg","detail-sub"]) ) {
-    $qsql = " Tahun='".$thn_renja."'";
+    $qsql = " Tahun='".$thn_data."'";
 
     if ( $data == "tabel-opd" ) {
         $qsql .= (in_array($_SESSION['__WEB_USER']['Level'],[1,3,4])) ? " AND OPDID IN (".$_SESSION['__WEB_USER']['AK_OPD'].")": "";
@@ -130,17 +131,20 @@ if ( in_array($data, ["tabel-opd","tabel-prog","tabel-keg","tabel-sub","tabel-ak
 }
 
 if ( $data == "tabel-opd" ) {
-    $f_real = (in_array($_SESSION['__WEB_USER']['Level'],[0,1])) ? "1" : "0";
+    $f_bln = "0"; $f_tw = "0";
-    if (in_array($_SESSION['__WEB_USER']['Level'],[3,4])) {
+    if (in_array($_SESSION['__WEB_USER']['Level'],[0,1])) {
-        $f_real = "IFNULL(H.Hak_Real,1)";
+        $f_bln = "1"; $f_tw = "1";
+    } else if (in_array($_SESSION['__WEB_USER']['Level'],[3,4])) {
+        $f_bln = "IFNULL(H.Hak_Kin_B".isi_nol($bln_data,2).",1)"; $f_tw = "IFNULL(H.Hak_Kin_T".$tw_data.",1)"; 
     }
     $obj = new Table($db);
-    $obj->set_query("SELECT K.*,M.ORGID,M.K_OPD,M.N_OPD,M.Nama_OPD,".$f_real." Hak_Real FROM (SELECT A.OPDID,SUM(A.Renc_Keu) TOT_PAGU,SUM".$q_keu_lalu." REAL_LALU,SUM".$q_keu_ini." REAL_TOTAL,(SUM".$q_keu_ini."/SUM(A.Renc_Keu))*100 REAL_PSN,SUM(GREATEST".$q_fis_ini."*A.Renc_Keu/B.TOT_PAGU) REAL_FISIK,SUM(GREATEST".$q_non_ini."*A.Renc_Keu/B.TOT_PAGU) REAL_NON,MAX(A.Real_Stamp) TGL FROM (SELECT * FROM dpa_akun WHERE".$qsql.") A LEFT JOIN (SELECT OPDID,SUM(Renc_Keu) TOT_PAGU FROM dpa_akun WHERE".$qsql." GROUP BY OPDID) B ON (B.OPDID=A.OPDID) GROUP BY A.OPDID) K LEFT JOIN (SELECT OPDID,Hak_Real FROM sippd_akses_sip WHERE Tahun='".$thn_renja."') H ON (H.OPDID=K.OPDID) LEFT JOIN vi_para90_opd M ON (M.OPDID=K.OPDID) WHERE M.Aktif=1");
+    $obj->set_query("SELECT K.*,M.ORGID,M.K_OPD,M.N_OPD,M.Nama_OPD,".$f_bln." Hak_Bln,".$f_tw." Hak_Tw FROM (SELECT A.OPDID,SUM(A.Renc_Keu) TOT_PAGU,SUM".$q_keu_lalu." REAL_LALU,SUM".$q_keu_ini." REAL_TOTAL,(SUM".$q_keu_ini."/SUM(A.Renc_Keu))*100 REAL_PSN,SUM(GREATEST".$q_fis_ini."*A.Renc_Keu/B.TOT_PAGU) REAL_FISIK,SUM(GREATEST".$q_non_ini."*A.Renc_Keu/B.TOT_PAGU) REAL_NON,MAX(A.Real_Stamp) TGL FROM (SELECT * FROM dpa_akun WHERE".$qsql.") A LEFT JOIN (SELECT OPDID,SUM(Renc_Keu) TOT_PAGU FROM dpa_akun WHERE".$qsql." GROUP BY OPDID) B ON (B.OPDID=A.OPDID) GROUP BY A.OPDID) K LEFT JOIN (SELECT OPDID,Hak_Renja FROM sippd_akses_mon WHERE Tahun='".$thn_data."') H ON (H.OPDID=K.OPDID) LEFT JOIN vi_para90_opd M ON (M.OPDID=K.OPDID) WHERE M.Aktif=1");
     $obj->set_query_footer("SELECT 1 OPDID,SUM(A.Renc_Keu) TOT_PAGU,SUM".$q_keu_lalu." REAL_LALU,SUM".$q_keu_ini." REAL_TOTAL,(SUM".$q_keu_ini."/SUM(A.Renc_Keu))*100 REAL_PSN,SUM(GREATEST".$q_fis_ini."*A.Renc_Keu/B.TOT_PAGU) REAL_FISIK,SUM(GREATEST".$q_non_ini."*A.Renc_Keu/B.TOT_PAGU) REAL_NON FROM (SELECT * FROM dpa_akun WHERE".$qsql.") A LEFT JOIN (SELECT 1 OPDID,SUM(Renc_Keu) TOT_PAGU FROM dpa_akun WHERE".$qsql.") B ON (B.OPDID=A.OPDID)");
     $obj->add_field("OPDID", "OPD", "hid");
     $obj->add_field("ORGID", "ORG", "hid");
     $obj->add_field("Nama_OPD", "Nama OPD", "hid");
-    $obj->add_field("Hak_Real", "Real", "hid");
+    $obj->add_field("Hak_Bln", "Hak Bln", "hid");
+    $obj->add_field("Hak_Tw", "Hak Tw", "hid");
     $obj->add_field("K_OPD", "Kode", "c");
     $obj->add_field("N_OPD", "Nama Perangkat Daerah", "awr");
     $obj->add_field("TOT_PAGU", "Jumlah Pagu", "r", "rupiah", "rupiah");
@@ -157,11 +161,25 @@ if ( $data == "tabel-opd" ) {
 
 } else if ( $data == "tabel-prog" ) {
     if ($mode_detail=="update") {
-        $aparam = Param::Get_Array();
+        $aparam = Param::Get_Array(); $_sql = [];
         foreach($aparam as $key => $val) {
             if (strpos($key, "Prog_TW_") !== false) {
                 $aid = explode("_", str_replace("Prog_TW_","",$key));
-                $db->Query("UPDATE dpa_prog_indi SET Real_TW".$aid[0]."='".($val=='0:0'?'':$val)."',Poin_TW".$aid[0]."='".tipedata_poin($val)."' WHERE Tahun='".$thn_renja."' AND DPAProgIndiID='".$aid[1]."' LIMIT 1");
+                $_sql[$aid[1]][] = 'Real_TW'.$aid[0].'=\''.($val=='0:0'?'':$val).'\'';
+                $_sql[$aid[1]][] = 'Poin_TW'.$aid[0].'=\''.tipedata_poin($val).'\'';
+            }
+            if (strpos($key, "Sumber_TW_") !== false) {
+                $aid = explode("_", str_replace("Sumber_TW_","",$key));
+                $_sql[$aid[1]][] = 'Sumber_Data=\''.$val.'\'';
+            }
+            if (strpos($key, "Catat_TW_") !== false) {
+                $aid = explode("_", str_replace("Catat_TW_","",$key));
+                $_sql[$aid[1]][] = 'Catatan=\''.$val.'\'';
+            }
+        }
+        if (count($_sql) > 0) {
+            foreach ($_sql as $id => $val) {
+                $db->Query("UPDATE dpa_prog_indi SET ".implode(',', $val)." WHERE Tahun='".$thn_data."' AND DPAProgIndiID='".$id."' LIMIT 1");
             }
         }
         $q_poin = "IF(TipeDataID<2,Poin_TW1,Poin_TW1)";
@@ -172,7 +190,7 @@ if ( $data == "tabel-opd" ) {
         } else if ($tw_data == 4) {
             $q_poin = "IF(TipeDataID<2,IF(Status_Indi='komulatif',Poin_TW1+Poin_TW2+Poin_TW3+Poin_TW4,IF(Status_Indi='rata-rata',(Poin_TW1+Poin_TW2+Poin_TW3+Poin_TW4)/4,Poin_TW4)),Poin_TW4)";
         }
-        $db->Query("UPDATE dpa_prog A,(SELECT ProgID,IF(Poin_Target=0,0,AVG(".$q_poin."/Poin_Target)*100) Poin FROM dpa_prog_indi WHERE Tahun='".$thn_renja."' AND OPDID='".$id_opd."' AND ProgID='".$id_prog."' GROUP BY ProgID) B SET A.Real_TW".$tw_data."=B.Poin WHERE A.DPAProgID='".$id_dpa_prog."'");
+        $db->Query("UPDATE dpa_prog A,(SELECT ProgID,IF(Poin_Target=0,0,AVG(".$q_poin."/Poin_Target)*100) Poin FROM dpa_prog_indi WHERE Tahun='".$thn_data."' AND OPDID='".$id_opd."' AND ProgID='".$id_prog."' GROUP BY ProgID) B SET A.Real_TW".$tw_data."=B.Poin WHERE A.DPAProgID='".$id_dpa_prog."'");
     }
 
     $obj = new Table($db);
@@ -197,31 +215,6 @@ if ( $data == "tabel-opd" ) {
     $ajson[] = $obj->json_table("divPROG");
 
 } else if ( $data == "tabel-keg" ) {
-    /*if ($mode_detail=="update") {
-        $sql = new SQL($db);
-        $sql->set_table("dpa_keg");
-        $sql->add_param("Real_Kendala");
-        $sql->add_param("Real_Tindak");
-        $sql->add_param("Real_Bantu");
-        $sql->add_param_stamp("Real_Stamp");
-        $sql->add_param_userid("Real_UserID");
-        $sql->add_where("Tahun", $thn_renja);
-        $sql->add_where("DPAKegID", Param::Get("DPAKegID",0));
-        $sql->UpdateDB();
-
-        $aparam = Param::Get_Array();
-        foreach($aparam as $key => $val) {
-            if (strpos($key, "Keluar_TW_") !== false) {
-                $aid = explode("_", str_replace("Keluar_TW_","",$key));
-                $db->Query("UPDATE dpa_keg_keluar SET Real_TW".$aid[0]."='".$val."' WHERE Tahun='".$thn_renja."' AND DPAKegKeluarID='".$aid[1]."' LIMIT 1");
-            }
-            if (strpos($key, "Hasil_TW_") !== false) {
-                $aid = explode("_", str_replace("Hasil_TW_","",$key));
-                $db->Query("UPDATE dpa_keg_hasil SET Real_TW".$aid[0]."='".$val."' WHERE Tahun='".$thn_renja."' AND DPAKegHasilID='".$aid[1]."' LIMIT 1");
-            }
-        }
-    }*/
-
     $obj = new Table($db);
     $obj->set_query("SELECT K.*,KR.DPAKegID,KR.K_Keg,M.N_Keg,CONCAT('(',M.K_Keg,') ',M.N_Keg) Nama_Keg FROM (SELECT A.KegID,SUM(A.Renc_Keu) TOT_PAGU,SUM".$q_keu_lalu." REAL_LALU,SUM".$q_keu_ini." REAL_TOTAL,(SUM".$q_keu_ini."/SUM(A.Renc_Keu))*100 REAL_PSN,SUM(GREATEST".$q_fis_ini."*A.Renc_Keu/B.TOT_PAGU) REAL_FISIK,SUM(GREATEST".$q_non_ini."*A.Renc_Keu/B.TOT_PAGU) REAL_NON,MAX(A.Real_Stamp) TGL FROM (SELECT * FROM dpa_akun WHERE".$qsql.") A LEFT JOIN (SELECT KegID,SUM(Renc_Keu) TOT_PAGU FROM dpa_akun WHERE".$qsql." GROUP BY KegID) B ON (B.KegID=A.KegID) GROUP BY A.KegID) K LEFT JOIN (SELECT * FROM dpa_keg WHERE".$qsql.") KR ON (KR.KegID=K.KegID) LEFT JOIN (SELECT * FROM para90_submap WHERE Tahun='".$_SESSION['__WEB_APP']['SUBMAP_TAHUN']."' AND ProgID='".$id_prog."' GROUP BY KegID) M ON (M.KegID=K.KegID)");
     $obj->set_query_footer("SELECT SUM(A.Renc_Keu) TOT_PAGU,SUM".$q_keu_lalu." REAL_LALU,SUM".$q_keu_ini." REAL_TOTAL,(SUM".$q_keu_ini."/SUM(A.Renc_Keu))*100 REAL_PSN,SUM(GREATEST".$q_fis_ini."*A.Renc_Keu/B.TOT_PAGU) REAL_FISIK,SUM(GREATEST".$q_non_ini."*A.Renc_Keu/B.TOT_PAGU) REAL_NON FROM (SELECT * FROM dpa_akun WHERE".$qsql.") A LEFT JOIN (SELECT ProgID,SUM(Renc_Keu) TOT_PAGU FROM dpa_akun WHERE".$qsql." GROUP BY ProgID) B ON (B.ProgID=A.ProgID)");
@@ -237,7 +230,6 @@ if ( $data == "tabel-opd" ) {
     $obj->add_field("REAL_NON", "N-Fisik %", "r", "rupiah2", "rupiah2");
     $obj->add_field("TGL", "Update", "c nwr", "sqljams", "", "val-tgljams");
     $obj->set_field_order("K_Keg", "A");
-    //$obj->add_row_btn("clipboard", "Kinerja", "KinerjaJS.keg_real");
     $obj->add_row_btn("folder", "Sub Kegiatan", "KinerjaJS.keg_select");
     $obj->set_func_navi("KinerjaJS.data_query('tabel-keg')");
     $obj->set_textbtn(true);
@@ -247,27 +239,26 @@ if ( $data == "tabel-opd" ) {
     if ($mode_detail=="update") {
         $sql = new SQL($db);
         $sql->set_table("dpa_sub");
-        //$sql->add_param("Real_Kendala");
-        //$sql->add_param("Real_Tindak");
-        //$sql->add_param("Real_Bantu");
         $sql->add_param("Real_Catatan");
         $sql->add_param("Real_No_Kontrak");
         $sql->add_param("Real_Pelaksana");
         $sql->add_param_stamp("Real_Stamp");
         $sql->add_param_userid("Real_UserID");
-        $sql->add_where("Tahun", $thn_renja);
+        $sql->add_where("Tahun", $thn_data);
         $sql->add_where("DPASubID", Param::Get("DPASubID",0));
         $sql->UpdateDB();
 
-        $aparam = Param::Get_Array();
+        $db->Query("UPDATE dpa_sub_output SET Real_TW".$tw_data."='".Param::Get("Real_TW")."' WHERE Tahun='".$thn_data."' AND DPASubOutputID='".Param::Get("DPASubOutputID")."' LIMIT 1");
+        
+        /*$aparam = Param::Get_Array();
         foreach($aparam as $key => $val) {
             if (strpos($key, "Output_TW_") !== false) {
                 $aid = explode("_", str_replace("Output_TW_","",$key));
-                $db->Query("UPDATE dpa_sub_output SET Real_TW".$aid[0]."='".$val."' WHERE Tahun='".$thn_renja."' AND DPASubOutputID='".$aid[1]."' LIMIT 1");
+                $db->Query("UPDATE dpa_sub_output SET Real_TW".$aid[0]."='".$val."' WHERE Tahun='".$thn_data."' AND DPASubOutputID='".$aid[1]."' LIMIT 1");
                 // update kinerja ke dpa_sub
-                //$db->Query("UPDATE dpa_sub A, (SELECT IF(Real_TW1=0,0,IF(Target_Output=0,100,Real_TW1/Target_Output*100)) Kin_TW1,IF(Real_TW2=0,0,IF(Target_Output=0,100,Real_TW2/Target_Output*100)) Kin_TW2,IF(Real_TW3=0,0,IF(Target_Output=0,100,Real_TW3/Target_Output*100)) Kin_TW3,IF(Real_TW4=0,0,IF(Target_Output=0,100,Real_TW4/Target_Output*100)) Kin_TW4 FROM dpa_sub_output WHERE Tahun='".$thn_renja."' AND DPASubOutputID='".$aid[1]."' LIMIT 1) B SET A.Kin_TW1=B.Kin_TW1,A.Kin_TW2=B.Kin_TW2,A.Kin_TW3=B.Kin_TW3,A.Kin_TW4=B.Kin_TW4 WHERE A.Tahun='".$thn_renja."' AND DPASubID='".Param::Get("DPASubID",0)."' LIMIT 1");
+                //$db->Query("UPDATE dpa_sub A, (SELECT IF(Real_TW1=0,0,IF(Target_Output=0,100,Real_TW1/Target_Output*100)) Kin_TW1,IF(Real_TW2=0,0,IF(Target_Output=0,100,Real_TW2/Target_Output*100)) Kin_TW2,IF(Real_TW3=0,0,IF(Target_Output=0,100,Real_TW3/Target_Output*100)) Kin_TW3,IF(Real_TW4=0,0,IF(Target_Output=0,100,Real_TW4/Target_Output*100)) Kin_TW4 FROM dpa_sub_output WHERE Tahun='".$thn_data."' AND DPASubOutputID='".$aid[1]."' LIMIT 1) B SET A.Kin_TW1=B.Kin_TW1,A.Kin_TW2=B.Kin_TW2,A.Kin_TW3=B.Kin_TW3,A.Kin_TW4=B.Kin_TW4 WHERE A.Tahun='".$thn_data."' AND DPASubID='".Param::Get("DPASubID",0)."' LIMIT 1");
             }
-        }
+        }*/
     }
 
     $obj = new Table($db);
@@ -303,15 +294,15 @@ if ( $data == "tabel-opd" ) {
         $sql->add_param("Real_Non", "GREATEST(RealN_B1,RealN_B2,RealN_B3,RealN_B4,RealN_B5,RealN_B6,RealN_B7,RealN_B8,RealN_B9,RealN_B10,RealN_B11,RealN_B12)", true);
         $sql->add_param_stamp("Real_Stamp");
         $sql->add_param_userid("Real_UserID");
-        $sql->add_where("Tahun", $thn_renja);
+        $sql->add_where("Tahun", $thn_data);
         $sql->add_where("DPAAkunID", Param::Get("DPAAkunID",0));
         $sql->UpdateDB();
         // update sub
-        $db->Query("UPDATE dpa_sub A, (SELECT SubID,SUM(Real_Keu) P1,SUM(RealK_B1+RealK_B2+RealK_B3) K1,SUM(RealK_B4+RealK_B5+RealK_B6) K2,SUM(RealK_B7+RealK_B8+RealK_B9) K3,SUM(RealK_B10+RealK_B11+RealK_B12) K4,GREATEST(RealF_B1,RealF_B2,RealF_B3) F1,GREATEST(RealF_B4,RealF_B5,RealF_B6) F2,GREATEST(RealF_B7,RealF_B8,RealF_B9) F3,GREATEST(RealF_B10,RealF_B11,RealF_B12) F4,GREATEST(RealN_B1,RealN_B2,RealN_B3) N1,GREATEST(RealN_B4,RealN_B5,RealN_B6) N2,GREATEST(RealN_B7,RealN_B8,RealN_B9) N3,GREATEST(RealN_B10,RealN_B11,RealN_B12) N4 FROM dpa_akun WHERE Tahun='".$thn_renja."' AND OPDID='".$id_opd."' AND ProgID='".$id_prog."' AND KegID='".$id_keg."' GROUP BY SubID) B SET A.Real_Keu=B.P1,A.RealK_TW1=B.K1,A.RealK_TW2=B.K2,A.RealK_TW3=B.K3,A.RealK_TW4=B.K4,A.RealF_TW1=B.F1,A.RealF_TW2=B.F2,A.RealF_TW3=B.F3,A.RealF_TW4=B.F4,A.RealN_TW1=B.N1,A.RealN_TW2=B.N2,A.RealN_TW3=B.N3,A.RealN_TW4=B.N4 WHERE A.SubID=B.SubID AND A.Tahun='".$thn_renja."' AND A.OPDID='".$id_opd."' AND A.ProgID='".$id_prog."' AND A.KegID='".$id_keg."'");
+        $db->Query("UPDATE dpa_sub A, (SELECT SubID,SUM(Real_Keu) P1,SUM(RealK_B1+RealK_B2+RealK_B3) K1,SUM(RealK_B4+RealK_B5+RealK_B6) K2,SUM(RealK_B7+RealK_B8+RealK_B9) K3,SUM(RealK_B10+RealK_B11+RealK_B12) K4,GREATEST(RealF_B1,RealF_B2,RealF_B3) F1,GREATEST(RealF_B4,RealF_B5,RealF_B6) F2,GREATEST(RealF_B7,RealF_B8,RealF_B9) F3,GREATEST(RealF_B10,RealF_B11,RealF_B12) F4,GREATEST(RealN_B1,RealN_B2,RealN_B3) N1,GREATEST(RealN_B4,RealN_B5,RealN_B6) N2,GREATEST(RealN_B7,RealN_B8,RealN_B9) N3,GREATEST(RealN_B10,RealN_B11,RealN_B12) N4 FROM dpa_akun WHERE Tahun='".$thn_data."' AND OPDID='".$id_opd."' AND ProgID='".$id_prog."' AND KegID='".$id_keg."' GROUP BY SubID) B SET A.Real_Keu=B.P1,A.RealK_TW1=B.K1,A.RealK_TW2=B.K2,A.RealK_TW3=B.K3,A.RealK_TW4=B.K4,A.RealF_TW1=B.F1,A.RealF_TW2=B.F2,A.RealF_TW3=B.F3,A.RealF_TW4=B.F4,A.RealN_TW1=B.N1,A.RealN_TW2=B.N2,A.RealN_TW3=B.N3,A.RealN_TW4=B.N4 WHERE A.SubID=B.SubID AND A.Tahun='".$thn_data."' AND A.OPDID='".$id_opd."' AND A.ProgID='".$id_prog."' AND A.KegID='".$id_keg."'");
         // update keg
-        $db->Query("UPDATE dpa_keg A, (SELECT KegID,SUM(Real_Keu) P1 FROM dpa_sub WHERE Tahun='".$thn_renja."' AND OPDID='".$id_opd."' AND ProgID='".$id_prog."' GROUP BY KegID) B SET A.Real_Keu=B.P1 WHERE A.KegID=B.KegID AND A.Tahun='".$thn_renja."' AND A.OPDID='".$id_opd."' AND A.ProgID='".$id_prog."'");
+        $db->Query("UPDATE dpa_keg A, (SELECT KegID,SUM(Real_Keu) P1 FROM dpa_sub WHERE Tahun='".$thn_data."' AND OPDID='".$id_opd."' AND ProgID='".$id_prog."' GROUP BY KegID) B SET A.Real_Keu=B.P1 WHERE A.KegID=B.KegID AND A.Tahun='".$thn_data."' AND A.OPDID='".$id_opd."' AND A.ProgID='".$id_prog."'");
         // update prog
-        $db->Query("UPDATE dpa_prog A, (SELECT ProgID,SUM(Real_Keu) P1 FROM dpa_keg WHERE Tahun='".$thn_renja."' AND OPDID='".$id_opd."' GROUP BY ProgID) B SET A.Real_Keu=B.P1 WHERE A.ProgID=B.ProgID AND A.Tahun='".$thn_renja."' AND A.OPDID='".$id_opd."'");
+        $db->Query("UPDATE dpa_prog A, (SELECT ProgID,SUM(Real_Keu) P1 FROM dpa_keg WHERE Tahun='".$thn_data."' AND OPDID='".$id_opd."' GROUP BY ProgID) B SET A.Real_Keu=B.P1 WHERE A.ProgID=B.ProgID AND A.Tahun='".$thn_data."' AND A.OPDID='".$id_opd."'");
     }
 
     $obj = new Table($db);
@@ -327,7 +318,7 @@ if ( $data == "tabel-opd" ) {
     $obj->add_field("REAL_NON", "N-Fisik %", "r", "rupiah2", "rupiah2");
     $obj->add_field("Real_Stamp", "Update", "c nwr", "sqljams", "", "val-tgljams");
     $obj->set_field_order("K_Akun", "A");
-    if ($emon_en) {
+    if ($bln_en) {
         $obj->add_row_btn("clipboard", "Realisasi", "KinerjaJS.akun_ubah");
     } else {
         $obj->add_row_btn("clipboard", "Detail", "KinerjaJS.akun_ubah");
@@ -338,7 +329,7 @@ if ( $data == "tabel-opd" ) {
 
 } else if ( $data == "detail-prog" ) {
     $arec = [];
-    $db->Query("SELECT * FROM dpa_prog WHERE Tahun='".$thn_renja."' AND DPAProgID='".$id_dpa_prog."' LIMIT 1");
+    $db->Query("SELECT * FROM dpa_prog WHERE Tahun='".$thn_data."' AND DPAProgID='".$id_dpa_prog."' LIMIT 1");
     if ($db->Next()) $arec = $db->AllRow();
     if ($arec['ProgID'] > 0) {
         $db->Query("SELECT N_Prog FROM para90_submap WHERE Tahun='".$_SESSION['__WEB_APP']['SUBMAP_TAHUN']."' AND ProgID='".$arec['ProgID']."' LIMIT 1");
@@ -351,7 +342,7 @@ if ( $data == "tabel-opd" ) {
         <div class="col"><textarea class="form-control" disabled="true" rows="2">'.$arec['N_Prog'].'</textarea></div>
     </div>
     <div class="row mb-1">
-        <div class="col"><h5 class="text-center">Capaian Indikator Program &nbsp;<strong>Sampai Dengan Triwulan '.romawi($tw_data).'</strong></h5></div>
+        <div class="col"><h5 class="text-center">Capaian Indikator Program</h5></div>
     </div>';
 
     $db->Query("SELECT I.*,IFNULL(T.P_Input,'{}') P_Input FROM (SELECT *,func_tipedata(TipeDataID,Target_Indi) Target_Indi2 FROM dpa_prog_indi WHERE ".$qsql.") I LEFT JOIN para_tipedata T ON (T.TipeDataID=I.TipeDataID)");
@@ -362,12 +353,18 @@ if ( $data == "tabel-opd" ) {
         </div></div>';
     }
     while ($db->Next()) {
-        $_p_input = ($db->Row("TipeDataID", 0) > 0) ? json_decode($db->Row("P_Input", "{}"), true) : [];
+        $arec = $db->AllRow();
-        $_val_cap = $db->Row("Real_TW".$tw_data);
+        $_p_input = (($arec['TipeDataID'] ?? 0) > 0) ? json_decode($arec['P_Input'] ?? '{}', true) : [];
-        $tindi = '<textarea class="form-control" disabled="true" rows="2">'.$db->Row("Text_Indi")." (".$db->Row("Satuan_Indi").')</textarea>';
+        $_val_cap = $arec['Real_TW'.$tw_data];
-        $ttarget = '<input type="text" class="form-control" value="'.$db->Row("Target_Indi2").'" readonly="">';
         $tcss = 'border '.($_val_cap==""?'border-danger':'border-success').' rounded';
-        $treal = tipedata_select("Prog_TW_".$tw_data."_".$db->Row("DPAProgIndiID"), $db->Row("TipeDataID", 0), $_val_cap, $emon_en, $_p_input, $tcss);
+
+        $form = new Form($db);
+        $tindi = $form->textarea('_', 'Text_Indi', $arec['Text_Indi']." (".$arec['Satuan_Indi'].')', false, false, 2);
+        $ttarget = '<input type="text" class="form-control" value="'.$db->Row("Target_Indi2").'" readonly="">';
+        $treal = tipedata_select("Prog_TW_".$tw_data."_".$arec['DPAProgIndiID'], $arec['TipeDataID'], $_val_cap, $tw_en, $_p_input, $tcss);
+        $tstatus = $form->textbox('_', "Status_Indi", ucfirst($arec['Status_Indi']), false, false);
+        $tsumb = $form->textbox('_', 'Sumber_TW_'.$tw_data.'_'.$arec['DPAProgIndiID'], $arec['Sumber_Data'], $tw_en, true, 'text', 'sumber data capaian / link / informasi pendukung');
+        $tcatat = $form->textbox('_', 'Catat_TW_'.$tw_data.'_'.$arec['DPAProgIndiID'], $arec['Catatan'], $tw_en, true, 'text', 'catatan atau kendala, jika ada');
         $tcapaian = "";
         for ($_tw = 1; $_tw < $tw_data; $_tw++) {
             $tcapaian .= ' / TW'.$_tw.' : '.$db->Row("Real_TW".$_tw);
@@ -381,12 +378,21 @@ if ( $data == "tabel-opd" ) {
         <div class="row mb-1">
             <label class="col-sm-4 col-lg-2 col-form-label">Target Indikator</label>
             <div class="col-sm-6 col-lg-4">'.$ttarget.'</div>
+            <div class="col"><div class="input-group"><span class="input-group-text">Status Indikator</span>'.$tstatus.'</div></div>
         </div>
         <div class="row mb-1">
             <label class="col-sm-4 col-lg-2 col-form-label">Capaian Indikator</label>
             <div class="col-sm-6 col-lg-4">'.$treal.'</div>
             <div class="col"><button class="btn btn-outline-secondary shadow-none text-info" title="Input hanya Capaian per Triwulan '.romawi($tw_data).' saja."><i class="bi-lightbulb"></i></button></div>
         </div>
+        <div class="row mb-1">
+            <label class="col-sm-4 col-lg-2 col-form-label" for="Sumber_TW_'.$tw_data.'_'.$arec['DPAProgIndiID'].'">Sumber Data / Eviden</label>
+            <div class="col">'.$tsumb.'</div>
+        </div>
+        <div class="row mb-1">
+            <label class="col-sm-4 col-lg-2 col-form-label" for="Catat_TW_'.$tw_data.'_'.$arec['DPAProgIndiID'].'">Catatan / Kendala</label>
+            <div class="col">'.$tcatat.'</div>
+        </div>
         <div class="row'.($tw_data==1?' d-none':'').'">
             <label class="col-sm-4 col-lg-2 col-form-label">Histori Capaian</label>
             <div class="col"><input type="text" class="form-control" value="'.substr($tcapaian,3).'" readonly=""></div>
@@ -398,7 +404,7 @@ if ( $data == "tabel-opd" ) {
 } else if ( $data == "detail-sub" ) {
     $id_dpa_sub = Param::Get("DPASubID", 0);
     $adetail = [];
-    $db->Query("SELECT *,(RealK_TW1+RealK_TW2+RealK_TW3+RealK_TW4) Tot_Real FROM dpa_sub WHERE Tahun='".$thn_renja."' AND DPASubID='".$id_dpa_sub."' LIMIT 1");
+    $db->Query("SELECT *,(RealK_TW1+RealK_TW2+RealK_TW3+RealK_TW4) Tot_Real FROM dpa_sub WHERE Tahun='".$thn_data."' AND DPASubID='".$id_dpa_sub."' LIMIT 1");
     if ($db->Next()) $adetail = $db->AllRow();
     $db->Query("SELECT N_Sub FROM para90_submap WHERE Tahun='".$_SESSION['__WEB_APP']['SUBMAP_TAHUN']."' AND SubID='".$id_sub."' LIMIT 1");
     if ($db->Next()) $adetail = array_merge($adetail, $db->AllRow());
@@ -413,9 +419,9 @@ if ( $data == "tabel-opd" ) {
     $form = new Form($db);
     $tkode = $form->textbox("_", "K_Sub", $adetail['K_Sub'], false, false);
     $tsub = $form->textarea("_", "N_Sub", $adetail['N_Sub'], false, false, 2);
-    $tcatatan = $form->textarea("_", "Real_Catatan", $adetail['Real_Catatan'], $emon_en, false, 2);
+    $tcatatan = $form->textarea("_", "Real_Catatan", $adetail['Real_Catatan'], $bln_en, false, 2);
-    $tno_kontr = $form->textbox("_", "Real_No_Kontrak", $adetail['Real_No_Kontrak'], $emon_en, false, "text", "nomor kontrak");
+    $tno_kontr = $form->textbox("_", "Real_No_Kontrak", $adetail['Real_No_Kontrak'], $bln_en, false, "text", "nomor kontrak");
-    $tpelak = $form->textarea("_", "Real_Pelaksana", $adetail['Real_Pelaksana'], $emon_en, false, 2, "nama pelaksana");
+    $tpelak = $form->textarea("_", "Real_Pelaksana", $adetail['Real_Pelaksana'], $bln_en, false, 2, "nama pelaksana");
     $tinfo = $form->textbox("_", "Informasi", "Diperbaharui oleh : ".$adetail['Update_User'].", pada : ".tgl_sql2str($adetail['Update_Stamp'], true), false, false);
 
     echo '
@@ -430,41 +436,39 @@ if ( $data == "tabel-opd" ) {
 
     <div class="accordion" id="accorDPAReal">
         <div class="accordion-item">
-        <h2 class="accordion-header" id="flush-one"><button class="accordion-button" type="button" data-bs-toggle="collapse" data-bs-target="#flush-coll-one" aria-controls="flush-coll-one" aria-expanded="true">Kinerja Indikator Output &nbsp;<strong>Sampai Dengan Triwulan '.romawi($tw_data).'</button></h2>
+        <h2 class="accordion-header" id="flush-one"><button class="accordion-button" type="button" data-bs-toggle="collapse" data-bs-target="#flush-coll-one" aria-controls="flush-coll-one" aria-expanded="true">Kinerja Indikator Output</button></h2>
         <div id="flush-coll-one" class="accordion-collapse collapse show" aria-labelledby="flush-head-one" data-bs-parent="#accorDPAReal">
         <div class="accordion-body">';
-        
+
+        $aoutput = ['DPASubOutputID'=>0, 'Text_Output'=>"", 'Sasaran_Output'=>"", 'Status_Output'=>"", 'Target_Output'=>"", 'Satuan_Output'=>""];
         $db->Query("SELECT * FROM dpa_sub_output WHERE ".$qsql);
-        if ($db->RecordCount()==0) {
+        if ($db->Next()) $aoutput = array_merge($aoutput, $db->AllRow());
-            echo '
+
-            <div class="card"><div class="card-body">
+        $tindi = $form->textarea("_", "Text_Indi", $aoutput['Text_Output'], false, false, 1);
-            <div class="row mb-2"><div class="col text-center"><h3>Belum ada Indikator Output Sub Kegiatan</h3></div></div>
+        $tsasar = $form->textbox("_", "Sasaran_Output", $aoutput['Sasaran_Output'], false, false, "text");
-            </div></div>
+        $tstatus = $form->textbox("_", "Status_Indi", ucfirst($aoutput['Status_Output']), false, false, "text");
-            ';
+        $ttarget = $form->textbox("_", "Target_Indi", (int)$aoutput['Target_Output']." ".$aoutput['Satuan_Output'], false, false, "text");
-        }
+        $treal = $form->textbox("_", "Real_TW", (int)$aoutput["Real_TW".$tw_data], $bln_en, true, "integer");
-        while ($db->Next()) {
+        echo '
-            $tindi = $form->textarea("_", "Text_Indi", $db->Row("Text_Output"), false, false, 2);
+        <div class="card"><div class="card-body">
-            $tstatus = $form->textbox("_", "Status_Indi", ucfirst($db->Row("Status_Output")), false, false, "text");
+        <div class="row mb-2">
-            $ttarget = $form->textbox("_", "Target_Indi", (float)$db->Row("Target_Output")." ".$db->Row("Satuan_Output"), false, false, "text");
+            <label class="col-sm-4 col-lg-2 col-form-label">Tolok Ukur Output</label>
-            $treal = $form->textbox("_", "Output_TW_".$tw_data."_".$db->Row("DPASubOutputID"), $db->Row("Real_TW".$tw_data), $emon_en, true, "double");
+            <div class="col">'.$tindi.'</div>
-            echo '
+        </div>
-            <div class="card"><div class="card-body">
+        <div class="row mb-1">
-            <div class="row mb-2">
+            <label class="col-sm-4 col-lg-2 col-form-label" for="Sasaran_Output">Kelompok Sasaran</label>
-                <label class="col-sm-4 col-lg-2 col-form-label">Tolok Ukur</label>
+            <div class="col">'.$tsasar.'</div>
-                <div class="col">'.$tindi.'</div>
+        </div>
-            </div>
+        <div class="row mb-1">
-            <div class="row mb-1">
+            <label class="col-sm-4 col-lg-2 col-form-label">Status Output</label>
-                <label class="col-sm-4 col-lg-2 col-form-label">Status Indikator</label>
+            <div class="col-sm-6 col-lg-4">'.$tstatus.'</div>
-                <div class="col-sm-6 col-lg-4">'.$tstatus.'</div>
+        </div>
-            </div>
+        <div class="row">
-            <div class="row">
+            <label class="col-sm-4 col-lg-2 col-form-label">Target & Realisasi</label>
-                <label class="col-sm-4 col-lg-2 col-form-label">Target & Realisasi</label>
+            <div class="col-sm-6 col-lg-4">'.$ttarget.'</div>
-                <div class="col-sm-6 col-lg-4">'.$ttarget.'</div>
+            <div class="col-sm-8 col-lg-4"><div class="input-group">'.$treal.'<span class="input-group-text">'.$aoutput['Satuan_Output'].'</span></div></div>
-                <div class="col-sm-8 col-lg-4"><div class="input-group">'.$treal.'<span class="input-group-text">'.$db->Row("Satuan_Output").'</span></div></div>
+        </div>
-            </div>
+        </div></div>';
-            </div></div>
-            ';
-        }
 
     echo '
         </div></div></div>
@@ -473,16 +477,19 @@ if ( $data == "tabel-opd" ) {
         <h2 class="accordion-header" id="flush-two"><button class="accordion-button collapsed" type="button" data-bs-toggle="collapse" data-bs-target="#flush-coll-two" aria-controls="flush-coll-two" aria-expanded="false">Catatan / Kendala / Permasalahan dari Sub Kegiatan</button></h2>
         <div id="flush-coll-two" class="accordion-collapse collapse" aria-labelledby="flush-head-two" data-bs-parent="#accorDPAReal">
         <div class="accordion-body">
+            <div class="card"><div class="card-body">
             <div class="row mb-1">
                 <label class="col-sm-4 col-lg-2 col-form-label" for="Real_Catatan">Catatan /<br>Kendala / DLL</label>
                 <div class="col">'.$tcatatan.'</div>
             </div>
+            </div></div>
         </div></div></div>
 
         <div class="accordion-item">
         <h2 class="accordion-header" id="flush-tri"><button class="accordion-button collapsed" type="button" data-bs-toggle="collapse" data-bs-target="#flush-coll-tri" aria-controls="flush-coll-tri" aria-expanded="false">Nomor Kontrak & Nama Pelaksana&nbsp;<i>(jika informasi tersedia)</i></button></h2>
         <div id="flush-coll-tri" class="accordion-collapse collapse" aria-labelledby="flush-head-tri" data-bs-parent="#accorDPAReal">
         <div class="accordion-body">
+            <div class="card"><div class="card-body">
             <div class="row mb-1">
                 <label class="col-sm-5 col-lg-3 col-form-label" for="Real_No_Kontrak">Nomor Kontrak</label>
                 <div class="col">'.$tno_kontr.'</div>
@@ -491,16 +498,18 @@ if ( $data == "tabel-opd" ) {
                 <label class="col-sm-5 col-lg-3 col-form-label" for="Real_Pelaksana">Nama Pelaksana</label>
                 <div class="col">'.$tpelak.'</div>
             </div>
+            </div></div>
         </div></div></div>
     </div>
     <div class="row mt-2"><div class="col">'.$tinfo.'</div></div>
-    <input type="hidden" id="DPASubID" value="'.$adetail['DPASubID'].'">';
+    <input type="hidden" id="DPASubID" value="'.$adetail['DPASubID'].'">
+    <input type="hidden" id="DPASubOutputID" value="'.$aoutput['DPASubOutputID'].'">';
 
 } else if ( $data == "detail-akun" ) {
     $id_dpa_akun = Param::Get("DPAAkunID", 0);
-    $adetail = array();
+    $adetail = ['Real_User'=>""];
-    $db->Query("SELECT D.*,A.N_Akun FROM (SELECT * FROM dpa_akun WHERE Tahun='".$thn_renja."' AND DPAAkunID='".$id_dpa_akun."' LIMIT 1) D LEFT JOIN para90_akun A ON (D.AkunID=A.AkunID AND A.Tahun='".$_SESSION['__WEB_APP']['AKUN_TAHUN']."')");
+    $db->Query("SELECT D.*,A.N_Akun FROM (SELECT * FROM dpa_akun WHERE Tahun='".$thn_data."' AND DPAAkunID='".$id_dpa_akun."' LIMIT 1) D LEFT JOIN para90_akun A ON (D.AkunID=A.AkunID AND A.Tahun='".$_SESSION['__WEB_APP']['AKUN_TAHUN']."')");
-    if ($db->Next()) $adetail = $db->AllRow();
+    if ($db->Next()) $adetail = array_merge($adetail, $db->AllRow());
     $db->Query("SELECT Username Real_User FROM app_operator WHERE UserID='".$adetail['Real_UserID']."' LIMIT 1");
     if ($db->Next()) $adetail = array_merge($adetail, $db->AllRow());
 
@@ -522,13 +531,13 @@ if ( $data == "tabel-opd" ) {
     $f_pagu = $form->textbox("_", "Pagu_Ini", $adetail['Renc_Keu'], false, false, "double");
     $f_k_las = $form->textbox("_", "RealK_Las", $realK_las, false, false, "double");
     $f_k_bln = $form->textbox("_", "RealK_Bln", $adetail['RealK_B'.$bln_data], false, false, "double");
-    $f_k_tot = $form->textbox("_", "RealK_Tot", $realK_tot, $emon_en, $emon_en, "double");
+    $f_k_tot = $form->textbox("_", "RealK_Tot", $realK_tot, $bln_en, $bln_en, "double");
     $f_f_las = $form->textbox("_", "RealF_Las", $realF_las, false, false, "double");
     $f_f_bln = $form->textbox("_", "RealF_Bln", $realF_tot, false, false, "double");
-    $f_f_tot = $form->textbox("_", "RealF_Tot", $realF_tot, $emon_en, $emon_en, "double");
+    $f_f_tot = $form->textbox("_", "RealF_Tot", $realF_tot, $bln_en, $bln_en, "double");
     $f_n_las = $form->textbox("_", "RealN_Las", $realN_las, false, false, "double");
     $f_n_bln = $form->textbox("_", "RealN_Bln", $realN_tot, false, false, "double");
-    $f_n_tot = $form->textbox("_", "RealN_Tot", $realN_tot, $emon_en, $emon_en, "double");
+    $f_n_tot = $form->textbox("_", "RealN_Tot", $realN_tot, $bln_en, $bln_en, "double");
     $tinfo = $form->textbox("_", "Informasi", "Diperbaharui oleh : ".$adetail['Real_User'].", pada : ".tgl_sql2str($adetail['Real_Stamp'], true), false, false);
 
     echo '
@@ -541,18 +550,18 @@ if ( $data == "tabel-opd" ) {
         <div class="col">'.$f_akun.'</div>
     </div>
     <div class="row mb-1">
-        <label class="col-sm-4 col-lg-2 col-form-label">Kontrak/Swakelola (Rp.)</label>
+        <label class="col-sm-4 col-lg-2 col-form-label">Kontrak/Swakelola</label>
-        <div class="col-sm-4">'.$f_pagu.'</div>
+        <div class="col-sm-4"><div class="form-group"><div class="input-group"><span class="input-group-text">Rp</span>'.$f_pagu.'</div></div></div>
     </div>
     <div class="row mb-1"><div class="col"><hr class="my-1"></div></div>
     <div class="row mb-1 text-center font-weight-bold">
         <div class="col-6 col-lg-2">&nbsp;</div>
         <div class="col-6 col-lg-3">S/D BULAN LALU</div>
-        <div class="col-6 col-lg-3">BULAN '.strtoupper(bulan_array()[$bln_data]).'&nbsp;'.$thn_renja.'</div>
+        <div class="col-6 col-lg-3">BULAN '.strtoupper(bulan_array()[$bln_data]).'&nbsp;'.$thn_data.'</div>
-        <div class="col-6 col-lg-4">S/D BULAN '.strtoupper(bulan_array()[$bln_data]).' '.$thn_renja.'</div>
+        <div class="col-6 col-lg-4">S/D BULAN '.strtoupper(bulan_array()[$bln_data]).' '.$thn_data.'</div>
     </div>
     <div class="row mb-1">
-        <div class="col-6 col-lg-2">Realisasi Keuangan (Rp)</div>
+        <div class="col-6 col-lg-2">Realisasi Keuangan</div>
         <div class="col-6 col-lg-3">'.$f_k_las.'</div>
         <div class="col-6 col-lg-3">'.$f_k_bln.'</div>
         <div class="col-6 col-lg-4">
@@ -560,7 +569,7 @@ if ( $data == "tabel-opd" ) {
         </div>
     </div>
     <div class="row mb-1">
-        <div class="col-6 col-lg-2">Realisasi Fisik (%)</div>
+        <div class="col-6 col-lg-2">Realisasi Fisik</div>
         <div class="col-6 col-lg-3">'.$f_f_las.'</div>
         <div class="col-6 col-lg-3">'.$f_f_bln.'</div>
         <div class="col-6 col-lg-4">
@@ -568,7 +577,7 @@ if ( $data == "tabel-opd" ) {
         </div>
     </div>
     <div class="row mb-1">
-        <div class="col-6 col-lg-2">Realisasi Non-Fisik (%)</div>
+        <div class="col-6 col-lg-2">Realisasi Non-Fisik</div>
         <div class="col-6 col-lg-3">'.$f_n_las.'</div>
         <div class="col-6 col-lg-3">'.$f_n_bln.'</div>
         <div class="col-6 col-lg-4">
@@ -584,14 +593,15 @@ if ( $data == "tabel-opd" ) {
 } else if ( $data == "default") {
     echo '
     <div class="fade-in">
-    <div class="card"><div class="card-header custom-style">Kelola Data Realisasi Kinerja Renja OPD // Bulan '.bulan_array()[$bln_data].' '.$thn_renja.'</div><div class="card-body">
+    <div class="card"><div class="card-header custom-style">Kelola Data Realisasi Kinerja Renja OPD // Bulan '.bulan_array()[$bln_data].' '.$thn_data.'</div><div class="card-body">
     <div class="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="ORGID" type="hidden" value="0">
                 <input id="OPDID" type="hidden" value="0">
-                <input id="Hak_Real" type="hidden" value="1">
+                <input id="Hak_Bln" type="hidden" value="1">
+                <input id="Hak_Tw" type="hidden" value="1">
                 <button class="btn btn-info btn-ganti" type="button" id="butOPD"><span><i class="bi-arrow-left-right"></span></i>OPD</button>
             </div>
         </div>

apps/php/mon/renja.php

@@ -27,9 +27,9 @@ $ajson = [];
 $data = Param::Get("data");
 $mode = Param::Get("mode");
 $mode_detail = Param::Get("mode_detail");
-$emon_en = Param::Get("Hak_DPA", 0);
+$ren_en = Param::Get("Hak_Renja", 0);
 $id_rpjmd = $_SESSION['__WEB_APP']['REAL_RPJMDID'];
-$thn_renja = $_SESSION['__WEB_APP']['REAL_THN'];
+$thn_data = $_SESSION['__WEB_APP']['REAL_THN'];
 $id_org = Param::Get("ORGID", 0);
 $id_opd = Param::Get("OPDID", 0);
 $id_prog = Param::Get("ProgID", 0);
@@ -38,7 +38,7 @@ $id_sub = Param::Get("SubID", 0);
 $id_akun = Param::Get("AkunID", 0);
 
 if ( in_array($data, ["tabel-opd","tabel-prog","tabel-keg","tabel-sub","tabel-prog-indi","tabel-sub-output","tabel-akun"]) ) {
-    $qsql = "Tahun='".$thn_renja."'";
+    $qsql = "Tahun='".$thn_data."'";
     $msql = "M.Aktif=1";
 
     if ( $data == "tabel-opd" ) {
@@ -60,16 +60,16 @@ if ( in_array($data, ["tabel-opd","tabel-prog","tabel-keg","tabel-sub","tabel-pr
 if ( $data == "tabel-opd" ) {
     $f_usul = (in_array($_SESSION['__WEB_USER']['Level'],[0,1])) ? "1" : "0";
     if (in_array($_SESSION['__WEB_USER']['Level'],[3,4])) {
-        $f_usul = "IFNULL(H.Hak_DPA,1)";
+        $f_usul = "IFNULL(H.Hak_Renja,1)";
     }
     $obj = new Table($db);
-    $obj->set_query("SELECT M.OPDID OPDID2,M.ORGID,M.K_OPD,M.N_OPD,M.Nama_OPD,M.AK_Bidu,M.K_Bidu1,".$f_usul." Hak_DPA,KP.ITEM_PROG,KK.ITEM_KEG,KS.ITEM_SUB,KS.TOT_SEMUA FROM vi_para90_opd M LEFT JOIN (SELECT OPDID,COUNT(*) ITEM_PROG FROM dpa_prog WHERE ".$qsql." GROUP BY OPDID) KP ON (KP.OPDID=M.OPDID) LEFT JOIN (SELECT OPDID,COUNT(*) ITEM_KEG FROM dpa_keg WHERE ".$qsql." GROUP BY OPDID) KK ON (KK.OPDID=M.OPDID) LEFT JOIN (SELECT OPDID,COUNT(*) ITEM_SUB,SUM(Pagu_Ini) TOT_SEMUA FROM dpa_sub WHERE ".$qsql." GROUP BY OPDID) KS ON (KS.OPDID=M.OPDID) LEFT JOIN (SELECT OPDID,Hak_DPA FROM sippd_akses_sip WHERE Tahun='".$thn_renja."') H ON (H.OPDID=M.OPDID) WHERE ".$msql);
+    $obj->set_query("SELECT M.OPDID OPDID2,M.ORGID,M.K_OPD,M.N_OPD,M.Nama_OPD,M.AK_Bidu,M.K_Bidu1,".$f_usul." Hak_Renja,KP.ITEM_PROG,KK.ITEM_KEG,KS.ITEM_SUB,KS.TOT_SEMUA FROM vi_para90_opd M LEFT JOIN (SELECT OPDID,COUNT(*) ITEM_PROG FROM dpa_prog WHERE ".$qsql." GROUP BY OPDID) KP ON (KP.OPDID=M.OPDID) LEFT JOIN (SELECT OPDID,COUNT(*) ITEM_KEG FROM dpa_keg WHERE ".$qsql." GROUP BY OPDID) KK ON (KK.OPDID=M.OPDID) LEFT JOIN (SELECT OPDID,COUNT(*) ITEM_SUB,SUM(Pagu_Ini) TOT_SEMUA FROM dpa_sub WHERE ".$qsql." GROUP BY OPDID) KS ON (KS.OPDID=M.OPDID) LEFT JOIN (SELECT OPDID,Hak_Renja FROM sippd_akses_mon WHERE Tahun='".$thn_data."') H ON (H.OPDID=M.OPDID) WHERE ".$msql);
     $obj->add_field("OPDID2", "OPD", "hid");
     $obj->add_field("ORGID", "ORG", "hid");
     $obj->add_field("Nama_OPD", "Nama OPD", "hid");
     $obj->add_field("AK_Bidu", "AK_Bidu", "hid");
     $obj->add_field("K_Bidu1", "K_Bidu1", "hid");
-    $obj->add_field("Hak_DPA", "DPA", "hid");
+    $obj->add_field("Hak_Renja", "Renja", "hid");
     $obj->add_field("K_OPD", "Kode", "c");
     $obj->add_field("N_OPD", "Nama Perangkat Daerah", "awr");
     $obj->add_field("TOT_SEMUA", "Jumlah Pagu", "r", "rupiah");
@@ -90,7 +90,7 @@ if ( $data == "tabel-opd" ) {
             if ($k_bidu == "X.XX") {
                 $k_bidu = Param::Get("K_Bidu1");
             }
-            $db->Query("INSERT IGNORE INTO dpa_prog (RPJMDID,Tahun,ORGID,OPDID,ProgID,K_Bidu,K_Prog,Input_UserID) VALUES('".$id_rpjmd."','".$thn_renja."','".$id_org."','".$id_opd."','".$id_prog."','".$k_bidu."','".$k_prog."','".user_id()."')");
+            $db->Query("INSERT IGNORE INTO dpa_prog (RPJMDID,Tahun,ORGID,OPDID,ProgID,K_Bidu,K_Prog,Input_UserID) VALUES('".$id_rpjmd."','".$thn_data."','".$id_org."','".$id_opd."','".$id_prog."','".$k_bidu."','".$k_prog."','".user_id()."')");
         } else if ($mode_detail=="update") {
         } else if ($mode_detail=="delete") {
         }
@@ -110,7 +110,7 @@ if ( $data == "tabel-opd" ) {
     $obj->add_row_btn("clipboard", "Indikator", "RenjaJS.prog_edit", "", "", "CSS_INDI", [1=>"warning",2=>"danger"]);
     $obj->add_row_btn("folder", "Kegiatan", "RenjaJS.prog_select");
     $obj->set_func_navi("RenjaJS.data_query('tabel-prog')");
-    if ($emon_en) $obj->set_func_btn("RenjaJS.prog_brow", "+ Program");
+    if ($ren_en) $obj->set_func_btn("RenjaJS.prog_brow", "+ Program");
     $obj->set_textbtn(true);
     $ajson[] = $obj->json_table("divPROG");
 
@@ -123,12 +123,12 @@ if ( $data == "tabel-opd" ) {
         $sql->add_param("Target_Indi");
         $sql->add_param("Satuan_Indi");
         $sql->add_param("Poin_Target", tipedata_poin(Param::Get("Target_Indi","")));
-        $sql->add_where("Tahun", $thn_renja);
+        $sql->add_where("Tahun", $thn_data);
         $sql->add_where("DPAProgIndiID");
 
         if ($mode_detail=="insert") {
             $sql->add_param("RPJMDID", $id_rpjmd);
-            $sql->add_param("Tahun", $thn_renja);
+            $sql->add_param("Tahun", $thn_data);
             $sql->add_param("ORGID", $id_org);
             $sql->add_param("OPDID", $id_opd);
             $sql->add_param("ProgID", $id_prog);
@@ -153,8 +153,8 @@ if ( $data == "tabel-opd" ) {
     $obj->add_field("TipeDataID", "Tipe Data", "l", "tipedata_tipe");
     $obj->add_field("Target_Indi2", "Target", "c");
     $obj->set_field_order("Text_Indi", "A");
-    $obj->add_row_form("Detail", "RenjaJS.prog_indi_form");
+    $obj->add_row_form('pencil', 'Detail', 'RenjaJS.prog_indi_form');
-    if ($emon_en) {
+    if ($ren_en) {
         $obj->add_row_btn("trash", "Hapus", "RenjaJS.prog_indi_del");
         $obj->set_func_btn("RenjaJS.prog_indi_add", "+ Indikator");
     }
@@ -163,9 +163,9 @@ if ( $data == "tabel-opd" ) {
 } else if ( $data == "tabel-keg" ) {
     if (in_array($mode_detail, ["insert","update","delete"])) {
         if ($mode_detail=="insert") {
-            $db->Query("INSERT IGNORE INTO dpa_keg (RPJMDID,Tahun,ORGID,OPDID,ProgID,KegID,K_Keg,Input_UserID) VALUES('".$id_rpjmd."','".$thn_renja."','".$id_org."','".$id_opd."','".$id_prog."','".$id_keg."','".Param::Get("K_Keg")."','".user_id()."')");
+            $db->Query("INSERT IGNORE INTO dpa_keg (RPJMDID,Tahun,ORGID,OPDID,ProgID,KegID,K_Keg,Input_UserID) VALUES('".$id_rpjmd."','".$thn_data."','".$id_org."','".$id_opd."','".$id_prog."','".$id_keg."','".Param::Get("K_Keg")."','".user_id()."')");
         } else if ($mode_detail=="update") {
-            //$db->Query("UPDATE dpa_keg SET Sasaran='".Param::Get("Sasaran","")."' WHERE Tahun='".$thn_renja."' AND DPAKegID='".Param::Get("DPAKegID",0)."'");
+            //$db->Query("UPDATE dpa_keg SET Sasaran='".Param::Get("Sasaran","")."' WHERE Tahun='".$thn_data."' AND DPAKegID='".Param::Get("DPAKegID",0)."'");
         } else if ($mode_detail=="delete") {
         }
     }
@@ -183,7 +183,7 @@ if ( $data == "tabel-opd" ) {
     //$obj->add_row_btn("clipboard", "Detail", "RenjaJS.keg_edit");
     $obj->add_row_btn("folder", "Sub Kegiatan", "RenjaJS.keg_select");
     $obj->set_func_navi("RenjaJS.data_query('tabel-keg')");
-    if ($emon_en) $obj->set_func_btn("RenjaJS.keg_brow", "+ Kegiatan");
+    if ($ren_en) $obj->set_func_btn("RenjaJS.keg_brow", "+ Kegiatan");
     $obj->set_textbtn(true);
     $ajson[] = $obj->json_table("divKEG");
 
@@ -191,12 +191,12 @@ if ( $data == "tabel-opd" ) {
     if (in_array($mode_detail, ["insert","update","delete"])) {
         $sql = new SQL($db);
         $sql->set_table("dpa_sub");
-        $sql->add_where("Tahun", $thn_renja);
+        $sql->add_where("Tahun", $thn_data);
         $sql->add_where("DPASubID");
 
         if ($mode_detail=="insert") {
             $sql->add_param("RPJMDID", $id_rpjmd);
-            $sql->add_param("Tahun", $thn_renja);
+            $sql->add_param("Tahun", $thn_data);
             $sql->add_param("ORGID", $id_org);
             $sql->add_param("OPDID", $id_opd);
             $sql->add_param("ProgID", $id_prog);
@@ -208,7 +208,6 @@ if ( $data == "tabel-opd" ) {
         } else if ($mode_detail=="update") {
             $sql->add_param("Waktu1");
             $sql->add_param("Waktu2");
-            //$sql->add_param("Pagu_Ini");
             $sql->add_param("Pagu_Dpn");
             $sql->add_param("Lokasi");
             $sql->add_param_stamp("Update_Stamp");
@@ -216,7 +215,36 @@ if ( $data == "tabel-opd" ) {
             $sql->UpdateDB();
         } else if ($mode_detail=="delete") {
             $sql->DeleteDB();
-            $db->Query("DELETE IGNORE FROM dpa_sub_output WHERE Tahun='".$thn_renja."' AND OPDID='".$id_opd."' AND KegID='".$id_keg."' AND SubID='".$id_sub."'");
+            //$db->Query("DELETE IGNORE FROM dpa_sub_output WHERE Tahun='".$thn_data."' AND OPDID='".$id_opd."' AND KegID='".$id_keg."' AND SubID='".$id_sub."'");
+        }
+
+        // subkeg output
+        $sql = new SQL($db);
+        $sql->set_table("dpa_sub_output");
+        $sql->add_param("Status_Output");
+        $sql->add_param("Text_Output");
+        $sql->add_param("Sasaran_Output");
+        $sql->add_param("Target_Output");
+        $sql->add_param("Satuan_Output");
+        $sql->add_where("Tahun", $thn_data);
+        $sql->add_where("DPASubOutputID");
+
+        if ($mode_detail=="insert") {
+            $sql->add_param("RPJMDID", $id_rpjmd);
+            $sql->add_param("Tahun", $thn_data);
+            $sql->add_param("ORGID", $id_org);
+            $sql->add_param("OPDID", $id_opd);
+            $sql->add_param("ProgID", $id_prog);
+            $sql->add_param("KegID", $id_keg);
+            $sql->add_param("SubID", $id_sub);
+            $sql->add_param_userid("Input_UserID");
+            $sql->InsertDB();
+        } else if ($mode_detail=="update") {
+            $sql->add_param_stamp("Update_Stamp");
+            $sql->add_param_userid("Update_UserID");
+            $sql->UpdateDB();
+        } else if ($mode_detail=="delete") {
+            $sql->DeleteDB();
         }
     }
     
@@ -231,7 +259,7 @@ if ( $data == "tabel-opd" ) {
     $obj->add_field("Lokasi", "Lokasi", "awr");
     $obj->set_field_order("K_Sub", "A");
     $obj->add_row_btn("clipboard", "Detail", "RenjaJS.sub_edit", "", "", "CSS_INDI", [1=>"warning",2=>"danger"]);
-    if ($emon_en) {
+    if ($ren_en) {
         $obj->add_row_btn("trash", "Hapus", "RenjaJS.sub_hapus", "DEL_SUB", 1);
         $obj->set_func_btn("RenjaJS.sub_brow", "+ Sub Kegiatan");
     }
@@ -240,7 +268,7 @@ if ( $data == "tabel-opd" ) {
     $obj->set_textbtn(true);
     $ajson[] = $obj->json_table("divSUB");
 
-} else if ( $data == "tabel-sub-output" ) {
+/*} else if ( $data == "tabel-sub-output" ) {
     if (in_array($mode_detail, ["insert","update","delete"])) {
         $sql = new SQL($db);
         $sql->set_table("dpa_sub_output");
@@ -248,12 +276,12 @@ if ( $data == "tabel-opd" ) {
         $sql->add_param("Text_Output");
         $sql->add_param("Target_Output");
         $sql->add_param("Satuan_Output");
-        $sql->add_where("Tahun", $thn_renja);
+        $sql->add_where("Tahun", $thn_data);
         $sql->add_where("DPASubOutputID");
 
         if ($mode_detail=="insert") {
             $sql->add_param("RPJMDID", $id_rpjmd);
-            $sql->add_param("Tahun", $thn_renja);
+            $sql->add_param("Tahun", $thn_data);
             $sql->add_param("ORGID", $id_org);
             $sql->add_param("OPDID", $id_opd);
             $sql->add_param("ProgID", $id_prog);
@@ -276,13 +304,13 @@ if ( $data == "tabel-opd" ) {
     $obj->add_field("Text_Output", "Tolok Ukur Output", "awr", "", "", "val-emptylast");
     $obj->add_field("Target_Satuan", "Target", "r");
     $obj->set_field_order("Text_Output", "A");
-    $obj->add_row_form("Detail", "RenjaJS.sub_output_form");
+    $obj->add_row_form('pencil', 'Detail', 'RenjaJS.sub_output_form');
-    if ($emon_en) {
+    if ($ren_en) {
         $obj->add_row_btn("trash", "Hapus", "RenjaJS.sub_output_del");
         $obj->set_func_btn("RenjaJS.sub_output_add", "+ Output");
     }
     $ajson[] = $obj->json_table("divSubOutput");
-
+*/
 } else if ( $data == "tabel-akun" ) {
     if (in_array($mode_detail, ["insert","update","delete"])) {
         $sql = new SQL($db);
@@ -293,7 +321,7 @@ if ( $data == "tabel-opd" ) {
         $sql->add_param("Pagu_Ini", "Volume*Harga_Satuan", true);
         $sql->add_param("Renc_Keu");
         $sql->add_param("Renc_Fisik");
-        $sql->add_where("Tahun", $thn_renja);
+        $sql->add_where("Tahun", $thn_data);
         $sql->add_where("DPAAkunID");
 
         if ($mode_detail=="insert") {
@@ -301,7 +329,7 @@ if ( $data == "tabel-opd" ) {
             $db->Query("SELECT * FROM para90_akun WHERE Tahun='".$_SESSION['__WEB_APP']['AKUN_TAHUN']."' AND AkunID='".$id_akun."' LIMIT 1");
             if ($db->Next()) $k_akun = $db->Row("K_Akun");
             $sql->add_param("RPJMDID", $id_rpjmd);
-            $sql->add_param("Tahun", $thn_renja);
+            $sql->add_param("Tahun", $thn_data);
             $sql->add_param("ORGID", $id_org);
             $sql->add_param("OPDID", $id_opd);
             $sql->add_param("ProgID", $id_prog);
@@ -319,11 +347,11 @@ if ( $data == "tabel-opd" ) {
             $sql->DeleteDB();
         }
         // update sub
-        $db->Query("UPDATE dpa_sub A, (SELECT SubID,SUM(Pagu_Ini) P1,SUM(Renc_Keu) P2 FROM dpa_akun WHERE Tahun='".$thn_renja."' AND OPDID='".$id_opd."' AND ProgID='".$id_prog."' AND KegID='".$id_keg."' GROUP BY SubID) B SET A.Pagu_Ini=B.P1,A.Renc_Keu=B.P2 WHERE A.SubID=B.SubID AND A.Tahun='".$thn_renja."' AND A.OPDID='".$id_opd."' AND A.ProgID='".$id_prog."' AND A.KegID='".$id_keg."'");
+        $db->Query("UPDATE dpa_sub A, (SELECT SubID,SUM(Pagu_Ini) P1,SUM(Renc_Keu) P2 FROM dpa_akun WHERE Tahun='".$thn_data."' AND OPDID='".$id_opd."' AND ProgID='".$id_prog."' AND KegID='".$id_keg."' GROUP BY SubID) B SET A.Pagu_Ini=B.P1,A.Renc_Keu=B.P2 WHERE A.SubID=B.SubID AND A.Tahun='".$thn_data."' AND A.OPDID='".$id_opd."' AND A.ProgID='".$id_prog."' AND A.KegID='".$id_keg."'");
         // update keg
-        $db->Query("UPDATE dpa_keg A, (SELECT KegID,SUM(Pagu_Ini) P1,SUM(Renc_Keu) P2 FROM dpa_sub WHERE Tahun='".$thn_renja."' AND OPDID='".$id_opd."' AND ProgID='".$id_prog."' GROUP BY KegID) B SET A.Pagu_Ini=B.P1,A.Renc_Keu=B.P2 WHERE A.KegID=B.KegID AND A.Tahun='".$thn_renja."' AND A.OPDID='".$id_opd."' AND A.ProgID='".$id_prog."'");
+        $db->Query("UPDATE dpa_keg A, (SELECT KegID,SUM(Pagu_Ini) P1,SUM(Renc_Keu) P2 FROM dpa_sub WHERE Tahun='".$thn_data."' AND OPDID='".$id_opd."' AND ProgID='".$id_prog."' GROUP BY KegID) B SET A.Pagu_Ini=B.P1,A.Renc_Keu=B.P2 WHERE A.KegID=B.KegID AND A.Tahun='".$thn_data."' AND A.OPDID='".$id_opd."' AND A.ProgID='".$id_prog."'");
         // update prog
-        $db->Query("UPDATE dpa_prog A, (SELECT ProgID,SUM(Pagu_Ini) P1,SUM(Renc_Keu) P2 FROM dpa_keg WHERE Tahun='".$thn_renja."' AND OPDID='".$id_opd."' GROUP BY ProgID) B SET A.Pagu_Ini=B.P1,A.Renc_Keu=B.P2 WHERE A.ProgID=B.ProgID AND A.Tahun='".$thn_renja."' AND A.OPDID='".$id_opd."'");
+        $db->Query("UPDATE dpa_prog A, (SELECT ProgID,SUM(Pagu_Ini) P1,SUM(Renc_Keu) P2 FROM dpa_keg WHERE Tahun='".$thn_data."' AND OPDID='".$id_opd."' GROUP BY ProgID) B SET A.Pagu_Ini=B.P1,A.Renc_Keu=B.P2 WHERE A.ProgID=B.ProgID AND A.Tahun='".$thn_data."' AND A.OPDID='".$id_opd."'");
     }
 
     $obj = new Table($db);
@@ -336,7 +364,7 @@ if ( $data == "tabel-opd" ) {
     $obj->add_field("Renc_Fisik", "Fisik (%)", "r", "rupiah");
     $obj->set_field_order("K_Akun", "A");
     $obj->add_row_btn("clipboard", "Detail", "RenjaJS.akun_ubah");
-    if ($emon_en) {
+    if ($ren_en) {
         $obj->add_row_btn("trash", "Hapus", "RenjaJS.akun_hapus", "DEL_AKUN", 1);
         $obj->set_func_btn("RenjaJS.akun_tambah", "+ Akun");
     }
@@ -348,7 +376,7 @@ if ( $data == "tabel-opd" ) {
     $tcari = trim(Param::Get("Cari_Prog"));
     $tsql = ($tcari=="") ? "" : " AND CONCAT(K_Prog,N_Prog) LIKE '%".$tcari."%'";
     $obj = new Table($db);
-    $obj->set_query("SELECT * FROM para90_submap WHERE Tahun='".$_SESSION['__WEB_APP']['SUBMAP_TAHUN']."' AND K_Bidu IN (".stripslashes(Param::Get("AK_Bidu")).") AND ProgID NOT IN (SELECT ProgID FROM dpa_prog WHERE Tahun='".$thn_renja."' AND OPDID='".$id_opd."')".$tsql." GROUP BY ProgID");
+    $obj->set_query("SELECT * FROM para90_submap WHERE Tahun='".$_SESSION['__WEB_APP']['SUBMAP_TAHUN']."' AND K_Bidu IN (".stripslashes(Param::Get("AK_Bidu")).") AND ProgID NOT IN (SELECT ProgID FROM dpa_prog WHERE Tahun='".$thn_data."' AND OPDID='".$id_opd."')".$tsql." GROUP BY ProgID");
     $obj->add_field("ProgID", "ID", "hid");
     $obj->add_field("K_Bidu", "K_Bidu", "hid");
     $obj->add_field("K_Prog", "Kode", "c");
@@ -362,7 +390,7 @@ if ( $data == "tabel-opd" ) {
     $tcari = trim(Param::Get("Cari_Keg"));
     $tsql = ($tcari=="") ? "" : " AND CONCAT(K_Keg,N_Keg) LIKE '%".$tcari."%'";
     $obj = new Table($db);
-    $obj->set_query("SELECT * FROM para90_submap WHERE Tahun='".$_SESSION['__WEB_APP']['SUBMAP_TAHUN']."' AND ProgID='".$id_prog."' AND KegID NOT IN (SELECT KegID FROM dpa_keg WHERE Tahun='".$thn_renja."' AND OPDID='".$id_opd."' AND ProgID='".$id_prog."')".$tsql." GROUP BY KegID");
+    $obj->set_query("SELECT * FROM para90_submap WHERE Tahun='".$_SESSION['__WEB_APP']['SUBMAP_TAHUN']."' AND ProgID='".$id_prog."' AND KegID NOT IN (SELECT KegID FROM dpa_keg WHERE Tahun='".$thn_data."' AND OPDID='".$id_opd."' AND ProgID='".$id_prog."')".$tsql." GROUP BY KegID");
     $obj->add_field("KegID", "ID", "hid");
     $obj->add_field("K_Keg", "Kode", "c");
     $obj->add_field("N_Keg", "Nama Kegiatan", "awr");
@@ -375,7 +403,7 @@ if ( $data == "tabel-opd" ) {
     $tcari = trim(Param::Get("Cari_Sub"));
     $tsql = ($tcari=="") ? "" : " AND CONCAT(K_Sub,N_Sub) LIKE '%".$tcari."%'";
     $obj = new Table($db);
-    $obj->set_query("SELECT * FROM para90_submap WHERE Tahun='".$_SESSION['__WEB_APP']['SUBMAP_TAHUN']."' AND ProgID='".$id_prog."' AND KegID='".$id_keg."' AND SubID NOT IN (SELECT SubID FROM dpa_sub WHERE Tahun='".$thn_renja."' AND OPDID='".$id_opd."' AND ProgID='".$id_prog."' AND KegID='".$id_keg."')".$tsql."");
+    $obj->set_query("SELECT * FROM para90_submap WHERE Tahun='".$_SESSION['__WEB_APP']['SUBMAP_TAHUN']."' AND ProgID='".$id_prog."' AND KegID='".$id_keg."' AND SubID NOT IN (SELECT SubID FROM dpa_sub WHERE Tahun='".$thn_data."' AND OPDID='".$id_opd."' AND ProgID='".$id_prog."' AND KegID='".$id_keg."')".$tsql."");
     $obj->add_field("SubID", "ID", "hid");
     $obj->add_field("K_Sub", "Kode", "c");
     $obj->add_field("N_Sub", "Nama Sub Kegiatan", "awr");
@@ -414,11 +442,11 @@ if ( $data == "tabel-opd" ) {
     }    
 
     $form = new Form($db);
-    $tindi = $form->textarea("_", "Text_Indi", $arec['Text_Indi'], $emon_en, true, 2);
+    $tindi = $form->textarea("_", "Text_Indi", $arec['Text_Indi'], $ren_en, true, 2);
-    $ttipe = $form->option_que("_", "TipeDataID", $arec['TipeDataID'], $emon_en, false, tipedata_query(), ["TipeDataID","Nama_Tipe"], [0,"Numeric"], null, "RenjaJS.oc_ProgTipe()");
+    $ttipe = $form->option_que("_", "TipeDataID", $arec['TipeDataID'], $ren_en, false, tipedata_query(), ["TipeDataID","Nama_Tipe"], [0,"Numeric"], null, "RenjaJS.oc_ProgTipe()");
-    $ttarget = tipedata_select("Target_Indi", $arec['TipeDataID'], $arec['Target_Indi'], $emon_en, $_p_input);
+    $ttarget = tipedata_select("Target_Indi", $arec['TipeDataID'], $arec['Target_Indi'], $ren_en, $_p_input);
-    $tstatus = tipedata_status("Status_Indi", $arec['TipeDataID'], $arec['Status_Indi'], $emon_en);
+    $tstatus = tipedata_status("Status_Indi", $arec['TipeDataID'], $arec['Status_Indi'], $ren_en);
-    $tsatuan = $form->textbox("_", "Satuan_Indi", $arec['Satuan_Indi'], $emon_en, true, "text", "satuan");
+    $tsatuan = $form->textbox("_", "Satuan_Indi", $arec['Satuan_Indi'], $ren_en, true, "text", "satuan");
     $ajson['html'] = '
     <div class="card"><div class="card-body">
     <div class="row mb-1">
@@ -437,32 +465,40 @@ if ( $data == "tabel-opd" ) {
     <div class="row">
         <label class="col-sm-4 col-lg-2 col-form-label" for="Target_Indi">Target Indikator</label>
         <div class="col-sm-6 col-lg-4" id="inputTarget">'.$ttarget.'</div>
-        <div class="col text-end">'.($emon_en?'<button type="button" class="btn btn-warning me-2" id="butBatalIndi">Batal</button><button type="button" class="btn btn-success" id="butSimpanIndi">Simpan</button>':'').'</div>
+        <div class="col text-end">'.($ren_en?'<button type="button" class="btn btn-warning me-2" id="butBatalIndi">Batal</button><button type="button" class="btn btn-success" id="butSimpanIndi">Simpan</button>':'').'</div>
     </div>
     <input type="hidden" id="DPAProgIndiID" value="'.$arec['DPAProgIndiID'].'">
     <input type="hidden" id="mode_detail" value="'.$mode_detail.'">
     </div></div>';
 
 } else if ( $data == "detail-sub" ) {
-    $arec = [];
+    $arec = ['DPASubOutputID'=>0, 'Text_Output'=>"", 'Sasaran_Output'=>"", 'Target_Output'=>"", 'Satuan_Output'=>"", 'Status_Output'=>"komulatif"];
     $id_dpa_sub = Param::Get("DPASubID", 0);
     if ($id_dpa_sub > 0) {
         $db->Query("SELECT D.*,M.N_Sub FROM (SELECT * FROM dpa_sub WHERE DPASubID='".$id_dpa_sub."' LIMIT 1) D LEFT JOIN (SELECT * FROM para90_submap WHERE Tahun='".$_SESSION['__WEB_APP']['SUBMAP_TAHUN']."' AND KegID='".$id_keg."') M ON (M.SubID=D.SubID)");
-        if ($db->Next()) $arec = $db->AllRow();
+        if ($db->Next()) $arec = array_merge($arec, $db->AllRow());
         $db->Query("SELECT Username Input_User FROM app_operator WHERE UserID='".$arec['Input_UserID']."' LIMIT 1");
         if ($db->Next()) $arec = array_merge($arec, $db->AllRow());
         $db->Query("SELECT Username Update_User FROM app_operator WHERE UserID='".$arec['Update_UserID']."' LIMIT 1");
         if ($db->Next()) $arec = array_merge($arec, $db->AllRow());
+        // subkeg output
+        $db->Query("SELECT DPASubOutputID,Text_Output,Sasaran_Output,Target_Output,Satuan_Output FROM dpa_sub_output WHERE OPDID='".$id_opd."' AND ProgID='".$id_prog."' AND KegID='".$id_keg."' AND SubID='".$id_sub."' LIMIT 1");
+        if ($db->Next()) $arec = array_merge($arec, $db->AllRow());
     }
 
     $form = new Form($db);
     $tsub = $form->textarea("_", "N_Sub", $arec['N_Sub'], false, false, 2);
-    $twaktu1 = $form->option("_", "Waktu1", $arec['Waktu1'], $emon_en, true, bulan_array());
+    $twaktu1 = $form->option("_", "Waktu1", $arec['Waktu1'], $ren_en, true, bulan_array());
-    $twaktu2 = $form->option("_", "Waktu2", $arec['Waktu2'], $emon_en, true, bulan_array());
+    $twaktu2 = $form->option("_", "Waktu2", $arec['Waktu2'], $ren_en, true, bulan_array());
-    $tlokasi = $form->textbox("_", "Lokasi", $arec['Lokasi'], $emon_en, true, "text");
+    $tlokasi = $form->textbox("_", "Lokasi", $arec['Lokasi'], $ren_en, true, "text");
-    $tpagu_ini = $form->textbox("_", "Pagu_Ini", $arec['Pagu_Ini'], false, false, "double");
+    $tpagu_dpn = $form->textbox("_", "Pagu_Dpn", $arec['Pagu_Dpn'], $ren_en, true, "double");
-    $tpagu_dpn = $form->textbox("_", "Pagu_Dpn", $arec['Pagu_Dpn'], $emon_en, true, "double");
     $tinfo = $form->plaintext("_", "Info", "Diinput : ".($arec['Input_User']??"...")." (".tgl_sql2str($arec['Input_Stamp'], true)."), Diperbaharui : ".($arec['Update_User']??"...")." (".tgl_sql2str($arec['Update_Stamp'], true).")");
+    // subkeg output
+    $tindi = $form->textarea("_", "Text_Output", $arec['Text_Output'], false, false, 1);
+    $tsasar = $form->textbox("_", "Sasaran_Output", $arec['Sasaran_Output'], $ren_en, true, "text", "Kelompok/pihak yang menjadi sasaran atau penerima manfaat sub kegiatan");
+    $ttarget = $form->textbox("_", "Target_Output", round($arec['Target_Output']), $ren_en, true, "integer");
+    $tsatuan = $form->textbox("_", "Satuan_Output", $arec['Satuan_Output'], false, false, "text", "satuan");
+    $tstatus = tipedata_status("Status_Output", 0, $arec['Status_Output'], $ren_en);
 
     echo '<form id="formSub" novalidate="novalidate">
     <div class="row mb-1">
@@ -482,14 +518,34 @@ if ( $data == "tabel-opd" ) {
         <label class="col-sm-4 col-lg-2 col-form-label" for="Pagu_Dpn">Pagu Tahun N+1</label>
         <div class="col-sm-4 col-lg-4">'.$tpagu_dpn.'</div>
     </div>
+    <div class="row mb-1"><div class="col"><hr class="my-1"></div></div>
+    <div class="row mb-1">
+        <label class="col-sm-4 col-lg-2 col-form-label" for="Text_Output">Tolok Ukur Output</label>
+        <div class="col">'.$tindi.'</div>
+    </div>
+    <div class="row mb-1">
+        <label class="col-sm-4 col-lg-2 col-form-label" for="Sasaran_Output">Kelompok Sasaran</label>
+        <div class="col">'.$tsasar.'</div>
+    </div>
+    <div class="row mb-1">
+        <label class="col-sm-4 col-lg-2 col-form-label" for="Status_Output">Status Output</label>
+        <div class="col-sm-6 col-lg-4">'.$tstatus.'</div>
+        <div class="col"><div class="input-group"><span class="input-group-text">Satuan Output</span>'.$tsatuan.'</div></div>
+    </div>
+    <div class="row mb-1">
+        <label class="col-sm-4 col-lg-2 col-form-label" for="Target_Output">Target Output</label>
+        <div class="col-sm-6 col-lg-4">'.$ttarget.'</div>
+    </div>
     </form>
-    <div class="row mb-1"><div class="col"><hr /><div id="divSubOutput"></div></div></div>
+    <div class="row mb-1"><div class="col"><hr class="my-1"></div></div>
-    <div class="row mt-2"><div class="col">'.$tinfo.'</div></div>
+    <div class="row"><div class="col">'.$tinfo.'</div></div>
     <input type="hidden" id="DPASubID" value="'.$arec['DPASubID'].'">
+    <input type="hidden" id="DPASubOutputID" value="'.$arec['DPASubOutputID'].'">
     <input type="hidden" id="mode_detail" value="'.$mode_detail.'">';
 
-} else if ( $data == "detail-sub-output" ) {
+/*} else if ( $data == "detail-sub-output" ) {
-    $arec = []; $mode_detail = "insert";
+    $arec = ['DPASubOutputID'=>0, 'Text_Output'=>"", 'Target_Output'=>"", 'Satuan_Output'=>"", 'Status_Output'=>"komulatif"];
+    $mode_detail = "insert";
     $id_dpa_sub_output = Param::Get("DPASubOutputID", 0);
     if ($id_dpa_sub_output > 0) {
         $db->Query("SELECT * FROM dpa_sub_output WHERE DPASubOutputID='".$id_dpa_sub_output."' LIMIT 1");
@@ -498,10 +554,10 @@ if ( $data == "tabel-opd" ) {
     }
 
     $form = new Form($db);
-    $tindi = $form->textarea("_", "Text_Output", $arec['Text_Output'], $emon_en, true, 2);
+    $tindi = $form->textarea("_", "Text_Output", $arec['Text_Output'], $ren_en, true, 2);
-    $ttarget = $form->textbox("_", "Target_Output", $arec['Target_Output'], $emon_en, true, "double");
+    $ttarget = $form->textbox("_", "Target_Output", $arec['Target_Output'], $ren_en, true, "double");
-    $tsatuan = $form->textbox("_", "Satuan_Output", $arec['Satuan_Output'], $emon_en, true, "text", "satuan");
+    $tsatuan = $form->textbox("_", "Satuan_Output", $arec['Satuan_Output'], $ren_en, true, "text", "satuan");
-    $tstatus = tipedata_status("Status_Output", 0, $arec['Status_Output'], $emon_en);
+    $tstatus = tipedata_status("Status_Output", 0, $arec['Status_Output'], $ren_en);
     $ajson['html'] = '
     <div class="card"><div class="card-body">
     <div class="row mb-2">
@@ -516,20 +572,20 @@ if ( $data == "tabel-opd" ) {
     <div class="row">
         <label class="col-sm-4 col-lg-2 col-form-label" for="Target_Output">Target Output</label>
         <div class="col-sm-6 col-lg-4">'.$ttarget.'</div>
-        <div class="col text-end">'.($emon_en?'<button type="button" class="btn btn-warning me-2" id="butBatalOutput">Batal</button><button type="button" class="btn btn-success" id="butSimpanOutput">Simpan</button>':'').'</div>
+        <div class="col text-end">'.($ren_en?'<button type="button" class="btn btn-warning me-2" id="butBatalOutput">Batal</button><button type="button" class="btn btn-success" id="butSimpanOutput">Simpan</button>':'').'</div>
     </div>
     <input type="hidden" id="DPASubOutputID" value="'.$arec['DPASubOutputID'].'">
     <input type="hidden" id="mode_detail" value="'.$mode_detail.'">
-    </div></div>';
+    </div></div>';*/
 
 } else if ( $data == "detail-akun" ) {
     $adetail = array('Renc_Fisik' => 100); $mode_detail = "insert";
-    $emode = $emon_en; $mode_detail = "insert";
+    $emode = $ren_en; $mode_detail = "insert";
-    $qakun = " AND AkunID NOT IN (SELECT AkunID FROM dpa_akun WHERE Tahun='".$thn_renja."' AND OPDID='".$id_opd."' AND ProgID='".$id_prog."' AND KegID='".$id_keg."' AND SubID='".$id_sub."')";
+    $qakun = " AND AkunID NOT IN (SELECT AkunID FROM dpa_akun WHERE Tahun='".$thn_data."' AND OPDID='".$id_opd."' AND ProgID='".$id_prog."' AND KegID='".$id_keg."' AND SubID='".$id_sub."')";
     $id_dpa_akun = Param::Get("DPAAkunID", 0);
     if ($id_dpa_akun > 0) {
         $emode = false;
-        $db->Query("SELECT D.*,A.N_Akun FROM (SELECT * FROM dpa_akun WHERE Tahun='".$thn_renja."' AND DPAAkunID='".$id_dpa_akun."' LIMIT 1) D LEFT JOIN para90_akun A ON (D.AkunID=A.AkunID AND A.Tahun='".$_SESSION['__WEB_APP']['AKUN_TAHUN']."')");
+        $db->Query("SELECT D.*,A.N_Akun FROM (SELECT * FROM dpa_akun WHERE Tahun='".$thn_data."' AND DPAAkunID='".$id_dpa_akun."' LIMIT 1) D LEFT JOIN para90_akun A ON (D.AkunID=A.AkunID AND A.Tahun='".$_SESSION['__WEB_APP']['AKUN_TAHUN']."')");
         if ($db->Next()) $adetail = $db->AllRow();
         $qakun = " AND AkunID='".$adetail['AkunID']."'";
         $mode_detail = "update";
@@ -538,12 +594,12 @@ if ( $data == "tabel-opd" ) {
     $form = new Form($db);
     $f_kakun = $form->textbox("_", "K_Akun", $adetail['K_Akun'], false, false, "text");
     $f_nakun = $form->option_que("_", "AkunID", $adetail['AkunID'], $emode, $emode, "SELECT AkunID,CONCAT(K_Akun,' - ',N_Akun) Nama_Akun FROM para90_akun WHERE Tahun='".$_SESSION['__WEB_APP']['AKUN_TAHUN']."' AND Set_Input=1".$qakun, array("AkunID","Nama_Akun"), array(0,"&nbsp;"));
-    $f_vol = $form->textbox("_", "Volume", $adetail['Volume'], $emon_en, $emon_en, "double", "masukkan volume", null, null, "RenjaJS.Hitung_Akun()");
+    $f_vol = $form->textbox("_", "Volume", $adetail['Volume'], $ren_en, $ren_en, "double", "masukkan volume", null, null, "RenjaJS.Hitung_Akun()");
-    $f_satuan = $form->option_db("_", "SatuanID", $adetail['SatuanID'], $emon_en, $emon_en, "para_satuan", array("SatuanID","N_Satuan"), "Aktif=1 ORDER BY N_Satuan", array(0,"&nbsp;"));
+    $f_satuan = $form->option_db("_", "SatuanID", $adetail['SatuanID'], $ren_en, $ren_en, "para_satuan", array("SatuanID","N_Satuan"), "Aktif=1 ORDER BY N_Satuan", array(0,"&nbsp;"));
-    $f_harga = $form->textbox("_", "Harga_Satuan", $adetail['Harga_Satuan'], $emon_en, $emon_en, "double", "masukkan harga satuan", null, null, "RenjaJS.Hitung_Akun()");
+    $f_harga = $form->textbox("_", "Harga_Satuan", $adetail['Harga_Satuan'], $ren_en, $ren_en, "double", "masukkan harga satuan", null, null, "RenjaJS.Hitung_Akun()");
     $f_pagu = $form->textbox("_", "Pagu_Ini", $adetail['Pagu_Ini'], false, false, "double");
-    $f_renck = $form->textbox("_", "Renc_Keu", $adetail['Renc_Keu'], $emon_en, $emon_en, "double", "masukkan rencana keuangan");
+    $f_renck = $form->textbox("_", "Renc_Keu", $adetail['Renc_Keu'], $ren_en, $ren_en, "double", "masukkan rencana keuangan");
-    $f_rencf = $form->textbox("_", "Renc_Fisik", $adetail['Renc_Fisik'], $emon_en, $emon_en, "double", "masukkan rencana fisik / non-fisik (default 100)");
+    $f_rencf = $form->textbox("_", "Renc_Fisik", $adetail['Renc_Fisik'], $ren_en, $ren_en, "double", "masukkan rencana fisik / non-fisik (default 100)");
     echo '
     <div class="row mb-1">
         <label class="col-sm-4 col-lg-3 col-form-label">Kode Akun</label>
@@ -588,13 +644,13 @@ if ( $data == "tabel-opd" ) {
         $db->Query("SELECT * FROM para_tipedata WHERE TipeDataID='".$id_tipe."' LIMIT 1");
         if ($db->Next()) $_p_input = json_decode($db->Row("P_Input", "{}"), true);
     }
-    $ajson['target'] = tipedata_select("Target_Indi", $id_tipe, $indi_target, $emon_en, $_p_input);
+    $ajson['target'] = tipedata_select("Target_Indi", $id_tipe, $indi_target, $ren_en, $_p_input);
-    $ajson['status'] = tipedata_status("Status_Indi", $id_tipe, $indi_status, $emon_en);
+    $ajson['status'] = tipedata_status("Status_Indi", $id_tipe, $indi_status, $ren_en);
 
 } else if ( $data == "default" ) {
     echo '
     <div class="fade-in">
-    <div class="card"><div class="card-header custom-style">Kelola Data Rencana Kerja OPD // Tahun Anggaran '.$thn_renja.'</div><div class="card-body">
+    <div class="card"><div class="card-header custom-style">Kelola Data Rencana Kerja OPD // Tahun Anggaran '.$thn_data.'</div><div class="card-body">
     <div class="row mb-1">
         <div class="col">
             <div class="input-group">
@@ -603,7 +659,7 @@ if ( $data == "tabel-opd" ) {
                 <input id="OPDID" type="hidden" value="0">
                 <input id="AK_Bidu" type="hidden" value="">
                 <input id="K_Bidu1" type="hidden" value="">
-                <input id="Hak_DPA" type="hidden" value="1">
+                <input id="Hak_Renja" type="hidden" value="1">
                 <button class="btn btn-info btn-ganti" type="button" id="butOPD"><span><i class="bi-arrow-left-right"></span></i>OPD</button>
             </div>
         </div>

index.php

@@ -54,7 +54,7 @@ $auth->set_id_reg($_SESSION['__WEB_APP']['PARENT_CODE']);
 
 $token = Param::Get("auth", "");
 if (!empty($token) && !$_SESSION['APP_TOKEN']) $_SESSION['APP_TOKEN'] = $token;
-if ($_SESSION['APP_TOKEN']) {
+if ($_SESSION['APP_TOKEN'] ?? false) {
     if ($auth->token_check()) {
         if (!isset($_SESSION['__WEB_USER'])) {
             $auser = $auth->user_data($auth->getUserByToken($_SESSION['APP_TOKEN']));