HD20655: VB : TRYING TO ACCESS THE API: GETNUMBEROFSHAPES() UNDER OBJECT "PRODUCT" IN VB EDITOR.

APAR status

• Closed as program error.

Error description

• VB : Trying to access the API: GetNumberOfShapes
  () under Object "Product" in VB Editor.
  - Create a Product document
  - Run the provided CATScript macro
  - Result error
  .
  Dim MyProd As ProductDocument
  Set MyProd = CATIA.ActiveDocument
  .
  Dim product1 As Product
  Set product1 = MyProd.Product
  .
  Dim NumOfShapes As Long
  NumOfShapes = product1.GetNumberOfShapes()
  .
  Error "Run time error ﾨ-2147467259ﾨ (80004005)"
  when using GetNumberOfShapes method.
  .
  

Local fix

Problem summary

• VB : Trying to access the API: GetNumberOfShapes() under Object
  "Product" in VB Editor.
  VB : Trying to access the API: GetNumberOfShapes
  () under Object "Product" in VB Editor.
  - Create a Product document
  - Run the provided CATScript macro
  - Result error
  .
  Dim MyProd As ProductDocument
  Set MyProd = CATIA.ActiveDocument
  .
  Dim product1 As Product
  Set product1 = MyProd.Product
  .
  Dim NumOfShapes As Long
  NumOfShapes = product1.GetNumberOfShapes()
  .
  Error "Run time error  -2147467259  (80004005)"
  when using GetNumberOfShapes method.
  .
  

Problem conclusion

• THIS PROBLEM WILL BE FIXED ON CATIA VERSION
  5 RELEASE 14 GA level.
  NOTE THAT THIS PROBLEM WILL ALSO BE FIXED
  ON V5R13SP04.
  .
  Incident Diagnosis
  If the Product had not shape, the VB method failed.
  .
  Correction Explanation
  In case of fail, the VB method succeeds and
  indicates that the product has no shape (0 shape).
  .
  Answer and By-Pass
  none
  .
  

Temporary fix

Comments

APAR Information

• APAR is sysrouted FROM one or more of the following:

• APAR is sysrouted TO one or more of the following:

Fix information

• Fixed component name

  CATIA V5/NT/200

• Fixed component ID

  569151000

Applicable component levels

• R513 PSN

     UP