ACCESS FEED: Re: [belajar-access] Kasus

Senin, 14 Mei 2012

Re: [belajar-access] Kasus

Thanks Mas Sofyan, problem solved. :-)
 
 

    From: Sofyan Efendi <sofyanefendi@gmail.com>
 To: belajar-access@yahoogroups.com 
 Sent: Tuesday, 15 May 2012, 11:40
 Subject: Re: [belajar-access] Kasus
  

 ﻿      
Dear Mas Cokro, ini ya samplenya :
 
Function test()
Dim db As Database
Dim rs As Recordset, rs2 As   Recordset
Set db = CurrentDb()
Set rs = db.OpenRecordset("Table1",   dbOpenDynaset)
Set rs2 = db.OpenRecordset("Table2", dbOpenDynaset)
While   Not rs.EOF
    Next i
      rs.MoveNext
Wend
rs.Close
rs2.Close
db.Close
Set rs =   Nothing
Set rs2 = Nothing
Set db = Nothing
End Function
Wassalaamu'alaikum Warahmatullahi   Wabarakatuh,
Sofyan Efendi
http://imopi.wordpress.com/
----- Original Message ----- 
From:     Cokro Fidian     
To: belajar-access@yahoogroups.com     
Sent: Tuesday, May 15, 2012 11:29   AM
Subject: Re: [belajar-access] Kasus

Dear Mas Sofyan,

Boleh minta tolong kasih contoh syntax utk looping di dlm 1 atau     lebih table dlm ms-access?
Saya sudah mencoba googling blm ktm yg pas utk kasus saya     ini.

Thanks sebelumnya,
Cokro
 
 

        From: Sofyan Efendi <sofyanefendi@gmail.com>
To: belajar-access@yahoogroups.com     
Sent: Tuesday, 15 May 2012,     10:05
Subject: Re:     [belajar-access] Kasus

 
Dear Mas Cokro, report seperti ini harus     menggunakan table temporary. Sebab saldo diletakan pada baris pertama pada     masing2 kode barang. Bila di MRP/ERP, hal ini sama seperti report Item     Transaction History atau Stock Value. Tentu saja harus ada field berjenis     AutoNumber, sehingga di report bisa diurutkan, dan posisi stok awal selau di     baris pertama. Cobalah experimen menggunakan VBA, query append atau make     table query, dari table stok akhir april 2012 dan table daftar barang masuk.     Insya Allah report seperti ini bisa dibuat.
 
Wassalaamu'alaikum Warahmatullahi     Wabarakatuh,
Sofyan Efendi
http://imopi.wordpress.com/
----- Original Message ----- 
From: Cokro Fidian 
To: belajar-access@yahoogroups.com       
Sent: Tuesday, May 15, 2012 9:39       AM
Subject: [belajar-access] Kasus

Dear Master Access,

Saya punya kasus, sbb:

STOCK AKHIR APRIL 2012
Kode_Brg    Saldo
A001        2000
A002        3500

DAFTAR BARANG MASUK
Ref#    Tgl        Kode_Brg    Qty    HargaSatuan
M123    30-04-12   A001        1000    1200
M123    30-04-12   A002        1500    2275
M122    29-04-12   A002        1600    2250
M121      30-03-12   A001         500    1300
M121    30-03-12   A002         750    2400
M120    03-03-12   A001        1000    1250


REPORT YG       DIINGINKAN:

Kode_Brg    Saldo    Qty    HargaSatuan    Ref#
A001        2000    1000    1200            M123
                     500    1300            M121
                     500    1250            M120
A002        3500    1500    2275            M123
                    1600    2250            M122
                     400    2400            M121

Stock Akhir April 2012       saya buatkan table TB_STOCK
Daftar Barang Masuk saya buatkan table       TB_BRG_MASUK

Untuk menghasilkan Report yang diinginkan melalui kedua       table tsb, apakah bisa melalui Query/View
atau menggunakan       Module/VBA?
Mohon petunjuk dari para master.

Terima kasih       sebelumnya,
Cokro