SetSlabRibbed Method

cPropArea SetSlabRibbed Method

CSi API ETABS 2015

Initializes a ribbed slab section.

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

Syntax

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

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

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

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

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

int SetSlabRibbed(
	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 initialized; 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