BOS單據設置方法
單據體和單據頭均使用SetActiveCell方法。
語法:Object.SetActiveCell (sKey As String, [lRow As Long])
參數說明:
sKey:String類型。指定字段的Key。
lRow:Long類型。可選參數。需要鎖定的單據體多分錄的行號。
注意:
如果指定的字段為“鎖定”的字段,該方法不起任何作用。
示例:
在單據加載后,判斷單據狀態,如果是“修改”模式,設置光標在單據頭字段FDecimal上:
Private Sub m_BillInterface_AfterLoadBill()
If m_BillInterface.BillStatus = Enu_BillStatusExt_Modify Then
Call m_BillInterface.SetActiveCell("FDecimal")
End If
End Sub
如果想控制單據體,SetActiveCell方法中指定lRow參數即可,不再說明,自己動手測試吧!
工業單據設置方法
單據體:
m_BillTransfer.BillForm.vsEntrys.SetFocus
m_BillTransfer.BillForm.vsEntrys.SetActiveCell(lCol,lRow)
單據頭
m_BillTransfer.BillForm.KDCtl(i).SetFocus
或者使用以下方法:
單據體:
m_BillTransfer.grid.SetFocus
m_BillTransfer.grid.SetActiveCell(lCol,lRow)
單據頭
m_BillTransfer.Head(i).SetFocus