To get AOT element in current layer by code in axapta you can get help from below code. You can get other layer element by change enum value of utillevel.
UtilElements _UtilElements;
while select _UtilElements
where _UtilElements.recordType == UtilElementType::ExtendedType
&& _UtilElements.utilLevel == global::currentAOLayer()
{
info(strfmt("%1",_UtilElements.name)) ;
}