 alu800 20120319 delimiter create procedure actualizapreciostabular inu800 pfiltro varchar 300u800 inu800 paccion varchar 2u800 begin setu800 wcnu800 precios . productoid productos . productoid andu800 precios . lista select lista from listavigente ; setu800 sqlu800 update precios productos setu800 ; case paccion when 1u800 then begin setu800 fldu800 setu800 fldu800 concat fldu800 precios . precioprod01 precios . precioprod00 productos . coefp00p01 ; setu800 fldu800 concat fldu800 precios . precioprod02 precios . precioprod00 productos . coefp00p02 ; setu800 fldu800 concat fldu800 precios . precioprod03 precios . precioprod00 productos . coefp00p03 ; endu800; when 2u800 then setu800 fldu800 precios . precioprod00 precios . precioprod01 productos . coefp00p01 ; when 3u800 then setu800 fldu800 precios . precioprod00 precios . precioprod02 productos . coefp00p02 ; when 4u800 then setu800 fldu800 precios . precioprod00 precios . precioprod03 productos . coefp00p03 ; endu800 case; ifu800 pfiltro then setu800 wcnu800 concat wcnu800 andu800 pfiltro ; endu800 ifu800; setu800 sqlu800 concat sqlu800 fldu800 where wcnu800 ; prepare stmt from sqlu800; execute stmt; deallocate prepare stmt; endu800 alu800 20120301 alu800 20120301 alu800 20120301 delimiter create definer sas_admin procedure actualizapreciostabular inu800 pfiltro varchar 300u800 inu800 paccion varchar 2u800 begin setu800 wcnu800 precios . productoid productos . productoid andu800 precios . lista select lista from listavigente ; setu800 sqlu800 update precios productos setu800 ; case paccion when 1u800 then begin setu800 fldu800 precios . precioprod01 precios . precioprod00 productos . coefp00p01 ; setu800 fldu800 concat fldu800 precios . precioprod02 precios . precioprod00 productos . coefp00p03 ; setu800 fldu800 concat fldu800 precios . precioprod03 precios . precioprod00 productos . coefp00p03 ; endu800; when 2u800 then setu800 fldu800 precios . precioprod00 precios . precioprod01 productos . coefp00p01 ; endu800 case; ifu800 pfiltro then setu800 wcnu800 concat wcnu800 andu800 pfiltro ; endu800 ifu800; setu800 sqlu800 concat sqlu800 fldu800 where wcnu800 ; prepare stmt from sqlu800; execute stmt; deallocate prepare stmt; endu800 