示例#1
0
文件: clsYB.cs 项目: timsanc/HIS
        /// <summary>
        /// (医保)传送门诊收费数据到医保前置机
        /// </summary>
        /// <param name="DSN"></param>
        /// <param name="objSQLArr"></param>
        /// <returns></returns>
        public long m_lngSendybdata(string DSN, ArrayList objYBArr, ref string BillNo)
        {
            long   lngRes = 0;
            string Sql    = "";

            try
            {
                if (BillNo.Trim() == "")
                {
                    clsOPChargeSvc objCharge = new clsOPChargeSvc();
                    objCharge.m_mthGenBillNo(out BillNo);
                }

                if (BillNo != "")
                {
                    ArrayList SqlArr = new ArrayList();
                    for (int i = 0; i < objYBArr.Count; i++)
                    {
                        clsYB_VO objYB = objYBArr[i] as clsYB_VO;

                        //由于UI控件DATAGRID自身BUG,合计栏偶尔显示错误,故在此重算【合计 = 数量 * 单价】
                        Sql = @"insert into masmzhxm (hos_code, billno, xmcode, ass_sign, xmdes, xmunt , xmqnt, 
                                                 xmprc, xmamt, trndate, trnflag, memoa, u_version) values ('" +
                              objYB.Hoscode + "','" +
                              BillNo + "','" +
                              objYB.XMCode + "','" +
                              objYB.Asssign + "','" +
                              objYB.XMDes + "','" +
                              objYB.XMUnt + "'," +
                              objYB.XMQnt + "," +
                              objYB.XMPrc + "," +
                              Convert.ToDecimal(objYB.XMQnt * objYB.XMPrc).ToString("0.00") + ",'" +
                              objYB.Trndate + "','" +
                              objYB.Trnflag + "','" +
                              objYB.Memoa + "','" +
                              objYB.UVersion + "')";

                        SqlArr.Add(Sql);
                    }

                    clsF2 F2Svc = new clsF2();
                    F2Svc.DSN = DSN;
                    lngRes    = F2Svc.ExecuteSQL(SqlArr);
                }
                else
                {
                    return(0);
                }
            }
            catch
            {
                //throw Exp;
                return(0);
            }

            return(lngRes);
        }
示例#2
0
文件: clsZyYB.cs 项目: timsanc/HIS
        /// <summary>
        /// (医保)传送住院收费数据到医保前置机
        /// </summary>
        /// <param name="DSN"></param>
        /// <param name="objYBArr"></param>
        /// <returns></returns>
        public long m_lngSendybdata(string DSN, ArrayList objYBArr)
        {
            long   lngRes = 0;
            string Sql    = "";

            try
            {
                ArrayList SqlArr = new ArrayList();
                for (int i = 0; i < objYBArr.Count; i++)
                {
                    clsYB_VO objYB = objYBArr[i] as clsYB_VO;

                    Sql = @"insert into mashxm (hos_code, zyno, zysno, xmcode, xmdes, xmunt , xmqnt, 
                                             xmprc, xmamt, trndate, trnflag, memoa, u_version) values ('" +
                          objYB.Hoscode + "','" +
                          objYB.ZYNo + "'," +
                          objYB.ZYSno + ",'" +
                          objYB.XMCode + "','" +
                          objYB.XMDes + "','" +
                          objYB.XMUnt + "'," +
                          objYB.XMQnt + "," +
                          objYB.XMPrc + "," +
                          objYB.XMAmt + ",'" +
                          objYB.Trndate + "','" +
                          objYB.Trnflag + "','" +
                          objYB.Memoa + "','" +
                          objYB.UVersion + "')";

                    SqlArr.Add(Sql);
                }

                clsF2 F2Svc = new clsF2();
                F2Svc.DSN = DSN;
                lngRes    = F2Svc.ExecuteSQL(SqlArr);
            }
            catch
            {
                //throw Exp;
                return(0);
            }

            return(lngRes);
        }