coba robah dikit: IIf(Q_Peminjaman.Tgl_Pinjam >= IIF(Q_Pengembalian.Tgl_Kembali=NULL,0,Q_Pengembalian.Tgl_Kembali),'Belum Dikembalikan','Sudah Dikembalikan') AS Keterangan
sukses dayat --- In [email protected], arief pramana` <arief_31ma...@...> wrote: > > > > Adakah yang bisa memberikan solusi > terhadap aplikasi access yang saya buat... > > Saya sedang membuat aplikasi > "MONITORING KELUAR-MASUK DOKUMEN".. > > tp ketika ingin mengaccess dokumen yang > statusnya di pinjam, saya mengalami > kesulitan karena belum menemukan rumus SQL nya..rumus yang skarang yaitu" > > > SELECT T_Dokumen.No_Dokumen, > T_Dokumen.Id_Kategori, T_Kategori.Kategori_Dokumen, T_Dokumen.Id_Lokasi, > T_Lokasi.Lokasi_Dokumen, > T_Dokumen.Uraian, T_Dokumen.Nilai_Rupiah, Q_Peminjaman.Tgl_Pinjam, > Q_Pengembalian.Tgl_Kembali, > IIf(Q_Peminjaman.Tgl_Pinjam>=Q_Pengembalian.Tgl_Kembali,'Belum > Dikembalikan','Sudah Dikembalikan') AS Keterangan, Q_Peminjaman.Nama_Peminjam, > Q_Peminjaman.Extension, Q_Peminjaman.No_Telp, Q_Pengembalian.Nama_Petugas, > Q_Peminjaman.Divisi > > > > FROM T_Lokasi INNER JOIN (T_Kategori INNER > JOIN ((T_Dokumen INNER JOIN Q_Peminjaman ON T_Dokumen.No_Dokumen = > Q_Peminjaman.No_Dokumen) INNER JOIN Q_Pengembalian ON T_Dokumen.No_Dokumen = > Q_Pengembalian.No_Dokumen) ON T_Kategori.Id_Kategori = T_Dokumen.Id_Kategori) > ON T_Lokasi.Id_Lokasi = T_Dokumen.Id_Lokasi > > > > WHERE > (((T_Dokumen.No_Dokumen)=[Forms]![F_NoDokumen]![No_Dokumen]) AND > ((IIf([Q_Peminjaman].[Tgl_Pinjam]>=[Q_Pengembalian].[Tgl_Kembali],'Belum > Dikembalikan','Sudah Dikembalikan'))='Belum Dikembalikan')); > > > > MASALAHNYA YAITU : > > DARI RUMUS INI TIDAK MEMUNCULKAN STATUS > "BELUM DIKEMBALIKAN " BAGI DOKUMEN YANG PERTAMA KALI DIPINJAM KARENA > NILAI Tgl_Kembali di T_Pengembalian MASIH KOSONG ATAU TIDAK MEMILIKI NILAI..
