Menu Artikel
-
▼
2013
(28)
-
►
Jul
(26)
- Cara menggunakan dan Perhatian Query
- scan alamat utk AC
- Quary melihat data perkara
- Perbaiki error update 15 su - error arsip tgl
- Quary Perbaiki DB
- PANJAR DI KIPA ADA TAPI DI INFOPERKARA TIDAK ADA
- Ngakalin bagi yg tanggal sidang pertama tdk ada
- Quary Mengetahui Nomor Perkara, Majelis, DLL
- Quary Hapus Data Transaksi Keuangan (SIADPA-KIPA) ...
- Quary Delete Seluruh Data SIADPA
- Quary Delete data AC via Nomor perkara
- Quary Data Majeis Hakim
- Quary Mencari Tanggal Putus
- Quary Cari data AC berdasarkan tanggal AC
- Quary Cara lihat transaksi KIPA perperkara
- Cara Ganti Nomor Variable
- Quary menghilangkan data tanggal ikrar talak 1900 ...
- Quary untuk menghapus Perkara di SIADPA
- untuk menghapus AC salah simpan
- klo muncul (sqlQuery1_Field 'ARSP_TANGGAL' NOT FOU...
- Query untuk ngecek/melihat perkara CG sudah putus ...
- Quary Menghapus data "JENIS PUTUSAN" yg belum putu...
- Variabel Total Rincian Biaya untuk diletakkan pada...
- Variable Pernyataan Saksi dalam Putusan yang diamb...
- Query menghapus data di SIADPA-KIPA yang perkarany...
- Quary Untuk Memindahkan Variable SIADPA-KIPA
-
►
Jul
(26)
Kamis, 29 Agustus 2013
Aplikasi untuk mengetahui perkara diterima dan diputus setiap bulannya
Banyak agan-agen yang masih pusing dengan adanya perbandingan perkara manual dan SIADPA pada infoperkara.badilag.net, maka untuk mencari kesalahan tersebut agan Laskar kita telah membuatkan aplikasi untuk mengetahui perkara yang diterima dan diputus, pada aplikasi tersebut bisa kita periksa apakah perkara yang kita buat secara manual sama dengan pada server SIADPA.
Sialahkan Dowload aplikasi disini
Sialahkan Dowload aplikasi disini
Rabu, 24 Juli 2013
Cara menggunakan dan Perhatian Query
Bagi agan-agan yang belum pernah menggunakan Query, maka sebelum menggunakan query tersebut, perlu kita tanyakan pada yang lebih ahli dalam hal ini, baik melalui forum Laskar Siadpa Plus di Fecebook, karena perlu memahaman khusus sebelum digunakan, quary tersebut saya kumpulkan dari agan-agan master lain dalam forum Facebook dan quary tersebut telah digunakan oleh saya sendiri serta agan-agan lain dalam mengatasi masalah khusus, untuk petunjuk penggunakannya, saya paparkan sebagai berikut :
1. Agan-agan jalankan Database Tool dengan logo

2. Kemudian isikan menu seperti gambar dan masuk dengan klik Login
3. Masukkan salah satu query yang ingin digunakan, pastikan menu berada pada Query Analyzer dan nama database Siadpawin seperti gambar berikut :
4. Pastikan telah pada posisi yang benar dan sudahi dengan klik Ran(F5)
Demikian petunjuk penggunaan ini saya paparkan, semoga bermanfaat bagi agan-agan semua, dan saya sarankan agar selalu hati-hati, karena jika salah penggunaan akan fatal akibatnya, ibarat pepatah "Malu bertanya sesat dijalan dan malu bertanya banyak jalan-jalan" hehehe....
1. Agan-agan jalankan Database Tool dengan logo
2. Kemudian isikan menu seperti gambar dan masuk dengan klik Login
3. Masukkan salah satu query yang ingin digunakan, pastikan menu berada pada Query Analyzer dan nama database Siadpawin seperti gambar berikut :
4. Pastikan telah pada posisi yang benar dan sudahi dengan klik Ran(F5)
Demikian petunjuk penggunaan ini saya paparkan, semoga bermanfaat bagi agan-agan semua, dan saya sarankan agar selalu hati-hati, karena jika salah penggunaan akan fatal akibatnya, ibarat pepatah "Malu bertanya sesat dijalan dan malu bertanya banyak jalan-jalan" hehehe....
Selasa, 23 Juli 2013
scan alamat utk AC
Jalan=[jl.][jln.][jalan ][jln ][jl ]
Dusun=[dusun ][dsn.][dsn ][dukuh ][lingkungan ]
RT=[rt.][ rt ][rt ][rt][r.t.]
RW=[rw.][ rw ][rw ][rw][r.w.]
Nomor=[no.][nomor ][nomer ][ no ][ no]
Desa/Kelurahan=[desa ][kelurahan ][ ds ][ kel ][ds.][kel.]
Kecamatan=[kecamatan ][ kec. ][kec ][kec.]
Kabupaten=[kabupaten ][kota ][kodya ][kotamadya ][kab.][kod. ][kotamadia ]
Dusun=[dusun ][dsn.][dsn ][dukuh ][lingkungan ]
RT=[rt.][ rt ][rt ][rt][r.t.]
RW=[rw.][ rw ][rw ][rw][r.w.]
Nomor=[no.][nomor ][nomer ][ no ][ no]
Desa/Kelurahan=[desa ][kelurahan ][ ds ][ kel ][ds.][kel.]
Kecamatan=[kecamatan ][ kec. ][kec ][kec.]
Kabupaten=[kabupaten ][kota ][kodya ][kotamadya ][kab.][kod. ][kotamadia ]
Quary melihat data perkara
SELECT
right(LEFT(DATA_REGISTER.NO_PERK,4),3)
+'/Pdt.'+
SUBSTRING(DATA_REGISTER.NO_PERK, LEN(DATA_REGISTER.NO_PERK) - 2, 1)
+'/20'+
RIGHT(DATA_REGISTER.NO_PERK, 2)
+'/PA.Sjj'
AS NOMOR_PERKARA,
replace(MS_DATAHAKIM.NAMA_HAKIM,char(13)+char(10),'|') AS MAJELIS_LENGKAP,
DATA_REGISTER.TGL_DAFTAR AS DAFTAR,
DATA_REGISTER.TGL_PMH AS PMH,
DATA_REGISTER.TGL_PHS AS PHS,
DATA_SIDANG.TANGGAL AS SDG_I,
DATA_REGISTER.TGL_PUTUSAN AS PUTUSAN,
DATA_REGISTER.TGL_MINUTASI AS MINUTASI,
DATA_REGISTER.ARSP_TANGGAL AS ARSIP,
MS_PERKARA.KETERANGAN AS JENIS_PERKARA,
right(LEFT(DATA_REGISTER.NO_PERK,5),1) AS KD,
DATA_REGISTER.TINGKAT AS TK
FROM
SiadpaWin.dbo.DATA_REGISTER
INNER JOIN DATA_SIDANG ON DATA_REGISTER.NO_PERK= DATA_SIDANG.NO_PERK
INNER JOIN MS_HAKIM ON DATA_SIDANG.TGL_SK= MS_HAKIM.TGL_SK
INNER JOIN MS_DATAHAKIM ON MS_HAKIM.KODE= MS_DATAHAKIM.KODE
INNER JOIN MS_PERKARA ON DATA_REGISTER.KODE_PERK=MS_PERKARA.KODE_PERK
AND DATA_SIDANG.RUANG= MS_DATAHAKIM.RUANG
AND DATA_SIDANG.NO_MAJELIS= MS_DATAHAKIM.TIM
AND DATEPART(weekday, DATA_SIDANG.TANGGAL)= MS_DATAHAKIM.HARI
WHERE RIGHT(DATA_REGISTER.NO_PERK,2)='12'
AND (DATA_SIDANG.KE=0)
ORDER BY DATA_SIDANG.NO_PERK
right(LEFT(DATA_REGISTER.NO_PERK,4),3)
+'/Pdt.'+
SUBSTRING(DATA_REGISTER.NO_PERK, LEN(DATA_REGISTER.NO_PERK) - 2, 1)
+'/20'+
RIGHT(DATA_REGISTER.NO_PERK, 2)
+'/PA.Sjj'
AS NOMOR_PERKARA,
replace(MS_DATAHAKIM.NAMA_HAKIM,char(13)+char(10),'|') AS MAJELIS_LENGKAP,
DATA_REGISTER.TGL_DAFTAR AS DAFTAR,
DATA_REGISTER.TGL_PMH AS PMH,
DATA_REGISTER.TGL_PHS AS PHS,
DATA_SIDANG.TANGGAL AS SDG_I,
DATA_REGISTER.TGL_PUTUSAN AS PUTUSAN,
DATA_REGISTER.TGL_MINUTASI AS MINUTASI,
DATA_REGISTER.ARSP_TANGGAL AS ARSIP,
MS_PERKARA.KETERANGAN AS JENIS_PERKARA,
right(LEFT(DATA_REGISTER.NO_PERK,5),1) AS KD,
DATA_REGISTER.TINGKAT AS TK
FROM
SiadpaWin.dbo.DATA_REGISTER
INNER JOIN DATA_SIDANG ON DATA_REGISTER.NO_PERK= DATA_SIDANG.NO_PERK
INNER JOIN MS_HAKIM ON DATA_SIDANG.TGL_SK= MS_HAKIM.TGL_SK
INNER JOIN MS_DATAHAKIM ON MS_HAKIM.KODE= MS_DATAHAKIM.KODE
INNER JOIN MS_PERKARA ON DATA_REGISTER.KODE_PERK=MS_PERKARA.KODE_PERK
AND DATA_SIDANG.RUANG= MS_DATAHAKIM.RUANG
AND DATA_SIDANG.NO_MAJELIS= MS_DATAHAKIM.TIM
AND DATEPART(weekday, DATA_SIDANG.TANGGAL)= MS_DATAHAKIM.HARI
WHERE RIGHT(DATA_REGISTER.NO_PERK,2)='12'
AND (DATA_SIDANG.KE=0)
ORDER BY DATA_SIDANG.NO_PERK
Perbaiki error update 15 su - error arsip tgl
ALTER TABLE DATA_REGISTER
ADD ARSP_LOKASI VARCHAR(10) NULL,
ARSP_NO_RAK VARCHAR(10) NULL,
ARSP_KODE_RAK VARCHAR(10) NULL,
ARSP_NO_BOX VARCHAR(10) NULL,
ARSP_TANGGAL DATETIME NULL,
ARSP_KETERANGAN VARCHAR(50) NULL
ADD ARSP_LOKASI VARCHAR(10) NULL,
ARSP_NO_RAK VARCHAR(10) NULL,
ARSP_KODE_RAK VARCHAR(10) NULL,
ARSP_NO_BOX VARCHAR(10) NULL,
ARSP_TANGGAL DATETIME NULL,
ARSP_KETERANGAN VARCHAR(50) NULL
Quary Perbaiki DB
EXEC sp_resetstatus ‘yourDBname’;
ALTER DATABASE yourDBname SET EMERGENCY
DBCC checkdb(‘yourDBname’)
ALTER DATABASE yourDBname SET SINGLE_USER WITH ROLLBACK IMMEDIATE
DBCC CheckDB (‘yourDBname’, REPAIR_ALLOW_DATA_LOSS)
ALTER DATABASE yourDBname SET MULTI_USER
ALTER DATABASE yourDBname SET EMERGENCY
DBCC checkdb(‘yourDBname’)
ALTER DATABASE yourDBname SET SINGLE_USER WITH ROLLBACK IMMEDIATE
DBCC CheckDB (‘yourDBname’, REPAIR_ALLOW_DATA_LOSS)
ALTER DATABASE yourDBname SET MULTI_USER
PANJAR DI KIPA ADA TAPI DI INFOPERKARA TIDAK ADA
Judul
diatas banyak dialami oleh PA-PA bahkah juga tidak muncul tanggal dan nilai
panjarnya waktu mencetak SKUM,dibawah ini adalah cara memperbaikinya yang sudah
dilaksanakan dilapangan :) :
Panjar
untuk semua jenis perkara harus satu karena defaultnya harus satu jangan di
buat bermacam-macam, seperti PANJAR CT, PANJAR CG, PANJAR PERMOHONAN, dll
, mungkin
karena nilai panjarnya beda-beda mungkin dibikin bermacam-macam, jangan takut
karena nilai panjar bisa dirubah waktu mengisi. Jika sudah terlanjur di bikin
banyak macam, agar diseragamkan menjadi satu panjar dengan variabel perkiraan
yang standar (0101000000) ikuti langkah-langkah berikut ini:
1.
cari panjar yang variabel perkiraannya 0101000000, rubah menjadi nama yang umum
misalnya Panjar atau Biaya Panjar atau terserah satker :), ceklist di sebelah
kanan kata Perkiraan Panjar Biaya Perkara.
2.
catat nomer variabel perkiraan yang di pakai panjar selain variabel 0101000000
, misalnya PANJAR CT = 0103000000, PANJAR CG=0104000000, PANJAR PERMOHONAN =
0105000000, dstnya. Ini berguna buat migrasi data ke satu panjar, jadi setelah
diganti menjadi satu PANJAR, data yang dulu dinput tidak akan hilang dan tidak
perlu dinput ulang
3.
Backup dulu SIADPA plus nya sebelum migrasi data satu PANJAR.
4.
Buka Databasetool atau SQL Management Studio atau yang lain, lakukan query di
bawah ini:
----------------------------------------------------------------------------------------------------
UPDATE
TRANS_PERK SET VAR_PERK='0101000000' WHERE LEFT(VAR_PERK,4) IN ('0103','0104','0105')
-----------------------------------------------------------------------------------------------------
CATATAN:SQL
di atas bagian IN ('...','...','....') ---> titik-titik itu diisi 4 huruf
dari kiri variabel perkiraaan panjar selain 0101000000, misalnya misalnya
PANJAR CT = 0103000000 -->0103, PANJAR CG=0104000000 -->0104, PANJAR
PERMOHONAN = 0105000000 --->0105, dst nya('...','...','....') ---> tidak
terbatas 3, bisa ditambah sesuai yang mau dirubah/migrasi
5.
setelah diekskusi, cek PANJAR nya apa sudah sesuai.
6.
Pakai Panjar yang sudah di bakukan tadi (0101000000) untuk semua perkara
7.
jika di infoperkara sebelumnya gak valid/kosoong panjarnya atau merah, hapus
semua, kemudian upload ulang data keuangannya
selamat
mencoba, kalau ada yang salah mohon dikoreksi
Ngakalin bagi yg tanggal sidang pertama tdk ada
buat deteksi sudah ada PHS tapi tanggal sidang Pertamanya gak ada, buat cek yang digrafik kinerja antara PHS dan tanggal sidang pertama tidak seimbang
dicoba quary ini:
SELECT DATA_REGISTER.NO_PERK, DATA_REGISTER.TGL_PHS, DATA_SIDANG.TANGGAL, SUM(DATA_SIDANG.KE + 1) AS SIDANG_KE
FROM DATA_REGISTER INNER JOIN
DATA_SIDANG ON DATA_REGISTER.NO_PERK = DATA_SIDANG.NO_PERK
WHERE (DATA_REGISTER.TGL_PHS IS NOT NULL) AND (RIGHT(DATA_REGISTER.NO_PERK, 2) = '12') AND (DATA_SIDANG.TANGGAL IS NULL) AND (DATA_SIDANG.KE = 0)
GROUP BY DATA_REGISTER.NO_PERK, DATA_REGISTER.TGL_PHS, DATA_SIDANG.TANGGAL
dicoba quary ini:
SELECT DATA_REGISTER.NO_PERK, DATA_REGISTER.TGL_PHS, DATA_SIDANG.TANGGAL, SUM(DATA_SIDANG.KE + 1) AS SIDANG_KE
FROM DATA_REGISTER INNER JOIN
DATA_SIDANG ON DATA_REGISTER.NO_PERK = DATA_SIDANG.NO_PERK
WHERE (DATA_REGISTER.TGL_PHS IS NOT NULL) AND (RIGHT(DATA_REGISTER.NO_PERK, 2) = '12') AND (DATA_SIDANG.TANGGAL IS NULL) AND (DATA_SIDANG.KE = 0)
GROUP BY DATA_REGISTER.NO_PERK, DATA_REGISTER.TGL_PHS, DATA_SIDANG.TANGGAL
Quary Mengetahui Nomor Perkara, Majelis, DLL
SELECT DISTINCT LEFT(DATA_REGISTER.NO_PERK, 4) + '/Pdt.'+ SUBSTRING(DATA_REGISTER.NO_PERK, LEN(DATA_REGISTER.NO_PERK) - 2, 1)+ '/20' + RIGHT(DATA_REGISTER.NO_PERK, 2) AS NOMER_PERKARA, DATA_SIDANG.RUANG, DATA_SIDANG.TIM,MS_DATAHAKIM.NAMA_HAKIM AS MAJELIS,
MS_PERKARA.KETERANGAN AS JENIS_PERKARA,LEFT(DATA_REGISTER.KODE_PERK,2) AS JP, DATA_REGISTER.TINGKAT
FROM DATA_REGISTER INNER JOIN DATA_SIDANG ON DATA_REGISTER.NO_PERK = DATA_SIDANG.NO_PERK INNER JOIN MS_HAKIM ON DATA_SIDANG.TGL_SK = MS_HAKIM.TGL_SK INNER JOIN
MS_DATAHAKIM ON MS_HAKIM.KODE = MS_DATAHAKIM.KODE AND DATA_SIDANG.RUANG = MS_DATAHAKIM.RUANG AND DATA_SIDANG.NO_MAJELIS = MS_DATAHAKIM.TIM AND DATEPART(weekday, DATA_SIDANG.TANGGAL) = MS_DATAHAKIM.HARI
INNER JOIN MS_PERKARA ON DATA_REGISTER.KODE_PERK=MS_PERKARA.KODE_PERK
WHERE RIGHT(DATA_REGISTER.NO_PERK,2)='12'
MS_PERKARA.KETERANGAN AS JENIS_PERKARA,LEFT(DATA_REGISTER.KODE_PERK,2) AS JP, DATA_REGISTER.TINGKAT
FROM DATA_REGISTER INNER JOIN DATA_SIDANG ON DATA_REGISTER.NO_PERK = DATA_SIDANG.NO_PERK INNER JOIN MS_HAKIM ON DATA_SIDANG.TGL_SK = MS_HAKIM.TGL_SK INNER JOIN
MS_DATAHAKIM ON MS_HAKIM.KODE = MS_DATAHAKIM.KODE AND DATA_SIDANG.RUANG = MS_DATAHAKIM.RUANG AND DATA_SIDANG.NO_MAJELIS = MS_DATAHAKIM.TIM AND DATEPART(weekday, DATA_SIDANG.TANGGAL) = MS_DATAHAKIM.HARI
INNER JOIN MS_PERKARA ON DATA_REGISTER.KODE_PERK=MS_PERKARA.KODE_PERK
WHERE RIGHT(DATA_REGISTER.NO_PERK,2)='12'
Quary Hapus Data Transaksi Keuangan (SIADPA-KIPA) perkara tertentu
Untuk menghapus transaksi keuangan perkara tertentu pada SIADPA-KIPA pada perkara tertentu menggunakan Quary :
Contoh perkara Nomor 123/G/2013
DELETE FROM SIADPAWIN.DBO.TRANS_PERK WHERE NO_PERK='0123G13' AND TINGKAT=0
Jika pada perkara lain, ganti 0123G13 dengan perkara yang dituju, dengan ketentuan pada quary 4 digit nomor perkar (contoh perkara 123/G/2013, maka menjadi 0123G13)
Contoh perkara Nomor 123/G/2013
DELETE FROM SIADPAWIN.DBO.TRANS_PERK WHERE NO_PERK='0123G13' AND TINGKAT=0
Jika pada perkara lain, ganti 0123G13 dengan perkara yang dituju, dengan ketentuan pada quary 4 digit nomor perkar (contoh perkara 123/G/2013, maka menjadi 0123G13)
Quary Delete Seluruh Data SIADPA
DELETE FROM SIADPAWIN.DBO.DATA_AMAR
DELETE FROM SIADPAWIN.DBO.DATA_ANGKA
DELETE FROM SIADPAWIN.DBO.DATA_BAP
DELETE FROM SIADPAWIN.DBO.DATA_BIODATA
DELETE FROM SIADPAWIN.DBO.DATA_REG_AC
DELETE FROM SIADPAWIN.DBO.DATA_REGISTER
DELETE FROM SIADPAWIN.DBO.DATA_SIDANG
DELETE FROM SIADPAWIN.DBO.DATA_TANGGAL
DELETE FROM SIADPAWIN.DBO.DATA_TEKS
DELETE FROM SIADPAWIN.DBO.DATA_TUTUP_INDUK
DELETE FROM SIADPAWIN.DBO.TRANS_PERK
(HATI-HATI UNTUK MENCOBA-COBA QUARY INI, NYESEL KARENA HILANG SMUA NTAR NANGIS...HEHEHE)
DELETE FROM SIADPAWIN.DBO.DATA_ANGKA
DELETE FROM SIADPAWIN.DBO.DATA_BAP
DELETE FROM SIADPAWIN.DBO.DATA_BIODATA
DELETE FROM SIADPAWIN.DBO.DATA_REG_AC
DELETE FROM SIADPAWIN.DBO.DATA_REGISTER
DELETE FROM SIADPAWIN.DBO.DATA_SIDANG
DELETE FROM SIADPAWIN.DBO.DATA_TANGGAL
DELETE FROM SIADPAWIN.DBO.DATA_TEKS
DELETE FROM SIADPAWIN.DBO.DATA_TUTUP_INDUK
DELETE FROM SIADPAWIN.DBO.TRANS_PERK
(HATI-HATI UNTUK MENCOBA-COBA QUARY INI, NYESEL KARENA HILANG SMUA NTAR NANGIS...HEHEHE)
Quary Data Majeis Hakim
SELECT DATA_SIDANG.NO_PERK, DATA_SIDANG.RUANG, DATA_SIDANG.TIM, MS_DATAHAKIM.KODE_HAKIM, MS_DATAHAKIM.NAMA_HAKIM
FROM DATA_SIDANG INNER JOIN
MS_HAKIM ON DATA_SIDANG.TGL_SK = MS_HAKIM.TGL_SK INNER JOIN
MS_DATAHAKIM ON MS_HAKIM.KODE = MS_DATAHAKIM.KODE AND DATA_SIDANG.RUANG = MS_DATAHAKIM.RUANG AND
DATA_SIDANG.TIM = MS_DATAHAKIM.TIM AND DATEPART(weekday, DATA_SIDANG.TANGGAL) = MS_DATAHAKIM.HARI
WHERE (DATA_SIDANG.NO_PERK = '0123G12')
FROM DATA_SIDANG INNER JOIN
MS_HAKIM ON DATA_SIDANG.TGL_SK = MS_HAKIM.TGL_SK INNER JOIN
MS_DATAHAKIM ON MS_HAKIM.KODE = MS_DATAHAKIM.KODE AND DATA_SIDANG.RUANG = MS_DATAHAKIM.RUANG AND
DATA_SIDANG.TIM = MS_DATAHAKIM.TIM AND DATEPART(weekday, DATA_SIDANG.TANGGAL) = MS_DATAHAKIM.HARI
WHERE (DATA_SIDANG.NO_PERK = '0123G12')
Quary Cara lihat transaksi KIPA perperkara
select A.tgl_trans, B.keterangan,
SUM (CASE WHEN B.debet=1 THEN A.nil_trans ELSE 0 END) AS DEBET,
SUM (CASE WHEN B.debet=0 THEN A.nil_trans ELSE 0 END) AS KREDIT
from trans_perk A, var_perkiraan B
where
A.var_perk=B.kode AND
A.tingkat=0 and A.no_perk='0001G12'
GROUP BY A.tgl_trans, B.urutan,B.keterangan,A.var_perk
order by A.tgl_trans,B.urutan, A.var_perk asc
SUM (CASE WHEN B.debet=1 THEN A.nil_trans ELSE 0 END) AS DEBET,
SUM (CASE WHEN B.debet=0 THEN A.nil_trans ELSE 0 END) AS KREDIT
from trans_perk A, var_perkiraan B
where
A.var_perk=B.kode AND
A.tingkat=0 and A.no_perk='0001G12'
GROUP BY A.tgl_trans, B.urutan,B.keterangan,A.var_perk
order by A.tgl_trans,B.urutan, A.var_perk asc
Cara Ganti Nomor Variable
1. Buka tabel DATA_BIODATA
select * from data_biodata
2. Fungsi 1001 buat Pemohon/Penggugat
3. Fungsi 1002 buat Tergugat/Termohon
4. Tadi yang T fungsinya 8179, sehingga di rubah ke 1002 pake query:
update data_biodata set fungsi=1002 where fungsi=8179
select * from data_biodata
2. Fungsi 1001 buat Pemohon/Penggugat
3. Fungsi 1002 buat Tergugat/Termohon
4. Tadi yang T fungsinya 8179, sehingga di rubah ke 1002 pake query:
update data_biodata set fungsi=1002 where fungsi=8179
Senin, 22 Juli 2013
Quary untuk menghapus Perkara di SIADPA
Jika Perkara yang ingin di Hapus per-Tahun, quary nya adalah :
DELETE FROM DATA_REGISTER WHERE CAST(RIGHT(NO_PERK,2) AS INTEGER) = 10
(quary diatas yang dihapus Perkara tahun 2010, jika tahun lain ganti 10 dengan tahun perkara yang ingin dihapus)
Jika Perkara yang ingin di Hapus per-Nomor Perkara, quary nya adalah :
DELETE FROM DATA_REGISTER WHERE NO_PERK = 896G11
(quary diatas yang dihapus Perkara Nomor 0896/G/2011, jika Perkara lain ganti 896G11 dengan perkara yang ingin dihapus)
DELETE FROM DATA_REGISTER WHERE CAST(RIGHT(NO_PERK,2) AS INTEGER) = 10
(quary diatas yang dihapus Perkara tahun 2010, jika tahun lain ganti 10 dengan tahun perkara yang ingin dihapus)
Jika Perkara yang ingin di Hapus per-Nomor Perkara, quary nya adalah :
DELETE FROM DATA_REGISTER WHERE NO_PERK = 896G11
(quary diatas yang dihapus Perkara Nomor 0896/G/2011, jika Perkara lain ganti 896G11 dengan perkara yang ingin dihapus)
untuk menghapus AC salah simpan
DELETE FROM DATA_REG_AC WHERE NO_PERK='0001G12'
('0001G12' di ganti dengan nomor perkara yang bersangkutan)
('0001G12' di ganti dengan nomor perkara yang bersangkutan)
klo muncul (sqlQuery1_Field 'ARSP_TANGGAL' NOT FOUND), quary untuk mengatasinya
ALTER TABLE DATA_PRE_REG
ADD ARSP_NO_RAK VARCHAR(10) NULL,
ARSP_KODE_RAK VARCHAR(10) NULL,
ARSP_NO_BOX VARCHAR(10) NULL,
ARSP_TANGGAL DATETIME NULL,
ARSP_KETERANGAN VARCHAR(50) NULL
ADD ARSP_NO_RAK VARCHAR(10) NULL,
ARSP_KODE_RAK VARCHAR(10) NULL,
ARSP_NO_BOX VARCHAR(10) NULL,
ARSP_TANGGAL DATETIME NULL,
ARSP_KETERANGAN VARCHAR(50) NULL
Query untuk ngecek/melihat perkara CG sudah putus belum keluar ac
SELECT A.NO_PERK,A.TGL_PUTUSAN,A.KODE_PERK,B.NO_AC,B.TGL_AC,B.NO_AKTA
FROM DATA_REGISTER A LEFT JOIN DATA_REG_AC B ON A.NO_PERK=B.NO_PERK
WHERE ((LEFT(A.KODE_PERK,2)='CG') OR (LEFT(A.KODE_PERK,2)='GC') or
LEFT(KODE_PERK,1)='7') AND (A.TGL_PUTUSAN IS NOT NULL) AND
(B.TGL_AC IS NULL) AND (YEAR(A.TGL_DAFTAR)=2013) ORDER BY A.TGL_PUTUSAN ASC
FROM DATA_REGISTER A LEFT JOIN DATA_REG_AC B ON A.NO_PERK=B.NO_PERK
WHERE ((LEFT(A.KODE_PERK,2)='CG') OR (LEFT(A.KODE_PERK,2)='GC') or
LEFT(KODE_PERK,1)='7') AND (A.TGL_PUTUSAN IS NOT NULL) AND
(B.TGL_AC IS NULL) AND (YEAR(A.TGL_DAFTAR)=2013) ORDER BY A.TGL_PUTUSAN ASC
Quary Menghapus data "JENIS PUTUSAN" yg belum putus tetapi terinputkan jenis putusannya
Sering kali dalam penggunaan SIADPA user salah dalam penginputan Jenis Putusan, ketika telah di inputkan dan tersimpan, Jenis Putusan terisi dalam suatu perkara tersebut tidak bisa dibuang atau dikosongkan, karena dalam menu tersebut tidak tersedia untuk mengosongkannya, maka digunakanlah Quary untuk menyelesaikan masalah tersebut :
Adapun Quary untuk mengosongkan kembali Jenis Putusan pada perkara yang belum putus tersebut adalah:
Cara 1 (untuk semua Perkara)
update data_register set jenis_p='-1' where tgl_putusan is null
Cara 2 ( untuk 1 Perkara)
update data_register set jenis_p= null where no_perk='(no perkara)'
Variabel Total Rincian Biaya untuk diletakkan pada Putusan
Model: SQL
Field: Data
Sql Ambil Data: SELECT SUM(NIL_TRANS) AS DATA FROM TRANS_PERK WHERE
LEFT(VAR_PERK,2)='02'
AND VAR_PERK <> '0217000000' AND LEFT(VAR_PERK,4) <> '0214'
AND no_perk=:noPerk
Field: Data
Sql Ambil Data: SELECT SUM(NIL_TRANS) AS DATA FROM TRANS_PERK WHERE
LEFT(VAR_PERK,2)='02'
AND VAR_PERK <> '0217000000' AND LEFT(VAR_PERK,4) <> '0214'
AND no_perk=:noPerk
Variable Pernyataan Saksi dalam Putusan yang diambil dari Hasil Tanya-Jawab di BAP
DECLARE @@MYTEKS VARCHAR(8000)
SET @@MYTEKS=''
SELECT @@MYTEKS = @@MYTEKS + 'Bahwa ' +LTRIM(RTRIM(SUBSTRING(JAWAB,1,8000))) FROM DATA_BAP
WHERE NO_PERK=:NoPerk AND TINGKAT=:Tingkat AND FUNGSI=5058
ORDER BY BAP
SELECT REPLACE(@@MYTEKS, CHAR(13)+CHAR(10), + CHAR(13) + CHAR(10) + 'Bahwa ') as DATA
SET @@MYTEKS=''
SELECT @@MYTEKS = @@MYTEKS + 'Bahwa ' +LTRIM(RTRIM(SUBSTRING(JAWAB,1,8000))) FROM DATA_BAP
WHERE NO_PERK=:NoPerk AND TINGKAT=:Tingkat AND FUNGSI=5058
ORDER BY BAP
SELECT REPLACE(@@MYTEKS, CHAR(13)+CHAR(10), + CHAR(13) + CHAR(10) + 'Bahwa ') as DATA
Query menghapus data di SIADPA-KIPA yang perkaranya tidak ada di SIADPA
DELETE FROM SIADPAWIN.DBO.TRANS_PERK
WHERE NO_PERK + CAST(TINGKAT AS CHAR) NOT IN (SELECT NO_PERK + CAST(
TINGKAT AS CHAR ) FROM SIADPAWIN.DBO.DATA_REGISTER)
WHERE NO_PERK + CAST(TINGKAT AS CHAR) NOT IN (SELECT NO_PERK + CAST(
TINGKAT AS CHAR ) FROM SIADPAWIN.DBO.DATA_REGISTER)
Quary Untuk Memindahkan Variable SIADPA-KIPA
( Keterangan : Buang #KETERANGAN# dan cocokkan Kode Variable dengan Variable yang dibuat)
UPDATE
VAR_PERKIRAAN SET KODE=REPLACE(KODE,LEFT(KODE,6),'020101'#VARIABLE TUJUAN# ) WHERE LEFT(KODE,6)='020501' #VARIABLE SUMBER#
UPDATE TRANS_PERK SET VAR_PERK=REPLACE(VAR_PERK,LEFT(VAR_PERK,6),'020101'#VARIABLE TUJUAN# ) WHERE LEFT(VAR_PERK,6)='020501'#VARIABLE SUMBER#
Langganan:
Postingan (Atom)