 category proc descripciu8c3b3n descripciu8c3b3n descripciu8c3b3n funciu8c3b3n deu800 cu8c3a1lculo deu800 precio enu800 base au800 losu800 parametros indicados sinu800 acceder au800 base deu800 datos deu800 precios yau800 conu800 elu800 valor delu800 precio delu800 producto indicado dependiendo delu800 tipo deu800 cliente composiciu8c3b3n composiciu8c3b3n composiciu8c3b3n solo funciu8c3b3n deu800 cu8c3a1lculo estructura estructura estructura sqlu800 -- -------------------------------------------------------------------------------- -- routine ddlu800 -- note comments before andu800 after theu800 routine body will notu800 beu800 stored byu800 theu800 server -- -------------------------------------------------------------------------------- delimiter create function calculoprecio pancho intu800 4u800 palto intu800 4u800 pprecioprod decimal 10u800 2u800 pmagnitud char 2u800 poffsetvanoalto intu800 11u800 poffsetvanoancho intu800 11u800 pcoefvanoalto decimal 16u800 8u800 pcoefvanoancho decimal 16u800 8u800 pvalorelemento decimal 16u800 8u800 returns decimal 10u800 2u800 begin declare ppreciobase decimal 10u800 2u800 ; case pmagnitud when 'm2u800' then setu800 ppreciobase palto poffsetvanoalto pcoefvanoalto pancho poffsetvanoancho pcoefvanoancho 1000000 pvalorelemento pprecioprod; when 'pru800' then setu800 ppreciobase palto poffsetvanoalto 2u800 pcoefvanoalto pancho poffsetvanoancho 2u800 pcoefvanoancho 1000 pvalorelemento pprecioprod; when 'mlu800' then setu800 ppreciobase pancho poffsetvanoancho pcoefvanoancho 1000 pvalorelemento pprecioprod; when 'alu800' then setu800 ppreciobase palto poffsetvanoalto pcoefvanoalto 1000 pvalorelemento pprecioprod; when 'anu800' then setu800 ppreciobase pancho poffsetvanoancho pcoefvanoancho 1000 pvalorelemento pprecioprod; when 'mgu800' then setu800 ppreciobase palto poffsetvanoalto pcoefvanoalto pancho poffsetvanoancho pcoefvanoancho 1000 pvalorelemento pprecioprod; else setu800 ppreciobase pvalorelemento pprecioprod; endu800 case; return ppreciobase; endu800 bitu8c3a1cora bitu8c3a1cora bitu8c3a1cora 20121017 agregado deu800 lasu800 nuevas magnitudes aplicables alu800 alto yu800 alu800 ancho. anterior create function calculoprecio pancho intu800 4u800 palto intu800 4u800 pprecioprod decimal 10u800 2u800 pmagnitud char 2u800 poffsetvanoalto intu800 11u800 poffsetvanoancho intu800 11u800 pcoefvanoalto decimal 16u800 8u800 pcoefvanoancho decimal 16u800 8u800 pvalorelemento decimal 16u800 8u800 returns decimal 10u800 2u800 begin declare ppreciobase decimal 10u800 2u800 ; case pmagnitud when 'm2u800' then setu800 ppreciobase palto poffsetvanoalto pcoefvanoalto pancho poffsetvanoancho pcoefvanoancho 1000000 pvalorelemento pprecioprod; when 'pru800' then setu800 ppreciobase palto poffsetvanoalto 2u800 pcoefvanoalto pancho poffsetvanoancho 2u800 pcoefvanoancho 1000 pvalorelemento pprecioprod; when 'mlu800' then setu800 ppreciobase pancho poffsetvanoancho pcoefvanoancho 1000 pvalorelemento pprecioprod; when 'mgu800' then setu800 ppreciobase palto poffsetvanoalto pcoefvanoalto pancho poffsetvanoancho pcoefvanoancho 1000 pvalorelemento pprecioprod; when '2hu800' then setu800 ppreciobase palto poffsetvanoalto pcoefvanoalto 1000 pvalorelemento 2u800 pprecioprod; when '2wu800' then setu800 ppreciobase pancho poffsetvanoancho pcoefvanoancho 1000 pvalorelemento 2u800 pprecioprod; else setu800 ppreciobase pvalorelemento pprecioprod; endu800 case; return ppreciobase; endu800 usou800 usou800 usou800 urlu800 