在lightswitch中將一條記錄複製到另一條記錄

Question

有誰知道如何做到這一點。我GOOGLE了它，但它是2010年的老教程視頻，似乎並沒有匹配正確的指示如何做到這一點。我使用的是2012. 我想添加一個複製按鈕，然後點擊一個記錄，點擊複製，並添加一個新記錄，其中默認值爲您選擇的值。

Answer 1

在我的應用程序中，我跟蹤銷售報價。我有能力製作和保留報價修訂。我通過一個按鈕來創建一個新的修訂版，通過複製以前的修訂版開始。

你沒有提到你正在使用哪種語言。我使用VB.NET，但大部分代碼都是非常簡單的東西，只是聲明和分配，所以你應該可以很容易地將它轉換爲C＃。將關鍵字Me替換爲this，你就是那裏的大部分。

在我的按鈕的_Execute()代碼，我首先要要複製的記錄的本地副本：

'Create a quote object to hold the quote to be revised 
Dim CurrentRev As Quote 
CurrentRev = Me.qQuoteByFirm.SelectedItem 

我再添加一個新的記錄到數據庫：

'Add a new quote entity to the database 
Me.qQuoteByFirm.AddNew() 

並複製相關信息：

'Copy the necessary relevant values to the new quote 
Me.qQuoteByFirm.SelectedItem.QuoteNumber = CurrentRev.QuoteNumber 
Me.qQuoteByFirm.SelectedItem.RepFirm = CurrentRev.RepFirm 
Me.qQuoteByFirm.SelectedItem.Customer = CurrentRev.Customer 
Me.qQuoteByFirm.SelectedItem.QuoteStatus = CurrentRev.QuoteStatus 

這將製作當前選定的副本記錄記錄中的每個值是否是單個值。如果某個值與另一個表有關係並且包含多個記錄，則需要循環訪問該值。

例如，以上只是我的報價的一般信息。我也與報價行項目表有關係。每個報價都有幾個項目，所有這些都需要複製。所以我需要遍歷每個訂單項並創建一個副本。

'Duplicate all associate quote line items 
For Each item In CurrentRev.QuoteLines 
    Me.qLineItemsByQuoteID.AddNew() 
    Me.qLineItemsByQuoteID.SelectedItem.ItemNo = item.ItemNo 
    Me.qLineItemsByQuoteID.SelectedItem.ProductQty = item.ProductQty 
    Me.qLineItemsByQuoteID.SelectedItem.Description = item.Description 
    Me.qLineItemsByQuoteID.SelectedItem.SellPrice = item.SellPrice 
    Me.qLineItemsByQuoteID.SelectedItem.PartNo = item.PartNo 
Next