pears.GetInvoicePDF [iqx]

This page is read only. You can view the source, but not change it. Ask your administrator if you think this is wrong.
====== pears.GetInvoicePDF ======
<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>
create function "pears"."GetInvoicePDF"( 
  /* Application Maintained Function / Procedure - DO NOT EDIT*/
  in @InvoiceNumber char(20),in @DocumentID char(20) ) 
returns long varchar
begin
  declare @rootpath char(250);
  declare @AccountCode char(12);
  declare @InvoiceDate date;
  if "isnull"(@InvoiceNumber,'') = '' and "isnull"(@DocumentID,'') = '' then
    return null
  end if;
  set @RootPath = "WPKMaintainGetSwitchValue"('PDFINDB','GLOBAL','LITERAL');
  if "right"(@rootpath,1) <> '\\' then set @rootpath = "string"(@rootpath,'\\')
  end if;
  case
  when "isnull"(@InvoiceNumber,'') <> '' then
    select "AccountCode","DocumentDate" into @AccountCode,@InvoiceDate from "IQACDocument" where "OurRef" = @InvoiceNumber and "DocumentClass" = 'Invoice'
  when "isnull"(@DocumentID,'') <> '' then
    select "AccountCode","DocumentDate","OurRef" into @AccountCode,@InvoiceDate,@InvoiceNumber from "IQACDocument" where "DocumentID" = @DocumentID
  end case;
  return("string"(@rootpath,@AccountCode,'\\',"dateformat"(@InvoiceDate,'yyyymmdd'),'\\',@InvoiceNumber,'.pdf'))
end
</code>