首先要想实现源单的汇总数量作为新单的数量,如果物料不一样得到汇总有何意义?不过可以实现.写插件:
序时簿插件1:
SET RS=m_listinterface.k3lig.getdata("select sum(数量) as 汇总数量,字段A,...... FROM 表A,表B WHERE 表A.FID=表B.FID") '当然这个SQL一定要有条件限制.
然后在下推时,将RS内的数据赋值到对应的单据字段内.
可写如下代码:
Do While rs.EOF <> True
m_BillInterface.InsertNewRowAndFill 2, i, "fbase", rs.fields!fnumber
i = i + 1
rs.movenext
Loop
rs.Close
当然也可先得RS的值赋值给一个数组.
上查,下查,你可以参考如下代码
(先获得序时簿内所选单据的单据内码,单据编号,等信息,然后再实现上下查功能,我暂时只知道这样做,有没有对应的接口我还不知道)
获得所选单据的单据内码,单据编号,等信息代码:
If m_ListInterface.GetCurrentSelRowInfo.Count > 0 Then
For i = m_ListInterface.GetSelectedBillInfo.LBound To m_ListInterface.GetSelectedBillInfo.UBound
MsgBox "This is fid:" & m_ListInterface.GetSelectedBillInfo.Item(i).Value("fid")
MsgBox "User ID:" & m_ListInterface.K3Lib.User.UserID
Set rs = m_ListInterface.K3Lib.GetData("select * from t_BOS200000003 where fid=" & m_ListInterface.GetSelectedBillInfo.Item(i).Value("fid"))
MsgBox "This is fbillno:" & rs.fields!fbillno
'此处可设置一个数据或其他变量,让所选单据的FID赋予给它
Next i
rs.Close
End If
仅供参考,如有需要请加QQ:603633540或加QQ群:44424480