Bu CATIA API fonksiyonu ne işe yarar?
Fonksiyon: CAAPspApplication.CATScript
Cevap:
COPYRIGHT DASSAULT SYSTEMES 2004
 *****************************************************************************
   Purpose:      This sample illustrats the use of IDL interfaces
                 CATIAPspWorkbench, CATIAPspApplication, CATIAPspClass,
                 CATIAPspAppFactory and CATIAPspResource


   Languages:    VBScript
   Locales:      English
   CATIA Level:  V5R15
 *****************************************************************************
--- strMessage_g is a global variable visible to all private Sub/Function
 -------------------------------------------------------------------------
 Optional: allows to find the sample wherever it's installed
 -------------------------------------------------------------------------
 Open the Distributive system document
 Find the top node of the Distribute System object tree - .
-----------------------------------------------------------------------
 Get PspWorkBench, PspApplication and PspClass
-----------------------------------------------------------------------
--- If ( Not ( objPspWorkbench Is Nothing )...
-----------------------------------------------------------------------
 Get PspAppFactory
-----------------------------------------------------------------------
--- If ( Not ( objPspWorkbench Is Nothing ) and objPspApplication
-----------------------------------------------------------------------
 Get PspResource
-----------------------------------------------------------------------
--- If ( Not ( objPspWorkbench Is Nothing ) and objPspApplication
 -----------------------------------------------------------------------------
 | Query QueryPspResource methods
 |
 | Input: objPspResourceArg: PspResoure object
 |
 -----------------------------------------------------------------------------
 -----------------------------------------------------------------------------
 | Query PspClass methods
 |
 | Input: objPspClassArg: PspClass object
 |
 -----------------------------------------------------------------------------
-----------------------------------------------------------------------
 Get StartUpPhysicals
-----------------------------------------------------------------------
 Not ( objPspClassArg Is Nothing )
 -----------------------------------------------------------------------------
 | Query PspAppFactory methods
 |
 | Input: objPspAppFactoryArg: PspAppFactory object
 |        objRootPrdArg:       Product       object
 -----------------------------------------------------------------------------
-----------------------------------------------------------------------
 Get ListPhysicals
-----------------------------------------------------------------------
------------------------------------------------------------
 Get ListLogicalLines
------------------------------------------------------------
 Not ( objPspClassArg Is Nothing )