1 CREATE OR REPLACE FUNCTION deleteItemSite(pItemsiteid 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.
13 IF ( ( SELECT (itemsite_qtyonhand <> 0)
15 WHERE (itemsite_id=pItemsiteid) ) ) THEN
19 SELECT metric_value='t' INTO _bbom
21 WHERE (metric_name='BBOM');
23 SELECT metric_value='t' INTO _lotserial
25 WHERE (metric_name='LotSerialControl');
27 SELECT metric_value NOT IN ('PostBooks', 'Standard') INTO _mfg
29 WHERE (metric_name='Application');
31 SELECT metric_value='Standard' INTO _standard
33 WHERE (metric_name='Application');
35 SELECT invhist_id INTO _result
37 WHERE (invhist_itemsite_id=pItemsiteid)
44 SELECT lsdetail_id INTO _result
46 WHERE (lsdetail_itemsite_id=pItemsiteid)
53 SELECT wo_id INTO _result
55 WHERE (wo_itemsite_id=pItemsiteid)
61 SELECT womatl_id INTO _result
63 WHERE (womatl_itemsite_id=pItemsiteid)
69 SELECT womatlvar_id INTO _result
71 WHERE ( (womatlvar_parent_itemsite_id=pItemsiteid)
72 OR (womatlvar_component_itemsite_id=pItemsiteid) )
79 SELECT brdvar_id INTO _result
81 WHERE ( (brdvar_itemsite_id=pItemsiteid)
82 OR (brdvar_parent_itemsite_id=pItemsiteid) )
89 SELECT coitem_id INTO _result
91 WHERE (coitem_itemsite_id=pItemsiteid)
97 SELECT cohist_id INTO _result
99 WHERE (cohist_itemsite_id=pItemsiteid)
105 SELECT quitem_id INTO _result
107 WHERE (quitem_itemsite_id=pItemsiteid)
113 SELECT cmitem_id INTO _result
115 WHERE (cmitem_itemsite_id=pItemsiteid)
122 SELECT poitem_id INTO _result
124 WHERE (poitem_itemsite_id=pItemsiteid)
130 SELECT recv_id INTO _result
132 WHERE (recv_itemsite_id=pItemsiteid)
138 SELECT poreject_id INTO _result
140 WHERE (poreject_itemsite_id=pItemsiteid)
146 SELECT pr_id INTO _result
148 WHERE (pr_itemsite_id=pItemsiteid)
154 IF (_mfg OR _standard) THEN
155 SELECT planord_id INTO _result
157 WHERE (planord_itemsite_id=pItemsiteid)
165 SELECT pschitem_id INTO _result
167 WHERE (pschitem_itemsite_id=pItemsiteid)
173 SELECT woopervar_id INTO _result
175 WHERE (woopervar_parent_itemsite_id=pItemsiteid)
183 IF (_mfg OR _standard) THEN
184 SELECT itemsite_id INTO _result
186 WHERE (itemsite_supply_itemsite_id=pItemsiteid)
194 WHERE (invcnt_itemsite_id=pItemsiteid);
197 WHERE (itemloc_itemsite_id=pItemsiteid);
198 DELETE FROM itemlocdist
199 WHERE (itemlocdist_itemsite_id=pItemsiteid);
202 DELETE FROM xtmfg.brddist
203 WHERE (brddist_itemsite_id=pItemsiteid);
207 WHERE (itemsite_id=pItemsiteid);