Design Table Functions

Example

In the example below, you are going to drive the Pad first length parameter using the CreateSheet keyword.

1. Create an Excel file identical to the one below:

   A	B	C
   1	5mm	5mm
   2	10mm	20mm
   3	30mm	40mm

2. From the Compass, click Social and Collaborative Apps , and select Data Setup.
3. Right-click the Knowledge Resources category in the Setup Data Tables tab, and select Create a new Resource table.
4. In the KnowledgeResourcesxxx table, click Add a new resource item. A new resource is added to the table.
5. Double-click the Logical Name cell and enter the resource name, Resource1 in our example.
6. Double-click the Resource Type cell and select Sheet in the scrolling list.
7. Click the From file tab, double-click the Resource cell and click Import in the Select a Sheet for item Resource1 dialog box. Click OK twice.
8. Assign Knowledge Resources to the current project.
9. Create a 3D Representation containing a Pad.
10. Enter the Engineering Rules Capture app and create an Action. Enter the following arguments into the editor and click OK when done.

    let s(DTSheetType)
    s = CreateSheet("KnowledgeResources|resource1")
    if (s <> NULL)
    {
    	P.FirstLength = s.CellAsReal(Row, Column) * 1mm
    }
    

11. Right-click the action in the tree and select Action.1 object > Run.
12. Make the appropriate selection in the 3D area and in the tree. The Pad First length is driven by the parameters entered in the Excel file.

Example

Boolean2=Relations\DesignTable1\sheet_name->CellAsBoolean(1,5)
if (Boolean2 <> true)
{
  Message("Error !!!")
}

Example

CString=Relations\DesignTable1\sheet_name->CellAsString(1,5) if (CString == )
  {
    Message("No value read !!!")  
  }

Example

Sheet->CloserConfig("column1", 
     "<", 
 10mm, "column2", 
     ">=", 
 20deg, 
     "column3", 
     "!=", 
     "standard")
     

The example above can be interpreted as follows:

• the value in column1 is strictly smaller than 10mm
• the value in column2 is greater than or equal to 20deg
• the value in column3 is different from the standard string.

Example

Given the design table below:

The statement below:

Relations\DesignTable1\sheet_name->CloserInfConfig(PadLim1,60mm, SketchRadius, 130mm, PadLim2, 40mm) 

Returns 3.

The values of lines 1 , 2 and 3 are all less or equal to the values specified in the method arguments.

• As the first parameter specified in the argument list is PadLim1, the method scans the lines 1, 2 and 3 and searches for the largest PadLim1 value which is less or equal to 60 mm. Two configurations meet the condition: configuration 1 and configuration 3.
• As the second parameter specified is SketchRadius, the method scans the configurations 1 and 3 and searches for the largest SketchRadius value less or equal to 130 mm. Again, the function finds two configurations meeting the criteria.
• Then it rescans lines 1 and 3 and searches for the largest PadLim2 value less or equal to 40mm. The result is line 3.

Example

ValueSup=Relations\DesignTable1\sheet_name->CloserValueSupInColumn(1, 80mm)
Message(Closest sup value is # (0.08 is expected), ValueSup)

Example

Message(Closest inf value is # , Relations\DesignTable1\ sheet_name->CloserValueInfInColumn(2,41mm))

Example

ValueSup=Relations\DesignTable1\sheet_name->CloserValueSupInColumn(1, 80mm)
Message(Closest sup value is # (0.08 is expected), ValueSup)

Example

let DT(SheetType)
DT=CreateSheet("KnowledgeResources|AAA")
DT->ImportAttributes(PartBody)

Example

Line=Relations\DesignTable1\sheet_name->LocateInColumn(4,11mm)
if (Line == 0)
{
Message("No value found !!!")
}

Example

MaximumValue=Relations\DesignTable1\sheet_name->MaxInColumn(1)
Message(Maximum value is # (0.150 is expected), MaximumValue)

Example

MinimumValue=sheet->MinInColumn(3)
Message(Minimum value is # (0  is expected), MinimumValue)
/* you can use also */
Message(Minimum value is # (0 is expected), MinInColumn(3))

Example

You must have created the VB Script.1 macro before creating the rule below:

if PartBody\Pad.1.HasAttribute(String.1) == true 
						`VB Scripts.1` .Run(PartBody\Pad.1 .GetAttributeString(String.1),PartBody\Pad.1.Name() )