Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Sub CATMain()
Dim settingControllers1 As SettingControllers
Set settingControllers1 = CATIA.SettingControllers
Dim settingRepository1 As SettingRepository
Set settingRepository1 = settingControllers1.Item("LPCommonEditor")
boolean1 = settingRepository1.GetAttr("DisplayRequirementsMode")
boolean2 = settingRepository1.GetAttr("DisplayRequirementsMode")
boolean3 = settingRepository1.GetAttr("DisplayRequirementsMode")
boolean4 = settingRepository1.GetAttr("DisplayRequirementsMode")
End Sub