Piolot_RepotForm_PeiHao/ZPR_SalesRportShareData.sql
2025-04-16 16:30:33 +08:00

155 lines
8.8 KiB
Transact-SQL

-- 检查存储过程是否存在,存在则删除
IF OBJECT_ID('dbo.[ZPR_SalesRportShareData]', 'P') IS NOT NULL
BEGIN
DROP PROCEDURE dbo.ZPR_SalesRportShareData;
PRINT '存储过程 dbo.[ZPR_SalesRportShareData] 已删除';
END
GO
-- 创建新的存储过程
CREATE PROCEDURE dbo.ZPR_SalesRportShareData
AS
BEGIN
-- 存储过程逻辑
TRUNCATE TABLE [ZZZ_SalesRportShareData];
INSERT INTO [ZZZ_SalesRportShareData]
([销售单主键ID],[销售员ID],[F_RecConditionId],[整单订单总额],[销售员],[分摊比例],[分摊金额],[SBU],[明细区域],[购货单位],[公司性质],[客户信用]
,[纸质合同号],[项目名称],[签订年份],[订单日期],[发货日期],[整单累计发货金额],[开票日期],[整单累计退货金额],[整单累计开票金额],[整单累计到款金额],[订单总额],[累计发货金额],[累计退货金额],[累计开票金额],[应收款合计]
,[累计到款金额],[组织ID],[销售订单编号],[收款条件主键ID],[收款条件],[应收单日期])
SELECT
[销售单主键ID],[销售员ID],[F_RecConditionId],[整单订单总额],[销售员],[分摊比例],[分摊金额],isnull([SBU],'其他') as [SBU],[明细区域],[购货单位],[公司性质],[客户信用]
,[纸质合同号],[项目名称],[签订年份],[订单日期],[发货日期],[整单累计发货金额],[开票日期],[整单累计退货金额],[整单累计开票金额], [整单累计到款金额],0 [订单总额]
,0 [累计发货金额],0 [累计退货金额],0 [累计开票金额],0 [应收款合计],0 [累计到款金额],[组织ID],[销售订单编号],[收款条件主键ID],[收款条件], [应收单日期]
FROM (
SELECT A.FID [销售单主键ID]
,ISNULL(O.fid,l.fid) [销售员ID]
,0 [收款条件主键ID] ,'' [收款条件], 0 F_RecConditionId
--,ISNULL(w.FENTRYID,0) [收款条件主键ID], ISNULL(w.FNAME,'') AS [收款条件], W.F_RecConditionId
,(SELECT SUM(FBillAllAmount_LC) FROM T_SAL_ORDERFIN FF WHERE FF.FID = A.FID )AS [整单订单总额]
,ISNULL(O.FNAME,L.FNAME) AS [销售员],CONVERT(DECIMAL(18,2),ISNULL(n.FSHARERATE,100)) AS [分摊比例]
,CONVERT(DECIMAL(18,6),ISNULL(n.FSHAREAMOUNT,fin.FBillAllAmount_LC)) [分摊金额]
,ISNULL(ACO.区域,ACL.区域) AS [SBU] , ISNULL (ACO.[明细区域] , ACL.明细区域) AS [明细区域],c.FNAME AS [购货单位] ,ISNULL(K.FDATAVALUE,'') AS [公司性质]
,P.FDATAVALUE AS [客户信用],A.F_contractnumber AS [纸质合同号] , G.FNAME AS [项目名称]
,CONVERT( NVARCHAR(10), YEAR(A.FAPPROVEDATE)) AS [签订年份],CONVERT(VARCHAR(10), A.FAPPROVEDATE,23) AS [订单日期]
,[发货日期]=ISNULL((SELECT (CONVERT(NVARCHAR(10),MAX(SAL.FDATE),23)) AS '发货日期' FROM T_SAL_DELIVERYNOTICE SAL
INNER JOIN T_SAL_DELIVERYNOTICEFIN B ON SAL.FID =B.FID
WHERE SAL.FDOCUMENTSTATUS= 'C' AND SAL.F_PAPERCONTRACT = A.F_contractnumber),'')
,[整单累计发货金额]=ISNULL( (SELECT SUM(B.FBillAllAmount_LC) AS '累计发货金额' FROM T_SAL_DELIVERYNOTICE SAL
INNER JOIN T_SAL_DELIVERYNOTICEFIN B ON SAL.FID =B.FID
WHERE SAL.FDOCUMENTSTATUS= 'C' AND SAL.F_PAPERCONTRACT = A.F_contractnumber),0)
,'' [开票日期]
--,[开票日期]=ISNULL((CASE WHEN SUBSTRING(U.FDATAVALUE,0,1)= 'W' THEN T.开票日期 ELSE T.没有红色的开票日期 END ),'')
,[整单累计退货金额]=ISNULL((
SELECT SUM(B.FBillAllAmount_LC) AS '累计退货金额'
FROM T_SAL_RETURNSTOCK AA
INNER JOIN T_SAL_RETURNSTOCKFIN B ON AA.FID =B.FID
WHERE AA.FDOCUMENTSTATUS= 'C' AND A.F_contractnumber = AA.F_contractnumber ),0)
, [整单累计开票金额]=0
--,[整单累计开票金额] =ISNULL( CASE WHEN SUBSTRING(U.FDATAVALUE,0,1)= 'W' THEN AD.发票总金额 ELSE AD.[发票总金额(普票存财务)] END,0)
,A.FSALEORGID as '组织ID'
,0 '天数'
--,W.F_DAY AS '天数'
,a.FBILLNO [销售订单编号]
,[应收单日期]=''
--,[应收单日期]=(T.[开票日期])
,[整单累计到款金额]= ISNULL(a.F_Amount,0)
-----------------from 表--------
FROM T_SAL_ORDER A WITH(NOLOCK)
--LEFT JOIN (
--SELECT DISTINCT x.FNAME +'--'+CONVERT(NVARCHAR(50), CONVERT(INT, w.F_DAY))+'--'+CONVERT(NVARCHAR(50),CONVERT(DECIMAL(18,2), w.FRECADVANCERATE))+'%' AS FNAME
--,w.FID,w.F_PMSDate
--,W.FRECADVANCEAMOUNT,w.F_DAY
--,w.FENTRYID, W.F_RecConditionId ,w.FRECADVANCERATE
--FROM T_SAL_ORDERPLAN w WITH(NOLOCK)
-- LEFT JOIN T_BD_RecCondition_L X ON X.FID = W.F_RecConditionId
--) w ON w.FID=A.FID
LEFT join (Select a2.FENTRYID,a2.FDATAVALUE From T_BAS_ASSISTANTDATAENTRY a1 JOIN T_BAS_ASSISTANTDATAENTRY_L a2 on a1.FENTRYID = a2.FENTRYID
Where a1.FID = '670cc977263353') B on A.F_ORDERCATEGORY = B.FENTRYID
LEFT JOIN T_BD_CUSTOMER_L C WITH(NOLOCK) ON C.FCUSTID= A.FCUSTID AND C.FLOCALEID= 2052
left JOIN T_PerformanceSharingEntry TPS ON TPS.fid=a.FID
LEFT JOIN V_BD_SALESMAN_L L WITH(NOLOCK) ON L.fid = A.FSALERID
LEFT JOIN T_PerformanceSharing M WITH(NOLOCK) ON M.FSOURCEBILLNO = A.FBILLNO AND M.FDOCUMENTSTATUS = 'C'
LEFT JOIN T_PerformanceSharingEntry N WITH(NOLOCK) ON N.FID=M.FID
LEFT JOIN V_BD_SALESMAN_L O WITH(NOLOCK) ON O.fid= N.FSALEID
LEFT JOIN (SELECT DISTINCT ACO22.名称,ACO22.明细区域,ACO22.区域 FROM ERPTOHR.HYHRV3.dbo.v_erp_empinfo ACO22 ) ACO ON ACO.名称=O.FNAME AND ISNULL(ACO.明细区域,'') != ''
LEFT JOIN (SELECT DISTINCT ACL22.名称,ACL22.明细区域 ,ACL22.区域 FROM ERPTOHR.HYHRV3.dbo.v_erp_empinfo ACL22 ) ACL ON ACL.名称=L.FNAME AND ISNULL(ACL.明细区域,'') != ''
LEFT JOIN T_SAL_ORDERFIN fin WITH(NOLOCK) ON a.FID=fin.FID
LEFT JOIN T_BD_CUSTOMER I WITH(NOLOCK) ON I .FCUSTID = A.FCUSTID
lEFT JOIN V_ASSISTANTDATA K WITH(NOLOCK) ON K.FENTRYID = i.FCompanyNature
LEFT JOIN V_ASSISTANTDATA P WITH(NOLOCK) ON P.FENTRYID = I.F_CREDITCLASSIFICATION
LEFT JOIN T_BAS_PREBDONE_L G WITH(NOLOCK) ON G.FID = A.F_projectname AND G.FLocaleID =2052
-- LEFT JOIN
--(
-- SELECT F_Paper ,CONVERT(NVARCHAR(10), MAX(FDATE),23) AS '开票日期'
-- ,CONVERT(NVARCHAR(10), MAX(FDATE),23) AS '没有红色的开票日期'
-- FROM t_AR_receivable A
-- INNER JOIN T_AR_RECEIVABLEENTRY B ON A.FID = B.FID
-- WHERE A.FDOCUMENTSTATUS = 'C' AND A.FCancelStatus = 'A'
-- GROUP BY F_Paper
--) T ON T.F_PAPER = A.F_contractnumber
LEFT JOIN V_ASSISTANTDATA U ON U.FENTRYID = A.F_Ordercategory
-- LEFT JOIN
--(
-- SELECT
-- F_Papercontract,CAST( sum(b.FALLAMOUNT) AS DECIMAL(18,6)) AS '发票总金额',
-- CAST (sum(CASE WHEN F_Papercontract = 'Y' THEN b.FALLAMOUNT ELSE 0 END ) AS DECIMAL(18,6)) AS '发票总金额(普票存财务)'
-- FROM t_AR_receivable A
-- INNER JOIN T_AR_RECEIVABLEFIN B ON A.FID = B.FID
-- GROUP BY F_Papercontract
--) AD ON AD.F_PAPERCONTRACT = A.F_contractnumber
--LEFT join
--(
-- SELECT a.F_Papercontract,
-- sum(d.FCURWRITTENOFFAMOUNT) as '累计收款'
-- FROM t_AR_receivable A
-- INNER JOIN T_AR_RECEIVABLEENTRY E ON E.FID =A.FID
-- INNER JOIN T_AR_RECMacthLogENTRY B ON A.FBILLNO = B.FSRCBILLNO
-- INNER JOIN T_AR_RECMacthLog C ON C.FID = B.FID
-- INNER JOIN T_AR_RECMacthLogENTRY D ON D.FID = B.FID
-- AND D.FSOURCETYPE = '36cf265bd8c3452194ed9c83ec5e73d2'
-- WHERE
-- 1=1
-- group by a.F_Papercontract
--) AE ON AE.F_Papercontract = A.F_contractnumber
LEFT JOIN (SELECT DISTINCT F_Papercontract FROM T_SAL_DELIVERYNOTICE WHERE F_SFYFH ='') AB ON AB.F_PAPERCONTRACT = A.F_contractnumber
WHERE ( ( A.FSALEORGID = 100302 AND (
(ACO.区域 != '碳索智控' OR ACO.区域 IS null )
AND (ACL.区域 != '碳索智控' OR ACL.区域 IS null )
AND ( C.FNAME NOT IN ('派诺科技(香港)有限公司','武汉派诺科技发展有限公司','客户-样机使用'
,'珠海华夏云联技术有限公司','广东碳索智控科技有限公司')
or ( C.FNAME='珠海兴诺能源技术有限公司' AND (ACO.区域 != '决策团队' OR ACO.区域 IS null ) ) )
AND L.FNAME NOT IN ('兴诺总','陈智勇') )
AND EXISTS(SELECT 1 FROM T_SAL_ORDERENTRY bb WHERE bb.fid=a.fid AND A.FManualClose <> '1'
AND BB.FManualRowClose <> '1' ) AND SUBSTRING(A.F_contractnumber,1,1) != 'Z' AND A.F_contractnumber NOT IN ('CYJSQD2024123118401','CYJSQD2025011518501') ) OR A.FSALEORGID != 100302 )
AND A.FDocumentStatus = 'C'
) A
WHERE [整单订单总额]<>0
ORDER BY A.[销售单主键ID],[销售员ID]
UPDATE [ZZZ_SalesRportShareData] SET [订单总额]=[整单订单总额]*[分摊比例]*0.01,[累计发货金额]=[整单累计发货金额]*[分摊比例]*0.01,[累计退货金额]=[整单累计退货金额]*[分摊比例]*0.01
,[累计开票金额]=[整单累计开票金额]*[分摊比例]*0.01,[累计到款金额]=[整单累计到款金额]*[分摊比例]*0.01
,[应收款合计]=[分摊金额]-([整单累计退货金额]+[整单累计到款金额])*[分摊比例]*0.01
FROM [ZZZ_SalesRportShareData] A
UPDATE [ZZZ_SalesRportShareData] SET [订单日期]=CASE WHEN [订单日期] > '1990-01-01' THEN [订单日期] ELSE NULL END ,
[发货日期]=CASE WHEN [发货日期] > '1990-01-01' THEN [发货日期] ELSE NULL END
,[开票日期]=CASE WHEN [开票日期] > '1990-01-01' THEN [开票日期] ELSE NULL END
END
GO
EXEC ZPR_SalesRportShareData;