HD28946: VB : CATIASELECTION::SELECTELEMENT2 () WITH 2 FILTERS KO IN

APAR status

• Closed as program error.

Error description

• VB : CATIASelection::SelectElement2 () with 2
  filters KO in R14 (Regression)
  Since R14 CATIASelection::SelectElement2 () does
  not work like in earlier releases. If the user selects
  a Sketch (wich is second filterstring in filter2
  variable ), the xSel.Count is 1, but xSel.Item(1) is
  nothing.
  .
  Steps to reproduce (R13, which is ok)
  1. please start CATIA R13 and open CATPart
  2. start VB
  3. press comand button
  4. select open body ==> Messagbox appears
  5. press command button again
  6. select sketch ==> Messagebox appears (ok)
  .
  .
  steps to reproduce (R14, which is not ok)
  1. please start CATIA R14 and open CATPart
  2. start VB
  3. press comand button
  4. select open body ==> Messagbox appears
  5. press command button again
  6. select sketch ==> VB Error Messag box appears
  (xSel.Count=1 and xSel.Item(1) = Nothing???????)
  .
  ____________________ Begin of code
  ......
  'sel a Sketch a TwoContourDF or a Edge
  Dim xSel
  Set xSe l= CATIA.ActiveDocument.Selection
  Dim filter2(1)
  filter2(0) = "HybridBody"
  filter2(1) = "Sketch"
  If (xSel.SelectElement2(filter2, "Select a Sketch,
  Face or Open Body", False) = "Cancel") Then
  'RoughcutWithStopAndFinishing Body visible
  Exit Sub
  Else
  If 0 < xSel.Count Then
  If xSel.Item(1).Type = "Sketch" Then
  MsgBox "Sketch"
  ElseIf xSel.Item(1).Type = "HybridBody" Then
  MsgBox "Open Body"
  End If
  End If
  End If
  ....
  ____________________ End of code
  .
  Same problem with SelectElement3()
  .
  .
  

Local fix

Problem summary

• VB : CATIASelection::SelectElement2 () with 2 filters KO in
  R14 (Regression)
  VB : CATIASelection::SelectElement2 () with 2
  filters KO in R14 (Regression)
  Since R14 CATIASelection::SelectElement2 () does
  not work like in earlier releases. If the user selects
  a Sketch (wich is second filterstring in filter2
  variable ), the xSel.Count is 1, but xSel.Item(1) is
  nothing.
  .
  Steps to reproduce (R13, which is ok)
  1. please start CATIA R13 and open CATPart
  2. start VB
  3. press comand button
  4. select open body ==> Messagbox appears
  5. press command button again
  6. select sketch ==> Messagebox appears (ok)
  .
  .
  steps to reproduce (R14, which is not ok)
  1. please start CATIA R14 and open CATPart
  2. start VB
  3. press comand button
  4. select open body ==> Messagbox appears
  5. press command button again
  6. select sketch ==> VB Error Messag box appears
  (xSel.Count=1 and xSel.Item(1) = Nothing???????)
  .
  ____________________ Begin of code
  ......
  'sel a Sketch a TwoContourDF or a Edge
  Dim xSel
  Set xSe l= CATIA.ActiveDocument.Selection
  Dim filter2(1)
  filter2(0) = "HybridBody"
  filter2(1) = "Sketch"
  If (xSel.SelectElement2(filter2, "Select a Sketch,
  Face or Open Body", False) = "Cancel") Then
  'RoughcutWithStopAndFinishing Body visible
  Exit Sub
  Else
  If 0 < xSel.Count Then
  If xSel.Item(1).Type = "Sketch" Then
  MsgBox "Sketch"
  ElseIf xSel.Item(1).Type = "HybridBody" Then
  MsgBox "Open Body"
  End If
  End If
  End If
  ....
  ____________________ End of code
  .
  Same problem with SelectElement3()
  .
  .
  

Problem conclusion

• THIS PROBLEM WILL BE FIXED ON CATIA
  VERSION
  R15 GA level.
  NOTE THAT THIS PROBLEM WILL ALSO BE
  FIXED
  ON V5R14SP3.
  .
  

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>XP

• Fixed component ID

  569151000

Applicable component levels

• R514 PSN

     UP