MasteringVFP/2/6/1

==== Procedure ====
程序,我們可以將常用的指令集合到一起~這樣就不必再剪貼那麼多程式碼了~

例如:
<pre>
use customers
go top
locate for cust_id=="A"
if found()
  && do something
endif
use in customers

use customers
go top
locate for cust_id=="B"
if found()
  && do something
endif
use in customers
</pre>

我們就可以化簡為:
<pre>
do findCustomer with "A"
do findCustomer with "B"

procedure findCustomer
  lparameters lc_id
  use customers
  go top
  locate for cust_id==lc_id
  if found()
    && do something
  endif
  use in customers
endproc
</pre>

這樣不是簡單許多嗎??
一般來說, Procedure 是不會傳回值的,但 VFP 的 Procedure 比較特別,它可以傳回值也可以不傳回值.