+ my ($h_oe_id, $q_oe_id);
+ if ($form->{l_oe_id}) {
+ $q_oe_id = <<SQL;
+ SELECT oe.id AS id,
+ CASE WHEN oe.quotation THEN oe.quonumber ELSE oe.ordnumber END AS number,
+ CASE
+ WHEN oe.customer_id IS NOT NULL AND COALESCE(oe.quotation, FALSE) THEN 'sales_quotation'
+ WHEN oe.customer_id IS NOT NULL AND NOT COALESCE(oe.quotation, FALSE) THEN 'sales_order'
+ WHEN oe.customer_id IS NULL AND COALESCE(oe.quotation, FALSE) THEN 'request_quotation'
+ ELSE 'purchase_order'
+ END AS type
+ FROM oe
+ WHERE oe.id = ?
+
+ UNION
+
+ SELECT dord.id AS id, dord.donumber AS number,
+ CASE
+ WHEN dord.customer_id IS NULL THEN 'purchase_delivery_order'
+ ELSE 'sales_delivery_order'
+ END AS type
+ FROM delivery_orders dord
+ WHERE dord.id = ?
+
+ UNION
+
+ SELECT ar.id AS id, ar.invnumber AS number, 'sales_invoice' AS type
+ FROM ar
+ WHERE ar.id = ?
+
+ UNION
+
+ SELECT ap.id AS id, ap.invnumber AS number, 'purchase_invoice' AS type
+ FROM ap
+ WHERE ap.id = ?
+SQL
+ $h_oe_id = prepare_query($form, $dbh, $q_oe_id);
+ }
+