changecompany not changing the company please see the below code

display CompanyName companyName()
{
CompanyName nameOfCompany;
axpContractTable contractCompany; // trying to check companycode field from this table
CompanyInfo company;

;
// contractCompany = axpContractTable::find(warehouseTable.ContractId);
//if (contractCompany.CompanyCode)
while select contractCompany
{
if (contractCompany.dataAreaId == '003')
{
changecompany(contractCompany.CompanyCode)

{
nameOfCompany = CompanyInfo::name();
}
}
if (contractCompany.dataAreaId == '014')
{
changecompany(contractCompany.CompanyCode)

{
nameOfCompany = CompanyInfo::name();
}
}
}

return nameOfCompany;
}