Esempio n. 1
0
        public long m_lngVerichDropRecord(System.Security.Principal.IPrincipal p_objPrincipal, int p_Seq, int p_Order)
        {
            long lngRes = 0;

            clsPrivilegeHandleService objPrivilege = new clsPrivilegeHandleService();

            lngRes = objPrivilege.m_lngCheckCallPrivilege(p_objPrincipal, "com.digitalwave.iCare.middletier.HIS.clsMedStoreBseInfoSvc", "m_lngVerichDropRecord");

            if (lngRes < 0)
            {
                return(-1);
            }

            try
            {
                com.digitalwave.iCare.middletier.HRPService.clsHRPTableService objHRPSvc = new com.digitalwave.iCare.middletier.HRPService.clsHRPTableService();
                string strSQL = @" update T_OPR_MEDSTOREWINQUE set  ORDER_INT=? where SEQ_INT=?";

                System.Data.IDataParameter[] paramArr = null;
                objHRPSvc.CreateDatabaseParameter(2, out paramArr);
                paramArr[0].Value = p_Order;
                paramArr[1].Value = p_Seq;
                long lngRecordsAffected = -1;
                lngRes = objHRPSvc.lngExecuteParameterSQL(strSQL, ref lngRecordsAffected, paramArr);
                objHRPSvc.Dispose();
            }
            catch (Exception objEx)
            {
                string strTmp = objEx.Message;
                com.digitalwave.Utility.clsLogText objLogger = new clsLogText();
                bool blnRes = objLogger.LogError(objEx);
            }
            return(lngRes);
        }
Esempio n. 2
0
        public long m_lngDeleteReportObject(System.Security.Principal.IPrincipal p_objPrincipal,
                                            string p_strApplicationID)
        {
            long lngRes = 0;

            clsPrivilegeHandleService objPrivilege = new clsPrivilegeHandleService();

            lngRes = objPrivilege.m_lngCheckCallPrivilege(p_objPrincipal, "com.digitalwave.iCare.middletier.LIS.clsReportSvc", "m_lngDeleteReportObject");
            if (lngRes < 0)
            {
                return(-1);
            }

            string strSQL = @"DELETE FROM t_opr_lis_report_object
								WHERE application_id_chr = ?"                                ;

            com.digitalwave.iCare.middletier.HRPService.clsHRPTableService objHRPSvc =
                new com.digitalwave.iCare.middletier.HRPService.clsHRPTableService();

            IDataParameter[] objDPArr = null;
            objHRPSvc.CreateDatabaseParameter(1, out objDPArr);
            objDPArr[0].Value = p_strApplicationID;

            lngRes = 0;
            long lngEff = 0;

            lngRes = objHRPSvc.lngExecuteParameterSQL(strSQL, ref lngEff, objDPArr);
            return(lngRes);
        }
Esempio n. 3
0
        public long m_lngInsertReportObject(System.Security.Principal.IPrincipal p_objPrincipal,
                                            clsReportObject p_objReportObject)
        {
            long lngRes = 0;

            clsPrivilegeHandleService objPrivilege = new clsPrivilegeHandleService();

            lngRes = objPrivilege.m_lngCheckCallPrivilege(p_objPrincipal, "com.digitalwave.iCare.middletier.LIS.clsReportSvc", "m_lngInsertReportObject");
            if (lngRes < 0)
            {
                return(-1);
            }

            string strSQL = @"delete t_opr_lis_report_object a where a.application_id_chr = ?";

            com.digitalwave.iCare.middletier.HRPService.clsHRPTableService objHRPSvc =
                new com.digitalwave.iCare.middletier.HRPService.clsHRPTableService();

            IDataParameter[] objDPArr = null;
            long             lngEff   = 0;

            objHRPSvc.CreateDatabaseParameter(1, out objDPArr);
            objDPArr[0].Value = p_objReportObject.strApplicationID;
            lngRes            = objHRPSvc.lngExecuteParameterSQL(strSQL, ref lngEff, objDPArr);
            if (lngRes <= 0)
            {
                return(lngRes);
            }
            strSQL = @"insert into t_opr_lis_report_object
								values (?, ?,?)"                                ;
            objHRPSvc.CreateDatabaseParameter(3, out objDPArr);
            objDPArr[0].Value = p_objReportObject.strApplicationID;
            objDPArr[1].Value = p_objReportObject.bytReportObjectArr;
            objDPArr[2].Value = 0;

            lngRes = 0;

            lngRes = objHRPSvc.lngExecuteParameterSQL(strSQL, ref lngEff, objDPArr);
            return(lngRes);
        }
Esempio n. 4
0
        public long m_lngAddMedSendGiveRelation(System.Security.Principal.IPrincipal p_objPrincipal, out int p_intSeq,
                                                clsMedSendConfig_VO p_objWinArr)
        {
            long lngRes = 0;

            p_intSeq = 0;          //流水号

            clsPrivilegeHandleService objPrivilege = new clsPrivilegeHandleService();

            lngRes = objPrivilege.m_lngCheckCallPrivilege(p_objPrincipal, "com.digitalwave.iCare.middletier.HIS.clsMedStoreBseInfoSvc", "m_lngAddMedSendGiveRelation");
            if (lngRes < 0)
            {
                return(-1);
            }
            try
            {
                com.digitalwave.iCare.middletier.HRPService.clsHRPTableService objHRPSvc = new com.digitalwave.iCare.middletier.HRPService.clsHRPTableService();
                p_intSeq = Convert.ToInt32(objHRPSvc.m_strGetNewID("T_OPR_MEDSTOREWINRLT", "SEQ_INT", 6));

                string strSQL = @"INSERT INTO T_OPR_MEDSTOREWINRLT
										  (SEQ_INT, TREATWINID_CHR, GIVEWINID_CHR,
										   ORDER_INT
										  )
								  VALUES (?,?,?,?)"                                ;


                System.Data.IDataParameter[] paramArr = null;
                objHRPSvc.CreateDatabaseParameter(4, out paramArr);
                paramArr[0].Value = p_intSeq;
                paramArr[1].Value = p_objWinArr.m_TreatWinID_chr;
                paramArr[2].Value = p_objWinArr.m_GiveWinID_chr;
                paramArr[3].Value = p_objWinArr.m_intOrder;
                long lngRecordsAffected = -1;
                lngRes = objHRPSvc.lngExecuteParameterSQL(strSQL, ref lngRecordsAffected, paramArr);


                objHRPSvc.Dispose();
            }
            catch (Exception objEx)
            {
                string strTmp = objEx.Message;
                com.digitalwave.Utility.clsLogText objLogger = new clsLogText();
                bool blnRes = objLogger.LogError(objEx);
            }

            return(lngRes);
        }
Esempio n. 5
0
        public long m_lngInsert(clsST360CheckResultVO m_objResult)
        {
            long lngRes = 0;

            string sql = @"
                            INSERT INTO t_opr_lis_st360_result
                                        (sampleid_int, sampletype_int, boardno_vchr, templateno_int,
                                         check_item_id_int, check_item_name_vchr,
                                         check_item_english_name_vchr, modify_dat, operator_dat,
                                         device_send_dat, resultnum_vchr, resulttext_vchr, status_int,
                                         deviceid_chr, operator_id_chr, summary_vchr,Positive_INT
                                        )
                                 VALUES (?, ?, ?, ?,
                                         ?, ?,
                                         ?, ?, ?,
                                         ?, ?, ?, ?,
                                         ?, ?, ?,?
                                        )
                          ";

            com.digitalwave.iCare.middletier.HRPService.clsHRPTableService hrpService = new com.digitalwave.iCare.middletier.HRPService.clsHRPTableService();
            try
            {
                System.Data.IDataParameter[] objODPArr = GetInsertDataParameterArr(m_objResult);

                long lngRecEff = -1;
                //往表增加记录


                lngRes = 0;
                lngRes = hrpService.lngExecuteParameterSQL(sql, ref lngRecEff, objODPArr);
                hrpService.Dispose();
            }
            catch (Exception objEx)
            {
                new clsLogText().LogError(objEx);
            }
            return(lngRes);
        }
Esempio n. 6
0
        public long m_lngHorDropRecord(System.Security.Principal.IPrincipal p_objPrincipal, int p_Seq, string p_WinID, int p_WinType, int p_Order)
        {
            long lngRes = 0;

            clsPrivilegeHandleService objPrivilege = new clsPrivilegeHandleService();

            lngRes = objPrivilege.m_lngCheckCallPrivilege(p_objPrincipal, "com.digitalwave.iCare.middletier.HIS.clsMedStoreBseInfoSvc", "m_lngHorDropRecord");

            if (lngRes < 0)
            {
                return(-1);
            }

            try
            {
                com.digitalwave.iCare.middletier.HRPService.clsHRPTableService objHRPSvc = new com.digitalwave.iCare.middletier.HRPService.clsHRPTableService();
                string strSQL = @"  update T_OPR_MEDSTOREWINQUE a set  a.ORDER_INT=?,a.WINDOWID_CHR=?  where a.SEQ_INT=?";


                System.Data.IDataParameter[] paramArr = null;
                objHRPSvc.CreateDatabaseParameter(3, out paramArr);
                paramArr[0].Value = p_Order;
                paramArr[1].Value = p_WinID;
                paramArr[2].Value = p_Seq;
                long lngRecordsAffected = -1;
                lngRes = objHRPSvc.lngExecuteParameterSQL(strSQL, ref lngRecordsAffected, paramArr);
                string p_strSQL = "";
                if (p_WinType == 0)
                {
                    p_strSQL = @"  update t_opr_medrecipesend b set  b.SENDWINDOWID=? where b.OUTPATRECIPEID_CHR in (select a.OUTPATRECIPEID_CHR from T_OPR_MEDSTOREWINQUE a where a.SEQ_INT=? )";
                    paramArr = null;
                    objHRPSvc.CreateDatabaseParameter(2, out paramArr);
                    paramArr[0].Value  = p_WinID;
                    paramArr[1].Value  = p_Seq;
                    lngRecordsAffected = -1;
                    lngRes             = objHRPSvc.lngExecuteParameterSQL(p_strSQL, ref lngRecordsAffected, paramArr);
                }
                else if (p_WinType == 1)
                {
                    paramArr = null;
                    objHRPSvc.CreateDatabaseParameter(2, out paramArr);
                    paramArr[0].Value  = p_WinID;
                    paramArr[1].Value  = p_Seq;
                    lngRecordsAffected = -1;
                    p_strSQL           = @"  update t_opr_medrecipesend b set  b.WINDOWID_CHR=? where b.OUTPATRECIPEID_CHR=(select a.outpatrecipeid_chr from T_OPR_MEDSTOREWINQUE a where a.seq_int=?)";
                    lngRes             = objHRPSvc.lngExecuteParameterSQL(p_strSQL, ref lngRecordsAffected, paramArr);
                    p_strSQL           = @"  update t_opr_outpatientpwmrecipede b set  b.WINDOWID_CHR=? where b.OUTPATRECIPEID_CHR=(select a.outpatrecipeid_chr from T_OPR_MEDSTOREWINQUE a where a.seq_int=?)";
                    lngRes             = objHRPSvc.lngExecuteParameterSQL(p_strSQL, ref lngRecordsAffected, paramArr);
                    p_strSQL           = @"  update T_OPR_OUTPATIENTCMRECIPEDE b set  b.WINDOWID_CHR=? where b.OUTPATRECIPEID_CHR=(select a.outpatrecipeid_chr from T_OPR_MEDSTOREWINQUE a where a.seq_int=?)";
                    lngRes             = objHRPSvc.lngExecuteParameterSQL(p_strSQL, ref lngRecordsAffected, paramArr);

                    p_strSQL = @"  update T_OPR_OUTPATIENTCHKRECIPEDE b set  b.WINDOWID_CHR=? where b.OUTPATRECIPEID_CHR=(select a.outpatrecipeid_chr from T_OPR_MEDSTOREWINQUE a where a.seq_int=?)";
                    lngRes   = objHRPSvc.lngExecuteParameterSQL(p_strSQL, ref lngRecordsAffected, paramArr);

                    p_strSQL = @"  update T_OPR_OUTPATIENTTESTRECIPEDE b set  b.WINDOWID_CHR=? where b.OUTPATRECIPEID_CHR=(select a.outpatrecipeid_chr from T_OPR_MEDSTOREWINQUE a where a.seq_int=?)";
                    lngRes   = objHRPSvc.lngExecuteParameterSQL(p_strSQL, ref lngRecordsAffected, paramArr);

                    p_strSQL = @"  update T_OPR_OUTPATIENTOPSRECIPEDE b set  b.WINDOWID_CHR=? where b.OUTPATRECIPEID_CHR=(select a.outpatrecipeid_chr from T_OPR_MEDSTOREWINQUE a where a.seq_int=?)";
                    lngRes   = objHRPSvc.lngExecuteParameterSQL(p_strSQL, ref lngRecordsAffected, paramArr);
                }

                objHRPSvc.Dispose();
            }
            catch (Exception objEx)
            {
                string strTmp = objEx.Message;
                com.digitalwave.Utility.clsLogText objLogger = new clsLogText();
                bool blnRes = objLogger.LogError(objEx);
            }
            return(lngRes);
        }