Vítejte !   Přihlášení | Registrace
Hlavní menu
CATIA fórum.cz
Novinky
Seriál CATIA
Obecně o CAD
Novinky ze světa DS
Makra pro CATIA V5
Diskuse
Vytvořit téma
Koncepty
Seznam oblíbených
Soukromé zprávy
Pravidla
Live CHAT
VIP žádost
Základy Catia
Ke stažení
Doporučujeme
Pracovní příležitosti
Reklama a kampaně
O fóru
Nápověda

Přejmenování Instance name

Kompletní přehled příspěvků v tématu Přejmenování Instance name řazený podle data jejich publikace na fóru.

UživatelPříspěvek
Libor Váchal

Poslat zprávu | Profil
Datum: 12.5. 2017 | Zobrazeno: 395x
Konfigurace CATIA: V5-6R2014, MD2 + GSD

Text dotazu:
Ahoj,

používám tento script na přejmenování instance name vše funguje jak má do chvíle kdy se v Part Number objeví tečka. Zkoušel jsem to upravit, ale už si s tím nevím rady.

MS VBScript

Sub CATMain()


Prod = 11
Part = 8


Set Documents = CATIA.documents

For Each Item In Documents


If Right(Item.Name,10) = "CATProduct" Then

CurrentFileName = Left(Item.Name, (Len(Item.Name) - Prod))

ElseIf Right(Item.Name,7) = "CATPart" Then

CurrentFileName = Left(Item.Name, (Len(Item.Name) - Part))

End If

Set CurrentPart = Item.GetItem(CurrentFileName)

CurrentPart.PartNumber = CurrentFileName

Next



For i = 1 To Documents.Count

If Right(Documents.Item(i).Name,10) = "CATProduct" Then

Set CurrentProduct2 = Documents.Item(i).Product.Products

For Each Item In CurrentProduct2

k = 1

For j = 1 To CurrentProduct2.Count

If CurrentProduct2.Item(j).PartNumber = Item.PartNumber Then

Exists = 0

NewInstanceName = Item.PartNumber & "." & k

For m = 1 To CurrentProduct2.Count

If CurrentProduct2.Item(m).Name = NewInstanceName Then

Exists = 1

Exit For

End If

Next

If Exists = 0 Then

CurrentProduct2.Item(j).Name = NewInstanceName

End If

k = k + 1

End If

Next

Next

End If

Next

End Sub

Ing Jan Cinert

Poslat zprávu | Profil
[#6206] | Publikováno: 12.05. 2017 - 08:03
Dobrý den,

stáhněte si tuhle variantu. Léty osvědčená a plně funkční utilita, poradí si se vším.

Rename Instance Name
http://www.catia-forum.cz/download/file_detail.php?file_id=5841


Váš skript jsem se detailně neprocházel, ale přijde mi i tak trochu krkolomný. Navíc v něm zcela chybí přepnutí do design mode, tj. při práci s Cache (vytváření Cgr) nebude fungovat.


Uživatel nepřihlášen

Pro zobrazení obsahu stránky / provedení akce (vytvoření nového téma, napsání odpovědi do diskuse apod.) musíte být přihlášeni.