CATIA macros Save only active document

[elmundo777]

Hello. I'm want to write a macro (catscript\vb\c#) to save ONLY active document.
But I don't know how to do this.
In this C# code I can save all opened documents
How I can save only active document or last created document?

            var path = tb_path.Text;
for (int iDoc = 1; iDoc <= CATIA.Documents.Count; iDoc++)
            {
                Document docc = null;
                docc = CATIA.Documents.Item(iDoc);

                string nn = CATIA.Documents.Item(iDoc).get_Name();
                
                string TOTAL = path + @"\" + nn;
                
                docc.SaveAs(TOTAL);
               
            

            }

 

[Little Cthulhu]

CATIA.ActiveDocument.SaveAs(path)

 

[elmundo777]

CATIA.ActiveDocument.SaveAs(path)

This is good idea, but it saves only products and parts from 1 lvl of the tree:
Product (root product)
-Product 1 /save
--Product x /don't save
-Product 2 /save
--Product xx /don't save
---Product xxx /don't save
-Part 1 /save

 

[Little Cthulhu]

I'm want to write a macro (catscript\vb\c#) to save ONLY active document.

You asked for it.

To save all products in active documents:

Dim sel: set sel = CATIA.ActiveDocument.Selection
sel.Search "CATAsmSearch.Product,all"
Dim i: for i=1 to sel.Count
  sel.Item(i).LeafProduct.ReferenceProduct.Parent.SaveAs("path")
next

 

[elmundo777]

You asked for it.

To save all products in active documents:

CODE
Dim sel: set sel = CATIA.ActiveDocument.Selection
sel.Search "CATAsmSearch.Product,all"
Dim i: for i=1 to sel.Count
sel.Item(i).LeafProduct.ReferenceProduct.Parent.SaveAs("path")

I'm have an error here:

 

[itsmyjob]

please check your V5Automation.chm file in your [CATIA install path]code/bin folder. and read about SelectedElement and LeafProduct... that could help you understand how to make it work.

Eric N.
indocti discant et ament meminisse periti ​

 

[elmundo777]

please check your V5Automation.chm file in your [CATIA install path]code/bin folder. and read about SelectedElement and LeafProduct... that could help you understand how to make it work.

I have read this document, but it has not become clearer.
Moreover, it saves not with the names of the product / desk, but with the names CATIASelectedElement27 and etc.

 

[ferdo]

Did you tried .Value? Or .Name? Or .PartNumber? What you will obtain if you do a manual selection in the tree and what if you select in the graphic area (just for testing purposes)?
This is how I learned, reading and trying different things...
And by the way, you can even find all the unsaved parts in the CATIA.Documents.

Regards
Fernando

https://www.youtube.com/playlist?list=PL9mSHa4SOedV3dr0D3kfIWFUg7mIYm94k

https://www.youtube.com/playlist?list=PL9mSHa4SOedVUEkEojiX_kdzpe0sDbaz2

 

[elmundo777]

Did you tried .Value? Or .Name? Or .PartNumber? What you will obtain if you do a manual selection in the tree and what if you select in the graphic area (just for testing purposes)?
This is how I learned, reading and trying different things...
And by the way, you can even find all the unsaved parts in the CATIA.Documents.

I tried all methods. And this code works for me, but sometimes create empty files.

Dim sel: set sel = CATIA.ActiveDocument.Selection
sel.Search "CATAsmSearch.Product,all"
Dim i: for i=1 to sel.Count[b]2[/b]
PN = sel.Item(i).Name
path = "H:\!TEST\"
  sel.Item(i).LeafProduct.ReferenceProduct.Parent.SaveAs(path & "\" &  sel.Item(i).Value.[b]PartNumber[/b])     
next

Problem, that i write code in c#.And after LeafProduct visual studio displays an errors:

 

[ferdo]

Did you check if you are in design mode?

Regards
Fernando

https://www.youtube.com/playlist?list=PL9mSHa4SOedV3dr0D3kfIWFUg7mIYm94k

https://www.youtube.com/playlist?list=PL9mSHa4SOedVUEkEojiX_kdzpe0sDbaz2

 

[elmundo777]

Did you check if you are in design mode?

Error with ReferenceProduct error i am getting in development environment of Visual studio.
Perhaps I should declare links or dependencies somewhere so that there is no error after the ReferenceProduct?

 

[Little Cthulhu]

Cast .LeafProduct to Product.
Cast .Value to AnyObject.

 

[elmundo777]

Cast .LeafProduct to Product.
Cast .Value to AnyObject.

Sorry, but what do you mean by this? Do you have examples of implementation?(vbscript or catscript)
Because in С# I can't seem to find a way to solve this problem

 

[Little Cthulhu]

Do you know what "cast" in C# is?

var prd = ((Product)....LeafProduct).ReferenceProduct;
var doc = (ProductDocument)prd.Parent;
doc.SaveAs("path");

 

[elmundo777]

Do you know what "cast" in C# is?

var prd = ((Product)....LeafProduct).ReferenceProduct;
var doc = (ProductDocument)prd.Parent;
doc.SaveAs("path");

In "...." did you mean the root product? I'm already confused and don't understand.
I've tried the selection option so far.
And when I'm try this code, I've get an error: Error Hresult E_fail ... COM component.

 var prd = ((Product)CATIA.ActiveDocument.Selection.Item(i).LeafProduct).ReferenceProduct;
  var doc = (ProductDocument)prd.Parent;
  doc.SaveAs(fullpath);

But products of first level are saved .

 

[elmundo777]

This code works good, but don't save parts, that were added as Existing component

 var prd = ((Product)sel.Item2(1).LeafProduct).ReferenceProduct;   
            var doc = (ProductDocument)prd.Parent;
            doc.SaveAs(fullpath);

 

[elmundo777]

When I'm try to do this in cycle: System.Runtime.InteropServices.COMException: 'Error HRESULT E_FAIL has been returned from a call to a COM component.'

var sel = CATIA.ActiveDocument.Selection;
sel.Search("CATAsmSearch.Product,all");
            
for (var i = 1; i <= sel.Count; i++)
{
var prd = ((Product)sel.Item2(i).LeafProduct).ReferenceProduct;   
var doc = (ProductDocument)prd.Parent;
doc.SaveAs(TOTAL);
}

 

[Little Cthulhu]

Why are you using the same name (TOTAL) for all files? CATIA won't allow you to overwrite existing file unless CATIA.DisplayFileAlerts is set to false.

 

[elmundo777]

Why are you using the same name (TOTAL) for all files? CATIA won't allow you to overwrite existing file unless CATIA.DisplayFileAlerts is set to false.

The TOTAL variable consists of the save path variable(true_path) and the name of the active document(nn):

 var path = tb_path.Text;
 var true_path = path.Replace("/", "\"");
 path.Replace("//", "\\");
var nn = CATIA.ActiveDocument.get_Name();
var TOTAL = true_path + @"\" + nn;

How can I correctly specify in the code to save the entire content of the document?
I really don't understand and have already re-read hundreds of topics on various forums and tried even more code options...