aloo.. pagi all..
mau tanya, aku punya beberapa table seperti ini
tb_mst_pendidikan : kd_pend (varchar, 10,0) nm_pend (varchar,
50,0)
tb_mst_organisasi : kd_organisasi (varchar, 10,0) ,
nm_organisasi (varchar, 50,0)
tb_pegawai : nik (varchar, 8,0) , stat_peg (varchar,
8,0)
tb_tkerja : nik (varchar, 8,0) , kd_organisasi
(varchar, 10,0)
tb_pdakhir : nik (varchar, 8,0), pdakhir (varchar,
10,0)
giamana cara untuk mempercepat penampilan rekapitulasi untuk report
seperti ini, dan dengan catatan
- jika pada sebuah organisasi tersebut tidak ada datanya, nama
organisasinya tetap di munculkan.
- data di laporan bisa disesuaikan dengan bentuk organisasi, artinya
jika user memilih organisasi A berarti data yang
keluar adalah sub organisasi A
---------------------------------------------------------------------------------------------------------------------------------------------
no | nama organisasi | sd | smp | sma | d1 | d2 | d3 |
d4 | sarjana | pasca sarjana | Doktor | d2 | d3
---------------------------------------------------------------------------------------------------------------------------------------------
aku sudah buat di programmingnya pake declare cursor dengan pengulangan
cman waktunya lama sekali. :-(
contoh :
declare cursor A for select kd_organisasi , nm_organisasi from
tb_mst_organisasi where kd_organisasi like :pilih_kdogan+"%";
open A;
fetch A into :kd_organ, :nm_organ;
a=0;
do while sqlca.sqlcode = 0
a++
dw_1.insertrow(a)
dw_1.setitem(a, "nm_organisasi", nm_organ)
select count (*)
into :sd
from tb_tkerja, tb_pdakhir
where substring(tb_tkerja.kd_organ,1,len(pilih_kdogan)) =
substring(:kd_organ,1,len(pilih_kdogan))
and tb_tkerja.nik = tb_pdakhir.nik
and substring(tb_pdakhir,1,2) = "10" // unutk sd
dw_1.setitem(a, "sd", sd)
select count (*)
into :smp
from tb_tkerja, tb_pdakhir
where substring(tb_tkerja.kd_organ,1,len(pilih_kdogan)) =
substring(:kd_organ,1,len(pilih_kdogan))
and tb_tkerja.nik = tb_pdakhir.nik
and substring(tb_pdakhir,1,2) = "21" // unutk smp
dw_1.setitem(a, "smp", smp)
fetch A into :kd_organ, :nm_organ;
.... selanjutnya
loop
close ;
maksih yah buat bantuan dan sarannya... ohya aku pake Powerbuilder and
sybase ASE
--
Iwan Setiawan
STAF IT
PT LGPhilips Displays
Kawasan MM2100 Blok G
Cikarang Bara - Bekasi 17520
Jawa barat - Indonesia
Telp : +21 898 9510/511
HP : 0815 - 911 44 73
Web : http://embun.net
--
Iwan Setiawan
STAF IT
PT LGPhilips Displays
Kawasan MM2100 Blok G
Cikarang Bara - Bekasi 17520
Jawa barat - Indonesia
Telp : +21 898 9510/511
HP : 0815 - 911 44 73
Web : http://embun.net
-----------------------------------------------
INDOPB TURUT BERDUKA CITA UNTUK ACEH & SUMUT
-----------------------------------------------
IndoPB - Indonesia PB User Group
To Post a message, send it to: [EMAIL PROTECTED]
To Unsubscribe,send a blank message to: [EMAIL PROTECTED]
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/indopb/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
