Buat 1 tabel khusus untuk simpan penomoran

Contoh :
Tabel Nomor
Field PO, tipe long atau string untuk data 1 atau V/0001
Field SO, tipe long atau string untuk data 2 atau III/0002

Lalu setiap kali buka faktur, ambil nomornya.
Ketika data faktur disimpan, baru nomor tsb disimpan lagi ke tabel nomor

Btw, untuk mencegah faktur yang berbeda mempunyai nomor faktur yang sama, buat satu fungsi, untuk mengecek dan merubah penomoran.

Contoh:
Jika ada 3 orang yang membuka faktur PO dalam waktu yang bersamaan, maka nomor yang keluar di masing2 user adalah nomor PO yang sama. Jika tidak dibuat fungsi cek nomor, maka akan ada 3 buah faktur yang isinya berbeda yang mempunyai nomor faktur yang sama.


Best Regards,
David J M

Advanced Access
Independent Software Vendor
-----------------------------



--- On Thu 04/20, rifztm < [EMAIL PROTECTED] > wrote:
From: rifztm [mailto: [EMAIL PROTECTED]
To: [email protected]
Date: Thu, 20 Apr 2006 09:45:47 -0000
Subject: [indoprog-vb] Re: Mengenai penomoran Order




penomoran dengan  auto number sich boleh2 saja karena semua sudah
diurusin oleh database engine access kita tinggal terima enaknya...
namu ada kelemahan dimana nomor bisa longkap apabila dilakukan
penghapusan data...sehingga apabila kita memasukkan data baru maka
nomor nya akan nambah terus. Bisa sich dilakukan compact agar urut
kembali datanya. Yang kedua apabila kita suatu saat mengiginkan Nomor
yang tidak urut hal ini tidak bisa dilakukan kecuali kita mengganti
type datanya menjadi tidak auto number.

salam,

--- In [email protected], Rudy Sutanto
<[EMAIL PROTECTED]> wrote:
>
> Bro-bro,
>
> gimana kalo field di ACCESS tsb dibikin aja auto
> number. Jadi yg disimpan hanya nomor urut saja, tanpa
> ada tulisan 'PO' dll. Karena kalo pake field, maka
> kita harus melakukan commit (CMIIW) terlebih dulu.
> Supaya nomor terbaru ada di table tsb.
>
> Kalo pake autonumber, masalah commit, atau lock record
> diatur oleh ACCESS-nya sendiri.
> Dan tepat pada saat record di simpan di table, maka
> otomatis table baru memberi nomor sendiri, tanpa
> campur tangan kita. Hal ini dilakukan dgn membuat
> sequence dan 1 trigger di table tsb.
>
> Maaf jika komentarnya kurang mengena. Saya jarang pake
> access.
>
> Semoga membantu,
> Rudy
> --- rifztm <[EMAIL PROTECTED]> wrote:
>
> > saya ingin memberi komentar sedikit. Kalo membaca
> > transaksi di PO agar
> > mendapatkan No terakhir bukannya lambat apabila
> > transaksi bertambah
> > banyak ? bagaimana apabila ada user lain yang
> > bersamaan membaca nya ?
> > misal ada 3 user yang membuat transaksi PO ? pasti
> > nanti akan ada
> > error duplicate ???m endingan membuat satu tabel
> > untuk menampung
> > field2 yang memerlukan nilai yang berurut baik itu
> > untuk transaksi PO,
> > SO dsb. Sehingga dari sisi pembacaan singkat karena
> > cuma 1 record dan
> > menghindari user mendapatkan No yang sama apabila
> > terdiri atas banyak
> > user.
> >
> > misal tabel SetupNomor ada field NextPO = 1
> >
> > jadi setiap kali kita mau simpan baca dulu field
> > tersebut, gabungkan
> > dengan format yang kita inginkan sehingga menjadi
> > PO0001. kemudian
> > setelah itu tambah field nextPO tersebut dengan 1
> > lalu simpan ke field
> > NextPO. Untuk memudahkan anda bisa menampungnya
> > dalam satu variabel
> > untuk membedakan biar tidak bingung...
> >
> > selamat mencoba,
> >
> > --- In [email protected], "eriek"
> > <eriek@> wrote:
> > >
> > > dim strPO as string
> > > sql=select * from tblPO ORDER BY PO DESC
> > > rs.open sql
> > >   strPO =format(rs("PO") +1,"000")
> > >
> > > inti nya ambil dulu record PO scr DESC lalu ambil
> > record pertama di
> > tambah
> > > dengan 1
> > >
> > >
> > > ----- Original Message -----
> > > From: "rudi sutomo" <rudsut@>
> > > To: <[email protected]>
> > > Sent: Wednesday, April 19, 2006 4:28 PM
> > > Subject: [indoprog-vb] Mengenai penomoran Order
> > >
> > >
> > > > Dear All,
> > > >
> > > >
> > > >
> > > >            Thanks ya atas masukan en ,jalan
> > > > programnya,  Saya mau nanya lagi nich,
> > > >
> > > > Pada waktu penomoran Order,nomornya berdasarkan
> > > > menghapal,bagaimana caranya agar penomoran bisa
> > > > langsung nomor yg keberikutnya
> > > >
> > > > contoh PO 001
> > > >
> > > > setelah jalan program langsung muncul PO 002
> > > >
> > > > agar tidak terjadi redudansi
> > > >
> > > > saya memakai database acces dan metode DAO
> > > >
> > > > Mohon pencerahannya
> > > >
> > > > Thanks for your attention !!!!!
> > > >
> > > > Salam,
> > > > Rudi
> > > >
> > > >
> > > >
> > __________________________________________________
> > > > Do You Yahoo!?
> > > > Tired of spam?  Yahoo! Mail has the best spam
> > protection around
> > > > http://mail.yahoo.com
> > > >
> > > >
> > > > Untuk berhenti berlangganan kirim email kosong
> > ke :
> > > > [EMAIL PROTECTED]
> > > >
> > > > Ikuti juga forum diskusi VB.net dengan
> > > > mengirim email kosong ke
> > [EMAIL PROTECTED]
> > > >
> > > > Yahoo! Groups Links
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > >
> >
> >
> >
> >
> >
> >
>
>
> __________________________________________________
> Do You Yahoo!?
> Tired of spam?  Yahoo! Mail has the best spam protection around
> http://mail.yahoo.com
>










Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED]

Ikuti juga forum diskusi VB.net dengan
mengirim email kosong ke [EMAIL PROTECTED]






   


 
 
    SPONSORED LINKS
 
         
                 
           
        Computer internet security
     
                     
        Computer internet business
     
                     
        Computer internet access
     
             
                       
           
        Computer internet privacy securities
     
                     
        Computer internet help
     
                     
        Computer internet connection
     
             
                   
          
 







 
 
  YAHOO! GROUPS LINKS



   Visit your group "indoprog-vb" on the web.
   To unsubscribe from this group, send an email to: [EMAIL PROTECTED]
   Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.



 









_______________________________________________
Join Excite! - http://www.excite.com
The most personalized portal on the Web!




Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED]

Ikuti juga forum diskusi VB.net dengan
mengirim email kosong ke [EMAIL PROTECTED]




YAHOO! GROUPS LINKS




Kirim email ke