You mean something like this:
! — MVO: 3D Öffnungslinien an/aus
bOplinesTemp = 0
success = LIBRARYGLOBAL (“LibraryGlobals13”, “D_showBOpLine3D”, bOplinesTemp) ! Door
if success > 0 and bOplinesTemp <> 0 then
bOplines = bOplinesTemp
ENDIF
! — MVO: Öffnungslinientyp 3D Öffnungsseite
success = LIBRARYGLOBAL (“LibraryGlobals13”, “gs_opline_type_m”, reqIOplineTypeTemp)
if success > 0 then
gs_opline_type_m = reqIOplineTypeTemp
endif
! — MVO: Öffnungslinientyp 3D gegenüberliegende Seite
success = LIBRARYGLOBAL (“LibraryGlobals13”, “gs_opline_type_m_out”, reqIOplineTypeOutTemp)
if success > 0 then
gs_opline_type_m_out = reqIOplineTypeOutTemp
endif
! — MVO: Öffnungslinientyp 3D für Nebentürblatt
success = LIBRARYGLOBAL (“LibraryGlobals13”, “D_iOpLineType2”, reqOplineType2)
if success > 0 then
iOplineType2 = reqOplineType2
endif
! — MVO: Öffnungslinienstift 3D
success = LIBRARYGLOBAL (“LibraryGlobals13”, “D_opLinePen”, reqOplinePen)
if success > 0 then
gs_opLinePen = reqOplinePen
endif
IF (bOverride_MVO_3D AND or_bOplines3d) OR (NOT(bOverride_MVO_3D) AND bOplines ) THEN
IF (bOverride_MVO_3D AND or_bOplines3d) THEN
temp_opLineType3dIn = or_iOpLineType3dIn
temp_opLineType3dOut = or_iOpLineType3dOut
gs_opLinePen = or_opLinePen
gs_opline_style_m = gs_opline_style_m
ENDIF
IF (NOT(bOverride_MVO_3D) AND bOplines ) THEN
temp_opLineType3dIn = gs_opline_type_m – 1
temp_opLineType3dOut = gs_opline_type_m_out – 1
gs_opLinePen = gs_opLinePen
gs_opline_style_m = gs_opline_style_m
ENDIF
ENDIF
GDL Object Developer
b-prisma
MAC OSx 10.14