Cross Comapany support in Ax 2009

Hi friends,

Today we have cross company support functionality published in the below post

static void Test(Args _args)
{
InventTable inventTable,inventTable1;

str Item;

str ItemName;

int ItemInt,ItemInt1,value,i;

container conCompanies = [ 'CEU', 'CEE' ];
;

select firstonly ItemId from inventTable1 order by ItemId;
Item = inventTable1.ItemId;


// While select ItemId from inventTable order by ItemId
while select
crossCompany
: conCompanies
ItemId from inventTable
order by dataAreaId,inventTable.ItemId
{

ItemName = inventTable.ItemId;

if(Item != ItemName)
{

ItemInt = str2int(ItemName);

ItemInt1= str2int(Item);

value = ItemInt - ItemInt1;

for(i=1;i {
ItemInt1 = ItemInt1 + 1;
info(int2str(ItemInt1));
}
Item = inventTable.ItemId;
}

}

}

Vivek Chirumamilla