The xAssets API - Method : SpecialAssetClone

Summary

Clone an Asset. This makes a "deep" copy of an asset record, such that all child information (specification data, devices, software, transactions, service plans, maintenance) is copied.

Parameters

Parameter : sXMLIgnore

sXMLIgnore : This parameter is not used

Parameter : sArguments

0
AssetID to be cloned
1
Transaction Scaling Factor - use 1.0 to apply the same asset transactions to the clone as the original asset
2
"move" or "keep" for transaction splits
3
"CHILDREN" - just clone the children
4
If (3) = "CHILDREN" this is the assetid
5
ApplyDate - date the clone took place
6
Field1 - preset the below value into this field
7
Value1 - the value to set field1 to
8
Field2 ...

Returns

Returns the AssetID of the newly created asset which is a new clone of the AssetID provided

Syntax and Examples

Restful syntax with Microsoft Visual Basic

Example 1 - Clone asset number 3 and set the Notes field

There is no restful call for this API operation - use a SOAP method instead

SOAP Syntax with Microsoft Visual Basic

Example 1 - Clone asset number 3 and set the Notes field


    Try

        ErrorMessage = ""

        Return w.WebSaveSpecial(_hash, _username, _db, _ip, "", "SpecialAssetClone", {"3", "1", "keep", "", "", "12-Jun-2022 16:34:56", "Notes", "Notes field set during clone operation"}, False, _dns, _port, _scheme, _nonce, _noncedate)

    Catch ex As Exception
        ErrorMessage = ex.Message
        Return "
    End Try

                            

AMSX Syntax

Example 1 - Clone asset number 3 and set the Notes field


    SaveSpecial "SpecialAssetClone","", "3", "1", "keep", "", "", "12-Jun-2022 16:34:56", "Notes", "Notes field set during clone operation"
                        

XCS Syntax

Example 1 - Clone asset number 3 and set the Notes field


    Dim ret as String = Server.SaveSpecial("SpecialAssetClone","", "3", "1", "keep", "", "", "12-Jun-2022 16:34:56", "Notes", "Notes field set during clone operation")
    If ret = " Or ret.Substring(0, 8) = "special=" Then
        MsgBox("Save operation completed.", vbInformation, "Save Data")
    Else
        MsgBox("Save operation failed:" & ret, vbExclamation, "Save Data")
    End If
                        

Download the Visual Studio API Samples Project

Return to the API Index Page