- EICOM changes

intranet-ubl.info

@@ -19,6 +19,8 @@
         <callbacks>
         </callbacks>
         <parameters>
+            <parameter datatype="string"  min_n_values="1"  max_n_values="1"  name="BuyerIdSqlExpression"  default="cust.company_id" description="SQL expression to calculate the UBL BuyerID field. This expression is inserted into a SQL query in /intranet-ubl/tcl/intranet-ubl-procs.tcl in order to determine the buyer identification. The default value is &quot;cust.company_id&quot;, representing the im_company.company_id field of the customer &quot;cust&quot;. Assuming a custom DynField im_company.nav_company_nr representing the company's Navision number, a suitable expression could be &quot;coalesce(cust.nav_company_nr, cust.company_id::varchar)&quot; in order to return the Navision number if available, or the ]po[ company_id otherwise."/>
+            <parameter datatype="string"  min_n_values="1"  max_n_values="1"  name="SellerSqlExpression"  default="prov.company_id" description="Please see BuyerIdSqlExpression for description, replacing &quot;cust&quot; and &quot;Customer&quot; with &quot;prov&quot; and &quot;Provider&quot;."/>
             <parameter datatype="string"  min_n_values="1"  max_n_values="1"  name="UblExportConverterProc"  default="im_package_ubl_invoice2ubl" description="What procedure to use for exporting UBL documents? The reason for this parameter is that existing users might want to continue to use &quot;bugy&quot; exports in even if there are newer or better versions available. The reason is that the customer might have created a script on the other side that actually depends on these &quot;bugs&quot;..."/>
             <parameter datatype="string"  min_n_values="1"  max_n_values="1"  name="UblExportPathUnix"  default="/web/projop/filestorage/ubl" description="Path to the directory on where to write UBL documents for batch export."/>
         </parameters>

www/document.xml.tcl

@@ -26,6 +26,6 @@ set user_id [ad_maybe_redirect_for_registration]
 set today [db_string today "select to_char(now(), 'YYYY-MM-DD')"]
 set invoice_url "/intranet-invoices/view?invoice_id=$invoice_id"
 
-set xml [im_package_ubl_invoice2ubl_v10_eicom -invoice_id $invoice_id]
+set xml [im_ubl::invoice2ubl -invoice_id $invoice_id]
 ns_return 200 text/xxx $xml