Exemplo n.º 1
0
        /// <summary>
        /// Capture the selected macro variables as a series
        /// of LET statements, to provide a simple template
        /// for setting these values within a program.
        /// </summary>
        /// <param name="sender"></param>
        /// <param name="e"></param>
        private void OnCopyMacroAssignments(object sender, EventArgs e)
        {
            StringBuilder sb = new StringBuilder();

            foreach (ListViewItem lvi in lvMacros.SelectedItems)
            {
                MacroVar mv = lvi.Tag as MacroVar;
                if (mv != null)
                {
                    if (mv.Scope == "AUTOMATIC")
                    {
                        sb.AppendFormat("/* AUTOMATIC variable {0} */\n%let {0} = {1};\n", mv.Name, mv.CurrentValue);
                    }
                    else
                    {
                        sb.AppendFormat("%let {0} = {1}; \n", mv.Name, mv.CurrentValue);
                    }
                }
            }
            try
            {
                Clipboard.SetData(System.Windows.Forms.DataFormats.Text, sb.ToString());
            }
            catch { }
        }
Exemplo n.º 2
0
        /// <summary>
        /// Query to retrieve the macro values from the active server
        /// </summary>
        private void RetrieveMacroValues()
        {
            SasServer s = cmbServers.SelectedItem as SasServer;

            using (System.Data.OleDb.OleDbConnection dbConnection = s.GetOleDbConnection())
            {
                //----- make provider connection
                dbConnection.Open();

                //----- Read values from query command
                string          sql        = @"select * from sashelp.vmacro order by name";
                OleDbCommand    cmdDB      = new OleDbCommand(sql, dbConnection);
                OleDbDataReader dataReader = cmdDB.ExecuteReader(CommandBehavior.CloseConnection);
                try
                {
                    MacroVars = new List <MacroVar>();
                    while (dataReader.Read())
                    {
                        MacroVar var = new MacroVar()
                        {
                            Name         = dataReader["name"].ToString(),
                            CurrentValue = dataReader["value"].ToString(),
                            Scope        = dataReader["scope"].ToString()
                        };
                        MacroVars.Add(var);
                    }
                }

                finally
                {
                    dataReader.Close();
                    dbConnection.Close();
                }
            }
        }
Exemplo n.º 3
0
        /// <summary>
        /// Query to retrieve the macro values from the active server
        /// </summary>
        private void RetrieveMacroValues()
        {
            SasServer s = cmbServers.SelectedItem as SasServer;
            using (System.Data.OleDb.OleDbConnection dbConnection = s.GetOleDbConnection())
            {

                //----- make provider connection
                dbConnection.Open();

                //----- Read values from query command
                string sql = @"select * from sashelp.vmacro order by name";
                OleDbCommand cmdDB = new OleDbCommand(sql, dbConnection);
                OleDbDataReader dataReader = cmdDB.ExecuteReader(CommandBehavior.CloseConnection);
                try
                {
                    MacroVars = new List<MacroVar>();
                    while (dataReader.Read())
                    {
                        MacroVar var = new MacroVar()
                        {
                            Name = dataReader["name"].ToString(),
                            CurrentValue = dataReader["value"].ToString(),
                            Scope = dataReader["scope"].ToString()
                        };
                        MacroVars.Add(var);
                    }

                }

                finally
                {
                    dataReader.Close();
                    dbConnection.Close();
                }

            }
        }