====== pears.GetInvoiceCompanyID ======
<WRAP center round info>
Generated schema reference. Regenerate this page from the SQL unload; keep hand-maintained business notes in the narrative namespace.
</WRAP>

===== Original SQL =====
<code sql>
COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."GetInvoiceCompanyID" IS 
{create function GetInvoiceCompanyID 

/* Application Maintained Function / Procedure - DO NOT EDIT*/

(in sclientcode char(12))
returns char(20)
begin
  declare rv char(20);
  select first companyid into rv from company where sclientcode is not null and clientcode = sclientcode order by isnull(invoiceaddress,0) desc;
  return(rv)
end
}
</code>