FUNCTION reservas_cotizacion(pcotizacion,parea,pcodn,pcodgrupo,pcodtipo,pcodsec,pcantidad,fecha_ini,fecha_fin) DEFINE pcotizacion,parea,pcodn,pcodgrupo,pcodtipo,pcodsec INT, pcantidad DEC(12,5), fecha_ini,fecha_fin DATE # ACTUALIZA LA TABLA CONTROL RESERVAS COTIZACIONES IF pcantidad IS NOT NULL THEN INSERT INTO vetb00051(cotizacion_no,area,cod_n,cod_Grupo,cod_tipo,cod_sec,descrip_ing,cantidad, fecha_inicio,fecha_final,autorizada) VALUES (pcotizacion,parea,pcod_n,pcod_grupo,pcod_tipo,pcod_sec, pnombre_p, pcantidad,fecha_ini,fecha_fin,'NO') END IF #----------------------------------------------------------------------------------------------------- END FUNCTION