MINI

files >> C:/Users/Administrator/Desktop/buku induk penduduk.txt
 
select to_char(nik)nik,upper(nama_lgkp)nama,
decode (jenis_klmin,1,'L',2,'P')jk,upper(tmpt_lhr)tmpt_lhr,tgl_lhr,
decode (gol_drh,1,'A',2,'B',3,'AB',4,'O',5,'A+',6,'A-',7,'B+',8,'B-',
9,'AB+',10,'AB-',11,'O+',12,'O-',13,'-')GDR,decode (AGAMA,'1',
'Islam','2','Kristen','3','Katholik','4','Hindu','5','Budha',
'6','Kong Huchu','7','Aliran Ke-percayaan')AGAMA,
DECODE (STAT_KWN,1,'Belum Kawin',2,'Kawin',3,'Cerai Hidup',
4,'Cerai Mati')status,decode (stat_hbkel,1,'Kepala Keluarga',
2,'Suami',3,'Istri',4,'Anak',5,'Menantu',6,'Cucu',7,'Orangtua',
8,'Mertua',9,'Famili Lain',10,'Pembantu',11,'Lainnya')Shdk,
(Stat_Hbkel)shdrt,decode (pddk_akh,1,'Tidak/Belum Sekolah',
2,'Tidak Tamat SD/Sederajat',3,'Tamat SD/Sederajat',
4,'SLTP/Sederajat',5,'SLTA/Sederajat',6,'Diploma I/II',
7,'Akademi/Diploma III/S. Muda',8,'Diploma IV/Strata I',
9,'Strata II',10,'Strata III')pddk_akhir,DECODE(JENIS_PKRJN,
1,'Belum/Tidak Bekerja',2,'Mengurus Rumah Tangga',
3,'Pelajar/Mahasiswa',4,'Pensiunan',5,'Pegawai Negeri Sipil',
6,'Tentara Nasional Indonesia',7,'Kepolisian RI',8,'Perdagangan',
9,'Petani/Pekebun',10,'Peternak',11,'Nelayan/Perikanan',
12,'Industri',13,'Konstruksi',14,'Transportasi',15,'Karyawan Swasta',
16,'Karyawan BUMN',17,'Karyawan BUMD',18,'Karyawan Honorer',
19,'Buruh Harian Lepas',20,'Buruh Tani/Perkebunan',
21,'Buruh Nelayan/Perikanan',22,'Buruh Peternakan',
23,'Pembantu Rumah Tangga',24,'Tukang Cukur',
25,'Tukang Listrik',26,'Tukang Batu',27,'Tukang Kayu',
28,'Tukang Sol Sepatu',29,'Tukang Las/Pandai Besi',
30,'Tukang Jahit',31,'Tukang Gigi',32,'Penata Rias',
33,'Penata Busana',34,'Penata Rambut',35,'Mekanik',36,'Seniman',
37,'Tabib',38,'Paraji',39,'Perancang Busana',40,'Penterjemah',
41,'Imam Mesjid',42,'Pendeta',43,'Pastor',44,'Wartawan',
45,'Ustadz/Mubaligh',46,'Juru Masak',47,'Promotor Acara',
48,'Anggota DPR-RI',49,'Anggota DPD',50,'Anggota BPK',
51,'Presiden',52,'Wakil Presiden',53,'Anggota Mahkamah Konstitusi',
54,'Anggota Kabinet/Kementerian',55,'Duta Besar',56,'Gubernur',
57,'Wakil Gubernur',58,'Bupati',59,'Wakil Bupati',60,'Walikota',
61,'Wakil Walikota',62,'Anggota DPRD Provinsi',
63,'Anggota DPRD Kabupaten/Kota',64,'Dosen',65,'Guru',66,'Pilot',
67,'Pengacara',68,'Notaris',69,'Arsitek',70,'Akuntan',
71,'Konsultan',72,'Dokter',73,'Bidan',74,'Perawat',75,'Apoteker',
76,'Psikiater/Psikolog',77,'Penyiar Televisi',78,'Penyiar Radio',
79,'Pelaut',80,'Peneliti',81,'Sopir',82,'Pialang',83,'Paranormal',
84,'Pedagang',85,'Perangkat Desa',86,'Kepala Desa',
87,'Biarawati',88,'Wiraswasta',89,'Lainnya')pekerjaan,
upper(nama_lgkp_ibu)nama_ibu,
upper(nama_lgkp_ayah)nama_ayah,to_char(b.no_kk)no_kk,
upper(b.nama_kep)nama_kep_kel,upper(b.alamat)||
',RT :'||decode(b.no_rt,NULL,'', 0,'','-','',to_char(b.no_rt,'000'))||
',RW :'||decode(b.no_rw,NULL,'',0,'','-','',to_char(b.no_rw, '000'))||
',Kodepos :'||(b.kode_pos)||',Telp :'||(b.telp)alamat,
getnamaprop(b.no_prop) nama_prop,(b.no_kab)kab_kota,
getnamakab(b.no_kab,b.no_prop) nama_kab,
getnamakec(b.no_kec,b.no_kab,b.no_prop) nama_kec,
b.no_kel,getnamakel(b.no_kel,b.no_kec,b.no_kab,b.no_prop) nama_kel,
(trim(decode(b.no_rw,NULL,'',0,'','-','',to_char(b.no_rw,'000'))))rw,
(trim(decode(b.no_rt,NULL,'',0,'','-','',to_char(b.no_rt,'000'))))rt
FROM Biodata_wni a, Data_Keluarga b 
WHERE a.No_kk=b.no_kk 
--sesuaikan kode wilayah yg ingin ditampilkan !!!
and flag_status='0'
and b.no_kab=71
and b.no_kec=2
and b.no_kel=1002

order by no_rw,no_rt,no_kk,stat_hbkel