ax code 2009

static void Job38(Args _args)
{
    InventDimSetup  InventDimSetup;
    ;
    ttsbegin;
    select forupdate InventDimSetup where  InventDimSetup.RecId == 5637152344
                                       && InventDimSetup.dimGroupId == 'scsw';
     {
    //5637152344
        info (strfmt("%1,%2", InventDimSetup.Active,InventDimSetup.RecId));
        InventDimSetup.Active = Noyes::Yes;
        //InventDimSetup.Update();
       info (strfmt("%1,%2", InventDimSetup.Active,InventDimSetup.RecId));
    }
    ttscommit;
}