Get Vendor Id based on Vender's Name in ax 2012

static void VendorId(Args _args)
{
    VendTable       VendTableloc;
    DirPartyTable   DirPartyTableloc;
    str a;

    select DirPartyTableloc join VendTableloc where DirPartyTableloc.Name == "Test" && VendTableloc.Party == DirPartyTableloc.RecId;

    a = VendTableloc.AccountNum;

   info(strfmt("%1",a));
}