protected void btnUnAudit_Click(object sender, EventArgs e) { if (ddlFLAG.SelectedValue == "N") { Alert.Show("【未审核】供应商,无法进行【反审核】操作"); return; } else { String strSUPID = tbxSUPID.Text.ToString(); if (string.IsNullOrEmpty(tbxSUPID.Text)) { Alert.Show("未选择供应商,无法进行【反审核】操作"); return; } if (DbHelperOra.Exists("select 1 from DAT_GOODSSTOCK t where pssid = '" + strSUPID + "' and t.kcsl > 0")) { Alert.Show("当前供应商下还存在有库存的商品,无法执行【反审核】操作。"); return; } if (DbHelperOra.Exists(string.Format("SELECT 1 FROM DAT_DD_DOC WHERE PSSID = '{0}' AND (FLAG ='N' OR (isend = 'N' AND FLAG = 'Y'))", strSUPID))) { Alert.Show("当前供应商下还存在有在途中的商品,无法执行【反审核】操作。"); return; } DbHelperOra.ExecuteSql("UPDATE DOC_SUPPLIER SET FLAG = 'N' WHERE SUPID IN ('" + strSUPID + "')"); Alert.Show("【反审核】成功"); OperLog("供应商资料", "反审核供应商【" + strSUPID + "】"); ERPUtility.CacheClear("DOC_SUPPLIER"); cxsj(strSUPID); dataSearch(); } }
protected override void billExport() { if (GridList == null || docBILLNO.Text == "") { Alert.Show("没有数据无法导出,请先生成采购计划!", "异常提示", MessageBoxIcon.Warning); return; } //string strSql = string.Format(@"SELECT // GD.GDNAME 商品名称, // GD.GDSEQ 商品编码, // GD.GDSPEC 商品规格, // F_GETUNITNAME(GD.Unit) 商品单位, // GD.BZHL 包装数量, // GD.PIZNO 批号, // GD.HSJJ 含税进价, // F_GETPRODUCERNAME(GD.Producer) 生产厂商, // NVL(CFG.ZGKC,0) 最高库存, // NVL(CFG.ZDKC,0) 最低库存, // DECODE(GD.UNIT_ORDER,'D',GD.NUM_DABZ,'Z',GD.NUM_ZHONGBZ,GD.BZHL) 最小包装数量, // F_GETZTKC('{3}',GD.GDSEQ) * DECODE(GD.UNIT_ORDER,'D',GD.NUM_DABZ,'Z',GD.NUM_ZHONGBZ,GD.BZHL) 在途数量, // F_GETJYDH('{3}',GD.GDSEQ,'DAY', '{1}','{2}') 日均用量, // F_GETJYDH('{3}',GD.GDSEQ,'DS', '{1}','{2}')* DECODE(GD.UNIT_ORDER,'D',GD.NUM_DABZ,'Z',GD.NUM_ZHONGBZ,GD.BZHL)*{0} 建议采购量, // F_GETJYDH('{3}',GD.GDSEQ,'DS', '{1}','{2}')* DECODE(GD.UNIT_ORDER,'D',GD.NUM_DABZ,'Z',GD.NUM_ZHONGBZ,GD.BZHL)*{0}*GD.HSJJ 含税金额 // FROM // (SELECT GDSEQ, ABS(SUM(SL)) SL // FROM DAT_GOODSJXC A // WHERE RQSJ BETWEEN TO_DATE('{1}', 'YYYY-MM-DD') AND // TO_DATE('{2}', 'YYYY-MM-DD') // AND EXISTS (SELECT 1 // FROM SYS_DEPT // WHERE TYPE = '3' // AND CODE = A.DEPTID) // GROUP BY GDSEQ) JXC, // (SELECT GDSEQ, SUM(KCSL) KCSL // FROM DAT_GOODSSTOCK S // WHERE EXISTS (SELECT 1 // FROM SYS_DEPT // WHERE TYPE = '3' // AND CODE = S.DEPTID) // GROUP BY GDSEQ) GS, // (SELECT GDNAME, GDSEQ, GDSPEC, UNIT, BZHL, PIZNO, HSJJ, PRODUCER,UNIT_ORDER,NUM_DABZ,NUM_ZHONGBZ // FROM DOC_GOODS // WHERE ISGZ = 'N') GD, // (SELECT ZGKC, ZDKC, GDSEQ // FROM DOC_GOODSCFG WHERE DEPTID={3}) CFG // WHERE JXC.GDSEQ = GS.GDSEQ(+) // AND JXC.GDSEQ = GD.GDSEQ // AND JXC.GDSEQ = CFG.GDSEQ", Convert.ToDecimal(nbxYSSL.Text), dpStartDate.Text, dpEndDate.Text, UserAction.UserDept); //DataTable dt = DbHelperOra.Query(strSql).Tables[0]; DataTable dtData = DbHelperOra.Query(string.Format("SELECT * FROM DAT_DDPLAN_COM WHERE BILLTYPE='CJD' AND SEQNO='{0}'", docBILLNO.Text)).Tables[0]; if (dtData == null || dtData.Rows.Count == 0) { Alert.Show("未获取到单据【" + docBILLNO.Text + "】的明细信息,无法导出!", "异常提示", MessageBoxIcon.Warning); return; } ExcelHelper.ExportByWeb(ERPUtility.ExportDataTable(GridGoods, dtData), "采购单信息", "采购单导出_" + DateTime.Now.ToString("yyyyMMddHHmmss") + ".xls"); }
private void FP_Action() { //进行库存分配 try{ if (docFLAG.SelectedValue == "A") { OracleParameter[] parameters = new OracleParameter[] { new OracleParameter("BILLNO", OracleDbType.Varchar2), new OracleParameter("USERID", OracleDbType.Varchar2), }; parameters[0].Value = docSEQNO.Text; parameters[1].Value = UserAction.UserID; DbHelperOra.RunProcedure("STOREDS.P_FP_DBD", parameters); billOpen(docSEQNO.Text); Alert.Show("库存分配成功,可继续审核出库!"); } else { Alert.Show("单据状态不正确,不能进行库存分配!"); return; } } catch (Exception ex) { Alert.Show(ERPUtility.errorParse(ex.Message), "消息提示", MessageBoxIcon.Warning); } }
protected void Page_Load(object sender, EventArgs e) { if (!IsPostBack) { dpkout1.SelectedDate = DateTime.Now.AddDays(-1); dpkout2.SelectedDate = DateTime.Now; DepartmentBind.BindDDL("DDL_SYS_DEPTALLRANGE", UserAction.UserID, lstDEPTID); ERPUtility.CacheClear("SYS_DEPT"); hfdCurrent.Text = UserAction.UserID; } }
protected void btnSave_Click(object sender, EventArgs e) { if (PubFunc.FormDataCheck(FormMx).Length > 0) { return; } //if (tbxCode.Text.Length != ddlSJCODE.SelectedValue.Length + 2 && tbxCode.Text.Length > 2) //{ // Alert.Show("编码规则不正确,请检查!", "提示信息", MessageBoxIcon.Warning); // return; //} //增加控制避免主键重复 if ((DbHelperOra.Exists("select 1 from SYS_DEPT where code = '" + tbxCode.Text + "'")) && (tbxCode.Enabled)) { Alert.Show("你输入的编码已存在,请检查!"); return; } if (string.IsNullOrWhiteSpace(ddlSJCODE.SelectedValue)) { Alert.Show("请填选上级!", "提示", MessageBoxIcon.Information); return; } if (!CheckTel(tbxSTR6.Text)) { Alert.Show("联系电话请保证格式(固话XXX-XXX)(手机1XXX)!"); return; } string ls_codelabel; MyTable mtTable = new MyTable(strTable, "CODE"); mtTable.ColRow = PubFunc.FormDataHT(FormMx); ls_codelabel = PubFunc.FormLabelGet(FormMx, "CODE"); if (PubFunc.StrIsEmpty(mtTable.ColRow["CODE"].ToString())) { Alert.Show("【" + ls_codelabel + "】不能为空!"); return; } if (tbxCode.Enabled) //新增 { mtTable.InsertExec(); } else { mtTable.UpdateExec(""); } //写入日志 OperLog("管理架构定义", "修改资料【" + tbxCode.Text + "】"); Alert.Show("数据保存成功!"); ERPUtility.CacheClear("SYS_DEPT"); tbxCode.Enabled = false; InitTree(); }
protected override void billAudit() { if (docFLAG.SelectedValue != "A") { Alert.Show("单据状态非新增,不能审核!", "操作提示", MessageBoxIcon.Warning); return; } //验证科室是否盘点 if (DbHelperOra.Exists("SELECT 1 FROM DAT_PD_LOCK WHERE DEPTID IN('" + docDEPTOUT.SelectedValue + "','" + docDEPTID.SelectedValue + "') AND FLAG='N'")) { Alert.Show("库房正在盘点,请检查!"); return; } //string strBillno = docSEQNO.Text; //if (BillOper(strBillno, "AUDIT") == 1) //{ // billLockDoc(true); // Alert.Show("单据【" + strBillno + "】审核成功!"); // billOpen(strBillno); // OperLog("直接出库", "审核单据【" + docSEQNO.Text + "】"); //} StringBuilder sbSql = new StringBuilder(); // sbSql.AppendFormat(@"DECLARE // BEGIN // DELETE FROM DAT_DB_EXT T WHERE T.BILLNO ='{0}'; // INSERT INTO DAT_DB_EXT(DEPTID,BILLNO,ROWNO,ONECODE,GDSEQ,GDNAME,BARCODE,UNIT,GDSPEC,DEPTCUR,BZHL,FLAG,PH,RQ_SC,YXQZ) // SELECT '{3}','{0}',ROWNUM,A.STR2,A.GDSEQ,A.GDNAME,A.BARCODE,A.UNIT,A.GDSPEC,'{3}',A.BZHL,'Y',A.PH,A.RQ_SC,A.YXQZ // FROM DAT_DB_COM A WHERE A.SEQNO = '{0}'; // IF SQL%ROWCOUNT = 0 THEN // RAISE_APPLICATION_ERROR(-20001, '修改单据[{0}]标志不成功!'); // END IF; // STORE.P_BILLOPER('{0}', '{1}', '{2}', 'AUDIT'); // END; ", docSEQNO.Text, BillType, UserAction.UserID, docDEPTID.SelectedValue); sbSql.AppendFormat(@"DECLARE BEGIN STORE.P_BILLOPER('{0}','{1}','{2}','AUDIT'); END;", docSEQNO.Text, BillType, UserAction.UserID, docDEPTID.SelectedValue); try { DbHelperOra.ExecuteSql(sbSql.ToString()); billLockDoc(true); Alert.Show("单据【" + docSEQNO.Text + "】审核成功!", "消息提示", MessageBoxIcon.Information); OperLog("商品调拨", "审核单据【" + docSEQNO.Text + "】-高值扫码出库"); billOpen(docSEQNO.Text); } catch (Exception ex) { Alert.Show(ERPUtility.errorParse(ex.Message), "消息提示", MessageBoxIcon.Warning); } }
protected void btnAudit_Click(object sender, EventArgs e) { int[] rows = GridSupplier.SelectedRowIndexArray; if (rows.Length > 0 && !string.IsNullOrEmpty(tbxSUPID.Text)) { if (PubFunc.FormDataCheck(FormProducer).Length > 1) { return; //存在为空的非空列则返回! } else { saveExec(); string strFLAG = ddlFLAG.SelectedValue.ToString(); if (strFLAG == "Y") { Alert.Show("已经审核通过,无需再审!"); } else { string strSUPID = ""; foreach (int index in rows) { strSUPID += PubFunc.GridDataGet(GridSupplier, index)["SUPID"].ToString() + ","; } strSUPID = strSUPID.TrimEnd(',').Replace(",", "','"); DbHelperOra.ExecuteSql("UPDATE DOC_SUPPLIER SET FLAG = 'Y' WHERE SUPID IN ('" + strSUPID + "')"); Alert.Show("供应商资料 审核通过!"); OperLog("供应商资料", "审核供应商【" + strSUPID + "】"); ERPUtility.CacheClear("DOC_SUPPLIER"); } } } else { Alert.Show("请选择需要审核的供应商!"); return; } String strSUPID1 = tbxSUPID.Text.ToString(); cxsj(strSUPID1); PubFunc.FormLock(FormProducer, true); dataSearch(); }
protected void zsmScan_TextChanged(object sender, EventArgs e) { if ((",M,R,N,A").IndexOf(docFLAG.SelectedValue) < 0) { Alert.Show("非『新单』单据不允许操作!", "消息提示", MessageBoxIcon.Warning); return; } if (!DbHelperOra.Exists(string.Format("SELECT 1 FROM DAT_GZ_EXT WHERE ONECODE = '{0}' AND FLAG IN( 'Y','R')", zsmScan.Text))) { Alert.Show("您输入的追溯码已扫描使用,请检查!", "提示信息", MessageBoxIcon.Warning); zsmScan.Text = string.Empty; zsmScan.Focus(); return; } if (DbHelperOra.Exists(string.Format("SELECT 1 FROM DAT_DB_EXT WHERE ONECODE = '{0}' AND billno='{1}'", zsmScan.Text, docBILLNO.Text))) { Alert.Show("您输入的追溯码已扫描使用,请检查!", "提示信息", MessageBoxIcon.Warning); zsmScan.Text = string.Empty; zsmScan.Focus(); return; } try { //写入数据库中 OracleParameter[] parameters = new OracleParameter[] { new OracleParameter("V_BILLNO", OracleDbType.Varchar2), new OracleParameter("V_ONECODE", OracleDbType.Varchar2), }; parameters[0].Value = docSEQNO.Text; parameters[1].Value = zsmScan.Text; DbHelperOra.RunProcedure("STOREDS.P_INS_DBD", parameters); billOpen(docBILLNO.Text); ScanSearch(""); } catch (Exception ex) { Alert.Show(ERPUtility.errorParse(ex.Message), "消息提示", MessageBoxIcon.Warning); } }
protected override void billAudit() { //住院办审核 if (docFLAG.SelectedValue != "M") { Alert.Show("单据状态非新增,不能审核!", "操作提示", MessageBoxIcon.Warning); return; } SaveSuccess = false; save("Y"); if (SaveSuccess == false) { return; } SaveSuccess = false; //string strBillno = docSEQNO.Text; //if (BillOper(strBillno, "AUDIT") == 1) //{ // billLockDoc(true); // Alert.Show("单据【" + strBillno + "】审核成功!"); // billOpen(strBillno); // OperLog("直接出库", "审核单据【" + docSEQNO.Text + "】"); //} List <Dictionary <string, object> > newDict = GridGoods.GetNewAddedList().ToList(); string barcode = ""; for (int i = 0; i < newDict.Count; i++) { barcode = newDict[i]["STR2"].ToString(); if (DbHelperOra.Exists(string.Format("SELECT 1 FROM DAT_GZ_EXT WHERE ONECODE = '{0}'AND DEPTCUR<>'{1}'", barcode, docDEPTOUT.SelectedValue))) { Alert.Show("高值条码【" + barcode + "】已不在该出库库房,请检查!", "提示信息", MessageBoxIcon.Warning); return; } } StringBuilder sbSql = new StringBuilder(); sbSql.AppendFormat(@"DECLARE BEGIN UPDATE DAT_CK_DOC SET FLAG = 'N' WHERE SEQNO = '{0}' AND FLAG = 'M'; DELETE FROM DAT_CK_EXT T WHERE T.BILLNO ='{0}'; INSERT INTO DAT_CK_EXT(DEPTID,BILLNO,ROWNO,ONECODE,GDSEQ,GDNAME,BARCODE,UNIT,GDSPEC,DEPTCUR,BZHL,FLAG,PH,RQ_SC,YXQZ) SELECT '{3}','{0}',ROWNUM,A.STR2,A.GDSEQ,A.GDNAME,A.BARCODE,A.UNIT,A.GDSPEC,'{3}',A.BZHL,'Y',A.PH,A.RQ_SC,A.YXQZ FROM DAT_CK_COM A WHERE A.SEQNO = '{0}'; IF SQL%ROWCOUNT = 0 THEN RAISE_APPLICATION_ERROR(-20001, '修改单据[{0}]标志不成功!'); END IF; STORE.P_BILLOPER('{0}', '{1}', '{2}', 'AUDIT'); END; ", docSEQNO.Text, BillType, UserAction.UserID, docDEPTID.SelectedValue); try { DbHelperOra.ExecuteSql(sbSql.ToString()); billLockDoc(true); Alert.Show("单据【" + docSEQNO.Text + "】审核成功!", "消息提示", MessageBoxIcon.Information); OperLog("高值扫码出库", "审核单据【" + docSEQNO.Text + "】"); billOpen(docSEQNO.Text); } catch (Exception ex) { Alert.Show(ERPUtility.errorParse(ex.Message), "消息提示", MessageBoxIcon.Warning); } }
protected void btnCreate_Click(object sender, EventArgs e) { if (string.IsNullOrWhiteSpace(ddlSUPID.SelectedValue)) { Alert.Show("请选择要结算的供应商!", "异常提醒", MessageBoxIcon.Information); return; } if (string.IsNullOrWhiteSpace(docSEQNO.Text)) { docSEQNO.Text = BillSeqGet(); } StringBuilder sbSql = new StringBuilder(); sbSql.AppendFormat(@"DECLARE BEGIN INSERT INTO DAT_JSD_COM (SEQNO, ROWNO, GDSEQ, BARCODE, GDNAME, UNIT, GDSPEC, GDMODE, BZSL, JXTAX, HSJJ, HSJE, ISGZ, ISLOT, PZWH, PRODUCER, ZPBH) SELECT '{0}', ROWNUM, A.GDSEQ, A.BARCODE, A.GDNAME, A.UNIT, A.GDSPEC, A.GDMODE, B.BZSL, A.JXTAX, B.HSJJ, B.BZSL * B.HSJJ, A.ISGZ, A.ISLOT, A.PIZNO, A.PRODUCER, A.ZPBH FROM DOC_GOODS A, (SELECT J.GDSEQ, J.HSJJ, -(SUM(J.SL)) BZSL FROM DAT_GOODSJXC J WHERE J.PSSID = '{1}' AND (J.BILLTYPE IN ('XSD', 'XSG', 'DSH') OR (J.BILLTYPE = 'XST' AND J.KCADD = '1')) AND NVL(J.STR1,'#') = '#' AND J.DEPTID IN (SELECT CODE FROM SYS_DEPT WHERE TYPE IN ('3', '4')) AND J.RQSJ BETWEEN TO_DATE('{2}', 'YYYY-MM-DD') AND TO_DATE('{3}', 'YYYY-MM-DD') + 1 GROUP BY J.GDSEQ, J.HSJJ) B WHERE A.GDSEQ = B.GDSEQ AND B.BZSL > 0 ORDER BY A.GDSEQ; IF SQL%ROWCOUNT = 0 THEN RAISE_APPLICATION_ERROR(-20001, '未查询到符合条件的结算数据!'); END IF; INSERT INTO DAT_JSD_DOC (CUSTID, SEQNO, SUPID, SUPNAME, FLAG, GATFUNDCORP, BEGRQ, ENDRQ, XSJE, LRY, LRRQ, UPTTIME, YJJJ) SELECT F_GETPARA('USERCODE'), '{0}', '{1}', '{4}', 'G', '{4}', TO_DATE('{2}', 'YYYY-MM-DD'), TO_DATE('{3}', 'YYYY-MM-DD') , SUM(T.BZSL * T.HSJJ), '{5}', SYSDATE, SYSDATE, SUM(T.BZSL * T.HSJJ) FROM DAT_JSD_COM T WHERE T.SEQNO = '{0}'; --反填结算单号 UPDATE DAT_GOODSJXC J SET J.STR1='{0}' WHERE J.PSSID = '{1}' AND NVL(J.STR1,'#') = '#' AND (J.BILLTYPE IN ('XSD', 'XSG', 'DSH') OR (J.BILLTYPE = 'XST' AND J.KCADD = '1')) AND J.DEPTID IN (SELECT CODE FROM SYS_DEPT WHERE TYPE IN ('3', '4')) AND J.RQSJ BETWEEN TO_DATE('{2}', 'YYYY-MM-DD') AND TO_DATE('{3}', 'YYYY-MM-DD') + 1 ; END; ", docSEQNO.Text.Trim(), ddlSUPID.SelectedValue, docJSKS.Text, docJSJS.Text, ddlSUPID.SelectedText, docLRY.SelectedValue); try { DbHelperOra.ExecuteSql(sbSql.ToString()); Alert.Show("结算单据【" + docSEQNO.Text + "】生成成功!", "消息提示", MessageBoxIcon.Information); //if (DbHelperOra.ExecuteSqlTran(cmdList)) //{ // Alert.Show("结算单据【" + docSEQNO.Text + "】生成成功!", "消息提示", MessageBoxIcon.Information); //} //else //{ // Alert.Show("结算单生成失败,请检查系统信息!", "异常提醒", MessageBoxIcon.Warning); //} } catch (Exception ex) { Alert.Show(ERPUtility.errorParse(ex.Message), "错误提示", MessageBoxIcon.Error); } }
protected void btnExport_Click(object sender, EventArgs e) { ERPUtility.DataExport(GetQuerySql(), GridSum, "科室进销存数据导出"); }