Vítejte !   Přihlášení | Registrace
Hledat
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řevod AllCatPart na sestavu

UživatelPříspěvek
petan86

Poslat zprávu | Profil
Datum: 25.7. 2013 | Zobrazeno: 12191x
Konfigurace CATIA:

Text dotazu:
Dobry den,
chtel bych se zeptat na makrro, ktere prevede allcatpart zpet na sestavu. Uz jsem na ne nekde narazil, ale ted je nemuzu najit..

Poradi te mi?

Dekuji

Vit Cerny

Poslat zprávu | Profil 		[#4024] | Publikováno: 25.07. 2013 - 10:35
Není to makro, ale fce přímo v Catii. (Tools - Generate Catpart from product)

Přiložené obrázky:

petan86

Poslat zprávu | Profil 		[#4025] | Publikováno: 25.07. 2013 - 10:37
O teto funkci vim, ale potrebuji obraceny postup.
Vit Cerny

Poslat zprávu | Profil 		[#4026] | Publikováno: 25.07. 2013 - 10:38
Omlouvám se, špatně jsem to přečetl.
petan86

Poslat zprávu | Profil 		[#4027] | Publikováno: 25.07. 2013 - 10:54
Uz jsem nasel adresu kde jsem makro videl...

http://www.youtube.com/watch?v=i1hRdlPYf-s

Bouzel je placene...

Jak by se makro dalo napsat?

Vytvoril by se Product do nej novy part a zkopiroval se PartBody z vychoziho allCATpartu. Cele by to procovalo v cyklu.

Dekuji za jakoukoliv radu.


Ing Jan Cinert

Poslat zprávu | Profil 		[#4028] | Publikováno: 25.07. 2013 - 12:15
Ano, to je správný postup. V detailech asi takto:

1. vytvoří se nová sestava
2. v AllCatPartu se bude procházet kolekce Root Body
3. pro každé body se vytvoří nový Part a do něho se zkopíruje odpovídající Body jako mrtvá kopie
4. sestava se uloží
petan86

Poslat zprávu | Profil 		[#4029] | Publikováno: 25.07. 2013 - 22:36
Potřeboval bych poradit.
Vytvořený skript, mě kopíruje Partbody z allcatpartu zase do allcatpartu. Jak mám zadat cestu do partu v nově vytvořené sestavě....? 

Language="VBSCRIPT"



Sub CATMain()



'vytvoreni produktu a pridani noveho partu

Set allcatpart = CATIA.ActiveDocument

Set sestava = CATIA.Documents

Set productDocument1 = sestava.Add("Product")

Set product1 = productDocument1.Product

Set products1 = product1.Products

Set product2 = products1.AddNewComponent("Part", "")



'vyber body a kopirovani

Set selection1 = allcatpart.Selection

Set part1 = allcatpart.Part

Set bodies1 = part1.Bodies

Set body1 = bodies1.Item("PartBody")

selection1.Add body1

selection1.Copy() 

selection1.PasteSpecial("CATPrtResultWithOutLink")



product1.Update 



End Sub
Ing Jan Cinert

Poslat zprávu | Profil 		[#4030] | Publikováno: 26.07. 2013 - 00:15
Musíte vybrat nově vytvořený Part - je to jako kdybyste to dělal ručně. Kliknete na Body (selection.add(nejake body)), pravým tlačítkem dáte Copy (selection.copy), mezitím vyprazdníte výběr (selection.clear), pak kliknete na nový part (selection.add(novy part)) a vložíte do něj body selection.pasteSpecial().

Takhle to vkládáte tam, odkud kopírujete.

Takže nějak takhle 
Sub CATMain()



Set oAllCatPart = CATIA.ActiveDocument

Set oNewProductDocument = CATIA.Documents.Add("Product")



Set oBodies = oAllCatPart.Part.Bodies



' prochazime body

For i = 1 To oBodies.Count



   Set oSelection = oAllCatPart.Selection

   oSelection.Clear()



   oSelection.Add(oBodies.Item(i))

   oSelection.Copy()

   oSelection.Clear()



   Set oNewPart = oNewProductDocument.Product.Products.AddNewComponent("Part", "")

   

   ' prejmenujeme Part

   oNewPart.PartNumber = oBodies.Item(i).Name



   Set oSelection = oNewProductDocument.Selection

   

   oSelection.Add(oNewPart.ReferenceProduct.Parent.Part)

   oSelection.PasteSpecial("CATPrtResultWithOutLink")

   oSelection.Clear()



Next



oNewProductDocument.Product.Update()



End Sub


Velice primitivni, neosetrene.
Petr

Poslat zprávu | Profil 		[#4032] | Publikováno: 30.07. 2013 - 08:34
Dobrý den,
měl bych otazku. Slo by vytvoři macro, které by generovalo v podstatě allcatpart jen by díly rozdělovalo podle přiřazeného materiálu???

V Postatě by vytvořilo sestavu, do které by se vložili třeba party Steel a Aluminium atd... Dal by se prohledávala sestava a podle materiálu se kopírovalo mrtvé partbody do daného pártu.

Slibuji si od toho rychleší vážení u složitejších sestav.. Připadně myslíte si, že to urychlí výpočet??

Děkuji za odpověd.

Ing Jan Cinert

Poslat zprávu | Profil 		[#4033] | Publikováno: 30.07. 2013 - 17:02
Zdravím,

makro, které popisujete, by určitě udělat šlo, ale nevidím jediný důvod, proč by mělo jakkoliv urychlit výpočet hmotnosti sestavy? CATIA stejně musí každé Body měřit zvlášť podle objemu a hustoty, takže takhle by celá operace trvala stejně dlouho a k tomu navíc by se ještě musela generovat další data.


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.