AssignItemIDAndRevUsingPatterns Method

Description

Gives ItemID and Revision according to the pattern given as input to this API

Syntax

Visual Basic
Public Sub AssignItemIDAndRevUsingPatterns( _ ByVal bstrItemType As String, _ ByVal bstrItemIDPattern As String, _ ByVal bstrRevisionPattern As String, _ ByRef pItemIDPattern As String, _ ByRef pRevisionPattern As String _ )

Visual Basic

Public Sub AssignItemIDAndRevUsingPatterns( _
   ByVal bstrItemType As String, _
   ByVal bstrItemIDPattern As String, _
   ByVal bstrRevisionPattern As String, _
   ByRef pItemIDPattern As String, _
   ByRef pRevisionPattern As String _
)

Parameters

bstrItemType: Specify the item-type of the item
bstrItemIDPattern: Specify the pattern in which ItemID is expected.
bstrRevisionPattern: Specify the pattern in which RevID is expected.
pItemIDPattern: ItemID according to pattern provided.
pRevisionPattern: RevisionID according to pattern provided.

Example

Example (VB.NET)

Imports System.Runtime.InteropServices

Public Class Form1

    Private Sub AssignItemIDAndRevUsingPatterns_Click(sender As Object, e As EventArgs) Handles AssignItemIDAndRevUsingPatterns.Click
        Dim objSEApplication As SolidEdgeFramework.Application = Nothing
        Dim objTCE As SolidEdgeFramework.SolidEdgeTCE = Nothing
        Dim majorVersion As Object = Nothing
        Dim completeVersion As Object = Nothing
        Dim UserName As String
        Dim Password As String
        Dim Group As String
        Dim Role As String
        Dim URL As String
        Dim bTeamCenterMode As Boolean
        Dim ItemType As String = "NR9TwoRule"
        Dim ItemIDPattern As String = "NNNNNA"
        Dim RevPattern As String = "NA"
        Dim GeneratedItemID As Object = Nothing
        Dim GeneratedRevID As Object = Nothing


        Try
            objSEApplication = Marshal.GetActiveObject("SolidEdge.Application")
            objSEApplication.DisplayAlerts = False

            objTCE = objSEApplication.SolidEdgeTCE
            Call objTCE.GetTeamCenterMode(bTeamCenterMode)
            If bTeamCenterMode = False Then
                objTCE.SetTeamCenterMode(True)
            End If
            'Specify Server Credentials
            UserName = "abc"
            Password = "abc"
            Group = ""
            Role = ""
            URL = "http://Servername:8085/tc"

            Call objTCE.ValidateLogin(UserName, Password, Group, Role, URL)
            objTCE.AssignItemIDAndRevUsingPatterns(ItemType, ItemIDPattern, RevPattern, GeneratedItemID, GeneratedRevID)


        Catch ex As Exception
            MsgBox(ex.ToString)
            Clipboard.SetText(ex.ToString)
        End Try
    End Sub
End Class