* sure bug
=AMEMBERS(apem,"DataEnvironment")
? ASCAN(apem,"SCALEMODE")	&& Expected 0

* sure bug
=AMEMBERS(apem,"Label")
? ASCAN(apem,"TABSTOP")		&& Expected 0

* would be better to resolve the bug adding these properties to the baseclass 
=AMEMBERS(apem,"Page")
? ASCAN(apem,"TABSTOP")		&& Expected 0
? ASCAN(apem,"TABINDEX")	&& Expected 0

* would be better to resolve the bug adding these properties to the baseclass 
=AMEMBERS(apem,"Separator")
? ASCAN(apem,"HEIGHT")		&& Expected 0
? ASCAN(apem,"LEFT")		&& Expected 0
? ASCAN(apem,"TOP")		&& Expected 0
? ASCAN(apem,"WIDTH")		&& Expected 0