Н>Просто ради интереса — кто чего делает. 20 строк, надеюсь коммерческой тайны не составляют

parameters f1, f2
local xTemp := ""

if f1 = NIL .or. f2 = NIL .or. f1 = "/?" 
   quit
end

? "Source: " + f1
? "Target: " + f2
? ""
use (f1)
? "Copy structure..."
copy structure to (f2)
use (f1)
? "Export to SDF..."
xTemp := "_temp.txt"
copy to (xTemp) SDF
? "Import from SDF..."
use (f2)
append from (xTemp) sdf
? "...complete"

B>А потом костлявая с косой?

 kill -9 vash_PID

Счастье, это когда множество желаний есть подмножество множества возможностей.... (с)студенты ВМиК

Н>Просто ради интереса — кто чего делает. 20 строк, надеюсь коммерческой тайны не составляют

Н>        class XmlContainerSerializer
Н>        {
Н>        public:
Н>            //
Н>            // Serializes container
Н>            template <typename Container>
Н>            static MSXML2::IXMLDOMElementPtr Serialize(const MSXML2::IXMLDOMDocument2Ptr &xmlDocument,
Н>                const Container &container, long lItems, const CString &strElementName)
Н>            {
Н>                MSXML2::IXMLDOMElementPtr xmlElement = xmlDocument->createElement((LPCTSTR)strElementName);
Н>                for(long lItem = 0; lItem < lItems; ++lItem)
Н>                    xmlElement->appendChild(container[lItem].Serialize(xmlDocument));

Н>                return xmlElement;
Н>            }

Н>            //
Н>            // Deserializes container. strXPath is the XPath expression
Н>            // which selects root node
Н>            template <typename Container, typename Type>
Н>            static void Deserialize(const MSXML2::IXMLDOMElementPtr &xmlElement, Container &container,
Н>

convert    bcf     PORTA,CS     ; подтверждаем приём
        movlw    0x08        ; инициализируем приём 8 битов данных
        movwf    counter2
loop    bsf        PORTA,CLK    ; генерим тактовый импульс
        nop                    ; погодим....
        bcf        PORTA,CLK    ; сбрасываем тактовый импульс
        btfss    PORTB,data_    ;
        bcf     STATUS,C    ;
        btfsc    PORTB, data_;
        bsf        STATUS, C     ;
        rlf     adresult, 1    ; сдвигаемся влево, выводим перенос
        decfsz     counter2,1    ;
        goto     loop        ;
        bsf        PORTA,CS    ;
        retlw    0x00        ;


wait32    
        movlw    0x0F
        movwf    counter1
st        decfsz     counter1, 1    
        goto     st
        retlw    0x00

    
        org     0x04
        BANK0
        btfsc    INTCON, RBIF; от rb?
        btfsc    PORTB, 7
        call    send        ; начинаем передачу

Счастье, это когда множество желаний есть подмножество множества возможностей.... (с)студенты ВМиК

public void GetGoods()
{
    OnlineProxyContext prxContext = new OnlineProxyContext(
        "SCDemoClient",
        "SCDemo.SvcProxy",
        "GetGoods");
    ServiceAgentContext saCtx = new ServiceAgentContext("GoodsAvailableCallBack");
    ReferenceDataDefinition dataDef = new ReferenceDataDefinition(
        _cacheKey, 600, prxContext);
    OfflineBlockBuilder.Instance.DataLoaderManager.LoadData(
        Guid, saCtx, dataDef);
}

public void AddGood(Good good)
{
    OnlineProxyContext prxContext = new OnlineProxyContext(
        "SCDemoClient",
        "SCDemo.SvcProxy",
        "AddGood");
    ServiceAgentContext saCtx = new ServiceAgentContext("GoodAdded");
    Payload pl = new Payload(prxContext, Guid, saCtx, good);
    OfflineBlockBuilder.Instance.PayloadConsumer.Enqueue(pl);
}

Н>Просто ради интереса — кто чего делает. 20 строк, надеюсь коммерческой тайны не составляют

/// <summary>
        /// Execute an OleDbCommand (that returns a 1x1 resultset) against the database specified in the connection string 
        /// using the provided parameters.
        /// </summary>
        /// <param name="commandText">SQL command</param>
        /// <param name="commandParameters">An array of OleDbParameters used to execute the command</param>
        /// <returns>An object containing the value in the 1x1 resultset generated by the command</returns>        
        public object ExecuteScalar(string commandText, params OleDbParameter[] commandParameters)
        {
            // Return Value
            // The first column of the first row in the result set, 
            // or a null reference if the result set is empty.
            return InternalExecuteCommand(commandText,ExecuteCommandType.ExecuteScalar,commandParameters);
        }

        /// <summary>
        /// Execute an OleDbCommand using the provided parameter values.
        /// </summary>
        /// <param name="commandText">SQL command</param>
        /// <param name="commandText"></param>
        /// <param name="commandType">Enum indicating  type of command calling, ExecuteScalar or ExecuteNonQuery.</param>
        /// <param name="commandParameters">An array of OleDbParameters used to execute the command</param>
        /// <returns>An object containing the value in resultset generated by the command</returns>        
        /// <exception cref="System.ArgumentNullException">Thrown if commandText is null</exception>
        private object InternalExecuteCommand(string commandText, ExecuteCommandType commandType, params OleDbParameter[] commandParameters)
        {
            if( commandText == null || commandText.Length == 0 ) throw new ArgumentNullException( "commandText" );
            using (OleDbConnection dbCnctn = GetConnection())
            {
                OleDbCommand dbCmnd = new OleDbCommand(commandText,dbCnctn);
                foreach (OleDbParameter pr in commandParameters)
                    dbCmnd.Parameters.Add(pr);
                // Open the database connection and execute the command
                dbCnctn.Open();
        
                if (ExecuteCommandType.ExecuteScalar == commandType)
                    
                    // Return Value
                    // The first column of the first row in the result set, 
                    // or a null reference if the result set is empty.

                    return dbCmnd.ExecuteScalar();

                    // Return Value
                    // The number of rows affected.

                else return dbCmnd.ExecuteNonQuery(); 
            }
        }

            using(SqlConnection conn = new SqlConnection(System.Configuration.ConfigurationSettings.AppSettings["ConnectionString"]))
            {
                SqlCommand cmd = new SqlCommand();
                cmd.CommandText = "SELECT * FROM Contacts WHERE id = @id";
                cmd.Parameters.Add("@id", id);
                thisClass = (Contact)cl.SqlSelectFromDB.FillObjectFromSqlDataReader(thisClass, cmd, conn);
            }

using System;
using System.Collections;
using System.ComponentModel;
using System.Drawing;
using System.Windows.Forms;
using System.Reflection;

using Infragistics.Win;
using Infragistics.Win.UltraWinGrid;

namespace WW.Controls
{
    // some typedefs for shorting
    using _A = UltraGridAction;
    using _S = UltraGridState;
    using _C = UltraGridCell;

    [Serializable]
    public class Grid : Infragistics.Win.UltraWinGrid.UltraGrid
    {

        public Grid()
        {
            Infragistics.Win.Appearance backAppearance = new Infragistics.Win.Appearance();
            backAppearance.BackColor = System.Drawing.Color.White;
            backAppearance.BorderColor = System.Drawing.Color.LightGray;
            backAppearance.FontData.SizeInPoints = 8F;
            this.DisplayLayout.Appearance = backAppearance;

        }
    
        protected override void OnKeyDown(KeyEventArgs e)
        {    
            switch (e.KeyData) 
            {
                case Keys.Up : 
                {
                    _C c = this.ActiveCell;
                    if (c != null && c.IsInEditMode) 
                    {
                        if ((this.CurrentState & _S.FirstRowInGrid) == 0)
                        {
                            if (TryPerformAction(_A.ExitEditMode))
                                PerformAction(_A.AboveCell);
                        }
                        e.Handled = true;
                    } 
                }
                    break;

                case Keys.Down : 
                {
                    _C c = this.ActiveCell;
                    if (c != null && c.IsInEditMode) 
                    {
                        if ((this.CurrentState & _S.LastRowInGrid) == 0) 
                        {
                            if (TryPerformAction(_A.ExitEditMode))
                                PerformAction(_A.BelowCell);
                        }                    
                        e.Handled = true;
                    }
                }
                    break;

                case Keys.Left : 
                {
                    _C c = ActiveCell;
                    if (c != null && 
                        c.Column.Editor.SupportsSelectableText && 
                        c.IsInEditMode && 
                        c.SelStart == 0) 
                    {
                        if (((this.CurrentState & _S.FirstRowInGrid) == 0) || 
                            ((this.CurrentState & _S.CellFirst) == 0))
                        {
                            if (TryPerformAction(_A.ExitEditMode))
                                PerformAction(_A.PrevCell);
                        }
                        e.Handled = true;
                    }
                }
                    break;

                case Keys.Right : 
                {
                    _C c = ActiveCell;
                    if (c != null && 
                        c.Column.Editor.SupportsSelectableText && 
                        c.IsInEditMode && 
                        c.SelStart + c.SelLength == c.Text.Length) 
                    {
                        if (((this.CurrentState & _S.LastRowInGrid) == 0) || 
                            ((this.CurrentState & _S.CellLast) == 0))
                        {
                            if (TryPerformAction(_A.ExitEditMode))
                                PerformAction(_A.NextCell);
                        }
                        e.Handled = true;
                    }
                }
                    break;

                case Keys.Enter : 
                {
                    _C c = ActiveCell;
                    if (c != null && 
                        c.Column.Editor.SupportsSelectableText && 
                        c.IsInEditMode) 
                    {
                        if (((this.CurrentState & _S.LastRowInGrid) == 0) || 
                            ((this.CurrentState & _S.CellLast) == 0))
                        {
                            if (TryPerformAction(_A.ExitEditMode))
                                PerformAction(_A.BelowCell);
                        }
                        e.Handled = true;
                    }
                }
                    break;

            }
            
            base.OnKeyDown(e);
        }

        protected override void OnAfterCellActivate()
        {
            if (this.ActiveCell.CanEnterEditMode) 
                this.PerformAction(_A.EnterEditMode);
        }

        /// <summary>
        /// internal helper class
        /// </summary>
        internal class Helper 
        {

            static Type cellType = typeof(_C);

            /// <summary>
            /// using of reflection to retrive private field
            /// </summary>
            /// <param name="c">cell</param>
            /// <returns>displayText field value</returns>
            public static string GetDisplayText(_C c)
            {
                FieldInfo pi = cellType.GetField("displayText", BindingFlags.NonPublic | BindingFlags.Instance);
                return pi.GetValue(c) as string;
            }

            public static void SetDisplayText(_C c, string txt)
            {
                FieldInfo pi = cellType.GetField("displayText", BindingFlags.NonPublic | BindingFlags.Instance);
                pi.SetValue(c, txt);
            }
        }

        bool cancelEvent = false;
        public void CancelEvent()
        {
            cancelEvent = true;
        }

        public bool TryExitEditMode()
        {
            return TryPerformAction(_A.ExitEditMode);
        }

        public bool TryPerformAction(_A action)
        {
            cancelEvent = false;
            PerformAction(action);
            return!cancelEvent;
        }
    
        protected override void OnBeforeCellUpdate(BeforeCellUpdateEventArgs e)
        {
            try
            {
                base.OnBeforeCellUpdate(e);
                cancelEvent = e.Cancel;
            }
            catch {
                _C c = e.Cell;
                if (c.Column.Editor.SupportsSelectableText) 
                {
                    c.SelStart = 0;
                    c.SelLength = c.Text.Length;
                }                
                throw;
            }
        }
    
    
        protected override void OnGotFocus(EventArgs e)
        {
            base.OnGotFocus(e);
            _C c = this.ActiveCell;
            if (c != null) {
                //PerformAction(_A.EnterEditMode);
            }
        }
    
        protected override void WndProc(ref Message m)
        {
            // TODO:  Add Grid.WndProc implementation
            try
            {
                base.WndProc (ref m);
            } catch (Exception e) {
//                MessageBox.Show(e.ToString());
            }
        }
    }
}