Adding a document handling note in ax 2012

static void VendAccountDocu(Args _args)
{
DocuRef docuRef;
VendTable vendTable;
vendTable = VendTable::find('3001');
docuRef.RefCompanyId = vendTable.dataAreaId;
docuRef.RefTableId = vendTable.TableId;
docuRef.RefRecId = vendTable.RecId;
docuRef.TypeId = 'Note';
docuRef.Name = 'Imported';
docuRef.Notes = 'This vendor was imported.';
docuRef.insert();
}