company address in ax 2009

Display str CompanyAddress()
{
    InventSiteId  inventSiteId;
    TextBuffer  txt = new TextBuffer();
    Addressing  address;
    CompanyInfo companyInfoLoc;
    ;

    companyInfoLoc = CompanyInfo::find();
    inventSiteId =PurchTable::find(VendPurchOrderJour.PurchId).InventSiteId;
    address = Address::findByInventSiteIdandTableRecId(inventSiteId,companyInfoLoc.TableId,companyInfoLoc.RecId
            ,AddressType::Invoice).Address;

    txt.setText(address);
    txt.replace('\n',' ');
    address = txt.getText();

    return(address);
}