@c:\aplic\excel\inicia_reporte
set linesize 320
column Gye format 99999999
column Cua format 99999999
column Tot format 99999999
column marca format A60 truncated
column E format A1 truncated
column producto format A50 truncated
column contenido format A15 truncated
break on marca skip 1 nodup
compute sum of Gye on marca
compute sum of Cua on marca
compute sum of Tot on marca
prompt Existencias de Producto Terminado &2
prompt
prompt
prompt Marca,Producto,Contenido,Categoria ( A-B-C ),Guayaquil,Cuarentena,Total,Dias de Stock,Saldo Rojo
select
marca,
producto,
contenido,
categoria,
Gye,
Cua,
Tot-Cua Tot,
decode(nvl(Plan,0),0,0,(Tot-Cua)*30/plan) Dias_Stock,
(CASE
WHEN prod_origen=1 AND decode(nvl(Plan,0),0,0,(Tot-Cua)*30/plan)< 30 THEN '*'
WHEN prod_origen=2 AND decode(nvl(Plan,0),0,0,(Tot-Cua)*30/plan)< 75 THEN '**'
WHEN prod_origen=3 AND decode(nvl(Plan,0),0,0,(Tot-Cua)*30/plan)< 15 THEN '***'
ELSE ' '
END) saldorojo
from
(
select
max(rtrim(mapr_descripcion)||': '||rtrim(grpr_descripcion)||chr(13)) marca,
max('"'||decode(prod_fecha_expiracion,null,' ','*'))||
max(to_char(prod_codigo,'999999')||' '||rtrim(prod_descripcion)||'"') producto,
max(to_char(degr_contenido)||' '||degr_unidad_medida||'.') contenido,
max(prod_abc) categoria,
sum(decode(AEPR_CODIGO_BODEGA,7,
nvl(AEPR_INV_INICIAL,0)
+nvl(AEPR_MES_1,0)
+nvl(AEPR_MES_2,0)
+nvl(AEPR_MES_3,0)
+nvl(AEPR_MES_4,0)
+nvl(AEPR_MES_5,0)
+nvl(AEPR_MES_6,0)
+nvl(AEPR_MES_7,0)
+nvl(AEPR_MES_8,0)
+nvl(AEPR_MES_9,0)
+nvl(AEPR_MES_10,0)
+nvl(AEPR_MES_11,0)
+nvl(AEPR_MES_12,0),0)) Gye,
sum(decode(AEPR_CODIGO_BODEGA,8,
nvl(AEPR_INV_INICIAL,0)
+nvl(AEPR_MES_1,0)
+nvl(AEPR_MES_2,0)
+nvl(AEPR_MES_3,0)
+nvl(AEPR_MES_4,0)
+nvl(AEPR_MES_5,0)
+nvl(AEPR_MES_6,0)
+nvl(AEPR_MES_7,0)
+nvl(AEPR_MES_8,0)
+nvl(AEPR_MES_9,0)
+nvl(AEPR_MES_10,0)
+nvl(AEPR_MES_11,0)
+nvl(AEPR_MES_12,0),0)) Qui,
sum(decode(AEPR_CODIGO_BODEGA,10,
nvl(AEPR_INV_INICIAL,0)
+nvl(AEPR_MES_1,0)
+nvl(AEPR_MES_2,0)
+nvl(AEPR_MES_3,0)
+nvl(AEPR_MES_4,0)
+nvl(AEPR_MES_5,0)
+nvl(AEPR_MES_6,0)
+nvl(AEPR_MES_7,0)
+nvl(AEPR_MES_8,0)
+nvl(AEPR_MES_9,0)
+nvl(AEPR_MES_10,0)
+nvl(AEPR_MES_11,0)
+nvl(AEPR_MES_12,0),0)) Cue,
sum(decode(AEPR_CODIGO_BODEGA,11,
nvl(AEPR_INV_INICIAL,0)
+nvl(AEPR_MES_1,0)
+nvl(AEPR_MES_2,0)
+nvl(AEPR_MES_3,0)
+nvl(AEPR_MES_4,0)
+nvl(AEPR_MES_5,0)
+nvl(AEPR_MES_6,0)
+nvl(AEPR_MES_7,0)
+nvl(AEPR_MES_8,0)
+nvl(AEPR_MES_9,0)
+nvl(AEPR_MES_10,0)
+nvl(AEPR_MES_11,0)
+nvl(AEPR_MES_12,0),0)) Man,
sum(decode(AEPR_CODIGO_BODEGA,13,
nvl(AEPR_INV_INICIAL,0)
+nvl(AEPR_MES_1,0)
+nvl(AEPR_MES_2,0)
+nvl(AEPR_MES_3,0)
+nvl(AEPR_MES_4,0)
+nvl(AEPR_MES_5,0)
+nvl(AEPR_MES_6,0)
+nvl(AEPR_MES_7,0)
+nvl(AEPR_MES_8,0)
+nvl(AEPR_MES_9,0)
+nvl(AEPR_MES_10,0)
+nvl(AEPR_MES_11,0)
+nvl(AEPR_MES_12,0),0)) Cua,
sum(nvl(AEPR_INV_INICIAL,0)
+nvl(AEPR_MES_1,0)
+nvl(AEPR_MES_2,0)
+nvl(AEPR_MES_3,0)
+nvl(AEPR_MES_4,0)
+nvl(AEPR_MES_5,0)
+nvl(AEPR_MES_6,0)
+nvl(AEPR_MES_7,0)
+nvl(AEPR_MES_8,0)
+nvl(AEPR_MES_9,0)
+nvl(AEPR_MES_10,0)
+nvl(AEPR_MES_11,0)
+nvl(AEPR_MES_12,0)) Tot,
max(plan) plan,
--Voy agregar prod_origen
prod_origen
from
in_producto,
ve_desc_grupos,
in_marca_producto,
in_acum_existencia_producto,
in_grupo_producto,
(
select
plpr_codigo_producto producto,sum(nvl(plpr_cantidad,0)) plan
from
ve_plan_produccion
where
plpr_anio = to_number(to_char(SYSDATE,'YYYY'))
group by
plpr_codigo_producto
)
where
AEPR_ANIO = to_number(to_char(SYSDATE,'YYYY'))
and aepr_codigo_bodega not in (98,99)
and prod_codigo = aepr_codigo_producto + 0
and prod_codigo_grupo = degr_codigo
and mapr_codigo_marca = degr_codigo_marca
and mapr_grupo = 1
and prod_grupo = grpr_codigo_grupo
and prod_estado = 'A'
and prod_codigo = producto (+)
and prod_ocultar_en_existencias <> 'S'
and prod_tipo = decode(&1,1,&1,3,&1,prod_tipo)
and prod_fecha_expiracion is null
--Voy agregar prod_codigo: aqui se listan todos los codigos de los productos que no se
--se quieren que se muestre en el reporte
--and prod_codigo not in (5402,1702,8312,1815,3111,7100,7102,8622)
group by
mapr_quiebre_marca,
degr_secuencia_grupo,
prod_fecha_expiracion,
degr_secuencia_reporte,
degr_codigo_grupo,
prod_contenido,
prod_codigo,
--Voy agregar prod_origen
prod_origen
)
/
@c:\aplic\excel\termina_reporte