298 lines
11 KiB
Python
298 lines
11 KiB
Python
import clr
|
||
clr.AddReference("System")
|
||
clr.AddReference("Kingdee.BOS")
|
||
clr.AddReference("Kingdee.BOS.Core")
|
||
clr.AddReference("Kingdee.BOS.DataEntity")
|
||
clr.AddReference("Kingdee.BOS.App")
|
||
clr.AddReference("Kingdee.BOS.Contracts")
|
||
clr.AddReference("Kingdee.BOS.ServiceHelper")
|
||
|
||
from Kingdee.BOS import*
|
||
from Kingdee.BOS.Util import *
|
||
from Kingdee.BOS.Core import *
|
||
from Kingdee.BOS.Core.DependencyRules import *
|
||
from Kingdee.BOS.Core.Metadata.EntityElement import *
|
||
from Kingdee.BOS.Orm.DataEntity import*
|
||
from Kingdee.BOS.Orm.Metadata.DataEntity import*
|
||
from Kingdee.BOS.Core.DynamicForm.PlugIn import *
|
||
from Kingdee.BOS.Core.DynamicForm.PlugIn.Args import *
|
||
from Kingdee.BOS.Core.CommonFilter import *
|
||
from System import *
|
||
from System.ComponentModel import*
|
||
from System.Collections.Generic import*
|
||
from System.Text import*
|
||
from Kingdee.BOS.ServiceHelper import *
|
||
from Kingdee.BOS.KDThread import *
|
||
|
||
# showParameter = None
|
||
_whereSql = ""
|
||
def BarItemClick(e):
|
||
# 新增过滤窗口
|
||
if e.BarItemKey == "tbShowFilterForm":
|
||
# global showParameter
|
||
# if showParameter == None:
|
||
showParameter = FilterShowParameter();
|
||
showParameter.FormId = "POSH_CB_PROCOSTRESULTREC_FILTER";
|
||
showParameter.ParentPageId = this.View.PageId;
|
||
|
||
this.View.ShowForm(showParameter,lambda x:ShowReturnData(x));
|
||
|
||
def ShowReturnData(result):
|
||
global _whereSql
|
||
_whereSql = "";
|
||
if result.ReturnData is None:
|
||
return
|
||
else:
|
||
whereSql = "";
|
||
MoBills = List[str]()
|
||
BatchFilterRows = result.ReturnData.BatchFilterRows;
|
||
if BatchFilterRows != None and BatchFilterRows.Count > 0:
|
||
for item in BatchFilterRows:
|
||
if item.Value.find("[") == -1:
|
||
MoBills.Add(item.Value)
|
||
else:
|
||
vals = JsonUtil.DeserializeObject[List[str]](item.Value)
|
||
MoBills.AddRange(vals)
|
||
|
||
FilterRows = result.ReturnData.FilterRows
|
||
if FilterRows != None and FilterRows.Count > 0:
|
||
for item in FilterRows:
|
||
MoBills.Add(item.Value)
|
||
|
||
if MoBills.Count > 0:
|
||
whereSql = " AND t0.FBILLNO IN ('{0}') ".format("','".join(MoBills))
|
||
|
||
_whereSql = whereSql
|
||
ShowProgressBar();
|
||
# DoSetData(whereSql)
|
||
|
||
def DoSetData(whereSql):
|
||
date = DateTime.Now;
|
||
dateVal = (str(date)[0:7]).replace("-","")
|
||
# raise Exception(str(date))
|
||
if whereSql == "":
|
||
whereSql = " AND CONVERT(INT, CONVERT(VARCHAR(6),t0.FDATE,112)) = @period "
|
||
|
||
moSqlL = """/*dialect*/
|
||
DECLARE @period int
|
||
DECLARE @dbName varchar(100)
|
||
DECLARE @ACCTGORGID int
|
||
|
||
SET @ACCTGORGID = 100039
|
||
SET @period = 201801
|
||
SELECT @dbName = DB_NAME()
|
||
|
||
IF @dbName != 'AIS20231110222743'
|
||
BEGIN
|
||
SET @period = 202406
|
||
SET @ACCTGORGID = 1
|
||
END
|
||
|
||
;WITH #初始数据 AS (
|
||
SELECT t0.FPRODUCTNO
|
||
,t0.FPRODUCTID
|
||
,t0.FBILLID
|
||
,t0.FBILLENTRYID
|
||
,t0.FFORMID
|
||
,t0.FPRODUCTDIMEID
|
||
,(t2.FYEAR * 100 + t2.FPERIOD) AS 'FPERIOD'
|
||
FROM T_CB_PROORDERDIME t0
|
||
INNER JOIN V_CB_PROORDERINFO t1 on t0.FPRODUCTDIMEID = t1.FPRODUCTDIMEID
|
||
INNER JOIN V_HS_OUTACCTG t2 on t2.FID = t1.FACCTGID
|
||
WHERE 1=1
|
||
AND (t2.FYEAR * 100 + t2.FPERIOD) = @period
|
||
AND t2.FACCTGORGID = @ACCTGORGID
|
||
AND t2.FCOMPUTEID != ''
|
||
AND t0.FFORMID = 'PRD_MO'
|
||
AND t1.FENDINITKEY = 1 --期末标识
|
||
)
|
||
, #成本数据 AS (
|
||
SELECT t0.FPRODUCTNO,t0.FPRODUCTID,t0.FPRODUCTDIMEID,t0.FBILLID,t0.FBILLENTRYID
|
||
,t1.FCOSTITEMID
|
||
,(CASE WHEN t1.FEXPENSESITEMID = 4655037 AND t1.FCOSTITEMID = 20523 THEN 4655093 ELSE t1.FEXPENSESITEMID END) AS 'FEXPENSESITEMID'
|
||
,t1.FEXPTYPE
|
||
,t1.FQUALIFIEDINAMOUNT
|
||
,t1.FCURRINPUTAMOUNT
|
||
FROM #初始数据 t0
|
||
CROSS APPLY (
|
||
SELECT t1.FPRODUCTDIMEID
|
||
,t3d.FCOSTITEMID
|
||
,t3d.FEXPENSESITEMID
|
||
,t3.FEXPTYPE
|
||
,SUM(t3d.FQUALIFIEDINAMOUNT) 'FQUALIFIEDINAMOUNT'
|
||
,SUM(t3d.FCURRINPUTAMOUNT) 'FCURRINPUTAMOUNT'
|
||
FROM V_CB_PROORDERINFO t1
|
||
INNER JOIN V_HS_OUTACCTG t2 on t1.FACCTGID = t2.FID
|
||
AND (t2.FYEAR * 100 + t2.FPERIOD) <= t0.FPERIOD
|
||
INNER JOIN V_CB_COSTMATTERIAL t3 on t3.FID = t1.FID
|
||
INNER JOIN V_CB_COSTMATTERIALDETAIL t3d on t3d.FENTRYID = t3.FENTRYID
|
||
WHERE 1 = 1
|
||
AND t1.FPRODUCTDIMEID = t0.FPRODUCTDIMEID
|
||
AND t1.FENDINITKEY = 1
|
||
GROUP BY t1.FPRODUCTDIMEID
|
||
,t3d.FCOSTITEMID
|
||
,t3d.FEXPENSESITEMID
|
||
,t3.FEXPTYPE
|
||
) t1
|
||
)
|
||
, #成本转换 AS (
|
||
SELECT t1.FPRODUCTNO,t1.FPRODUCTID,t1.FPRODUCTDIMEID,t1.FBILLID,t1.FBILLENTRYID
|
||
,t1.O1,t1.O2,t1.O3,t1.O4,t1.O5,t1.O6,t1.O7,t1.O8,t1.O9,t1.O10,t1.O11,t1.O12,t1.O13,t1.O14,t1.O15,t1.O16
|
||
FROM (
|
||
SELECT t0.FPRODUCTNO,t0.FPRODUCTID,t0.FPRODUCTDIMEID,t0.FBILLID,t0.FBILLENTRYID
|
||
,t0.FQUALIFIEDINAMOUNT,t1.fieldName
|
||
FROM #成本数据 t0
|
||
LEFT JOIN V_BD_COST_RESTORE_EXPENSE t1 on t0.FEXPENSESITEMID = t1.FEXPID
|
||
WHERE NOT (t0.FCOSTITEMID = 20522 AND t0.FEXPENSESITEMID = 20045)
|
||
)t0
|
||
PIVOT
|
||
(
|
||
SUM(t0.FQUALIFIEDINAMOUNT) FOR
|
||
t0.fieldName IN (O1,O2,O3,O4,O5,O6,O7,O8,O9,O10,O11,O12,O13,O14,O15,O16)
|
||
) AS t1
|
||
)
|
||
SELECT t0.*
|
||
,ISNULL(t1.O1,0) AS 'O1'
|
||
,ISNULL(t1.O2,0) AS 'O2'
|
||
,ISNULL(t1.O3,0) AS 'O3'
|
||
,ISNULL(t1.O4,0) AS 'O4'
|
||
,ISNULL(t1.O5,0) AS 'O5'
|
||
,ISNULL(t1.O6,0) AS 'O6'
|
||
,ISNULL(t1.O7,0) AS 'O7'
|
||
,ISNULL(t1.O8,0) AS 'O8'
|
||
,ISNULL(t1.O9,0) AS 'O9'
|
||
,ISNULL(t1.O10,0) AS 'O10'
|
||
,ISNULL(t1.O11,0) AS 'O11'
|
||
,ISNULL(t1.O12,0) AS 'O12'
|
||
,ISNULL(t1.O13,0) AS 'O13'
|
||
,ISNULL(t1.O14,0) AS 'O14'
|
||
,ISNULL(t1.O15,0) AS 'O15'
|
||
,ISNULL(t1.O16,0) AS 'O16'
|
||
,ISNULL(t1.O1,0) +ISNULL(t1.O2,0) + ISNULL(t1.O3,0) + ISNULL(t1.O4,0)
|
||
+ ISNULL(t1.O5,0) + ISNULL(t1.O6,0) + ISNULL(t1.O7,0) + ISNULL(t1.O8,0)
|
||
+ ISNULL(t1.O9,0) + ISNULL(t1.O10,0) + ISNULL(t1.O11,0) + ISNULL(t1.O12,0)
|
||
+ ISNULL(t1.O13,0) + ISNULL(t1.O14,0) + ISNULL(t1.O15,0) + ISNULL(t1.O16,0) AS 'CostAll'
|
||
,t2.FNUMBER
|
||
,t2_l.FNAME
|
||
,t2_l.FDESCRIPTION
|
||
FROM #初始数据 t0
|
||
LEFT JOIN #成本转换 t1 on t0.FBILLID = t1.FBILLID
|
||
AND t0.FBILLENTRYID = t1.FBILLENTRYID
|
||
INNER JOIN T_BD_MATERIAL t2 on t0.FPRODUCTID = t2.FMATERIALID
|
||
INNER JOIN T_BD_MATERIAL_L t2_l on t2_l.FMATERIALID = t0.FPRODUCTID AND t2_l.FLOCALEID = 2052
|
||
|
||
""".format(str(dateVal),whereSql)
|
||
|
||
# raise Exception(moSqlL);
|
||
datas = DBServiceHelper.ExecuteDynamicObject(this.Context, moSqlL);
|
||
if datas != None and datas.Count > 0:
|
||
# raise Exception(str(datas.Count));
|
||
proEntity = this.View.Model.BusinessInfo.GetEntryEntity("FEntity")
|
||
proRows = this.View.Model.GetEntityDataObject(proEntity)
|
||
|
||
this.View.Session["ProcessRateValue"] = 1
|
||
this.View.Model.BeginIniti();
|
||
proRows.Clear()
|
||
num = 0;
|
||
count = datas.Count
|
||
for data in datas:
|
||
row = DynamicObject(proEntity.DynamicObjectType)
|
||
costQ = 0
|
||
costT = 0
|
||
billno = data["FPRODUCTNO"]
|
||
|
||
num = num + 1
|
||
|
||
this.View.Session["ProcessRateValue"] = int(num * 100/ count);
|
||
this.View.Session["ProcessTips"] = "共{0}条数据,已处理{1}条数据，正在处理{2}".format(count,(num-1),billno);
|
||
resCost = GetExecCost(data["FPRODUCTNO"])
|
||
|
||
if resCost != None and resCost.Count > 0:
|
||
resCostRow = resCost[0]
|
||
costQ = resCostRow["costQ"]
|
||
costT = resCostRow["costT"]
|
||
|
||
row["FMoBillNo"] = data["FPRODUCTNO"]
|
||
row["FProMaterialNumber"] = data["FNUMBER"]
|
||
row["FProMaterialName"] = data["FNAME"]
|
||
row["FQUALIFIEDINQTY"] = data["FSTOCKINQUASELAUXQTY"]
|
||
row["FMaterialCostQ"] = costQ
|
||
row["FLaborCostS"] = data["O1"]
|
||
row["FProcessCostO"] = data["O"] + costT
|
||
row["FQ_O_S_T_R"] = data["R"] + costQ + costT
|
||
row["FSysCostP"] = data["P"]
|
||
# row["FO1"] = data["O1"]
|
||
row["FMaterialCostT"] = costT
|
||
row["FO2"] = data["O2"]
|
||
row["FO3"] = data["O3"]
|
||
row["FO4"] = data["O4"]
|
||
row["FO5"] = data["O5"]
|
||
row["FO6"] = data["O6"]
|
||
row["FO7"] = data["O7"]
|
||
row["FO8"] = data["O8"]
|
||
row["FO9"] = data["O9"]
|
||
row["FO10"] = data["O10"]
|
||
row["FO11"] = data["O11"]
|
||
row["FO12"] = data["O12"]
|
||
row["FO13"] = data["O13"]
|
||
row["FO14"] = data["O14"]
|
||
row["FO15"] = data["O15"]
|
||
row["FO16"] = data["O16"]
|
||
|
||
proRows.Add(row)
|
||
|
||
this.View.UpdateView("FEntity")
|
||
this.View.Model.EndIniti();
|
||
|
||
def DoComputeData(billNo):
|
||
|
||
|
||
|
||
return { "CostQ" : 0,"CostT": 0 ,"CostA": 0 }
|
||
|
||
def GetExecCost(billNo):
|
||
sqlL = """/*dialect*/
|
||
EXEC PROC_CB_PRODUCT_COST_SELECT_SINGLE '{0}'
|
||
""".format(billNo)
|
||
res = DBServiceHelper.ExecuteDynamicObject(this.Context, sqlL)
|
||
return res;
|
||
|
||
# 检查批号是否符合类型
|
||
def CheckLotText(lotText):
|
||
if len(lotText) < 12:
|
||
return False
|
||
|
||
lotFlag = lotText[:2]
|
||
if lotFlag == "WO" or lotFlag == "RO" or lotFlag == "TO" or lotFlag == "RT" :
|
||
return True
|
||
|
||
return False;
|
||
|
||
def showRslt(asynResult):
|
||
if (asynResult != None and asynResult.Exception != None):
|
||
this.View.ShowErrMessage(asynResult.Exception.Message);
|
||
#进度条达到100%之后，关闭进度条弹窗，回调此方法，弹出提示信息
|
||
def showFinishMsg(formResult):
|
||
this.View.ShowMessage("数据加载完成！");
|
||
|
||
def ShowProgressBar():
|
||
#调试执行任务时，可以先通过这两行调试任务执行代码
|
||
#因为启用进度条之后，是在子线程中运行，不方便分析代码问题。调试成功之后，再屏蔽这两行，启用进度条
|
||
# setData();
|
||
# return;
|
||
progressFormParameter = DynamicFormShowParameter();
|
||
progressFormParameter.PageId = Guid.NewGuid().ToString();
|
||
progressFormParameter.FormId = "BOS_ReportProgressMsg";
|
||
progressFormParameter.OpenStyle.ShowType = ShowType.Modal;
|
||
progressFormParameter.Caption = "正在加载数据...";
|
||
progressFormParameter.HiddenCloseButton = True;
|
||
#true表示使用真实进度，在执行任务的方法中更新进度值：代码示例，this.View.Session["ProcessRateValue"] =10
|
||
progressFormParameter.CustomParams.Add("UseTruePro", "true");
|
||
this.View.ShowForm(progressFormParameter,Action[FormResult](showFinishMsg));
|
||
MainWorker.QuequeTask(this.Context,Action(setData),Action[AsynResult](showRslt));
|
||
#自定义方法，在这里实现加载数据的任务，需要根据自己的个性化编写代码
|
||
def setData():
|
||
DoSetData(_whereSql)
|
||
#根据代码执行过程大致估算出进度值，整数，最后一定要有100%，否则进度弹窗无法自动关闭
|
||
this.View.Session["ProcessRateValue"] = 100;
|
||
#本案例是通过值更新事件，选择年份或者月份的时候，动态加载出对应的数据 |