VFP 愛用者社區

[ckp6250]

================
小弟很好奇,
這個列次的實際用途為何?
================


二人以上同步核對資料時很有用
比如客戶打電話來，說某筆資料有疑義，我們一般會和她同步操作
第一步，就要是先找到那一筆資料
這時，如果客戶跟我們說，第3824筆有問題，我們很容易就找到了
但，如果她是說，Ｘ月Ｘ日出貨單號ＸＸＸＸＸ號
雖然一樣找得到，但肯定沒有3824來得快

另外，計算筆數也方便，比如說，客戶想知道5月10日到５月20日有幾筆資料
那只要把二個列號相減，就得出來了

她要知道 FA 開頭的存貨代碼有幾項，也是二個列號相減

雖然，我們也可以寫個小程式來計算筆數，但總沒有這招直觀

一般而言，我們都會提供流覽時即時過濾功能，那麼，過濾後有幾筆資料，一眼就瞄出來了

小功能，對使用者，卻是大方便

=============
上文小弟提到的 container 是為了解決第一個缺點的小小建議,
把 列次 蓋住了,
使用者就點不到它, 不是嗎?
=============

這項已經解決了!謝謝

[DennisTsai]

問題3,不難解決,我10多年前就已面對過,就像我前面寫的,建一表TMP,例AUX N(6),RECNO N(6)備用
資料筆數可先INSERT INTO 200000筆(看你需要) RECNO 從1~200000
再把你作業的TABLE SET RELA TO RECNO() 到 RECNO
用
N=1
SCAN !EOF()
REPL TMP.AUX WITH N
N=N+1
ENDSCAN
20萬筆約1~2秒完成
再來怎麼作,你應該會了

[DennisTsai]

建議樓主仔細衡量這種需求是否合理,16樓上你寫的理由,坦白說很牽強
有太多方法都可以更簡單達到那些需求

[ckp6250]

感謝DennisTsai
您十六樓的方法，和我所搜尋到方法，
如出一轍

我之所以不採用這個方法，在於它沒辦法適用於線上即時的 set filter , set order , set delete
當然，您也可以說，那只要下了 set filter 或 set order 後，也就是任何可能產生順序變動的，都要再去
N=1
SCAN !EOF()
REPL TMP.AUX WITH N
N=N+1
ENDSCAN

(戲法人人會變，這當然也是一招)
我會測試您提供的方法，在此先謝過了

至於16樓上寫的理由,只有第一點才是我真正想要的原因
直接講『請看第3824筆』一定比講『請看1LBF20UUCLFME-80LPTF-AP-C』來得舒服多啦
客戶的存貨代碼又臭又長，有的20碼以上，長的又差不多，可能一串中只差了一二個字母,看到老眼昏花，

我當然知道可以 SEEK , 但要 SEEK 總得打字，打太長容易打錯，打太短又出來同類項太多，還是得找

實在比不上她跟我說『請看第3824筆』

[jerryclt]

不得不建議您...
直接將[列次]作為索引欄位隨記錄儲存,
這樣什麼後置的鳥事都不用處理也!

客戶嘴巴唸 3 您就打 3
客戶嘴巴唸 8 您就打 8
客戶嘴巴唸 2 您就打 2
客戶嘴巴唸 4 您就打 4
客戶唸完了,您也SEEK到客戶要您看的記錄!

當然了,
如果您的索引是日期,是出貨單號,是其他特殊欄位時...
這個列次就會亂排了,
無法達到 5月10日~5月20日共有幾張出貨單的要求!
不過您也說這個不是重點,
重點是兩照要找到同一筆記錄,
那麼無論客戶端用什麼索引找記錄,
只要客戶告訴您該記錄的列次號碼就沒問題了!

[ckp6250]

感謝DennisTsai在17樓提供的方法
我有測試過了，其實結果和我的做法沒二樣
在筆數少的情況，效率一樣快，
當主檔筆數達幾萬筆，拉到底端，照樣牛步

或者，我沒真正領會您的意旨？

[ckp6250]

感謝jerryclt提供的建議
這不失為一個可行的方法

我只是想 Grid 長得像 Excel 一樣，直接以有順序的列號來呈現
不管客戶用什麼方式排序或過濾，
螢幕上都能有 1,2,3,4,5,6,7...........

大家想像一下，如果今天 Excel 沒有列號時.............

[jerryclt]

如果今天 Excel 沒有列號時.............咱就改用 Calc ...................(逃

[DennisTsai]

我說的方式我自己都不喜歡,但一定可行!

[ckp6250]

嗯，經過仔細調校及增修
DennisTsai 的方法確是可行
且效率遠優於我的方法，可實際應用

在此提醒版友，本人第一樓的程式碼，應予揚棄!

再次感謝DennisTsai大大及諸多參與指導之先進

[syntech]

[ckp6250]

[DennisTsai]

這根本不是甚麼技術,頂多算是方法,我只在強調.ACTIVEROW之不可行,不要糗我了!
我已表明,根本就不喜歡這樣做

[ckp6250]

[syntech]