cPropMaterialGetONoDesign Method

Retrieves the other material property data for no design type materials.

Namespace:  ETABS2016
Assembly:  ETABS2016 (in ETABS2016.dll) Version: 16.0.0.0 (16.0.0.0)
Syntax
Copy
int GetONoDesign(
	string Name,
	ref double FrictionAngle,
	ref double DilatationalAngle,
	double Temp = 0
)

Parameters

Name
Type: SystemString
The name of an existing concrete material property.
FrictionAngle
Type: SystemDouble
The Drucker-Prager friction angle. This item must be smaller or equal to 0 and less than 90. [deg]
DilatationalAngle
Type: SystemDouble
The Drucker-Prager dilatational angle. This item must be smaller or equal to 0 and less than 90. [deg]
Temp (Optional)
Type: SystemDouble
The temperature at which the specified data is to be retrieved. The temperature must have been defined previously for the material.

This item applies only if the specified material has properties that are temperature dependent. That is, it applies only if properties are specified for the material at more than one temperature.

Return Value

Type: Int32
Returns zero if the data is successfully retrieved; otherwise it returns a nonzero value.
Remarks
Examples
VB
Copy
Public Sub Example()
       Dim SapModel As cSapModel
       Dim EtabsObject As cOAPI
       Dim ret As Integer = -1
       Dim FrictionAngle As Double
       Dim DilatationalAngle As Double

   '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)

   'initialize new material property
       ret = SapModel.PropMaterial.SetMaterial("NoDesign", eMatType.NoDesign)

   'assign other properties
       ret = SapModel.PropMaterial.SetONoDesign("NoDesign", 10, 15)

   'get other properties
       ret = SapModel.PropMaterial.GetONoDesign("NoDesign", FrictionAngle, DilatationalAngle)

   'close ETABS
       EtabsObject.ApplicationExit(False)

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