This macro shows you how to open an existing CATIA
document. It details the programming equivalent of the File ->
Open command.
CAAInfOpenDocument is launched in CATIA [1]. An existing document called "CAAInfReadDocument.CATPart" must be found in the CATDocView.
CAAInfOpenDocument.CATScript is located in the CAAScdInfUseCases module. Execute macro (Windows only).
CAAInfOpenDocument includes two steps:
- Retrieving the CATDocView Environment Variable and Checking its Valuation
- Opening an existing CATIA document
Retrieving the CATDocView Environment Variable and Checking its Valuation
' Optional: allows to find the sample wherever it's installed
Dim sDocPath As String
sDocPath=CATIA.SystemService.Environ("CATDocView")
If (Not CATIA.FileSystem.FolderExists(sDocPath)) Then
Err.Raise 9999,,"No Doc Path Defined"
End If
|
Define the sDocPath variable to retrieve the
CATDocView environment variable value which holds the documentation path
where the Part document used below is stored. Also, check that this
variable is valuated.
[Top]
Opening an Existing CATIA Document
...
Dim iPartDoc As Document
Set iPartDoc = CATIA.Documents.Open(sDocPath & _
"\online\CAAScdInfUseCases\samples\CAAInfReadDocument.CATPart")
...
|
An existing CATIA document is opened using the Open method
of the Documents collection (Documents object). The only
argument to this method must contain the entire storage path and name
specifying where the document is to be found. This single statement opens
the document stored in the file and adds it to the end of the collection
of documents. It also creates and displays a new window for the document.
Both document and window are activated. Note that if any changes to the
opened document occur, the document should be saved at the end of the
session. See the CAAInfSaveDocument [2] sample
for an illustration of how to save an opened document. In any case, the
opened document should also be closed at the end of the session. See the
CAAInfCloseDocument [3] sample for an
illustration of how to close an opened document.
[Top]