表单插件--撤销按钮被点击后删除下游单据

# 开发时间：2024/7/29 15:34

##****************************表单插件--撤销按钮被点击后删除下游单据*******************
#引入clr运行库
import clr
clr.AddReference('System')
clr.AddReference('System.Data')
clr.AddReference('Kingdee.BOS.App')
clr.AddReference('Kingdee.BOS')
clr.AddReference('Kingdee.BOS.Core')
clr.AddReference('Kingdee.BOS.WebApi.FormService')
clr.AddReference('Kingdee.BOS.ServiceFacade.KDServiceFx')
clr.AddReference('Newtonsoft.Json')
from Kingdee.BOS.App.Data import *
from Kingdee.BOS import *
from Kingdee.BOS.Core.DynamicForm import *
from Kingdee.BOS.Core.DynamicService import *
from System import *
from System.Data import *
from System.Collections.Generic import *
from Kingdee.BOS.WebApi.FormService import *
from Kingdee.BOS.ServiceFacade.KDServiceFx import *
from Newtonsoft.Json.Linq import *


def BarItemClick(e):

    if e.BarItemKey=="tbCancelAssign":#自定义按钮的标识
    Billid = this.View.Model.DataObject["Id"].ToString();


    sql=("""/*dialect*/SELECT
    t2.FID 
FROM
    T_PRD_ISSUEMTRNOTICE t1
    LEFT JOIN (
    SELECT distinct FSourceBillId,
       fid = (
          stuff(
             ( SELECT ',' + CAST ( FID AS VARCHAR ( 20 ) ) FROM PZEJ_PRD_ISSNOTICE WHERE FSourceBillId = a.FSourceBillId FOR xml path ( '' ) ),
             1,
             1,
             '' 
          ) 
       ) 
    FROM
       PZEJ_PRD_ISSNOTICE a 
    ) t2  on t1.Fid=t2.FSourceBillId
WHERE
    t1.Fid = {0}""").format(Billid);#SQL语句，获取下游单据的FID，自行替换即可
    BillIdstr = str(DBUtils.ExecuteScalar(this.Context, sql, None))
    apiResult = DeleteBill(BillIdstr)

def DeleteBill(BillIdstr):
    jsonData = """{"Ids":"BIllIds"}"""
    json = jsonData.Replace("BIllIds", BillIdstr)
    apiResult = WebApiServiceCall.Delete(this.Context, "PZEJ_PRD_ISSUEMTRNOTICE", json)#WebApiServiceCall调用接口具体的操作标识
    return apiResult