Dear para ahli PB

Saya buat aplikasi parkir dengan menggunakan PB6.5 , dengan pintu masuk 
menggunakan 3 POS.

Pada saat saya testing program tersebut dengan menggunakan 1 komputer pada 
pos-masuk dan 1 komputer pada pos_keluar. Data yang tersimpan selalu unik 
(tidak duplicate), karena sudah saya cegah dengan script sbb :

double ld_count 
string ls_nopol

ls_nopol = trim(sle_nopol.text)

ld_count = 0
select count(no_pol) into :ld_count from dataparkir
where no_pol = :ls_nopol
using sqlca;

if ld_count <>  0 Then

   // data sudah data
  messagebox("duplicate","No Polisi sudah ada")

else
    // Data belum ada

   // Proses transaksi
  insert into dataparkir values(ls_nopol)
  using sqlca;

  Commit using sqlca;

End if

Tetapi pada saat saya menggunakan 3 komputer pada pos masuk, kemudian saya 
analisa data nya kadang duplicate, kadang tidak .

 
Kenapa yah bisa begitu, mohon bantuan dan petunjuk nya

Thanks


      

Kirim email ke