ch
2022-05-30 f9ef44a67fbf73f073efe65600bc25e204fde04f
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
using System;
using System.Collections.Generic;
using System.Text;
using System.Data;
 
namespace BLL
{
    public class ClsKf_OtherInBackBill
    {
 
 
        //生成其他入库单(红字) 
        public bool set_SaveOtherInBackBill_New(Model.ClsKf_ICStockBillMain oMain, string sHSourceType, ref string sErrMsg)
        {
            //获取系统参数
            Pub_Class.ClsXt_SystemParameter oSystemParameter = new Pub_Class.ClsXt_SystemParameter();
            if (oSystemParameter.ShowBill(ref sErrMsg) == false)
            {
                sErrMsg = "获取系统参数失败! " + sErrMsg;
                return false;
            }
            //
            if (oSystemParameter.omodel.Kf_OtherInBackBill_ERPMode.ToUpper() == "WISE") //判断同步模式是金蝶WISE
            {
                if (SaveOtherInBackBill_K3(oMain, sHSourceType, oSystemParameter.omodel, ref sErrMsg))
                {
                    //"保存成功!";
                    sErrMsg = "保存成功!" + oMain.HBillNo;
                    return true;
                }
                else
                {
                    //"保存失败!";
                    sErrMsg = sErrMsg;
                    return false;
                }
            }
            if (oSystemParameter.omodel.Kf_OtherInBackBill_ERPMode.ToUpper() == "CLOUD")  //判断同步模式是金蝶CLOUD
            {
 
            }
 
            sErrMsg = "保存其他入库单(红字)失败!" + sErrMsg;
            return false;
        }
         
        
 
        /// <summary>
        /// 生成其他入库单(红字)K3
        /// </summary>
        /// <param name="oMain"></param>
        /// <param name="sErrMsg"></param>
        /// <returns></returns>
        public bool SaveOtherInBackBill_K3(Model.ClsKf_ICStockBillMain oMain, string sHSourceType, Pub_Class.ClsXt_SystemParameterMain oSystemParameterMain, ref string sErrMsg)
        {
            SQLHelper.ClsCN oCn = new SQLHelper.ClsCN();
            DAL.ClsKf_OtherInBackBill dal = new DAL.ClsKf_OtherInBackBill();
            dal.omodel = oMain;
            //上传前必填项判断
            if (oMain.HDeptID == 0)
            {
                sErrMsg = "部门没有选择!";
                return false;
            }
            if (oMain.HSecManagerID == 0)
            {
                sErrMsg = "验收没有选择!";
                return false;
            }
            if (oMain.HKeeperID == 0)
            {
                sErrMsg = "保管没有选择!";
                return false;
            }
 
            try
            {
                //判断会计期是否合理
                string s = "";
                int sYear = 0;
                int sPeriod = 0;
                if (DBUtility.Xt_BaseBillFun.Fun_AllowYearPeriod(oMain.HDate, ref sYear, ref sPeriod, ref s) == false)
                {
                    sErrMsg = s;
                    return false;
                }
                oMain.HYear = sYear;
                oMain.HPeriod = sPeriod;
 
                DataSet Ds;
                oCn.BeginTran();
                //生成出入库单据
                //插入子表
                oCn.RunProc("EXEC h_p_Kf_OtherInBackBillSub_Insert_New " + oMain.HInterID.ToString() + ",'" + oMain.HBillNo + "','" + sHSourceType + "'");
                //插入主表
                oCn.RunProc("Insert Into Kf_ICStockBillMain   " +
                "(HBillType,HBillSubType,HInterID,HBillNo,HDate,HMainSourceBillType" +
                ",HYear,HPeriod,HRemark,HMaker,HMakeDate" +
                ",HSupID,HWHID,HSCWHID,HEmpID,HManagerID,HSecManagerID" +
                ",HKeeperID,HDeptID,HExplanation,HInnerBillNo,HRedBlueFlag" +
                ") " +
                " values('1248','1248'," + oMain.HInterID.ToString() + ",'" + oMain.HBillNo + "',convert(varchar(10),getdate(),120),'" + oMain.HMainSourceBillType + "'" +
                ", " + oMain.HYear.ToString() + "," + oMain.HPeriod.ToString() + ",'" + oMain.HRemark + "','" + oMain.HMaker + "',convert(varchar(10),getdate(),120)" +
                ", " + oMain.HSupID.ToString() + "," + oMain.HWHID.ToString() + "," + oMain.HSCWHID.ToString() + "," + oMain.HEmpID.ToString() + "," + oMain.HManagerID.ToString() + "," + oMain.HSecManagerID.ToString() +
                ", " + oMain.HKeeperID.ToString() + "," + oMain.HDeptID.ToString() + ",'" + oMain.HExplanation + "','" + oMain.HInnerBillNo + "'," + DBUtility.ClsPub.BoolToString(oMain.HRedBlueFlag) +
                ") ");
 
                //新增K3子表、主表
                oCn.RunProc("exec h_p_IFK3_ToERP_OtherInBackBill_Insert_New " + oMain.HInterID.ToString() + ",'" + oMain.HBillNo + "'," + oMain.HBillerID.ToString() + ",'" + sHSourceType + "'");
 
                //更新关联数量
                //回填K3关联数量
                oCn.RunProc("exec h_p_IFK3_ToERP_OtherInBackBill_UpdateBillRelateData " + oMain.HInterID.ToString());
 
                //审核单据
                if (oSystemParameterMain.Kf_OtherInBackBill_AutoCheck == "Y") //系统参数  自动审核 
                {
                    //审核单据
                    oCn.RunProc("Update Kf_ICStockBillMain Set HChecker='" + oMain.HMaker + "',HCheckDate=convert(varchar(10),getdate(),120) where HInterID= " + oMain.HInterID.ToString());
 
                    //审核K3单据
                    oCn.RunProc("exec h_p_IFK3_ToERP_OtherInBackBill_Check " + oMain.HInterID.ToString() + "," + oMain.HBillerID.ToString());
                    //更新K3库存
                    oCn.RunProc("exec h_p_IFK3_ToERP_OtherInBackBill_UpdateStock " + oMain.HInterID.ToString());
                    oCn.RunProc("exec h_p_IFK3_ToERP_OtherInBackBill_UpdateOrderStock " + oMain.HInterID.ToString());
                }
 
                //K3负库存判断
                if (oSystemParameterMain.WMS_ERPStockCtl == "Y") //系统参数  提交后ERP负库存控制 
                {
                    //判断条码库存是否异常(负库存、库存大于条码初始化)
                    Ds = oCn.RunProcReturn("EXEC h_p_KF_ICInventoryBarCodeQtyCtrl  " + oMain.HInterID.ToString(), "h_p_KF_ICInventoryBarCodeQtyCtrl");
                    if (DBUtility.ClsPub.isLong(Ds.Tables[0].Rows[0][0]) == 1)
                    {
 
                    }
                    else
                    {
                        sErrMsg = DBUtility.ClsPub.isStrNull(Ds.Tables[0].Rows[0][1]);
                        oCn.RollBack();
                        return false;
                    }
                }
                sErrMsg = "新增单据成功!";
                oCn.Commit();
                return true;
            }
            catch (Exception e)
            {
                sErrMsg = "生成其他入库单(红字)失败!" + e.Message;
                oCn.RollBack();
                return false;
            }
        }
        
 
 
    }
}