新增文章
文章标题
分类
C#
云星空
K3 BOS
K3 功能
用友
Oracle
python
SQL
MySql
PHP
HTML
script
windows
Access
影视后期
财务
服务
生活
内容
aFQty1 = m_BillInterface.GetDataFldbyKey("FQty2", I)("FFLD") '【字段值】 FQty2 重量 FQtyStock "FFLD" = "249" / "FDSP" = "KG" / "FFND" = "KG" / "FLastUnitID" = "249" / "FMODIFY" = 1 aFUnit11 = m_BillInterface.GetDataFldbyKey("FBase9", I)("FFLD") '【内码】 FBase9 库存单位 FUnitStock aFUnit12 = m_BillInterface.GetDataFldbyKey("FBase9", I)("FFND") '【编码】 FBase9 库存单位 FUnitStock aFUnit13 = m_BillInterface.GetDataFldbyKey("FBase9", I)("FDSP") '【名称】 FBase9 库存单位 FUnitStock aFQty2 = m_BillInterface.GetDataFldbyKey("FQty", I)("FFLD") '【字段值】 FQty 销售数量 FQtySale aFUnit2 = m_BillInterface.GetDataFldbyKey("FBase5", I)("FDSP") '【字段值】 FBase5 销售单位 FUnitSale aTxt1 = "": aTxt2 = "": aTxt2 = aFQty2 & " " & aFUnit2 If aFUnit1 <> aFUnit2 Then aTxt1 = aFQty1 & " " & aFUnit1 End If m_BillInterface.SetFieldValue "FText3", aTxt1, I '【填写数值】 FText3 重量文本 FQtyStockTxt m_BillInterface.SetFieldValue "FText5", aTxt2, I '【填写数值】 FText5 数量文本 FQtySaleTxt
返回
保存