1 CREATE OR REPLACE FUNCTION deleteItemSite(INTEGER) RETURNS INTEGER AS $$
2 -- Copyright (c) 1999-2014 by OpenMFG LLC, d/b/a xTuple.
3 -- See www.xtuple.com/CPAL for the full text of the software license.
5 pItemsiteid ALIAS FOR $1;
14 IF ( ( SELECT ( (itemsite_qtyonhand <> 0) OR (itemsite_nnqoh <> 0) )
16 WHERE (itemsite_id=pItemsiteid) ) ) THEN
20 SELECT metric_value='t' INTO _bbom
22 WHERE (metric_name='BBOM');
24 SELECT metric_value='t' INTO _lotserial
26 WHERE (metric_name='LotSerialControl');
28 SELECT metric_value NOT IN ('PostBooks', 'Standard') INTO _mfg
30 WHERE (metric_name='Application');
32 SELECT metric_value='Standard' INTO _standard
34 WHERE (metric_name='Application');
36 SELECT invhist_id INTO _result
38 WHERE (invhist_itemsite_id=pItemsiteid)
45 SELECT lsdetail_id INTO _result
47 WHERE (lsdetail_itemsite_id=pItemsiteid)
54 SELECT wo_id INTO _result
56 WHERE (wo_itemsite_id=pItemsiteid)
62 SELECT womatl_id INTO _result
64 WHERE (womatl_itemsite_id=pItemsiteid)
70 SELECT womatlvar_id INTO _result
72 WHERE ( (womatlvar_parent_itemsite_id=pItemsiteid)
73 OR (womatlvar_component_itemsite_id=pItemsiteid) )
80 SELECT brdvar_id INTO _result
82 WHERE ( (brdvar_itemsite_id=pItemsiteid)
83 OR (brdvar_parent_itemsite_id=pItemsiteid) )
90 SELECT coitem_id INTO _result
92 WHERE (coitem_itemsite_id=pItemsiteid)
98 SELECT cohist_id INTO _result
100 WHERE (cohist_itemsite_id=pItemsiteid)
106 SELECT quitem_id INTO _result
108 WHERE (quitem_itemsite_id=pItemsiteid)
114 SELECT cmitem_id INTO _result
116 WHERE (cmitem_itemsite_id=pItemsiteid)
123 SELECT poitem_id INTO _result
125 WHERE (poitem_itemsite_id=pItemsiteid)
131 SELECT recv_id INTO _result
133 WHERE (recv_itemsite_id=pItemsiteid)
139 SELECT poreject_id INTO _result
141 WHERE (poreject_itemsite_id=pItemsiteid)
147 SELECT pr_id INTO _result
149 WHERE (pr_itemsite_id=pItemsiteid)
155 IF (_mfg OR _standard) THEN
156 SELECT planord_id INTO _result
158 WHERE (planord_itemsite_id=pItemsiteid)
166 SELECT pschitem_id INTO _result
168 WHERE (pschitem_itemsite_id=pItemsiteid)
174 SELECT woopervar_id INTO _result
176 WHERE (woopervar_parent_itemsite_id=pItemsiteid)
184 IF (_mfg OR _standard) THEN
185 SELECT itemsite_id INTO _result
187 WHERE (itemsite_supply_itemsite_id=pItemsiteid)
195 WHERE (invcnt_itemsite_id=pItemsiteid);
198 WHERE (itemloc_itemsite_id=pItemsiteid);
199 DELETE FROM itemlocdist
200 WHERE (itemlocdist_itemsite_id=pItemsiteid);
203 DELETE FROM xtmfg.brddist
204 WHERE (brddist_itemsite_id=pItemsiteid);
208 WHERE (itemsite_id=pItemsiteid);
213 $$ LANGUAGE 'plpgsql';