生产任务单携带销售订单的客户名称(方法二)原创
金蝶云社区-GOICE
GOICE
1人赞赏了该文章 305次浏览 未经作者许可,禁止转载编辑于2022年03月12日 12:47:43

首先BOSIDE打开生产任务单,新增客户名称字段

图片.png

图片.png

第一步:-----查询单据模板ID(J01)
SELECT *
  FROM dbo.ICTransType
 WHERE FName LIKE '%生产任务%'
    OR FHeadTable = 'SEOrder';
图片.png
第二步:-----查询对应模板中"客户名称"字段对应的FFieldName(FHeadSelfJ0199)
SELECT *
  FROM dbo.ICTemplate
 WHERE FID = 'J01'
   AND (   FCaption LIKE '%销售%'
      OR   FCaption LIKE '%客户%'
      OR   FCaption LIKE '%委托加工单位%');
图片.png
第三步:------选单对应关系表中插入对应字段
INSERT INTO dbo.ICSelbills (FID,
                            FFieldName,
                            FDstCtlField,
                            FSelType,
                            FDK,
                            FColName,
                            FName,
                            FTableName,
                            FTableAlias,
                            FAction,
                            FROB,
                            FAllowEdited)
VALUES (N'J01', -- FID - nvarchar(50)
        N'FOrderInterID', -- FFieldName - nvarchar(50)
        N'FHeadSelfJ0199', -- FDstCtlField - nvarchar(50)
        2, -- FSelType - smallint
        0, -- FDK - int
        N'FCustID0', -- FColName - nvarchar(50)
        N'FCustID', -- FName - nvarchar(50)
        N'SEOrder', -- FTableName - nvarchar(50)
        N'v1', -- FTableAlias - nvarchar(50)
        N'(SELECT FItemID FROM t_Organization WHERE FItemID = v1.FCustID)', -- FAction - nvarchar(3000)
        0, -- FROB - int
        0 -- FAllowEdited - smallint
    ),
       (N'J01', -- FID - nvarchar(50)
        N'FOrderInterID', -- FFieldName - nvarchar(50)
        N'FHeadSelfJ0199', -- FDstCtlField - nvarchar(50)
        2, -- FSelType - smallint
        1, -- FDK - int
        N'FCustID1', -- FColName - nvarchar(50)
        N'FCustID', -- FName - nvarchar(50)
        N'SEOrder', -- FTableName - nvarchar(50)
        N'v1', -- FTableAlias - nvarchar(50)
        N'(SELECT FName FROM t_Organization WHERE FItemID = v1.FCustID)', -- FAction - nvarchar(3000)
        0, -- FROB - int
        0 -- FAllowEdited - smallint
       ),
       (N'J01', -- FID - nvarchar(50)
        N'FOrderInterID', -- FFieldName - nvarchar(50)
        N'FHeadSelfJ0199', -- FDstCtlField - nvarchar(50)
        2, -- FSelType - smallint
        2, -- FDK - int
        N'FCustID2', -- FColName - nvarchar(50)
        N'FCustID', -- FName - nvarchar(50)
        N'SEOrder', -- FTableName - nvarchar(50)
        N'v1', -- FTableAlias - nvarchar(50)
        N'(SELECT FNumber FROM t_Organization WHERE FItemID = v1.FCustID)', -- FAction - nvarchar(3000)
        0, -- FROB - int
        0 -- FAllowEdited - smallint
       );
第四步:------查询选单对应关系表ICSelbills
SELECT *
  FROM dbo.ICSelbills
 WHERE FID        = 'J01'
   AND FDstCtlField='FHeadSelfJ0199'
图片.png
第五步:----更改单据模板(FValueType = 1),否则"客户名称"字段显示为内码等
UPDATE dbo.ICTemplate
   SET FValueType = 1,
       FSaveValue = 1
 WHERE FID        = 'J01'
   AND FFieldName = 'FHeadSelfJ0199';




图标赞 1
1人点赞
还没有人点赞,快来当第一个点赞的人吧!
图标打赏
0人打赏
还没有人打赏,快来当第一个打赏的人吧!