/// <summary>
/// 创建生产计划
/// </summary>
/// <param name="scjh"></param>
public static void CreatScJh(YK_ZJJG_JH jh, List <Jhmx_lstYlmx> lst, RelationalDatabase db, string ywlx, int jgbm)
{
//插入计划表数据
//插入计划明细表数据-插入原料消耗明细-办理原料消耗出库
try
{
//db.BeginTransaction();
#region 插入原料消耗出库单据头
Guid ck_djid;
int ck_err_code = 0; //保存单据头存储过程错误代码
string ck_err_text = ""; //保存单据头存储过程错误文本
long ck_djh = Yp.SeekNewDjh(ywlx, jh.deptid, db);
long ck_sdjh = Yp.SeekNewDjh(ywlx, jh.deptid, db);
decimal ck_sumjhje = 0;
decimal ck_sumpfje = 0;
decimal ck_sumlsje = 0;
int deptid = jh.deptid;
int uid = jh.djy;
string sDate = db.GetDataResult(db.GetServerTimeString()).ToString();//当前服务器时间
foreach (Jhmx_lstYlmx jhmx_lstYlmx in lst)
{
foreach (YK_ZJJG_YLMX ylmx in jhmx_lstYlmx.lstYlmx)
{
ck_sumjhje += ylmx.jhj * ylmx.sl;
ck_sumpfje += ylmx.pfj * ylmx.sl;
ck_sumlsje += ylmx.lsj * ylmx.sl;
}
}
Yk_dj_djmx.SaveDJ(new Guid(Guid.Empty.ToString()),
ck_djh, //单据号
deptid, //仓库id
ywlx, //业务类型
deptid, + //往来单位
0, //经手人
DateTime.Now.ToShortDateString(),
uid,
Convert.ToDateTime(sDate).ToShortDateString(),
Convert.ToDateTime(sDate).ToLongTimeString(),
"", //发票号
"", //发票日期
"", //备注
"", //送货单号
0, //原因代码
0, //申请单号
ck_sumjhje,
ck_sumpfje,
ck_sumlsje,
ck_sdjh.ToString(),
out ck_djid, out ck_err_code, out ck_err_text, jgbm, db);
#endregion
#region 插入生产计划
jh.ckdjid = ck_djid;//回填计划表中 消耗出库单据id
jh.djh = YK_ZJJG_JH.SeekNewJhDjh(db, jh.ywlx, deptid);
YK_ZJJG_JH.SaveJh(db, jh, 0);
#endregion
foreach (Jhmx_lstYlmx jhmx_lstYlmx in lst)
{
#region 插入计划明细
YK_ZJJG_JHMX jhmx = jhmx_lstYlmx.jhmx;
jhmx.djid = jh.id; //计划id
jhmx.djh = Convert.ToInt32(jh.djh); //计划号
Guid jhmxid = jhmx.id;
YK_ZJJG_JHMX.SaveJhmx(jhmx, db, 0);
#endregion
int pxxh = 0;
foreach (YK_ZJJG_YLMX ylmx in jhmx_lstYlmx.lstYlmx)
{
pxxh += 1;
#region 构造原料消耗出库单据明细
//int ck_djmx_err_code = 0;
//string ck_djmx_err_text = "";
Guid ck_djmxid = Guid.NewGuid();
Ypcj YPCJ = new Ypcj(ylmx.cjid, db);
Ypgg YPGG = new Ypgg(YPCJ.GGID, db);
////此方法不再使用 统一方法
//InsertDjmx(db,
// ck_djmxid, ck_djid, ylmx.cjid,0,"",
// ylmx.yppm, ylmx.yppm, ylmx.ypgg, ylmx.sccj, ylmx.ph,
// ylmx.xq.ToShortDateString(), 0, 0, ylmx.sl, ylmx.ypdw,
// YPGG.YPDW,1,YPCJ.ZBJ, YPCJ.PFJ, YPCJ.LSJ,
// YPCJ.ZBJ * ylmx.sl,YPCJ.PFJ * ylmx.sl, YPCJ.LSJ * ylmx.sl, ck_djh,
// deptid, ywlx, "","", pxxh, 1);
int err_code = 0;
string err_text = "";
Yk_dj_djmx.SaveDJMX_ID(Guid.Empty, ck_djid, ylmx.cjid, 0, "",
ylmx.yppm, ylmx.yppm, ylmx.ypgg, ylmx.sccj, ylmx.ph,
ylmx.xq.ToShortDateString(), 0, 0, ylmx.sl, ylmx.ypdw,
YPGG.YPDW, 1,
0, //YPCJ.MRJJ, //ypcjd中默认进价
YPCJ.PFJ, //批发价
YPCJ.LSJ, //零售价
0, //YPCJ.MRJJ * ylmx.sl/jhmx.ydwbl, //ypcjd中默认进价*原料数量
YPCJ.PFJ * ylmx.sl / jhmx.ydwbl, //批发金额
YPCJ.LSJ * ylmx.sl / jhmx.ydwbl, //零售金额
ck_djh,
deptid, ywlx, "", "", out err_code, out err_text, db, pxxh, out ck_djmxid, "", Guid.Empty);
if (err_code != 0)
{
throw new Exception(err_text);
}
#endregion
#region 插入原料消耗明细
ylmx.ckmxid = ck_djmxid; //原料消耗出库单据明细id
ylmx.djid = jh.id; //原料出库单据id
ylmx.jhmxid = jhmxid; //计划明细id
ylmx.djh = Convert.ToInt32(jh.djh); //计划号
YK_ZJJG_YLMX.SaveYlmx(ylmx, db);
#endregion
}
}
#region 审核消耗出库单据
Yk_dj_djmx.Shdj(ck_djid, db.GetDataResult(db.GetServerTimeString()).ToString(), db);
#endregion
#region 更新库存
int upt_err_code = 0;
string upt_err_text = "";
Yk_dj_djmx.AddUpdateKcmx(ck_djid, out upt_err_code, out upt_err_text, Convert.ToInt64(jgbm), db);
if (upt_err_code != 0)
{
throw new Exception(upt_err_text.ToString());
}
#endregion
//db.CommitTransaction();
}
catch (Exception err)
{
//db.RollbackTransaction();
throw err;
}
}
//数据入账
private void button1_Click(object sender, System.EventArgs e)
{
DataTable tbsl = (DataTable)this.myDataGrid1.DataSource;
for (int i = 0; i <= tbsl.Rows.Count - 1; i++)
{
if (Math.Abs(Convert.ToDouble(tbsl.Rows[i]["数量误差"])) >= 0.2)
{
MessageBox.Show("当有数量误差时不能作账务调整，必须先解决数量误差，请和管理员联系!");
return;
}
}
DataTable tbje = (DataTable)this.myDataGrid2.DataSource;
if (tbje.Rows.Count == 0)
{
MessageBox.Show("没有需要作调整的数据"); return;
}
if (MessageBox.Show("您确定要将金额误差数据作账务处理行吗 ？", "询问窗", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button2) == DialogResult.No)
{
return;
}
decimal sumlsje = 0;
decimal sumpfje = 0;
decimal sumjhje = 0;
for (int i = 0; i <= tbje.Rows.Count - 1; i++)
{
sumjhje = sumjhje + Convert.ToDecimal(tbje.Rows[i]["进货金额差值"]);
sumlsje = sumlsje + Convert.ToDecimal(tbje.Rows[i]["零售金额差值"]);
sumpfje = sumpfje + Convert.ToDecimal(tbje.Rows[i]["批发金额差值"]);
}
// if (sumlsje>=100 || sumpfje>=100)
// {
// MessageBox.Show("调整金额太大了，系统数据可能存在问题！请和管理员联系");
// return;
// }
long djh = 0; //单据号
Guid djid = Guid.Empty;
int err_code = 0; //错误号
string err_text = ""; //借误文本
string sDate = DateManager.ServerDateTimeByDBType(InstanceForm.BDatabase).ToString(); //登记时间
this.button1.Enabled = false;
try
{
InstanceForm.BDatabase.BeginTransaction();
//产生单据号
djh = Yp.SeekNewDjh(_menuTag.FunctionTag.Trim(), InstanceForm.BCurrentDept.DeptId, InstanceForm.BDatabase);
//保存单据表头
YF_DJ_DJMX.SaveDJ(Guid.Empty,
djh,
InstanceForm.BCurrentDept.DeptId,
"012",
InstanceForm.BCurrentDept.DeptId,
0,
Convert.ToDateTime(sDate).ToShortDateString(),
InstanceForm.BCurrentUser.EmployeeId,
Convert.ToDateTime(sDate).ToShortDateString(),
Convert.ToDateTime(sDate).ToLongTimeString(),
"",
"",
"",
"", 0, 0, sumjhje, sumpfje, sumlsje, out djid, out err_code, out err_text, InstanceForm._menuTag.Jgbm, InstanceForm.BDatabase);
if (err_code != 0)
{
throw new System.Exception(err_text);
}
//保存单据明细
DataTable tb = (DataTable)this.myDataGrid2.DataSource;
if (tb.Rows.Count == 0)
{
throw new Exception("没有可保存的记录");
}
for (int i = 0; i <= tb.Rows.Count - 1; i++)
{
YF_DJ_DJMX.SaveDJMX(Guid.Empty,
djid,
Convert.ToInt32(tb.Rows[i]["cjid"]),
0,
tb.Rows[i]["货号"].ToString(),
tb.Rows[i]["品名"].ToString(),
tb.Rows[i]["商品名"].ToString(),
tb.Rows[i]["规格"].ToString(),
tb.Rows[i]["厂家"].ToString(),
"",
"",
0,
0,
0,
Convert.ToString(tb.Rows[i]["单位"]),
Yp.SeekYpdw(Convert.ToString(tb.Rows[i]["单位"]), InstanceForm.BDatabase),
Convert.ToInt32(tb.Rows[i]["dwbl"]),
0,
0,
0,
Convert.ToDecimal(tb.Rows[i]["进货金额差值"]) * (-1),
Convert.ToDecimal(tb.Rows[i]["批发金额差值"]) * (-1),
Convert.ToDecimal(tb.Rows[i]["零售金额差值"]) * (-1),
djh,
InstanceForm.BCurrentDept.DeptId,
_menuTag.FunctionTag.Trim(),
"",
"",
out err_code, out err_text, InstanceForm.BDatabase, i,
tb.Rows[i]["批次号"].ToString(),
new Guid(tb.Rows[i]["kcid"].ToString()));
if (err_code != 0)
{
throw new System.Exception(err_text);
}
}
//审核单据
YF_DJ_DJMX.Shdj(djid,
sDate, InstanceForm.BDatabase);
//提交事务
InstanceForm.BDatabase.CommitTransaction();
MessageBox.Show(err_text);
}
catch (System.Exception err)
{
InstanceForm.BDatabase.RollbackTransaction();
this.button1.Enabled = true;
MessageBox.Show(err.Message + err.Source);
}
}
/// <summary>
/// 审核生产计划
/// </summary>
/// <param name="scjh"></param>
public static void ShScJh(YK_ZJJG_JH jh, List <YK_ZJJG_JHMX> lstjhmx, RelationalDatabase db, string ywlx, int jgbm)
{
//更新计划明细-更新原料消耗明细-更新计划表
//办理加工入库
try
{
List <YK_ZJJG_JH> lstjh_check = YK_ZJJG_JH.GetJhList(string.Format(" and a.id='{0}' ", jh.id), "", db);
if (lstjh_check.Count <= 0)
{
throw new Exception("审核失败！找不到该计划,请刷新数据后重试！");
}
else
{
YK_ZJJG_JH jh_check = lstjh_check[0];
if (jh_check.bshbz == 1)
{
throw new Exception("审核失败！请刷新数据后重试！");
}
if (jh_check.bscbz == 1)
{
throw new Exception("审核失败！该计划已经被删除，请刷新数据！");
}
}
#region 插入加工入库单据头
Guid rk_djid;
int rk_err_code = 0; //保存单据头存储过程错误代码
string rk_err_text = ""; //保存单据头存储过程错误文本
long rk_djh = Yp.SeekNewDjh(ywlx, jh.deptid, db);
long rk_sdjh = Yp.SeekNewDjh(ywlx, jh.deptid, db);
decimal rk_sumjhje = 0;
decimal rk_sumpfje = 0;
decimal rk_sumlsje = 0;
int deptid = jh.deptid;
int uid = jh.djy;
string sDate = (db.GetDataResult(db.GetServerTimeString())).ToString();//当前服务器时间
foreach (YK_ZJJG_JHMX jhmx in lstjhmx)
{
rk_sumjhje += jhmx.jhj * jhmx.cpsl;
rk_sumpfje += jhmx.pfj * jhmx.cpsl;
rk_sumlsje += jhmx.lsj * jhmx.cpsl;
}
Yk_dj_djmx.SaveDJ(new Guid(Guid.Empty.ToString()),
rk_djh, //单据号
deptid, //仓库id
ywlx, //业务类型
deptid, //往来单位
0, //经手人
DateTime.Now.ToShortDateString(),
uid,
Convert.ToDateTime(sDate).ToShortDateString(),
Convert.ToDateTime(sDate).ToLongTimeString(),
"",
"",
"",
"",
0,
0,
rk_sumjhje,
rk_sumpfje,
rk_sumlsje,
rk_sdjh.ToString(),
out rk_djid, out rk_err_code, out rk_err_text, jgbm, db);
#endregion
#region 更新计划
//if (jh.bshbz == 1) throw new Exception("该计划已经审核！");
jh.bshbz = 1;
jh.rkdjid = rk_djid;
jh.shrq = Convert.ToDateTime(db.GetDataResult(db.GetServerTimeString()));
YK_ZJJG_JH.SaveJh(db, jh, 1);
#endregion
#region 更新计划明细
int pxxh = 0;
foreach (YK_ZJJG_JHMX jhmx in lstjhmx)
{
pxxh += 1;
//计算成本价
List <YK_ZJJG_YLMX> lstYlmx = YK_ZJJG_YLMX.GetYlmxList(string.Format(" and b.id='{0}'", jhmx.id), "", db);
decimal sumYlpfje = 0;
foreach (YK_ZJJG_YLMX ylmx in lstYlmx)
{
sumYlpfje += ylmx.pfj * ylmx.sl;
}
if (jhmx.cpsl == 0)
{
throw new Exception("成品数量不能为0");
}
jhmx.cbj = Convert.ToDecimal(sumYlpfje / jhmx.cpsl); //成本价
#region 插入加工入库单据明细
//int rk_djmx_err_code = 0;
//string rk_djmx_err_text = "";
Guid rk_djmxid = Guid.Empty;
Ypcj YPCJ = new Ypcj(jhmx.cjid, db);
Ypgg YPGG = new Ypgg(YPCJ.GGID, db);
//此方法不再使用 统一方法
//InsertDjmx(db, rk_djmxid, rk_djid, jhmx.cjid,
// 0, "", jhmx.yppm, jhmx.yppm, jhmx.ypgg,
// jhmx.sccj, jhmx.ph,
// jhmx.xq.ToShortDateString(), 0, 0, jhmx.cpsl, jhmx.ypdw, YPGG.YPDW, 1,
// YPCJ.ZBJ, YPCJ.PFJ, YPCJ.LSJ, YPCJ.ZBJ * jhmx.cpsl,
// YPCJ.PFJ * jhmx.cpsl, YPCJ.LSJ * jhmx.cpsl, rk_djh, deptid, ywlx, "", rk_sdjh.ToString(),
// pxxh, 1);
int err_code = 0;
string err_text = "";
//20140211 ncq 将成品入库批发价 设定为成本价 系统对账将会出现批发金额不对问题
Yk_dj_djmx.SaveDJMX_ID(Guid.Empty, rk_djid, jhmx.cjid, 0, "",
jhmx.yppm, jhmx.yppm, jhmx.ypgg, jhmx.sccj, jhmx.ph,
jhmx.xq.ToShortDateString(), 0, 0, jhmx.cpsl, jhmx.ypdw, YPGG.YPDW, 1,
0, //YPCJ.MRJJ, //ypcjd中默认进价
YPCJ.PFJ, //批发价 //jhmx.cbj, //成本价
YPCJ.LSJ, //零售价
//jhmx.cpsl*YPCJ.MRJJ,//ypcjd中默认进价*成品数量
0, //YPCJ.MRJJ * jhmx.cpsl/jhmx.ydwbl,//进货金额
jhmx.cpsl * YPCJ.PFJ / jhmx.ydwbl, //批发金额 //jhmx.cbj * jhmx.cpsl/jhmx.ydwbl, //采用成本价计算批发金额
YPCJ.LSJ * jhmx.cpsl / jhmx.ydwbl, //零售金额
rk_djh, deptid, ywlx, "", rk_sdjh.ToString(),
out err_code, out err_text, db, pxxh, out rk_djmxid, "", Guid.Empty);
if (err_code != 0)
{
throw new Exception(err_text);
}
#endregion
#region 更新计划明细
jhmx.cpl = Convert.ToDecimal(jhmx.cpsl / jhmx.jhsl); //成本率
jhmx.rkdjmxid = rk_djmxid; //更新计划明细中 入库单据明细id
jhmx.djid = jh.id;
jhmx.djh = Convert.ToInt32(jh.djh);
YK_ZJJG_JHMX.SaveJhmx(jhmx, db, 1);
#endregion
}
#endregion
#region 审核加工入库单据
Yk_dj_djmx.Shdj(rk_djid, db.GetDataResult(db.GetServerTimeString()).ToString(), db);
#endregion
#region 更新库存
int upt_err_code = 0;
string upt_err_text = "";
//MessageBox.Show(rk_djid.ToString());
Yk_dj_djmx.AddUpdateKcmx(rk_djid, out upt_err_code, out upt_err_text, Convert.ToInt64(jgbm), db);
if (upt_err_code != 0)
{
throw new Exception(upt_err_text.ToString());
}
//MessageBox.Show(upt_err_text);
#endregion
}
catch (Exception err)
{
throw err;
}
}
//由盘存明细数量生成盘点明细 并插入单据 及单据明细
public static void Insert_dj_djmx_kcmx(Guid djid_pd, RelationalDatabase db, out Guid djid)
{
try
{
int day = -90; //盘盈逆推天数
string pcglfs = "0"; //批次管理方式 0-先进先出 1-效期优先
pcglfs = (new SystemCfg(8051)).Config;
string ssql = string.Format(@" select * from yf_pd where id='{0}'", djid_pd);
DataTable tbTemp = db.GetDataTable(ssql);
if (tbTemp.Rows.Count <= 0)
{
throw new Exception("找不到盘存录入表");
}
int deptid = Convert.ToInt32(tbTemp.Rows[0]["deptid"]);//科室id
int uid = Convert.ToInt32(tbTemp.Rows[0]["djy"]);
int jgbm = Convert.ToInt32(tbTemp.Rows[0]["jgbm"]);
bool byk = YpConfig.是否药库(deptid, db);//是否药库
string strTbKcph = "yk_kcph";
string strTbKcmx = "yk_kcmx";
if (!byk)
{
strTbKcph = "yf_kcph";
strTbKcmx = "yf_kcmx";
}
ssql = string.Format(@" select b.kcl,a.zcs*b.dwbl/a.ydwbl zcsl,a.pcs*b.dwbl/a.ydwbl pcsl,
a.cjid,c.ggid,b.zxdw zxdw, dbo.fun_yp_ypdw(b.zxdw) ypdw,b.dwbl dwbl,
c.shh,c.yppm,c.ypspm,c.ypgg, c.s_sccj sccj,c.pfj/b.dwbl pfj,c.lsj/b.dwbl lsj
from YF_PDMX_KCMX a
inner join {0} b on a.cjid=b.cjid
inner join vi_yp_ypcd c on a.cjid=c.cjid
inner join YF_PD d on d.ID=a.djid and d.deptid=b.deptid
where a.djid='{1}' and d.deptid={2}", strTbKcmx, djid_pd, deptid);
DataTable tb = db.GetDataTable(ssql);
DataRow[] rows = tb.Select(" zcsl<>pcsl ");
//DataRow[] rowsTemp = tb.Select(" ( zcsl-pcsl-kcl>0)");//帐存数量-盘存数量-库存量
//if ( rowsTemp.Length > 0 )
//{
// throw new Exception( "库存量小于盘亏数量" );
//}
object objZcsl = tb.Compute("sum(zcsl)", "");
object objPcsl = tb.Compute("sum(pcsl)", "");
object objKcl = tb.Compute("sum(kcl)", "");
decimal yks = Convert.ToDecimal(Convertor.IsNull(objZcsl, "0")) - Convert.ToDecimal(Convertor.IsNull(objPcsl, "0"));
decimal _kcl = Convert.ToDecimal(Convertor.IsNull(objKcl, "0"));
if (yks < 0 && Math.Abs(yks) > _kcl)
{
throw new Exception("盘亏数大于当前库存量");
}
#region 保存盘点盈亏单据头表
Guid _djid;
string _err_text = "";
int _err_code = 0;
string ywlx = "008";
DateTime serverTime = Convert.ToDateTime(db.GetDataResult(db.GetServerTimeString()).ToString());
decimal sumpfje = 0; //批发金额
decimal sumlsje = 0; //零售金额
decimal sumjhje = 0; //进货金额
long djh = Yp.SeekNewDjh(ywlx, deptid, db); //单据流水号
string sdjh = Yp.SeekNewDjh_Str(ywlx, deptid, db);
if (byk)
{
Yk_dj_djmx.SaveDJ(Guid.Empty, djh, deptid, ywlx, deptid, 0, serverTime.ToShortDateString(), uid, serverTime.ToShortDateString(),
serverTime.ToString(), "", "", "", "", 0, 0,
sumjhje, sumpfje, sumlsje, sdjh, out _djid, out _err_code, out _err_text, jgbm, db);
if (_err_code != 0)
{
throw new Exception("插入盈亏单据明细失败!" + _err_text);
}
}
else
{
YF_DJ_DJMX.SaveDJ(Guid.Empty, djh, deptid, ywlx, deptid, 0, serverTime.ToShortDateString(), uid, serverTime.ToShortDateString(),
serverTime.ToString(), "", "", "", "", 0, 0,
sumjhje, sumpfje, sumlsje, out _djid, out _err_code, out _err_text, jgbm, db);
if (_err_code != 0)
{
throw new Exception("插入盈亏单据明细失败!" + _err_text);
}
}
#endregion
#region 保存盘点盈亏单据明细表
for (int i = 0; i < rows.Length; i++)
{
DataRow row = rows[i];
string yppm = row["yppm"].ToString().Trim(); //品名
string ypspm = row["ypspm"].ToString().Trim(); //商品名
string ypgg = row["ypgg"].ToString().Trim(); //规格
int ggid = Convert.ToInt32(row["ggid"]); //ggid
string sccj = row["sccj"].ToString(); //sccj
decimal jhj = 0; //进货价
decimal pfj = Convert.ToDecimal(row["pfj"]); //批发价
decimal lsj = Convert.ToDecimal(row["lsj"]); //零售价
string ypph = ""; //批号
string ypxq = ""; //效期
string yppch = ""; //批次号
Guid kcid = Guid.Empty; //kcid
decimal zcsl = Convert.ToDecimal(row["zcsl"]); //帐存数量
decimal pcsl = Convert.ToDecimal(row["pcsl"]); //盘存数量
int cjid = Convert.ToInt32(row["cjid"]);
decimal slcz = zcsl - pcsl;
int pxxh = 0; //排序序号
if (slcz > 0) //数量差值 大于0 帐存数>盘存数 盘亏
{
#region 盘亏
if (pcglfs == "0")//先进先出
{
ssql = string.Format(" select kcl,jhj,ypph,ypxq,yppch, id kcid from {0} where cjid={1} and deptid= {2} and kcl>0 order by djsj asc", strTbKcph, cjid, deptid);
}
if (pcglfs == "1")
{
ssql = string.Format(" select kcl,jhj,ypph,ypxq,yppch, id kcid from {0} where cjid={1} and deptid= {2} and kcl>0 order by ypxq asc", strTbKcph, cjid, deptid);
}
DataTable tbkcph = db.GetDataTable(ssql);
for (int j = 0; j < tbkcph.Rows.Count; j++)
{
DataRow row1 = tbkcph.Rows[j];
decimal kcl = Convert.ToDecimal(row1["kcl"]); //
decimal cks = 0;
if (kcl >= slcz)
{
cks = slcz;
slcz = 0;
}
else
{
cks = kcl;
slcz -= cks;
}
ypph = row1["ypph"].ToString();
ypxq = row1["ypxq"].ToString();
yppch = row1["yppch"].ToString();
kcid = new Guid(row1["kcid"].ToString());
jhj = Convert.ToDecimal(row1["jhj"]);
#region 保存单据明细
if (byk)
{
Yk_dj_djmx.SaveDJMX(Guid.Empty, _djid, cjid, 0,
row["shh"].ToString(),
yppm, ypspm, ypgg, sccj,
ypph, ypxq, 0, 0,
Convert.ToDecimal(cks * (-1)),
row["ypdw"].ToString(),
Convert.ToInt32(row["zxdw"]), //zxdw
Convert.ToInt32(row["dwbl"]), //dwbl
jhj,
pfj,
lsj,
Convert.ToDecimal(jhj * cks * (-1)),
Convert.ToDecimal(pfj * cks * (-1)),
Convert.ToDecimal(lsj * cks * (-1)),
djh,
deptid,
ywlx,
"",//备注
"",
0,
out _err_code,
out _err_text,
db,
0,
yppch,
kcid);
if (_err_code != 0)
{
throw new Exception("插入单据明细失败！");
}
}
else
{
YF_DJ_DJMX.SaveDJMX(Guid.Empty, _djid, cjid, 0,
row["shh"].ToString(),
yppm, ypspm, ypgg, sccj,
ypph, ypxq, 0, 0,
Convert.ToDecimal(cks * (-1)),
row["ypdw"].ToString(),
Convert.ToInt32(row["zxdw"]),//
Convert.ToInt32(row["dwbl"]),
jhj,
pfj,
lsj,
Convert.ToDecimal(jhj * cks * (-1)),
Convert.ToDecimal(pfj * cks * (-1)),
Convert.ToDecimal(lsj * cks * (-1)),
djh,
deptid, ywlx,
"",
"",
out _err_code,
out _err_text,
db,
pxxh,
yppch,
kcid);
if (_err_code != 0)
{
throw new Exception("插入单据明细失败！");
}
}
#endregion
sumjhje += Math.Round(Convert.ToDecimal(cks * jhj * (-1)), 3);
sumpfje += Math.Round(Convert.ToDecimal(cks * pfj * (-1)), 3);
sumlsje += Math.Round(Convert.ToDecimal(cks * lsj * (-1)), 3);
if (slcz == 0)
{
break;
}
}
if (slcz > 0)
{
throw new Exception("库存量小于盘亏数量");
}
#endregion
}
else//帐存数<盘存数 盘盈
{
#region 盘盈
string strOrder = "";
if (pcglfs == "0")
{
strOrder = " order by djsj desc ";
}
else
{
strOrder = " order by ypxq desc ";
}
string vi_name = "vi_yf_kcph";
string strYwlx = " ('001','002','003','004','009','015','016','019') ";
string tbYwlx = "yf_ywlx";
string tbDjmx = "yf_djmx";
//药房业务：001-采购入库 002-采购退货 003-药品调出 004-药房退库 009-期初录入
// 015-药品调入 016-药库出库单 019-其他入库
if (byk)
{
vi_name = "vi_yk_kcph";
tbYwlx = "yk_ywlx";
tbDjmx = "yk_djmx";
strYwlx = " ('001','002') ";
//药库业务： 001-采购入库 002-药品退货
}
ssql = string.Format(@" select * from ( select sum(a.YPSL*m.DWBL/a.YDWBL*(case y.YWFX when '+' then 1 else -1 end) )-sum(m.kcl) kcl,
m.jhj,m.ypph,m.ypxq,m.yppch,m.kcid,m.djsj_kc djsj
from {6} a
inner join {7} y on a.ywlx=y.YWLX
inner join {3} m on m.cjid=a.CJID and a.KCID=m.KCID and a.deptid=m.deptid
where a.YWLX in {5}
and m.djsj_kc>DATEADD(day,{0},GETDATE())
and m.cjid={1} and m.deptid={2}
group by m.jhj,m.ypph,m.ypxq,m.yppch,m.kcid,m.djsj_kc
,m.ypph,m.ypxq,m.yppch ) z where z.kcl > 0 {4}", day, cjid, deptid, vi_name, strOrder, strYwlx, tbDjmx, tbYwlx);
DataTable tb_py = db.GetDataTable(ssql);
decimal sysl = Convert.ToDecimal(slcz * (-1));
for (int j = 0; j < tb_py.Rows.Count; j++)
{
DataRow row_py = tb_py.Rows[j];
decimal kcl = Convert.ToDecimal(row_py["kcl"]);
decimal cks = 0;
ypph = row_py["ypph"].ToString();
yppch = row_py["yppch"].ToString();
ypxq = row_py["ypxq"].ToString();
kcid = new Guid(row_py["kcid"].ToString());
jhj = Convert.ToDecimal(row_py["jhj"]);
if (kcl >= sysl)
{
cks = sysl;
sysl -= cks;
}
else
{
cks = kcl;
sysl -= kcl;
}
decimal sl = cks;
#region 保存单据明细
if (byk)
{
Yk_dj_djmx.SaveDJMX(Guid.Empty, _djid, cjid, 0,
row["shh"].ToString(),
yppm, ypspm, ypgg, sccj,
ypph, ypxq, 0, 0,
sl,
row["ypdw"].ToString(),
Convert.ToInt32(row["zxdw"]), //zxdw
Convert.ToInt32(row["dwbl"]), //ypdw
jhj,
pfj,
lsj,
Convert.ToDecimal(jhj * sl),
Convert.ToDecimal(pfj * sl),
Convert.ToDecimal(lsj * sl),
djh, deptid,
ywlx,
"",//备注
"", 0,
out _err_code,
out _err_text,
db, 0, yppch, kcid);
}
else
{
YF_DJ_DJMX.SaveDJMX(Guid.Empty, _djid, cjid, 0,
row["shh"].ToString(),
yppm, ypspm, ypgg, sccj,
ypph, ypxq, 0, 0,
sl,
row["ypdw"].ToString(),
Convert.ToInt32(row["zxdw"]),//
Convert.ToInt32(row["dwbl"]),
jhj,
pfj,
lsj,
Convert.ToDecimal(jhj * sl),
Convert.ToDecimal(pfj * sl),
Convert.ToDecimal(lsj * sl),
djh,
deptid, ywlx,
"",
"",
out _err_code,
out _err_text, db,
pxxh,
yppch,
kcid);
}
#endregion
sumjhje += Math.Round(Convert.ToDecimal(jhj * sl), 3);
sumpfje += Math.Round(Convert.ToDecimal(pfj * sl), 3);
sumlsje += Math.Round(Convert.ToDecimal(lsj * sl), 3);
ypph = row_py["ypph"].ToString();
yppch = row_py["yppch"].ToString();
ypxq = row_py["ypxq"].ToString();
kcid = new Guid(row_py["kcid"].ToString());
jhj = Convert.ToDecimal(row_py["jhj"]);
if (sysl == 0)
{
break;
}
}
if (sysl > 0) //存在未能分配的记录,用最新的批次
{
ssql = string.Format(@" select top 1 a.kcl,a.jhj,a.ypph,a.ypxq,a.yppch,a.id kcid from {0} a
where a.cjid={1} and a.deptid={2} {3} ", strTbKcph, cjid, deptid, strOrder);
DataTable tb_sysl = db.GetDataTable(ssql);
DataRow row_py = tb_sysl.Rows[0];
ypph = row_py["ypph"].ToString();
yppch = row_py["yppch"].ToString();
ypxq = row_py["ypxq"].ToString();
kcid = new Guid(row_py["kcid"].ToString());
jhj = Convert.ToDecimal(row_py["jhj"]);
decimal sl = Convert.ToDecimal(sysl);
#region 保存单据明细
if (byk)
{
Yk_dj_djmx.SaveDJMX(Guid.Empty, _djid, cjid, 0,
row["shh"].ToString(),
yppm, ypspm, ypgg, sccj,
ypph, ypxq, 0, 0,
sl,
row["ypdw"].ToString(),
Convert.ToInt32(row["zxdw"]), //zxdw
Convert.ToInt32(row["dwbl"]), //ypdw
jhj,
pfj,
lsj,
Convert.ToDecimal(jhj * sl),
Convert.ToDecimal(pfj * sl),
Convert.ToDecimal(lsj * sl),
djh, deptid,
ywlx,
"",//备注
"", 0,
out _err_code,
out _err_text,
db, 0, yppch, kcid);
}
else
{
YF_DJ_DJMX.SaveDJMX(Guid.Empty, _djid, cjid, 0,
row["shh"].ToString(),
yppm, ypspm, ypgg, sccj,
ypph, ypxq, 0, 0,
sl,
row["ypdw"].ToString(),
Convert.ToInt32(row["zxdw"]),//
Convert.ToInt32(row["dwbl"]),
jhj,
pfj,
lsj,
Convert.ToDecimal(jhj * sl),
Convert.ToDecimal(pfj * sl),
Convert.ToDecimal(lsj * sl),
djh,
deptid, ywlx,
"",
"",
out _err_code,
out _err_text, db,
pxxh,
yppch,
kcid);
}
#endregion
sumjhje += Math.Round(Convert.ToDecimal(jhj * sl), 3);
sumpfje += Math.Round(Convert.ToDecimal(pfj * sl), 3);
sumlsje += Math.Round(Convert.ToDecimal(lsj * sl), 3);
}
#region
// if (pcglfs == "0")//先进先出 盘盈到最新的批次上
// {
// }
// else //效期优先 盘盈到效期最大的批次上
// {
// ssql = string.Format(@" select top 1 a.kcl,a.jhj,a.ypph,a.ypxq,a.yppch,a.id kcid from {0} a
// where a.cjid={1} and a.deptid={2} order by ypxq desc ", strTbKcph, cjid, deptid);
// }
// DataTable tbkcph = db.GetDataTable(ssql);
// if (tbkcph.Rows.Count <= 0)
// {
// throw new Exception("找不到库存批次记录！");
// }
// DataRow row1 = tbkcph.Rows[0];
// decimal cks = slcz;
// ypph = row1["ypph"].ToString();
// ypxq = row1["ypxq"].ToString();
// yppch = row1["yppch"].ToString();
// kcid = new Guid(row1["kcid"].ToString());
// jhj = Convert.ToDecimal(row1["jhj"]);
// #region 保存单据明细
// if (byk)
// {
// Yk_dj_djmx.SaveDJMX(Guid.Empty, _djid, cjid, 0,
// row["shh"].ToString(),
// yppm, ypspm, ypgg, sccj,
// ypph, ypxq, 0, 0,
// Convert.ToDecimal(cks*(-1)),
// row["ypdw"].ToString(),
// Convert.ToInt32(row["zxdw"]),//zxdw
// Convert.ToInt32(row["dwbl"]),//ypdw
// jhj,
// pfj,
// lsj,
// Convert.ToDecimal(jhj * cks*(-1)),
// Convert.ToDecimal(pfj * cks*(-1)),
// Convert.ToDecimal(lsj * cks*(-1)),
// djh, deptid,
// ywlx,
// "",//备注
// "",
// out _err_code,
// out _err_text,
// db, 0, yppch, kcid);
// }
// else
// {
// YF_DJ_DJMX.SaveDJMX(Guid.Empty, _djid, cjid, 0,
// row["shh"].ToString(),
// yppm, ypspm, ypgg, sccj,
// ypph, ypxq, 0, 0,
// Convert.ToDecimal(cks*(-1)),
// row["ypdw"].ToString(),
// Convert.ToInt32(row["zxdw"]),//
// Convert.ToInt32(row["dwbl"]) ,
// jhj,
// pfj,
// lsj,
// Convert.ToDecimal(jhj * cks * (-1)),
// Convert.ToDecimal(pfj * cks * (-1)),
// Convert.ToDecimal(lsj * cks * (-1)),
// djh,
// deptid, ywlx,
// "",
// "",
// out _err_code,
// out _err_text, db,
// pxxh,
// yppch,
// kcid);
// }
// #endregion
// sumjhje += Math.Round(Convert.ToDecimal(cks * jhj*(-1)), 3);
// sumpfje += Math.Round(Convert.ToDecimal(cks * pfj*(-1)), 3);
// sumlsje += Math.Round(Convert.ToDecimal(cks * lsj*(-1)), 3);
#endregion
#endregion
}
}
#endregion
#region 回填盘点盈亏单据头表金额
if (byk)
{
ssql = string.Format(" update yk_dj set sumjhje={0} where id='{1}'", sumjhje, _djid);
}
else
{
ssql = string.Format(" update yf_dj set sumjhje={0} where id='{1}'", sumjhje, _djid);
}
if (db.DoCommand(ssql) <= 0)
{
throw new Exception("更新进货金额失败！");
}
#endregion
djid = _djid;
}
catch (Exception err)
{
throw new Exception(err.ToString());
}
}
