Using Macro Display Error Image (or) Ok image in Ax 2012

display Integer errorlist()
{
    Na_ImageChange          na_ImageChange;
    #resAppl
    select na_ImageChange where na_ImageChange.Userid == this.Userid
                            &&  na_ImageChange.Status == NoYes::Yes;
    if( na_ImageChange.Status == NoYes::Yes)
    {
        return  #ImageOK;

    }
    return  #ImageError;
}