Masukan Foto Anda Disini :

Hallo Semua...

Buat Para Admin Se nusantara Kami berterimakasih Jika web Blog ini hanya digunakan untuk semua yang berhubungan dengan LOC.

This blog it's suppose for appreciated of LOC Project of hole Indonesian to making a better serve of public services and we thanks fully for out of this community to not disturbing us except give a good opinion when looking this blog.

Terimakasih Bagi yang sudah mengirim artikel ke Kami, Kami akan seleksi Artikel yang masuk untuk kemajuan Kita bersama.

Kami Juga secepatnya akan Menyeleksi Penggunaan Blog web ini bagi anggota LOCer's Saja yang terdaftar untuk menghindari hal2 yang tidak diinginkan. Daftarkan Anda Disini. Atau Lihat Data LOCer's Disini.

Kritik Dan Saran yang membangun Kami Harapkan sekali untuk kelengkapan Blog Web ini.

Pengumuman Hasil Seleksi Administrasi dan Pelaksanaan Ujian Tertulis CPNS BPN RI Th. 2007

Minggu, 11 Mei 2008

Laporan DI 301

Mbak Tari ....
Agak pusing juga neh bikin SQL nya tapi mudah-mudahan ada manpaatnyo


1. DI 301 untuk prosedur diluar HT

SELECT
b.berkasnomor,b.berkasyear,b.prosedurdesc,di.dinomor DI301Nomor,to_char(di.ditanggal,'dd-MM-yyyy')DI301Tgl,
DI208.dinomor DI208Nomor,DI208.ditanggal,
decode(b.berkasstatus,0,'Selesai',1,'Proses',2,'Blokir',3,'Batal',4,'Ditutup',
55,'Jatuh Tempo',56,'Belum Diumumkan',57,'Sedang Diumumkan',58,'Selesai Diumumkan',
99,'Berkas Manual')Status
FROM berkas b,dibook di,regdi rd,
(SELECT rd.regid,rd.dinomor,to_char(rd.ditanggal,'dd-MM-yyyy')ditanggal FROM regdi rd
WHERE rd.dikode = 'DI208')DI208
WHERE di.berkasid = b.berkasid
AND di.dikode = 'DI301'
AND di.dikode = rd.dikode(+)
AND di.dinomor = rd.dinomor(+)
AND di.ditahun = rd.ditahun(+)
AND rd.regid = DI208.regid(+)
-- AND b.prosedurdesc like '%Pemecahan%'
-- AND b.creationdate between to_date('01/01/2007','dd-mm-yyyy') and to_date('31/01/2007','dd-mm-yyyy')
order by b.berkasnomor,b.berkasyear;

2. DI 301 untuk Hak Tanggungan

-- Lap DI 301
SELECT
b.berkasnomor,b.berkasyear,b.prosedurdesc,di.dinomor DI301Nomor,to_char(di.ditanggal,'dd-MM-yyyy')DI301Tgl,
DI312C.dinomor HTNomor,
DI208.dinomor DI208Nomor,DI208.ditanggal,
decode(b.berkasstatus,0,'Selesai',1,'Proses',2,'Blokir',3,'Batal',4,'Ditutup',
55,'Jatuh Tempo',56,'Belum Diumumkan',57,'Sedang Diumumkan',58,'Selesai Diumumkan',
99,'Berkas Manual')Status
FROM berkas b,dibook di,regdi rd,
(SELECT rd.regid,rd.dinomor,to_char(rd.ditanggal,'dd-MM-yyyy')ditanggal FROM regdi rd
WHERE rd.dikode = 'DI208') DI208,
(SELECT rd.regid,rd.dinomor,to_char(rd.ditanggal,'dd-MM-yyyy')ditanggal FROM regdi rd
WHERE rd.dikode = 'DI312C') DI312C
WHERE di.berkasid = b.berkasid
AND di.dikode in ('DI301')
AND di.dikode = rd.dikode(+)
AND di.dinomor = rd.dinomor(+)
AND di.ditahun = rd.ditahun(+)
AND rd.regid = DI208.regid(+)
AND rd.regid = DI312C.regid(+)
AND b.prosedurdesc like '%Hak Tanggungan%'
-- AND di.ditanggal between to_date('01/02/2007','dd-mm-yyyy') and to_date('28/02/2007','dd-mm-yyyy')
order by b.berkasnomor,b.berkasyear;


Okeh ?!?!?!

Jo

Baca Selengkapnya..

Komentar Artikel Terbaru

Komentar Artikel terbaru