Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- BEGIN
- -- declare vperiodo varchar(6);
- -- tipo=1
- DECLARE vfvence DATE;
- DECLARE vfcorte DATE;
- DECLARE vfemision DATE;
- DECLARE vflectura DATE;
- DECLARE vfactor DOUBLE;
- DECLARE vigv DOUBLE;
- -- set vperiodo='201501';
- SELECT f_vence,f_corte,f_emision,factor,igv, f_lectura
- INTO vfvence,vfcorte,vfemision,vfactor,vigv, vflectura
- FROM g_recibo WHERE periodo=vperiodo AND tipo='E';
- SELECT l.periodo,vfvence,vfcorte,f_g_nombres(l.idsocio) AS nombres,l.num_recibo,p.codigo, p.codigo_ant,
- (SELECT des_giro FROM p_giro WHERE idgiro= p.idgiro) AS giro,
- l.e_tension, IF(l.e_tipo=1,'Monofásica', 'Trifásica') AS tipo, l.lectura_ant, l.lectura_actual,l.lectura_dif,vfemision,vigv,
- l.cargo, l.igv,l.e_apublico,l.e_gastos,l.e_mant,l.total,
- (SELECT COALESCE(SUM(saldo),0) FROM d_deuda d
- JOIN d_deuda_puesto dp ON d.ideuda=dp.ideuda
- WHERE dp.idpuesto=p.idpuesto AND d.idconcepto=6
- AND estado='DE' AND d.condicion = 1 AND isnull(d.idfracc)
- AND d.idperiodo < (SELECT x.idperiodo FROM d_periodo x WHERE x.anio= MID(vperiodo,1,4) AND x.nperiodo= MID(vperiodo,5,6) AND x.idf='M' )
- ) AS wsaldo,
- (SELECT group_concat(' ',f_get_nmes(MONTH(d.f_ini)),'-',YEAR(d.f_ini))
- FROM d_deuda d JOIN d_deuda_puesto sp ON sp.ideuda=d.ideuda
- WHERE sp.idpuesto=p.idpuesto AND d.saldo>0 AND d.estado<>'XX'
- AND d.condicion=1 AND d.idconcepto=6 AND isnull(d.idfracc)
- AND d.idperiodo < (SELECT x.idperiodo FROM d_periodo x WHERE x.anio= MID(vperiodo,1,4)
- AND x.nperiodo= MID(vperiodo,5,6) AND x.idf='M' )
- ) AS glosa,
- l.reposicion, l.redondeo,
- concat('Re-Impreso: ',(DATE_FORMAT(CURRENT_TIMESTAMP(),'%d/%m/%Y %H:%i:%s'))) AS f_rimpresion,
- vflectura , 'prueba' AS inst_luz /* prueba aqui */
- FROM p_lecturas l
- JOIN p_puesto p ON p.idpuesto=l.idpuesto
- WHERE l.periodo=vperiodo AND l.tipo= vtipo
- AND p.codigo= vpuesto AND l.de_baja = 0
- ORDER BY p.codigo;
- END
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
