GetSlabRibbed Method

cPropArea GetSlabRibbed Method

CSi API ETABS 2015

Retrieves property data for a ribbed slab section.

Namespace: ETABS2015
Assembly: ETABS2015 (in ETABS2015.dll) Version: 15.0.0.0 (15.0.0.0)

Syntax

int GetSlabRibbed(
	string Name,
	ref double OverallDepth,
	ref double SlabThickness,
	ref double StemWidthTop,
	ref double StemWidthBot,
	ref double RibSpacing,
	ref int RibsParallelTo
)

int GetSlabRibbed(
	string Name,
	ref double OverallDepth,
	ref double SlabThickness,
	ref double StemWidthTop,
	ref double StemWidthBot,
	ref double RibSpacing,
	ref int RibsParallelTo
)

Function GetSlabRibbed ( _
	Name As String, _
	ByRef OverallDepth As Double, _
	ByRef SlabThickness As Double, _
	ByRef StemWidthTop As Double, _
	ByRef StemWidthBot As Double, _
	ByRef RibSpacing As Double, _
	ByRef RibsParallelTo As Integer _
) As Integer

Function GetSlabRibbed ( _
	Name As String, _
	ByRef OverallDepth As Double, _
	ByRef SlabThickness As Double, _
	ByRef StemWidthTop As Double, _
	ByRef StemWidthBot As Double, _
	ByRef RibSpacing As Double, _
	ByRef RibsParallelTo As Integer _
) As Integer

int GetSlabRibbed(
	String^ Name, 
	double% OverallDepth, 
	double% SlabThickness, 
	double% StemWidthTop, 
	double% StemWidthBot, 
	double% RibSpacing, 
	int% RibsParallelTo
)

int GetSlabRibbed(
	String^ Name, 
	double% OverallDepth, 
	double% SlabThickness, 
	double% StemWidthTop, 
	double% StemWidthBot, 
	double% RibSpacing, 
	int% RibsParallelTo
)

Parameters

Name: Type: System String
The name of an existing ribbed slab property.

OverallDepth: Type: System Double
Overall Depth

SlabThickness: Type: System Double
Slab Thickness

StemWidthTop: Type: System Double
Stem Width at Top

StemWidthBot: Type: System Double
Stem Width at Bottom

RibSpacing: Type: System Double
Rib Spacing (Perpendicular to Rib Direction)

RibsParallelTo: Type: System Int32
This is the Local Axis that the Rib Direction is Parallel to
This value is 1 for the Local 1 Axis, and 2 for the Local 2 Axis.

Return Value

The function returns zero if the property data is successfully retrieved; otherwise it returns a nonzero value.

Remarks

Examples

C++

Copy to Clipboard Print

Public Sub Example()
       Dim SapModel As cSapModel
       Dim EtabsObject As cOAPI
       Dim ret As Integer = -1 
       Dim SlabType As ETABS2013.eSlabType
       Dim ShellType As ETABS2013.eShellType
       Dim MatProp As String 
       Dim Thickness As Double 
       Dim Color As Integer 
       Dim Notes As String 
       Dim GUID As String 
       Dim OverallDepth As Double 
       Dim SlabThickness As Double 
       Dim StemWidthTop As Double 
       Dim StemWidthBot As Double 
       Dim RibSpacing As Double 
       Dim RibsParallelTo As Integer 

   'create ETABS object
       EtabsObject = CreateObject("CSI.ETABS.API.ETABSObject")

   'start ETABS application
       ret = EtabsObject.ApplicationStart()

   'create SapModel object
       SapModel = EtabsObject.SapModel

   'initialize model
       ret = SapModel.InitializeNewModel()

   'create steel deck template model
       ret = SapModel.File.NewSteelDeck(4,12,12,4,4,24,24)

   'set new area property
       ret = SapModel.PropArea.SetSlab("MyShellProp1A", ETABS2013.eSlabType.Ribbed, ETABS2013.eShellType.ShellThin, "4000Psi", 14.2)

   'set new area property
       ret = SapModel.PropArea.SetSlabRibbed(Name:="MyShellProp1A", OverallDepth:=11.1, SlabThickness:=22.2, StemWidthTop:=33.3, StemWidthBot:=44.4, RibSpacing:=55.5, RibsParallelTo:=2)

   'get area property data
       ret = SapModel.PropArea.GetSlab("MyShellProp1A", SlabType, ShellType, MatProp, Thickness, Color, Notes, GUID)

   'get area property data
       ret = SapModel.PropArea.GetSlabRibbed("MyShellProp1A", OverallDepth, SlabThickness, StemWidthTop, StemWidthBot, RibSpacing, RibsParallelTo)

   'close ETABS
       EtabsObject.ApplicationExit(False)

   'clean up variables
       SapModel = Nothing
       EtabsObject = Nothing 
   End Sub

Public Sub Example()
       Dim SapModel As cSapModel
       Dim EtabsObject As cOAPI
       Dim ret As Integer = -1 
       Dim SlabType As ETABS2013.eSlabType
       Dim ShellType As ETABS2013.eShellType
       Dim MatProp As String 
       Dim Thickness As Double 
       Dim Color As Integer 
       Dim Notes As String 
       Dim GUID As String 
       Dim OverallDepth As Double 
       Dim SlabThickness As Double 
       Dim StemWidthTop As Double 
       Dim StemWidthBot As Double 
       Dim RibSpacing As Double 
       Dim RibsParallelTo As Integer 

   'create ETABS object
       EtabsObject = CreateObject("CSI.ETABS.API.ETABSObject")

   'start ETABS application
       ret = EtabsObject.ApplicationStart()

   'create SapModel object
       SapModel = EtabsObject.SapModel

   'initialize model
       ret = SapModel.InitializeNewModel()

   'create steel deck template model
       ret = SapModel.File.NewSteelDeck(4,12,12,4,4,24,24)

   'set new area property
       ret = SapModel.PropArea.SetSlab("MyShellProp1A", ETABS2013.eSlabType.Ribbed, ETABS2013.eShellType.ShellThin, "4000Psi", 14.2)

   'set new area property
       ret = SapModel.PropArea.SetSlabRibbed(Name:="MyShellProp1A", OverallDepth:=11.1, SlabThickness:=22.2, StemWidthTop:=33.3, StemWidthBot:=44.4, RibSpacing:=55.5, RibsParallelTo:=2)

   'get area property data
       ret = SapModel.PropArea.GetSlab("MyShellProp1A", SlabType, ShellType, MatProp, Thickness, Color, Notes, GUID)

   'get area property data
       ret = SapModel.PropArea.GetSlabRibbed("MyShellProp1A", OverallDepth, SlabThickness, StemWidthTop, StemWidthBot, RibSpacing, RibsParallelTo)

   'close ETABS
       EtabsObject.ApplicationExit(False)

   'clean up variables
       SapModel = Nothing
       EtabsObject = Nothing 
   End Sub