VFP 愛用者社區

[JAMESHUA]

我寫了一個出貨系統
單據編號排列為 SA年月日流水號
SA08121210001
SA08121210002
SA08121210003
.................
SA08121210009


單機用還OK
但多機用變重覆
SA08121210001
SA08121210002
SA08121210002
SA08121210002
SA08121210003
.................
SA08121210009

[nelsonchuang]

你該不會是先抓單號的吧~

[syntech]

加油,好嗎?


以前有討論過了.
寫個單機版程式就想套用在網路版,
可是沒那麼簡單.

結論嗎?........要用心體會...... XD

[yang1032]

1.存檔時先LOCK檔案
2.尋找存檔資料,編出編號後存檔
3.UNLOCK OR USE

[lee188188]

任何一部要新增一筆明細時:
DO WHILE !FLOCK()
=INKEY(0.1)
ENDDO

取得序號
APPE BLANK
寫入序號
UNLOCK


.....

[jepp]

append 完有沒有先 tableupdate(.t.)

[syntech]

不是 "技巧"問題, 是 "系統架構"問題.

[kentabc]

a simple concept just for your reference:
==============================
.....
cursorsetprop("buffering", 5, "the_table")
select the_table
append blank
....
...... && let your user input data
..
....
... && when user press SAVE button
...
select the_table
do file_lock(the_table) && do an unlimit file lock routine, pls check flock
use the_table again shared in 0 alias the_table2
select the_table2
set order to tag your_sequence_number
go bottom
m_use_this_number = the_table2.seq_number + 1
use && close the_table2
* you can check the number valid or not here
select the_table
replace the_table.seq_number with m_use_this_number
=tableupdate()
unlock
* no user input or control between flock and unlock
...
...... && control settings
thisform.refresh

[KKKLYNN]

還是先取得沒有人用的續號(最後一碼)
再來新增資料
比較安全
每一次新增號碼時就將號碼存起來
下一次要用時(加一)
直接取出使用(還要先偵測是否有人先取用)
這樣比較好
盡量不要用lock
這是我用的方法(號碼不會重復)
以上

[ys_richard]

我的作法是在各工作站存檔時,再給號就沒問題了