cPropMaterialSetONoDesign Method  | 
 
 Sets 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)
Syntaxint SetONoDesign(
	string Name,
	double FrictionAngle = 0,
	double DilatationalAngle = 0,
	double Temp = 0
)
Function SetONoDesign ( 
	Name As String,
	Optional FrictionAngle As Double = 0,
	Optional DilatationalAngle As Double = 0,
	Optional Temp As Double = 0
) As Integer
int SetONoDesign(
	String^ Name, 
	double FrictionAngle = 0, 
	double DilatationalAngle = 0, 
	double Temp = 0
)
abstract SetONoDesign : 
        Name : string * 
        ?FrictionAngle : float * 
        ?DilatationalAngle : float * 
        ?Temp : float 
(* Defaults:
        let _FrictionAngle = defaultArg FrictionAngle 0
        let _DilatationalAngle = defaultArg DilatationalAngle 0
        let _Temp = defaultArg Temp 0
*)
-> int 
Parameters
- Name
 - Type: SystemString
The name of an existing concrete material property. - FrictionAngle (Optional)
 - Type: SystemDouble
The Drucker-Prager friction angle. 
 This item must be smaller or equal to 0 and less than 90. [deg] - DilatationalAngle (Optional)
 - 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 applies.
 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: 
Int32Returns zero if the data is successfully assigned; otherwise it returns a nonzero value.
Remarks
ExamplesPublic Sub Example()
       Dim SapModel As cSapModel
       Dim EtabsObject As cOAPI
       Dim ret As Integer = -1
   
       EtabsObject = CreateObject("CSI.ETABS.API.ETABSObject")
   
       ret = EtabsObject.ApplicationStart()
   
       SapModel = EtabsObject.SapModel
   
       ret = SapModel.InitializeNewModel()
   
       ret = SapModel.File.NewSteelDeck(4,12,12,4,4,24,24)
   
       ret = SapModel.PropMaterial.SetMaterial("NoDesign", eMatType.NoDesign)
   
       ret = SapModel.PropMaterial.SetONoDesign(NoDesign", 10, 15)
   
       EtabsObject.ApplicationExit(False)
   
       SapModel = Nothing
       EtabsObject = Nothing
   End Sub
See Also