Exemplo n.º 1
0
        /// <summary>
        /// Підключення до Касового Апарату
        /// Number
//Номер аппарата.
//Тип: строка
//Умолчание: "1"
//Позволяет указать кассовый аппарат для работы в виде:
//Логический номер (в виде "число")
//Комбинация номер порта, сетевой номер кассы (в виде "порт;сетевойномер")
//Комбинация номер порта, сетевой номер кассы, скорость обмена (в виде "порт;сетевойномер;скорость")
//Если в момент установки значения свойства сеанс связи с аппаратом был установлен, он закрывается.
//При использовании логического номера он должен совпадать с логическим номером, запрограммированным в кассе в параметрах связи с компьютером.
//Если используется сетевой номер, то он должен совпадать с сетевым номером, запрограммированным в кассе в параметрах связи с компьютером.
//Возможные значения скорости: 9600, 19200, 38400, 57600, 115200. Однако некоторые модели касс не поддерживают скорости 57600 и 115200. Указанная скорость должна совпадать со скоростью обмена с компьютером, запрограммированной в кассе.
//Если касса подключена к компьютеру и в её настройках разрешён обмен с компьютером, то с помощью утилиты comtest.exe вы можете выяснить, на какой скорости работает касса, какой протокол она использует для обмена (упрощённый или полный) и какой имеет сетевой номер. Эти данные помогут вам правильно сформировать строку для свойства Number. Иконка comtest.exe устанавливается на рабочем столе Windows большинством инсталляторов, которые устанавливают драйверы EQL..
        /// </summary>
        public void Connect(string Port, string LogicNumber, string UserId, string Password)
        {
            connection = new Connection();
            string strCnn = "Provider=EQL OLE DB Provider;";
            strCnn = strCnn + "Data Source='" + Port + ";" + LogicNumber + "'";
            //strCnn = strCnn + "Data Source=’" + Port + ";" + LogicNumber + "’";
            strCnn = strCnn + ";User Id=" + UserId + ";Password="******";";
            strCnn = strCnn + "Extended Properties = \"Protocol=" + "L2Com.HcComSessionCreator\"";
            connection.Open(strCnn);

            srv = new Recordset();
            //відкриття службової таблиці
            srv.Open("EQL_service", connection, CursorTypeEnum.adOpenStatic, LockTypeEnum.adLockOptimistic, 512);
            //отримання процедурного інтерфейсу
            proc = srv.Fields[1].Value;
            fp = (IHcFReg)proc;
            fpext = (IHcFRegEx)proc;
            report = (IHcReport)proc;
            display = (IHcDisplay)proc;
            fiscPrinter = (IHcFiscPrnt)proc;
            fiscPrinterLastInfo = (IHmLastInfo)proc;
            fiscPrinterSound = (IHcSound)proc;

            this.OutTone(1000, 100);
        }
        public object[] db_access(string strSQL)
        {
            ADODB.Connection objCon;
            ADODB.Recordset  objRec;
            object[,] dataRows;
            object[] dataSuite;
            string   strCon;

            objCon = new ADODB.Connection();
            objRec = new ADODB.Recordset();

            //establish the connection string and open the database connection
            strCon = "driver={MySQL ODBC 5.1 Driver};server=107.22.232.228;uid=qa_people;pwd=thehandcontrols;" +
                     "database=functional_test_data;option=3";

            objCon.Open(strCon);

            //execute the SQL and return the recrodset of results
            objRec = objCon.Execute(strSQL, out missing, 0);

            //populate a two dinmensional object array with the results
            dataRows = objRec.GetRows();

            //get a onedimensional array that can be placed into the Test Suite dropdown
            dataSuite = thinArray(dataRows);

            //close the recordset
            objRec.Close();

            //close the database connection
            objCon.Close();

            return(dataSuite);
        }
Exemplo n.º 3
0
        private void AssemblyCopyToModel(IGTPolygonGeometry oGeometry)
        {
            int    ownerID = 0;
            int    lRecords;
            double dGeoOrientation = 0.0;

            try
            {
                frmAssmbly                  = new frmAssembly();
                frmAssmbly.Application      = m_GTApplication;
                frmAssmbly.FeatureFNO       = m_ActiveGraphicComponent.FNO;
                frmAssmbly.DetailIdentifier = m_ActiveMapWindow.DetailID;
                frmAssmbly.ShowDialog();
                if (frmAssmbly.FeatureIdentifier != 0)
                {
                    ownerID = GetOwnerIdentifier();
                    GetAssemblyPointsAndOrientation(oGeometry, ref dGeoOrientation);
                    ADODB.Recordset oRS = m_GTApplication.DataContext.Execute("{call OC_EXECUTE_DEEPCOPY(" + m_ActiveGraphicComponent.FNO.ToString() + " ," +
                                                                              frmAssmbly.FeatureIdentifier.ToString() + ", " +
                                                                              m_ActiveGraphicComponent.FNO.ToString() + ", " +
                                                                              m_ActiveGraphicComponent.CNO.ToString() + ", " +
                                                                              m_ActiveGraphicComponent.FID.ToString() + ", " +
                                                                              ownerID.ToString() + ", " + dGeoOrientation + ", " + m_ActiveMapWindow.DetailID + ")}", out lRecords, 1, new object[1]);
                }
            }
            catch (Exception ex)
            {
                throw;
            }
        }
Exemplo n.º 4
0
    } // end function;

    public int testresetwid(int wid)
    {
        ADODB.Recordset recset1 = null;
        int             retval;

        if (wid == 0)
        {
            retval = -1;
            return(retval);
        }
        DbUse.open_ado_rec(globaldb, ref recset1, "Select tblwhatif.* from tblwhatif where wid = " + wid + ";");
        if (!recset1.EOF)
        {
            retval = -1;
        }
        else
        {
            retval  = 0;
            glngwid = 0;     //  !!!  reset to 0 basecase !!
            saveWid();
            saveRecalcNeeded(0, -1);
            model_modified = -1;
            saveModel_modified();
        }

        DbUse.CloseAdoRec(recset1);
        recset1 = null;

        return(retval);
    }
Exemplo n.º 5
0
    } // end function;

    public long Get_whatif_wid(string whatifname)
    {
        //on error GoTo Err_Get_whatif_name;

        ADODB.Recordset recset1 = null;
        long            retval;

        if (whatifname == "Base Case")
        {
            return(0);
        }

        else
        {
            DbUse.open_ado_rec(globaldb, ref recset1, "Select tblwhatif.* from tblwhatif where name = " + whatifname + ";");
            if (recset1.EOF)
            {
                retval = -1;
            }
            else
            {
                retval = (long)recset1.Fields["wid"].Value;
            }

            DbUse.CloseAdoRec(recset1);
            recset1 = null;
        };

        return(retval); //exit  Function;
    } // end function;
Exemplo n.º 6
0
        public static UsuariosBO UpdateUsuario(UsuariosBO Usuario, ADODB.Connection cn)
        {
            var RsUsuarios = new ADODB.Recordset();
            var LibORGM    = new SQL();
            var Serializer = new SerializerFO();

            try
            {
                RsUsuarios.Open(String.Format("SELECT * FROM dbo.Usuarios WHERE Usuario = '{0}'", Usuario.Usuario), cn, CursorTypeEnum.adOpenDynamic, LockTypeEnum.adLockOptimistic);
                if (RsUsuarios.EOF)
                {
                    RsUsuarios.AddNew();
                    RsUsuarios.Fields["Usuario"].Value     = Usuario.Usuario;
                    RsUsuarios.Fields["SenhaAcesso"].Value = Usuario.SenhaAcesso;
                    RsUsuarios.Fields["TokenAcesso"].Value = CriptografiaFO.EncriptarMD5(Usuario.TokenAcesso);
                }
                RsUsuarios.Fields["Inativo"].Value = Usuario.Inativo;


                RsUsuarios.Update();
                RsUsuarios.Close();

                Usuario = UsuariosDA.GetUsuarios(Usuario.Usuario, cn);
            }
            catch (Exception)
            {
                throw;
            }

            return(Usuario);
        }
Exemplo n.º 7
0
    } // end sub;

    float availtime()
    {
        //on error GoTo err_availtime;

        ADODB.Recordset reccust = null;
        float           X;

        DbUse.open_ado_rec(globaldb, ref reccust, "tblgeneral");

        X = ((float)reccust.Fields["RTU1b"].Value) * ((float)reccust.Fields["RTU1c"].Value);
        if ((X <= 0))
        {
            X = 1;
        }
        ;



        //exit_availtime:
        DbUse.CloseAdoRec(reccust);
        reccust = null;
        return(X); //exit  Function;

        //err_availtime:
        // msgbox(ErrorToString(), 0, appl_name);
        // resume  exit_availtime;
    } // end function;
Exemplo n.º 8
0
        private void cmbTableUn_SelectedIndexChanged(object sender, EventArgs e)
        {
            grdData.Rows.Clear();
            grdData.Columns.Clear();

            mycon = new ADODB.Connection();
            mycon.Open("Provider = Microsoft.Jet.OLEDB.4.0; Data Source = " + clsDataStorage.db.Name);
            recordSet = new ADODB.Recordset();
            recordSet.Open("SELECT * FROM " + cmbTableUn.Text, mycon, CursorTypeEnum.adOpenStatic);

            //clsDataStorage.db.OpenTable(cmbTableUn.Text);

            foreach (ADODB.Field field in recordSet.Fields)
            {
                grdData.Columns.Add("clm" + field.Name, field.Name);
            }

            while (!recordSet.EOF)
            {
                grdData.Rows.Add();

                for (int i = 0; i < recordSet.Fields.Count; i++)
                {
                    grdData.Rows[r].Cells[i].Value = recordSet.Fields[i].Value;
                }
                r++;
                recordSet.MoveNext();
            }
            r = 0;
            recordSet.Close();
        }
Exemplo n.º 9
0
        //RETORNA TABELA NO FORMATO DE RECORDSET
        public ADODB.Recordset ReturnRs(string p_strSql)
        {
            ADODB.Recordset objRS = new ADODB.Recordset();

            try
            {
                if (this._AdodbConn == null)
                {
                    SetConn();
                    this._AdodbConn = new Connection();
                    GenericCLX.CS.Util objUtil = new GenericCLX.CS.Util();
                    //objUtil.GetConfig("");
                    this._AdodbConn.Open(objUtil.ConnectionStringXML(), this._User, this._Password, 0);
                }

                objRS.CursorLocation = (ADODB.CursorLocationEnum) 3;

                objRS.Open(p_strSql, this._AdodbConn, (ADODB.CursorTypeEnum) 3, (ADODB.LockTypeEnum) 3, 1);
                objRS.ActiveConnection = null;
            }
            catch (Exception e)
            {
                if (TreatedError(e.Message))
                {
                    this.ReturnRs(p_strSql);
                }
            }

            return(objRS);
        }
Exemplo n.º 10
0
        /// <summary>
        /// Execute Procudure to Purge Expired Archived Landbase
        /// </summary>
        private void DetectOverlapping(int g3eFno, bool selfOverlap)
        {
            ADODB.Recordset rs      = null;
            string          sqlStmt = "Begin LBM_UTL.DetectOverlappingPolygons({0},{1}); end;";

            try
            {
                gtApp.BeginWaitCursor();
                sqlStmt = string.Format(sqlStmt, g3eFno, selfOverlap);
                gtApp.SetStatusBarText(GTStatusPanelConstants.gtaspcMessage, "Detecting Overlapping Boundarys....");
                gtTransactionManager.Begin("Detect Overlapping Boundarys");
                rs = Execute(sqlStmt);
                gtTransactionManager.Commit();
                MessageBox.Show("Detecting Overlapping Boundarys Analysis is Completed", msgBoxCaption, MessageBoxButtons.OK, MessageBoxIcon.Information);
            }
            catch (Exception ex)
            {
                gtTransactionManager.Rollback();
                throw ex;
            }
            finally
            {
                rs = null;
                gtTransactionManager.RefreshDatabaseChanges();
                gtApp.RefreshWindows();
                gtApp.EndWaitCursor();
            }
        }
Exemplo n.º 11
0
        private void button1_Click(object sender, EventArgs e)
        {
            try
            {
                U8RefService.IServiceClass obj = new U8RefService.IServiceClass();
                obj.RefID = "Inventory_AA";
                obj.Mode  = U8RefService.RefModes.modeRefing;
                //obj.FilterSQL = " bbomsub =1";
                obj.FillText        = txtcinvcode.Text;
                obj.Web             = false;
                obj.MetaXML         = "<Ref><RefSet   bMultiSel='0'  /></Ref>";
                obj.RememberLastRst = false;
                ADODB.Recordset retRstGrid = null, retRstClass = null;
                string          sErrMsg = "";
                obj.GetPortalHwnd((int)this.Handle);

                Object objLogin = canshu.u8Login;
                if (obj.ShowRefSecond(ref objLogin, ref retRstClass, ref retRstGrid, ref sErrMsg) == false)
                {
                    MessageBox.Show(sErrMsg);
                }
                else
                {
                    if (retRstGrid != null)
                    {
                        this.txtcinvcode.Text = DbHelper.GetDbString(retRstGrid.Fields["cinvcode"].Value);
                    }
                }
            }
            catch (Exception ex)
            {
                MessageBox.Show("参照失败,原因:" + ex.Message);
            }
        }
Exemplo n.º 12
0
        // An error has occured in validation. Null the ESI Location value.
        private void ClearESILocation(ref ADODB.Recordset componentRS)
        {
            try
            {
                // Need to set a flag to let aecEditNotPosted attribute edit control
                // know that ESI Location is being set to null and skip processing.
                // Attribute edit control is firing before the attribute is set to null,
                // so without the flag what happens is the Premise attributes are
                // set to read-only by the attribute edit control and the ESI Location
                // is then set to null by this FI, thus locking the attributes including
                // the null ESI Location.
                AddProperty(M_PROP_SKIP_AECEDITIFNOTPOSTED, "TRUE");

                // Reset recordset position before updating
                ResetRecordPosition(ref componentRS);
                componentRS.Fields[FIELD_PREMISE_ESI_LOCATION].Value = null;
                m_Application.Properties.Remove(M_PROP_SKIP_AECEDITIFNOTPOSTED);
            }
            catch (Exception ex)
            {
                if (m_InteractiveMode)
                {
                    MessageBox.Show("Error in fiESILocationUpdate:ClearESILocation - " + ex.Message, "G/Technology", MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
                }
            }
        }
        /// <summary>
        /// Execute Procudure to Purge Expired Archived Landbase
        /// </summary>
        private void DetectOverlapping(int g3eFno, bool selfOverlap)
        {
            ADODB.Recordset rs          = null;
            string          sqlStmt     = "Begin LBM_UTL.DectectOverlappingPolygons({0},{1}); end;";
            string          mergeStatus = string.Empty;

            try
            {
                sqlStmt = string.Format(sqlStmt, g3eFno, selfOverlap);
                rs      = Execute(sqlStmt);
                //    gtTransactionManager.Commit();
            }
            catch (Exception ex)
            {
                //   gtTransactionManager.Rollback();
                throw ex;
            }
            finally
            {
                rs = null;
                //   gtTransactionManager.RefreshDatabaseChanges();
                gtApp.RefreshWindows();
                //      CleanUp();
            }
            MessageBox.Show("Detecting Overlapping Analysis is Completed");
        }
Exemplo n.º 14
0
        public void SetAuditLogin(string appVer)
        {
            string pcName = Environment.MachineName.Substring(0, 8);
            string pcOSVer = Environment.OSVersion.ToString();
            string pcPlatForm = Environment.OSVersion.Platform.ToString();
            int    osMajor = Environment.OSVersion.Version.Major;
            int    osMinor = Environment.OSVersion.Version.Minor;
            bool   bitBool = Environment.Is64BitOperatingSystem; int bit = -1;
            string appVersion = appVer;

            if (bitBool)
            {
                bit = 64;
            }
            else
            {
                bit = 32;
            }

            long seqNum = GetSeq("annotator.GPJ_AUDIT_SEQ");
            int  month = DateTime.Now.Month; int day = DateTime.Now.Day; int year = DateTime.Now.Year;

            conn.Open();
            string sqlCommand = $"INSERT INTO GPJ_APP_AUDIT VALUES ({seqNum}, '{pcName}', SYSDATE, 'GPJ', '{pcName}', '{pcOSVer}', '{pcPlatForm}', {osMajor}, {osMinor}, " +
                                $"{bit.ToString()}, 'TWITTER_POSTER', '{appVersion}', 'TWITPSTR', SYSDATE, '{TimeZone.CurrentTimeZone.StandardName}');";

            ADODB.Recordset rst = new ADODB.Recordset();
            object          rowsAffected;

            rst = conn.Execute(sqlCommand, out rowsAffected);
            conn.Close();
        }
Exemplo n.º 15
0
        public static bool session_valid(string sdate)
        {
            try
            {
                ADODB.Connection ADOconn = new ADODB.Connection();
                ADODB.Recordset  tmp     = new ADODB.Recordset();

                SqlConnectionStringBuilder decoder = new SqlConnectionStringBuilder(System.Configuration.ConfigurationManager.ConnectionStrings["Con"].ConnectionString);


                ADOconn.Open("Provider=SQLOLEDB;Initial Catalog= " + decoder.InitialCatalog + ";Data Source=" + decoder.DataSource + ";", decoder.UserID, decoder.Password, 0);

                ADODB.Recordset rec = new ADODB.Recordset();
                string          sql = "SELECT FINANCE_ID FROM FINANCE_SESSION  WHERE FINANCE_STATUS=1 AND '" + sdate + "' between finance_start_date and finance_end_date";

                Recordset TMP = new Recordset();
                TMP.Open(sql, ADOconn, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic, -1);
                if (TMP.RecordCount == 0)
                {
                    return(false);
                }
                else
                {
                    return(true);
                }
            }
            catch (Exception ex)
            {
                return(false);
            }
        }
Exemplo n.º 16
0
        /// <summary>
        /// Method to get the Component Number of the Unit Component whose standard/static attributes will be populated
        /// </summary>
        /// <param name="sCUCode"></param>
        /// <param name="iCUCID"></param>
        /// <param name="m_iCompUnitCNO"></param>
        /// <param name="m_oDataContext"></param>
        /// <returns></returns>
        private int GetUnitComponentCNO(string sCUCode, int iCUCID, int m_iCompUnitCNO, IGTDataContext m_oDataContext)
        {
            int sUnitComponentCNO = 0;

            ADODB.Recordset oRS  = null;
            string          sSQL = string.Empty;

            IGTKeyObject oKeyObject;

            ///''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
            //Query for the ANOs and their values from the m_sCUStaticAttributeTable table.
            //For each record returned in that query, set the ANO value.
            ///''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

            oKeyObject = m_oApp.DataContext.OpenFeature(Convert.ToInt16(m_oComponents[m_componentName].Recordset.Fields["G3e_FNO"].Value), Convert.ToInt32(m_oComponents[m_componentName].Recordset.Fields["G3e_FID"].Value));

            sSQL = @" select distinct a.g3e_cno from CULIB_ATTRIBUTE s,G3E_ATTRIBUTEINFO_OPTABLE a, CULIB_UNITATTRIBUTE b
                    where s.g3e_fno=? and b.cu_id=? and a.g3e_ano=s.g3e_ano and s.category_C = b.category_c and s.ATTRIBUTE_ID = b.ATTRIBUTE_ID
                        order by a.g3e_cno";

            oRS = m_oDataContext.OpenRecordset(sSQL, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockReadOnly, (int)ADODB.CommandTypeEnum.adCmdText, oKeyObject.FNO, sCUCode);

            if (oRS != null && oRS.RecordCount > 0)
            {
                sUnitComponentCNO = Convert.ToInt32(oRS.Fields["g3e_cno"].Value);
            }
            return(sUnitComponentCNO);
        }
Exemplo n.º 17
0
        /// <summary>
        /// Execute Procudure to Purge Expired Archived Landbase
        /// </summary>
        private void PurgeLandbase()
        {
            ADODB.Recordset rs          = null;
            string          sqlStmt     = "Begin LBM_UTL.PurgeExpiredArchivedLandbase; end;";
            string          mergeStatus = string.Empty;

            try
            {
                gtTransactionManager.Begin("Purge Expired Landbase");
                gtApp.BeginWaitCursor();
                rs = Execute(sqlStmt);
                gtTransactionManager.Commit();
            }
            catch (Exception ex)
            {
                gtTransactionManager.Rollback();
                throw ex;
            }
            finally
            {
                rs = null;
                gtTransactionManager.RefreshDatabaseChanges();
                gtApp.RefreshWindows();
                gtApp.EndWaitCursor();
            }
        }
Exemplo n.º 18
0
        /// <summary>
        /// Підключення до Касового Апарату
        /// Number
//Номер аппарата.
//Тип: строка
//Умолчание: "1"
//Позволяет указать кассовый аппарат для работы в виде:
//Логический номер (в виде "число")
//Комбинация номер порта, сетевой номер кассы (в виде "порт;сетевойномер")
//Комбинация номер порта, сетевой номер кассы, скорость обмена (в виде "порт;сетевойномер;скорость")
//Если в момент установки значения свойства сеанс связи с аппаратом был установлен, он закрывается.
//При использовании логического номера он должен совпадать с логическим номером, запрограммированным в кассе в параметрах связи с компьютером.
//Если используется сетевой номер, то он должен совпадать с сетевым номером, запрограммированным в кассе в параметрах связи с компьютером.
//Возможные значения скорости: 9600, 19200, 38400, 57600, 115200. Однако некоторые модели касс не поддерживают скорости 57600 и 115200. Указанная скорость должна совпадать со скоростью обмена с компьютером, запрограммированной в кассе.
//Если касса подключена к компьютеру и в её настройках разрешён обмен с компьютером, то с помощью утилиты comtest.exe вы можете выяснить, на какой скорости работает касса, какой протокол она использует для обмена (упрощённый или полный) и какой имеет сетевой номер. Эти данные помогут вам правильно сформировать строку для свойства Number. Иконка comtest.exe устанавливается на рабочем столе Windows большинством инсталляторов, которые устанавливают драйверы EQL..
        /// </summary>
        public void Connect(string Port, string LogicNumber, string UserId, string Password)
        {
            connection = new Connection();
            string strCnn = "Provider=EQL OLE DB Provider;";

            strCnn = strCnn + "Data Source='" + Port + ";" + LogicNumber + "'";
            //strCnn = strCnn + "Data Source=’" + Port + ";" + LogicNumber + "’";
            strCnn = strCnn + ";User Id=" + UserId + ";Password="******";";
            strCnn = strCnn + "Extended Properties = \"Protocol=" + "L2Com.HcComSessionCreator\"";
            connection.Open(strCnn);

            srv = new Recordset();
            //відкриття службової таблиці
            srv.Open("EQL_service", connection, CursorTypeEnum.adOpenStatic, LockTypeEnum.adLockOptimistic, 512);
            //отримання процедурного інтерфейсу
            proc                = srv.Fields[1].Value;
            fp                  = (IHcFReg)proc;
            fpext               = (IHcFRegEx)proc;
            report              = (IHcReport)proc;
            display             = (IHcDisplay)proc;
            fiscPrinter         = (IHcFiscPrnt)proc;
            fiscPrinterLastInfo = (IHmLastInfo)proc;
            fiscPrinterSound    = (IHcSound)proc;

            this.OutTone(1000, 100);
        }
Exemplo n.º 19
0
        /// <summary>
        /// Method to convert storage coordinates to Latitude and Longitude
        /// </summary>
        /// <param name="dXoord">X location</param>
        /// <param name="dYoord">Y location</param>
        /// <param name="dZoord">Z location (0)</param>
        private void ConvertToLatitudeAndLongitude(ref double dXoord, ref double dYoord, ref double dZoord)
        {
            try
            {
                Intergraph.CoordSystems.Interop.CoordSystemClass coords = new CoordSystemClass();
                int             outrec = 0;
                ADODB.Recordset rs     = DataContext.Execute("select c.*  from g3e_dataconnection_optable d , gcoordsystemtable  c where " +
                                                             " d.g3e_username ='******' and d.g3e_csname=c.name", out outrec, (int)ADODB.CommandTypeEnum.adCmdText, new object[0]);

                rs.MoveFirst();
                object[] rowformat = new object[rs.Fields.Count];
                for (int ifld = 0; ifld < rs.Fields.Count; ifld++)
                {
                    rowformat[ifld] = rs.Fields[ifld].Value;
                }
                coords.LoadFromGCoordSystemTableRowFormat(rowformat);

                coords.TransformPoint(Intergraph.CoordSystems.Interop.CSPointConstants.cspUOR, (int)Intergraph.CoordSystems.CSTransformLinkConstants.cstlDatumTransformation,
                                      Intergraph.CoordSystems.Interop.CSPointConstants.cspLLO, (int)Intergraph.CoordSystems.CSTransformLinkConstants.cstlDatumTransformation,
                                      ref dXoord, ref dYoord, ref dZoord);

                dXoord = dXoord * 180 / (4 * Math.Atan(1));
                dYoord = dYoord * 180 / (4 * Math.Atan(1));
            }
            catch (Exception)
            {
                throw;
            }
        }
Exemplo n.º 20
0
        public void Execute()
        {
            short  fNo = 0;
            string attributeValue;

            try
            {
                IGTComponent    component   = Components[ComponentName];
                ADODB.Recordset componentRs = component.Recordset;

                if (componentRs.RecordCount > 0)
                {
                    componentRs.MoveFirst();

                    if (componentRs.Fields["G3E_FNO"].Value == null)
                    {
                        return;
                    }

                    fNo = Convert.ToInt16(componentRs.Fields["G3E_FNO"].Value);
                    CheckForActiveFnoInValueMap(fNo, out attributeValue);
                    if (!String.IsNullOrEmpty(attributeValue))
                    {
                        componentRs.Fields["ORIENTATION_C"].Value = attributeValue;
                    }
                }
            }
            catch (Exception ex)
            {
                MessageBox.Show("Error during Set Attributes By FeatureClass execution. " + ex.Message, "G/Technology");
            }
        }
Exemplo n.º 21
0
    } // end function;

    public string Get_whatif_comment(int wid)
    {
        //on error GoTo Err_Get_whatif_name;

        ADODB.Recordset recset1 = null;
        string          retval;

        if (wid == 0)
        {
            retval = "Base Case";
        }
        else
        {
            DbUse.open_ado_rec(globaldb, ref recset1, "tblwhatif");
            recset1.Filter = "[wid] =" + wid;
            retval         = (string)recset1.Fields["Comm"].Value;
            DbUse.CloseAdoRec(recset1);
            recset1 = null;
        };

        // return; //exit _Get_whatif_name:
        return(retval);  //exit  Function;

        //Err_Get_whatif_name:
        // msgbox(ErrorToString(), 0, appl_name);
        //RESUME NEXT
    } // end function;
Exemplo n.º 22
0
        /// <summary>
        /// Mcheck Selected features are Valid for Merge
        /// </summary>
        /// <param name="g3eFno_trg"></param>
        /// <param name="g3eFid_trg"></param>
        /// <param name="g3eFno_src"></param>
        /// <param name="g3eFid_src"></param>
        /// <returns></returns>
        private bool CheckFeaturesAreValidForMerge(int g3eFno_trg, int g3eFid_trg, int g3eFno_src, int g3eFid_src)
        {
            ADODB.Recordset rs          = null;
            bool            flag        = false;
            string          sqlStmt     = "SELECT LBM_UTL.FeaturesAreValidForMerge({0},{1},{2},{3}) FROM DUAL";
            string          mergeStatus = string.Empty;

            try
            {
                rs = Execute(string.Format(sqlStmt, g3eFno_trg, g3eFid_trg, g3eFno_src, g3eFid_src));
                if (rs != null)
                {
                    rs.MoveFirst();
                    mergeStatus = Convert.ToString(rs.Fields[0].Value.ToString());
                    if (mergeStatus == "TRUE")
                    {
                        flag = true;
                    }
                    else
                    {
                        flag = false;
                    }
                }

                if (!flag)
                {
                    MessageBox.Show(mergeStatus, msgBoxCaption, MessageBoxButtons.OK, MessageBoxIcon.Information);
                }
            }
            catch (Exception ex)
            {
                MessageBox.Show("Error " + ex.Message, msgBoxCaption, MessageBoxButtons.OK, MessageBoxIcon.Error);
            }
            return(flag);
        }
Exemplo n.º 23
0
    public string Get_whatif_name(int wid)
    {
        //on error GoTo Err_Get_whatif_name;

        ADODB.Recordset recset1 = null;
        string          retval;

        if (wid == 0)
        {
            retval = "Basecase";
        }
        else
        {
            DbUse.open_ado_rec(globaldb, ref recset1, "Select tblwhatif.* from tblwhatif where wid = " + wid + ";");
            if (recset1.EOF)
            {
                retval = "";
            }
            else
            {
                retval = (string)recset1.Fields["Name"].Value;
            }

            DbUse.CloseAdoRec(recset1);
            recset1 = null;
        };

        return(retval);  //exit  Function;

        //Err_Get_whatif_name:
        // msgbox(ErrorToString(), 0, appl_name);
        //RESUME NEXT
    } // end function;
Exemplo n.º 24
0
        /// <summary>
        ///
        /// </summary>
        /// <param name="queryString"></param>
        /// <returns></returns>
        public List <double> QueryDataReturnListDouble(string queryString)
        {
            if (con == null || con.State != 1)
            {
                this.OpenConnection();
            }
            if (con.State != 1)
            {
                return(null);
            }

            //open recordset
            rs = new ADODB.Recordset();
            rs.Open(queryString, con);

            //get data
            object[,] dataRows = (object[, ])rs.GetRows();
            List <double> ts = new List <double>();

            for (int i = 0; i < dataRows.GetLength(1); i++)
            {
                object[] p = Enumerable.Range(0, dataRows.GetLength(0)).Select(x => dataRows[x, i]).ToArray();
                ts.Add((double)p[0]);
            }

            //close recordset
            rs.Close();
            rs = null;

            //return data
            return(ts);
        }
Exemplo n.º 25
0
        private void DisplayResults()
        {
            //SS:01/03/2018:2018-R1:ABSEXCH-19796: When Running the ExchDVT.exe, SQL Admin Passwords are visible in dump file.
            ADODB.Connection conn = new ADODB.Connection();
            ADODB.Command    cmd  = new ADODB.Command();
            cmd.CommandText = "SELECT RCount = COUNT(*) " +
                              "FROM [common].[SQLDataValidation] " +
                              "WHERE UPPER(Severity) = 'HIGH' " +
                              "AND SchemaName = '" + CompanyCode + "'";
            cmd.CommandTimeout = 10000;

            if (conn.State == 0)
            {
                if (connPassword.Trim() == "")
                {
                    conn.Open();
                }
                else
                {
                    conn.Open(ExchequerCommonSQLConnection, "", connPassword.Trim(),
                              (int)ADODB.ConnectModeEnum.adModeUnknown);
                }
            }
            conn.CursorLocation = ADODB.CursorLocationEnum.adUseClient;

            DataTable dataTable = new DataTable();

            cmd.CommandType      = ADODB.CommandTypeEnum.adCmdText;
            cmd.ActiveConnection = conn;
            ADODB.Recordset recordSet = null;
            object          objRecAff;

            try
            {
                recordSet = (ADODB.Recordset)cmd.Execute(out objRecAff, Type.Missing, (int)ADODB.CommandTypeEnum.adCmdText);
            }
            catch
            {
                throw;
            }

            for (int i = 0; i < recordSet.RecordCount; i++)
            {
                if (Convert.ToInt32(recordSet.Fields["RCount"].Value) == 0)
                {
                    // Posting Enabled
                    PostingEnabledDisabled(true, false);
                }
                else
                {
                    // Posting Disabled
                    PostingEnabledDisabled(false, false);
                }
            }

            File.Delete(fileString);

            Application.Exit();
        }
Exemplo n.º 26
0
        /// <summary>
        /// Execute SQL statement
        /// </summary>
        /// <param name="sqlStmt"></param>
        /// <returns></returns>
        public static Recordset Execute(string sqlStmt)
        {
            int recordsAffected;

            ADODB.Recordset rs = null;
            rs = _gtDataContext.Execute(sqlStmt, out recordsAffected, (int)ADODB.CommandTypeEnum.adCmdText);
            return(rs);
        }
        /// <summary>
        /// Execute SQL statement
        /// </summary>
        /// <param name="sqlStmt"></param>
        /// <returns></returns>
        private Recordset Execute(string sqlStmt)
        {
            int recordsAffected;

            ADODB.Recordset rs = null;
            rs = gtApp.DataContext.Execute(sqlStmt, out recordsAffected, (int)ADODB.CommandTypeEnum.adCmdText);
            return(rs);
        }
Exemplo n.º 28
0
        /// <summary>
        /// Execute SQL Statement
        /// </summary>
        /// <typeparam name="T"></typeparam>
        /// <param name="sqlStmt"></param>
        /// <returns></returns>
        public static List <T> Execute <T>(string sqlStmt)
        {
            int recordsAffected;

            ADODB.Recordset rs = null;
            rs = _gtDataContext.Execute(sqlStmt, out recordsAffected, (int)ADODB.CommandTypeEnum.adCmdText);
            return(ConvertRSToEntity <T>(rs));
        }
Exemplo n.º 29
0
        private void save_form()
        {
            try
            {
                //ADOconn.BeginTrans();
                ADODB.Recordset cus = new ADODB.Recordset();
                //ADOconn.BeginTrans();

                if (cmbgrp.Text == "")
                {
                    MessageBox.Show("Invalid User Group", "Invalid Entry");
                    return;
                }
                dgv1.EndEdit();
                ADODB.Connection ADOconn = new ADODB.Connection();
                ADOconn.Open("Provider=SQLOLEDB;Initial Catalog= " + decoder.InitialCatalog + ";Data Source=" + decoder.DataSource + ";", decoder.UserID, decoder.Password, 0);

                for (int i = 1; i < dgv1.RowCount; i++)
                {
                    if (dgv1["id", i].Value == null)
                    {
                        continue;
                    }
                    cus = new ADODB.Recordset();
                    sql = "SELECT * FROM userpriv where GROUP_NAME ='" + cmbgrp.Text + "' and form_id=" + dgv1["id", i].Value;
                    cus.Open(sql, ADOconn, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic, -1);
                    if (cus.RecordCount == 0)
                    {
                        cus.AddNew();
                    }
                    cus.Fields["GROUP_NAME"].Value = cmbgrp.Text;
                    cus.Fields["form_id"].Value    = dgv1["id", i].Value;
                    cus.Fields["ins"].Value        = dgv1["ins", i].Value;
                    cus.Fields["upd"].Value        = dgv1["upd", i].Value;
                    //cus.Fields["qry"].Value = dgv1["qry",i].Value;
                    cus.Fields["del"].Value       = dgv1["del", i].Value;
                    cus.Fields["dsp"].Value       = dgv1["dsp", i].Value;
                    cus.Fields["Menu_Name"].Value = dgv1["Menu_Name", i].Value;
                    cus.Update();
                }

                string grp = cmbgrp.Text;
                sql = "SELECT   distinct group_name  FROM UserPriv ";
                SqlDataAdapter adagrp = new SqlDataAdapter(sql, Conn);
                ///ada.TableMappings.Add("Table", "Leaders");
                DataSet grpds = new DataSet();

                adagrp.Fill(grpds, "UserPriv");
                cmbgrp.DisplayMember = "group_name";
                cmbgrp.DataSource    = grpds.Tables[0];
                cmbgrp.Text          = grp;
            }
            catch (Exception ex)
            {
                MessageBox.Show(ex.Message);
            }
        }
Exemplo n.º 30
0
        public ADODB.Recordset GetPreferredCU(string p_CategoryCode)
        {
            ADODB.Recordset rs  = null;
            string          sql = string.Empty;

            sql = "select CU_CODE from CUSELECT_USERPREF where PREF_UID = ? and CU_CATEGORY_CODE =?";
            rs  = m_oApp.DataContext.OpenRecordset(sql, CursorTypeEnum.adOpenDynamic, LockTypeEnum.adLockOptimistic, (int)ADODB.CommandTypeEnum.adCmdText, m_oApp.DataContext.DatabaseUserName, p_CategoryCode);
            return(rs);
        }
Exemplo n.º 31
0
 public void Return_SpreadSheet(string strSQL, string strPath)
 {
     ADODB.Connection adoConnection = new ADODB.Connection();
     ADODB.Recordset  objRecordset  = ReturnRecordset(strSQL, ref adoConnection);
     if (objRecordset.RecordCount > 0)
     {
         CreateSpreadSheet(objRecordset, strPath);
     }
 }
Exemplo n.º 32
0
 public static DataTable GetDataTable(string strFileName)
 {
     ADODB.Connection oConn = new ADODB.Connection();
     oConn.Open("Provider=Microsoft.Jet.OleDb.4.0; Data Source = " + System.IO.Path.GetDirectoryName(strFileName) + "; Extended Properties = \"Text;HDR=YES;FMT=Delimited\";", "", "", 0);
     string strQuery = "SELECT * FROM [" + System.IO.Path.GetFileName(strFileName) + "]";
     ADODB.Recordset rs = new ADODB.Recordset();
     System.Data.OleDb.OleDbDataAdapter adapter = new System.Data.OleDb.OleDbDataAdapter();
     DataTable dt = new DataTable();
     rs.Open(strQuery, "Provider=Microsoft.Jet.OleDb.4.0; Data Source = " + System.IO.Path.GetDirectoryName(strFileName) + "; Extended Properties = \"Text;HDR=YES;FMT=Delimited\";",
         ADODB.CursorTypeEnum.adOpenForwardOnly, ADODB.LockTypeEnum.adLockReadOnly, 1);
     adapter.Fill(dt, rs);
     return dt;
 }
Exemplo n.º 33
0
        private void button1_Click(object sender, System.EventArgs e)
        {
            short number = short.Parse(this.textBox1.Text);

            DataSet ds = new DataSet("FromRecordset");
            OleDbDataAdapter da = new OleDbDataAdapter();
            DataAccess.ProductsClass prod = new DataAccess.ProductsClass();
            Recordset rs = new ADODB.Recordset();

            rs = prod.Select_(number);

            da.Fill(ds, rs, "Products");

            dataGrid1.SetDataBinding(ds,"Products");
        }
        private object[] db_access(string strSQL, ref int fndExcep)
        {
            ADODB.Connection objCon;
                ADODB.Recordset objRec;
                object[,] dataRows;
                object[] dataSuite;
                string strCon;
                string tmpString;

                dataSuite = null;
                objCon = new ADODB.Connection();
                objRec = new ADODB.Recordset();
                try
                {
                    //establish the connection string and open the database connection
                    strCon = "driver={MySQL ODBC 5.1 Driver};server=107.22.232.228;uid=qa_people;pwd=thehandcontrols;" +
                        "database=functional_test_data;option=3";

                    objCon.Open(strCon);

                    //execute the SQL and return the recrodset of results
                    objRec = objCon.Execute(strSQL, out missing, 0);

                    //populate a two dinmensional object array with the results
                    dataRows = objRec.GetRows();

                    //get a one dimensional array that can be placed into the Test Suite dropdown
                    dataSuite = thinArray(dataRows);

                    //close the recordset
                    objRec.Close();

                    //close the database connection
                    objCon.Close();
                }
                catch (Exception e)
                {
                    tmpString = e.Message;

                    //set the variable to ternibate the script
                    fndExcep = -1;

                }

                return dataSuite;
        }
Exemplo n.º 35
0
        static ADODB.Recordset ConvertToRecordset(DataTable inTable)
        {
            ADODB.Recordset result = new ADODB.Recordset();
            result.CursorLocation = ADODB.CursorLocationEnum.adUseClient;

            ADODB.Fields resultFields = result.Fields;
            System.Data.DataColumnCollection inColumns = inTable.Columns;

            foreach (DataColumn inColumn in inColumns)
            {
                resultFields.Append(inColumn.ColumnName
                    , TranslateType(inColumn.DataType)
                    , inColumn.MaxLength
                    , inColumn.AllowDBNull ? ADODB.FieldAttributeEnum.adFldIsNullable :
                                             ADODB.FieldAttributeEnum.adFldUnspecified
                    , null);
            }

            result.Open(System.Reflection.Missing.Value
                    , System.Reflection.Missing.Value
                    , ADODB.CursorTypeEnum.adOpenStatic
                    , ADODB.LockTypeEnum.adLockOptimistic, 0);

            foreach (DataRow dr in inTable.Rows)
            {
                result.AddNew(System.Reflection.Missing.Value,
                              System.Reflection.Missing.Value);

                for (int columnIndex = 0; columnIndex < inColumns.Count; columnIndex++)
                {
                    resultFields[columnIndex].Value = dr[columnIndex];
                }
            }

            return result;
        }
Exemplo n.º 36
0
        static public ADODB.Recordset GetResultsFromQueryToRecordset(string connectionString, string query)
        {
            //ConvertToRecordset(GetResultsFromQueryToDataTable(connectionString, query);
            ADODB.Recordset rstReturn = new ADODB.Recordset();

            using (SqlConnection conSQL = new SqlConnection(connectionString))
            {
                using (SqlCommand cmdSQL = new SqlCommand(query, conSQL))
                {
                    try
                    {
                        conSQL.Open();
                        SqlDataReader dr = cmdSQL.ExecuteReader();
                        DataTable dt = new DataTable();
                        dt.Load(dr);
                        rstReturn = ConvertToRecordset(dt);
                    }
                    catch (SqlException ex)
                    {
                        Log.logFileTRAP(app, "GetResultsFromQueryToRecordset()", ex.ToString());
                        rstReturn = null;
                    }
                    catch (Exception ex)
                    {
                        Log.logFileTRAP(app, "GetResultsFromQueryToRecordset()", ex.ToString());
                        rstReturn = null;
                    }
                    finally
                    {
                        conSQL.Close();
                    }
                }
            }

            return rstReturn;
        }
        public object[] db_access(string strSQL)
        {
            ADODB.Connection objCon;
            ADODB.Recordset objRec;
            object[,] dataRows;
            object[] dataSuite;
            string strCon;

            objCon = new ADODB.Connection();
            objRec = new ADODB.Recordset();

            //establish the connection string and open the database connection
            strCon = "driver={MySQL ODBC 5.1 Driver};server=107.22.232.228;uid=qa_people;pwd=thehandcontrols;" +
                "database=functional_test_data;option=3";

            objCon.Open(strCon);

            //execute the SQL and return the recrodset of results
            objRec = objCon.Execute(strSQL, out missing, 0);

            //populate a two dinmensional object array with the results
            dataRows = objRec.GetRows();

            //get a onedimensional array that can be placed into the Test Suite dropdown
            dataSuite = thinArray(dataRows);

            //close the recordset
            objRec.Close();

            //close the database connection
            objCon.Close();

            return dataSuite;
        }