Retrieves whether a defined story is a master story
Namespace: ETABS2015Assembly: ETABS2015 (in ETABS2015.dll) Version: 15.0.0.0 (15.0.0.0)
int GetMasterStory(
string Name,
ref bool IsMasterStory
)
Function GetMasterStory ( _
Name As String, _
ByRef IsMasterStory As Boolean _
) As Integer
int GetMasterStory(
String^ Name,
bool% IsMasterStory
)
Parameters
- Name
- Type:
System String
The name of a defined story
- IsMasterStory
- Type: System Boolean
True if the story is a master story, False otherwise
Return Value
Returns zero if the value is successfully retrieved,
otherwise returns nonzero.
Public Sub Example()
Dim SapModel As cSapModel
Dim EtabsObject As cOAPI
Dim ret As Integer = -1
Dim MasterStory As Boolean
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.Story.GetMasterStory("Story4", MasterStory)
EtabsObject.ApplicationExit(False)
SapModel = Nothing
EtabsObject = Nothing
End SubPublic Sub Example()
Dim SapModel As cSapModel
Dim EtabsObject As cOAPI
Dim ret As Integer = -1
Dim MasterStory As Boolean
'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)
'get story master story
ret = SapModel.Story.GetMasterStory("Story4", MasterStory)
'close ETABS
EtabsObject.ApplicationExit(False)
'clean up variables
SapModel = Nothing
EtabsObject = Nothing
End Sub