LOCAL lNot8plus on error lNot8plus = .t. set enginebehavior 70 on error if lNot8plus *... endifCetin
> lcversion=TRANSFORM(VERSION(4)) > lcSearch='8' > lcStatus=ATC(lcSearch,lcVersion) > IF lcStatus # 0 > SET ENGINEBEHAVIOR 70 &&80 &&vfp7 compatibility > WAIT WINDOW "EngineBehavior 70 Using...." TIMEOUT 0.05 > ENDIF >