Harun Al Rosyid wrote:

> mohon bantuan saya ada permsl, relasi jadi gini,
> data base saya pakai acces, ada bbrap tabel :
> 
> TABELA        -> kodeA*
>                  NamaA
> 
> TABELB        -> kodeB*
>                  namaB
> 
> TABELC        -> kodeC*
>                  NamaC
> 
> DATA          -> nomor*
>                  kodeA        (relasi ke TabelA.kodeA)
>                  kodeB        (relasi ke TabelB.kodeB)
>                  kodeC        (relasi ke TabelC.kodeC)        
> 
> nah saya mo' bikin laporan berdasasr pada tabel Data yang tampilanya :
> 
>       nomor   NamaA           NamaB           NamaC
Sub-Query version :
...
select d.nomor,
        (select a.NamaA from tableA a where (a.kodeA = d.kodeA),
        (select b.NamaB from tableB b where (b.kodeB = d.kodeB),
        (select c.NamaC from tableC c where (c.kodeC = d.kodeC)
from DATA d
...

JOIN version :
...
select d.nomor, a.namaA, b.namaB, c.namaC
from DATA d
left join tableA a on (a.kodeA = d.kodeA)
left join tableB b on (b.kodeB = d.kodeB)
left join tableC c on (c.kodeC = d.kodeC)
...

Delphi-Client-side hack (4 interlinked query, use only if your database 
server is primitive enough not to support sql92 join syntax or 
subqueries...:):
...
//asumsikan ada empat buah query, queryA, queryB, queryC, queryD,
//masing masing query punya datasource masing masing :
//datasourceA, datasourceB, datasourceC, datasourceD

queryD.SQL.text := 'select * from data';
queryA.SQL.text := 'select * from tableA where kodeA = :kodeA';
queryB.SQL.text := 'select * from tableB where kodeB = :kodeB';
queryC.SQL.text := 'select * from tableC where kodeC = :kodeC';

queryA.datasource := datasourceD; //datasourceD.dataset := queryD;
queryB.datasource := datasourceD; //datasourceD.dataset := queryD;
queryC.datasource := datasourceD; //datasourceD.dataset := queryD;

queryD.open;
queryA.open;
queryB.open;
queryC.open;
...
Untuk yang terakhir, dari report anda tinggal refer ke tabel masing masing.

Good luck!,
Salam,
sugi.






------------------------ Yahoo! Groups Sponsor ---------------------~-->
Buy Ink Cartridges or Refill Kits for your HP, Epson, Canon or Lexmark
Printer at MyInks.com. Free s/h on orders $50 or more to the US & Canada.
http://www.c1tracking.com/l.asp?cid=5511
http://us.click.yahoo.com/mOAaAA/3exGAA/qnsNAA/i7folB/TM
---------------------------------------------------------------------~->

Berlangganan: [EMAIL PROTECTED]
Stop Berlangganan: [EMAIL PROTECTED]
Keluhan Milis(Unbouncing,spam,dll): [EMAIL PROTECTED] 

Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/ 


Kirim email ke