
      SELECT a.descrip_esp,a.descrip_ing,a.unidad_med,c.nombre_marca 
      INTO articulos.descrip_esp,articulos.descrip_ing,
           articulos.unidad_med,nombre_m
      FROM intb00001 a,iptb00002 b,iptb00019 c
      WHERE a.cod_n = arr_ordenes[curr].cod_n AND 
            a.cod_grupo =arr_ordenes[curr].cod_grupo AND
            a.cod_tipo = arr_ordenes[curr].cod_tipo AND 
            a.cod_sec = arr_ordenes[curr].cod_sec AND
            b.cod_n = arr_ordenes[curr].cod_n AND 
            b.cod_grupo =arr_ordenes[curr].cod_grupo AND
            b.cod_tipo = arr_ordenes[curr].cod_tipo AND 
            b.cod_sec = arr_ordenes[curr].cod_sec AND
            b.marca = c.marca
