alert("Acceso Denegado") location.href="login.php" '); } */ //echo $id_usu_session."aqui"; $prefijo = "jar_"; //prefijo base datos $ruta_sistema = 'http://www.tuestiloweb.cl/sistema/index.php'; //raiz para el menú del sistema $sistema = 'Jardin Infantil Mateitos'; // nombre sistema //$ruta = 'http://inet.utalca.cl/inspinia/'; $ruta = '/sistema/'; //archivos boostrap y inspinia $ruta_fisica = 'http://www.tuestiloweb.cl/sistema/'; //archivos boostrap y inspinia $ruta_fusionchart = 'http://inet.utalca.cl/fusioncharts/fusioncharts-xt-enterprise/'; //$jquery = 'http://inet.utalca.cl/inspinia/js/jquery-2.1.1.js'; $jquery = 'js/jquery-latest-min.js';//jquery del sistema antes js/jquery-latest.js $msj_success = 'operacion realizada con exito';//mensajes exitosos del sistema $msj_delete = 'Seguro desea eliminar registro?';//mensajes exitosos del sistema $msj_confirmacion = 'Seguro desea realizar la operación?';//mensajes confirmacion del sistema $msj_delete_valida = 'Debe seleccionar registro a eliminar';// $msj_duplicado = 'Registro ya existe en la base de datos !';//mensajes exitosos del sistema $msj_erro_mysql = ' Hubo un problema al ejecutar la sentencia con el número :';//mensajes si hubo un error que no ewstab considerado al guardar $msj_column_unknow = 'Columna desconocida en la sql :'; $msj_guardar_encabezado = 'Debe Guardar por lo menos toda la información básica primero'; $msj_elimina_asociado = 'Registro se encuentra asociado y no puede ser eliminado'; $sql_print ='';// variable para imprimir sql para hacer pruebas //$host_contenido2 = 'http://postgradoutalca.utalca.cl/repro'; //$rut_usuario OWA_COOKIE.cookie; // usuario conectado //$ruta_dhtmlx = 'http://inet.utalca.cl/dhtmlxsuite4.3/'; $ruta_dhtmlx = '/sistema/dhtmlxsuite4.3/'; $ruta_dhtmlx = '/sistema/dhtmlxsuite4.3/'; $v_sql =''; // variable para las sql largas $v_sql1 =''; // variable1 para las sql largas $v_sql2 =''; // variable1 para las sql largas $fecha_actual = date("d-m-Y"); //fecha sistema $agno_actual = date("Y"); //agno sistema $dia_actual = date("d"); //dia actual sistema para saber si paso o no de mes $dia_actual_semana = date('N', strtotime(date("d-m-Y"))); //numero del dia actual, para envios de email $iva=0.19; $mes = date("m");//mes sistema en numero ej:06 $mes_inicio_clases="03"; $mes_fin_clases="12"; setlocale(LC_ALL,"es_ES.UTF-8"); $mes_agno=strftime("%B del %Y"); //mes-agno sistema $mes_texto=strftime("%B"); //mes texto sistema $dia_cierre = "6"; //variable importante que indica cuando es el cierre de mes para un negocio. $dia_cierre_f = "5"; //variable importante que indica cuando es el cierre de mes para un negocio. $principio_mes="01-".date("m-Y"); //ej:01-05-2016; $mes_agno_numero=date("m-Y"); //mes-agno sistema ej: 05-2016 $fecha_actual_gringa=date("Y-m-d"); //mes-agno sistema ej: 05-2016 $fecha_hora_actual = date("Y-m-d H:i"); //fecha sistema $fecha_hora_actual_s = date("Y-m-d H:i:s"); //fecha sistema $style_pantallas = "wrapper wrapper-content animated fadeInRight"; $v_gridbox_altura="60%"; //casi todas las grillas tienen esta altura, se declara para excep. $v_cuenta=0; //variable contadora del sistema global $v_name_tbl_global; //si es tabla temporal o definitiva $icono_pregunta=' '; $txt_explicativo = array(); $txt_explicativo[0]="Cantidad de Facturas Pagadas en el mes consultado "; $txt_explicativo[1]="Monto total de Facturas Pagadas en el mes consultado "; $txt_explicativo[2]="Cantidad de Facturas que debieran ser pagadas en el mes consultado, se debe hacer seguimiento"; $txt_explicativo[3]="Monto total de Facturas que debieran ser pagadas en el mes consultado, se debe hacer seguimiento"; $txt_explicativo[4]="Cantidad de Facturas atrasadas en su pago, se debe hacer seguimiento "; $txt_explicativo[5]="Monto total de Facturas atrasadas en su pago, se debe hacer seguimiento "; $txt_explicativo[6]="Notas de Ventas sin factura, se debe hacer seguimiento"; $txt_explicativo[7]="Monto toal de Notas de Ventas sin factura, se debe hacer seguimiento"; $txt_explicativo[8]="Utilidad (ganancia) sumando facturas y efectivo Plotter del mes en curso (ya descontados todos los gastos) "; $txt_explicativo[9]="Ingreso total mes en curso (Facturas y Efectivo)"; $txt_explicativo[10]="Gastos totales del mes en curso (Efectivo y Cuenta Corriente) "; $txt_explicativo[11]="Utilidad Mes anterior "; $txt_explicativo[12]="Retiros Socios "; $txt_explicativo[13]="Utilidad mes en curso del Plotter (Efectivo solo del plotter)"; $txt_explicativo[14]="Ingreso total mes en curso del Plotter (Efectivo solo del plotter)"; $txt_explicativo[15]="Gastos totales del mes en curso (solo dinero del plotter) "; $txt_explicativo[16]="Utilidad DIA en curso del Plotter (Efectivo solo del plotter)"; $txt_explicativo[17]="Ingreso total DIA en curso del Plotter (Efectivo solo del plotter)"; $txt_explicativo[18]="Gastos totales del DIA en curso (solo del plotter) "; /*aun no implementado*/ //$txt_explicativo[17]="IVA mes en curso, monto para provisionar "; $arr_meses = array(); $arr_meses[1]="Enero"; $arr_meses[2]="Febrero"; $arr_meses[3]="Marzo"; $arr_meses[4]="Abril"; $arr_meses[5]="Mayo"; $arr_meses[6]="Junio"; $arr_meses[7]="Julio"; $arr_meses[8]="Agosto"; $arr_meses[9]="Septiembre"; $arr_meses[10]="Octubre"; $arr_meses[11]="Noviembre"; $arr_meses[12]="Diciembre"; /*moneda*/ $decimales=0; $separador_miles="."; // ************* ********************************** // ************* Parametros Subida Archivo // ************* ********************************** $v_memory_limit ="90M"; $v_max_execution_time="120"; //120 seconds = 2 minutes $v_directorio="carpeta"; // ************* ********************************** // ************* Parametros emails // ************* ********************************** $str_Firma = "

* Datos pueden estar sujetos a verificacion
* Los acentos se han omitido a proposito, para evitar incompatibilidades de visualizacion de los mismos con algunos clientes de correo

".$sistema."."; $mail_admin = "contacto@mail.com"; //from que aparecera en los correos de recuperacion de claves de acceso // ************* ********************************** // ************* Parametros excluye estados // ************* ********************************** $excluye_nv_nopagadas='2,6,8'; //estados que se excluyen en la sql de notas de ventas no pagadas $usuario_cookie=""; if (isset($_COOKIE['usuario'])){ $usuario_cookie=$_COOKIE['usuario']; } // ************* ********************************** // ************* id en duro ocupados en el sistema // ************* ********************************** $v_nota_ventas= 12; //notas de ventas tabla sis_pago_emp // ************* ********************************** // ************* Sql standars grillas sistema // ************* ********************************** /*años del sistema con informacion, para crear filtro lista*/ $sql_agnos=" SELECT distinct YEAR(indi_fecha_pagos), YEAR(indi_fecha_pagos) FROM ".$prefijo."ingreso_diario where elimina <> 'E' "; /*reporte pago mes y año a.elimina <> 'E' and */ $sql_agno_rep_xml = " SELECT mes, pame_agno_pago, sum(pame_monto_pagado), sum(pame_deuda_mes) FROM ".$prefijo."mensualidad a, ".$prefijo."meses b where a.pame_mes_pago=b.id and vigencia='SI' "; $sql_agno_rep_xml = " SELECT b.mes, pame_agno_pago, sum(a.pame_monto_pagado), sum(a.pame_deuda_mes) FROM jar_mensualidad a, jar_meses b, jar_alumnos c where a.pame_mes_pago=b.id and b.vigencia='SI' and a.alum_rut= c.alum_rut and a.pame_agno_pago = c.alum_agno_acad and c.elimina <> 'E' and a.elimina <> 'E'"; //:%s $sql_sms_hist=" select smde_id, DATE_FORMAT (sms_fecha , '%d-%m-%Y %H:%i:%s') sms_fecha, sms_titulo, smsde_sms, CONCAT(CONCAT(apod_nombre,' ',apod_paterno), ' ', apod_materno) apoderado , usua_nombre, smsde_resultado from jar_sms A, jar_sms_detalle B, jar_apoderados C, jar_usuario D where smde_sms_id=sms_id and smde_rut=apod_rut and sms_usuario = D.usua_rut "; $sql_sms_templates=" SELECT id, titulo FROM jar_sms_template where elimina <> 'E' " ; /*reporte deuda alumnos */ /*sql anterior, tenia pame_mes_pago <= ".$mes." de mas*/ $sql_deu_rep_xml = " SELECT pame_id, a.alum_rut, CONCAT(CONCAT(alum_nombre,' ',alum_paterno), ' ', alum_materno) alumno, pame_agno_pago, mes, pame_deuda_mes, e.apod_rut , CONCAT(CONCAT(apod_nombre,' ',apod_paterno), ' ', apod_materno) apoderado, apod_mail, apod_telefono FROM ".$prefijo."mensualidad a, ".$prefijo."alumnos b, ".$prefijo."meses c, ".$prefijo."alum_apod d, ".$prefijo."apoderados e WHERE a.alum_rut = b.alum_rut and a.pame_agno_pago = b.alum_agno_acad and a.pame_mes_pago = c.id and pame_deuda_mes > 0 and a.alum_rut = d.alum_rut and and pame_mes_pago <= ".$mes." (pame_agno_pago <= ".$agno_actual.") and a.elimina <> 'E' and d.apod_rut = e.apod_rut and e.apod_principal=1 and vigencia='SI' and b.elimina <> 'E' "; $sql_deu_rep_xml = " SELECT pame_id, a.alum_rut, CONCAT(CONCAT(alum_nombre,' ',alum_paterno), ' ', alum_materno) alumno, pame_agno_pago, mes, pame_deuda_mes, e.apod_rut , CONCAT(CONCAT(apod_nombre,' ',apod_paterno), ' ', apod_materno) apoderado, apod_mail, apod_telefono , 'dhtmlxSuite_v43_std/samples/dhtmlxToolbar/common/imgs/ticket.png' firma, alap_id FROM jar_mensualidad a, jar_alumnos b, jar_meses c, jar_alum_apod d, jar_apoderados e WHERE a.alum_rut = b.alum_rut and a.pame_agno_pago = b.alum_agno_acad and a.pame_mes_pago = c.id and pame_deuda_mes > 0 and a.alum_rut = d.alum_rut and pame_agno_pago <= ".$agno_actual." and a.elimina <> 'E' and d.apod_rut = e.apod_rut and e.apod_principal=1 and vigencia='SI' and b.elimina <> 'E' "; //se agrego todos los apoderados $sql_deu_rep_xml = " SELECT pame_id, a.alum_rut, CONCAT(CONCAT(alum_nombre,' ',alum_paterno), ' ', alum_materno) alumno, pame_agno_pago, mes, pame_deuda_mes, e.apod_rut , CONCAT(CONCAT(apod_nombre,' ',apod_paterno), ' ', apod_materno) apoderado, apod_mail, apod_telefono , 'dhtmlxSuite_v43_std/samples/dhtmlxToolbar/common/imgs/ticket.png' firma, alap_id, c.id FROM jar_mensualidad a, jar_alumnos b, jar_meses c, jar_alum_apod d, jar_apoderados e WHERE a.alum_rut = b.alum_rut and a.pame_agno_pago = b.alum_agno_acad and a.pame_mes_pago = c.id and pame_deuda_mes > 0 and a.alum_rut = d.alum_rut and pame_agno_pago <= ".$agno_actual." and a.elimina <> 'E' and d.apod_rut = e.apod_rut and vigencia='SI' and b.elimina <> 'E' "; //se agrego matricula en la deuda //dhtmlxSuite_v43_std/samples/dhtmlxToolbar/common/imgs/ticket.png FIRMA $sql_deu_rep_xml = " SELECT pame_id, a.alum_rut, CONCAT(CONCAT(alum_nombre,' ',alum_paterno), ' ', alum_materno) alumno, pame_agno_pago, mes, if (id=alum_mes_incorp,(alum_matricula+alum_arancel-pame_monto_pagado),(alum_arancel-pame_monto_pagado)) pame_deuda_mes, e.apod_rut , CONCAT(CONCAT(apod_nombre,' ',apod_paterno), ' ', apod_materno) apoderado, apod_mail, apod_telefono , '' firma, alap_id, c.id FROM jar_mensualidad a, jar_alumnos b, jar_meses c, jar_alum_apod d, jar_apoderados e WHERE a.alum_rut = b.alum_rut and a.pame_agno_pago = b.alum_agno_acad and a.pame_mes_pago = c.id and if( a.pame_cierre_deuda=1,0, if (id=alum_mes_incorp,(alum_matricula+alum_arancel-pame_monto_pagado),(alum_arancel-pame_monto_pagado)))>0 and a.alum_rut = d.alum_rut and pame_agno_pago <= ".$agno_actual." and a.elimina <> 'E' and d.apod_rut = e.apod_rut and vigencia='SI' and b.elimina <> 'E' "; /*sql que no considera si no tiene apoderador*/ $sql_deu_rep_xml = " SELECT pame_id, a.alum_rut, CONCAT(CONCAT(alum_nombre,' ',alum_paterno), ' ', alum_materno) alumno, pame_agno_pago, mes, if (id=alum_mes_incorp,(alum_matricula+alum_arancel-pame_monto_pagado),(alum_arancel-pame_monto_pagado)) pame_deuda_mes, e.apod_rut , CONCAT(CONCAT(apod_nombre,' ',apod_paterno), ' ', apod_materno) apoderado, apod_mail, apod_telefono , '' firma, alap_id, c.id FROM jar_mensualidad a left join jar_alumnos b on a.pame_agno_pago = b.alum_agno_acad and b.elimina <> 'E' left join jar_meses c on a.pame_mes_pago = c.id left join jar_alum_apod d on a.alum_rut = d.alum_rut left join jar_apoderados e on d.apod_rut = e.apod_rut and e.apod_principal=1 and vigencia='SI' and e.elimina <> 'E' WHERE a.alum_rut = b.alum_rut and pame_deuda_mes > 0 and pame_agno_pago = ".$agno_actual." and a.elimina <> 'E' "; //dhtmlxSuite_v43_std/samples/dhtmlxToolbar/common/imgs/ticket.png $sql_apod_sms_xml = " SELECT alap_id, curs_descripcion, a.alum_rut, CONCAT(CONCAT(alum_nombre,' ',alum_paterno), ' ', alum_materno) alumno, '' pame_agno_pago, '' mes, '' pame_deuda_mes, e.apod_rut , CONCAT(CONCAT(apod_nombre,' ',apod_paterno), ' ', apod_materno) apoderado, apod_mail, apod_telefono , '' firma FROM jar_alumnos a, jar_alum_apod d, jar_apoderados e, jar_cursos f WHERE a.alum_rut = d.alum_rut and a.elimina <> 'E' and d.apod_rut = e.apod_rut and if(a.curs_id1 =0,a.curs_id,a.curs_id1) = f.curs_id and f.curs_vigencia='SI' and f.elimina <> 'E' and a.elimina <> 'E' and apod_telefono <> '' and a.alum_agno_acad=".$agno_actual; //echo $sql_deu_rep_xml; /*reporte pago mensualidades alumnos, antes de agregar el nombre empresa*/ $sql_men_rep_xml = " SELECT pame_id, a.alum_rut, CONCAT(CONCAT(alum_nombre,' ',alum_paterno), ' ', alum_materno), pame_agno_pago, b.mes, a.pame_monto_pagado, a.pame_deuda_mes FROM ".$prefijo."mensualidad a, ".$prefijo."meses b, ".$prefijo."alumnos c where a.pame_mes_pago=b.id and b.vigencia='SI' and a.alum_rut= c.alum_rut and a.pame_agno_pago = c.alum_agno_acad and c.elimina <> 'E' and a.elimina <> 'E' "; /*reporte pago mensualidades alumnos, con nombre empresa*/ $sql_men_rep_xml = " SELECT pame_id, a.alum_rut, CONCAT(CONCAT(alum_nombre,' ',alum_paterno), ' ', alum_materno), empr_nombre, pame_agno_pago, b.mes, a.pame_monto_pagado, a.pame_deuda_mes FROM jar_mensualidad a inner join jar_meses b on a.pame_mes_pago=b.id and b.vigencia='SI' inner join jar_alumnos c on a.alum_rut= c.alum_rut and a.pame_agno_pago = c.alum_agno_acad left join jar_empresa d on d.empr_id=c.empr_rut and d.elimina <> 'E' where c.elimina <> 'E' and a.elimina <> 'E' "; /*reporte pago mensualidades alumnos por apoderado*/ $sql_men_rep_apod_xml = " SELECT pame_id, a.alum_rut, CONCAT(CONCAT(alum_nombre,' ',alum_paterno), ' ', alum_materno), pame_agno_pago, b.mes, a.pame_monto_pagado, a.pame_deuda_mes FROM ".$prefijo."mensualidad a, ".$prefijo."meses b, ".$prefijo."alumnos c where a.pame_mes_pago=b.id and b.vigencia='SI' and a.alum_rut= c.alum_rut and a.pame_agno_pago = c.alum_agno_acad and c.elimina <> 'E' and a.elimina <> 'E' and c.alum_rut in (select alum_rut from ".$prefijo."alum_apod where apod_rut= ".$usuario_cookie.") "; //$_SESSION['id_usu'] /*lista de alumnos asignados a un apoderado*/ /*se agrupa debido a que el mismo alumno puede estar para varios años academicos*/ $sql_alu_apod_xml1 =" SELECT distinct alum_rut, CONCAT(alum_rut,' - ', CONCAT(CONCAT(alum_nombre,' ',alum_paterno), ' ', alum_materno)) FROM jar_alumnos A where A.ELIMINA <> 'E' and A.alum_rut in (select alum_rut from jar_alum_apod where apod_rut= '".$usuario_cookie."')"; /*ingreso tou*/ $sql_tour_xml = " select * ". " from ".$prefijo."tour a ". " where a.elimina <> 'E' "; $sql_tour_elim_xml = " select * ". " from ".$prefijo."tour a ". " where a.elimina = 'E' "; /*listado items de contizaciones*/ $sql_icoti_xml = " select coit_item, coit_cantidad, coit_mt2, coit_descripcion, coit_mt2_valor, coit_valor_neto, coit_id from ".$prefijo."cotizacion_item "; /*ingreso razones sociales*/ $sql_razon_xml = " select raso_id, raso_rut, raso_razon_social, raso_fantasia, raso_giro, raso_direccion, raso_vigencia from ".$prefijo."razones_sociales a where a.elimina <> 'E' "; $sql_razon_elim_xml = " select raso_id, raso_rut, raso_razon_social, raso_fantasia, raso_giro, raso_direccion from ".$prefijo."razones_sociales a where a.elimina = 'E' "; /*ingreso diario 135 */ $sql_ind_xml = " select indi_id, indi_comentarios, DATE_FORMAT (indi_fecha , '%d-%m-%Y') indi_fecha, if(indi_tipo_accion=1,'INGRESO','EGRESO') indi_tipo_accion, esdo_descripcion, tiga_descripcion, paemp_descripcion ,empr_nombre, indi_num_doc, indi_monto, indi_num_fact, indi_num_doc from ".$prefijo."ingreso_diario a left join ".$prefijo."estado_doc b on a.esdo_id=b.esdo_id left join ".$prefijo."tipo_gasto c on a.tiga_id=c.tiga_id left join ".$prefijo."empresa d on a.empr_id=d.empr_id left join ".$prefijo."pago_emp e on a.tido_id=e.paemp_id where a.elimina <> 'E' order by a.indi_fecha desc "; /*ingreso diario reporte*/ //a left join jar_estado_doc b on a.esdo_id=b.esdo_id //( (alum_mes_termino-alum_mes_incorp) * alum_arancel) $sql_ind_rep_xml = " select a.alum_rut, alum_nombre, CONCAT(alum_paterno,' ',alum_materno) apellidos , alum_agno_acad, CONCAT(min(alum_mes_incorp),'-',max(pame_mes_pago)) meses, curs_descripcion, jorn_descripcion, sum(pame_monto_pagado) pagado, sum(pame_mensualidad) mensualidad, sum(pame_deuda_mes) deuda, empr_nombre from jar_alumnos a left join jar_cursos b on a.curs_id= b.curs_id left join jar_jornadas_nuevas c on a.jorn_id= c.jorn_id left join jar_empresa d on a.empr_rut= d.empr_id and d.elimina <> 'E' left join jar_mensualidad e on a.alum_rut=e.alum_rut and e.elimina <> 'E' and e.pame_agno_pago = a.alum_agno_acad where a.elimina <> 'E' "; // agrego matricula $sql_ind_rep_xml = " select a.alum_rut, alum_nombre, CONCAT(alum_paterno,' ',alum_materno) apellidos , alum_agno_acad, CONCAT(min(alum_mes_incorp),'-',max(pame_mes_pago)) meses, curs_descripcion, jorn_descripcion, sum(pame_monto_pagado) pagado, sum(if (pame_mes_pago=alum_mes_incorp,(alum_matricula+alum_arancel),pame_mensualidad)) mensualidad, sum(if( pame_cierre_deuda=1,0, if (pame_mes_pago=alum_mes_incorp,(alum_matricula+alum_arancel-pame_monto_pagado),(alum_arancel-pame_monto_pagado)))) deuda, empr_nombre from jar_alumnos a left join jar_cursos b on a.curs_id= b.curs_id left join jar_jornadas_nuevas c on a.jorn_id= c.jorn_id left join jar_empresa d on a.empr_rut= d.empr_id and d.elimina <> 'E' left join jar_mensualidad e on a.alum_rut=e.alum_rut and e.elimina <> 'E' and e.pame_agno_pago = a.alum_agno_acad "; $sql_ind_rep_xml_detalle = " select a.alum_rut, alum_nombre, CONCAT(alum_paterno,' ',alum_materno) apellidos , alum_agno_acad, pame_mes_pago meses, curs_descripcion, jorn_descripcion, pame_monto_pagado pagado, pame_mensualidad mensualidad, pame_deuda_mes deuda, empr_nombre from jar_alumnos a left join jar_cursos b on a.curs_id= b.curs_id left join jar_jornadas_nuevas c on a.jorn_id= c.jorn_id left join jar_empresa d on a.empr_rut= d.empr_id and d.elimina <> 'E' left join jar_mensualidad e on a.alum_rut=e.alum_rut and e.elimina <> 'E' and e.pame_agno_pago = a.alum_agno_acad where a.elimina <> 'E' "; // agrego matricula $sql_ind_rep_xml_detalle = " select a.alum_rut, alum_nombre, CONCAT(alum_paterno,' ',alum_materno) apellidos , alum_agno_acad, pame_mes_pago meses, curs_descripcion, jorn_descripcion, pame_monto_pagado pagado, if (pame_mes_pago=alum_mes_incorp,(alum_matricula+alum_arancel),pame_mensualidad) pame_mensualidad, if( pame_cierre_deuda=1,0, if (pame_mes_pago=alum_mes_incorp,(alum_matricula+alum_arancel-pame_monto_pagado),(alum_arancel-pame_monto_pagado))) deuda, empr_nombre from jar_alumnos a left join jar_cursos b on a.curs_id= b.curs_id left join jar_jornadas_nuevas c on a.jorn_id= c.jorn_id left join jar_empresa d on a.empr_rut= d.empr_id and d.elimina <> 'E' left join jar_mensualidad e on a.alum_rut=e.alum_rut and e.elimina <> 'E' and e.pame_agno_pago = a.alum_agno_acad "; /*and alum_agno_acad=2022*/ /*by a.alum_rut, alum_nombre, apellidos , alum_agno_acad, meses, curs_descripcion, jorn_descripcion, documento, empr_nombre*/ /*notas de ventas*/ $sql_ntv_xml = " select indi_id, indi_comentarios, DATE_FORMAT (indi_fecha , '%d-%m-%Y') indi_fecha, if(indi_tipo_accion=1,'INGRESO','EGRESO') indi_tipo_accion, esdo_descripcion, tiga_descripcion, paemp_descripcion ,empr_nombre, indi_num_doc, indi_monto, indi_num_fact from ".$prefijo."ingreso_diario a left join ".$prefijo."estado_doc b on a.esdo_id=b.esdo_id left join ".$prefijo."tipo_gasto c on a.tiga_id=c.tiga_id left join ".$prefijo."empresa d on a.empr_id=d.empr_id left join ".$prefijo."pago_emp e on a.tido_id=e.paemp_id where a.elimina <> 'E' and a.tido_id =".$v_nota_ventas." order by a.indi_fecha desc "; /*seguimiento ordenes de compra*/ /* REPLACE(FORMAT(indi_monto,0),',', '.')*/ $sql_seg_xml = " select indi_id, indi_comentarios, indi_num_fact , DATE_FORMAT (indi_fecha_factura, '%d-%m-%Y') fecha_factura , DATE_FORMAT (indi_fecha_pagos , '%d-%m-%Y') fecha_pago_factura, esdo_descripcion, indi_num_oc orden_compra, empr_nombre, indi_num_doc, indi_monto from ".$prefijo."ingreso_diario a left join ".$prefijo."estado_doc b on a.esdo_id=b.esdo_id left join ".$prefijo."tipo_gasto c on a.tiga_id=c.tiga_id left join ".$prefijo."empresa d on a.empr_id=d.empr_id left join ".$prefijo."pago_emp e on a.tido_id=e.paemp_id where a.elimina <> 'E' and a.esdo_id not in (2,8) order by a.indi_fecha desc "; /*seguimiento ordenes de compra reporte*/ $sql_fact_rep_xml = " select indi_id, indi_comentarios, indi_num_fact, DATE_FORMAT (indi_fecha_factura , '%d-%m-%Y'), esdo_descripcion, DATE_FORMAT (indi_fecha_pagos , '%d-%m-%Y'), indi_num_oc, indi_num_doc, DATE_FORMAT (indi_fecha , '%d-%m-%Y'), indi_monto, empr_nombre from ".$prefijo."ingreso_diario a left join ".$prefijo."estado_doc b on a.esdo_id=b.esdo_id left join ".$prefijo."tipo_gasto c on a.tiga_id=c.tiga_id left join ".$prefijo."empresa d on a.empr_id=d.empr_id left join ".$prefijo."pago_emp e on a.tido_id=e.paemp_id "; $sql_ind_xml_elim = "select indi_id, indi_comentarios, DATE_FORMAT (indi_fecha , '%d-%m-%Y') ". " indi_fecha, if(indi_tipo_accion=1,'INGRESO','EGRESO') indi_tipo_accion, ". " esdo_descripcion, tiga_descripcion, paemp_descripcion ,empr_nombre, indi_monto, ". " a.elimina_fecha, a.usua_rut ". " from ".$prefijo."ingreso_diario a left join ".$prefijo."estado_doc b on a.esdo_id=b.esdo_id ". " left join ".$prefijo."tipo_gasto c on a.tiga_id=c.tiga_id ". " left join ".$prefijo."empresa d on a.empr_id=d.empr_id ". " left join ".$prefijo."pago_emp e on a.tido_id=e.paemp_id ". " where a.elimina = 'E' order by a.elimina_fecha desc "; /* lista total de aranceles de los alumnos*/ $sql_aran_xml="select aran_id, aran_agno, curs_descripcion, jorn_descripcion, aran_monto, a.curs_id, a.jorn_id from ".$prefijo."aranceles a, ".$prefijo."cursos b, ".$prefijo."jornadas c where a.curs_id=b.curs_id and a.jorn_id=c.jorn_id and a.elimina <> 'E' order by curs_descripcion, aran_agno "; /* lista total de aranceles eliminados de los alumnos*/ $sql_aran_xml_elim="select aran_id, aran_agno, curs_descripcion, ". " jorn_descripcion, aran_monto, a.elimina_fecha, a.usua_rut ". " from ".$prefijo."aranceles a, ".$prefijo."cursos b, ".$prefijo."jornadas c ". " where a.curs_id=b.curs_id and a.jorn_id=c.jorn_id and a.elimina = 'E' order by a.elimina_fecha desc "; /*lista de apoderados para selección multiple*/ $sql_apo_mtp =" SELECT apod_rut, CONCAT(CONCAT(apod_rut,' - ', apod_nombre,' ', apod_paterno, ' ', apod_materno), if(apod_principal=1,' (Principal)','') ) ". " FROM ".$prefijo."apoderados A ". " where A.ELIMINA <> 'E' "; /*lista de apoderados para busquedas avanzadas*/ /*se agrupa por que se repite si un alumno esta para mas de 1 año matriculado*/ $sql_apo_xml =" SELECT C.alum_rut, A.apod_rut, CONCAT(CONCAT(apod_nombre,' ',apod_paterno), ' ', apod_materno), A.apod_telefono, A.apod_telefono1, A.apod_mail, C.alum_rut, CONCAT(CONCAT(alum_nombre,' ',alum_paterno), ' ', alum_materno) FROM ".$prefijo."apoderados A left join ".$prefijo."alum_apod B on A.APOD_RUT= B.APOD_RUT and B.ELIMINA <> 'E' left join ".$prefijo."alumnos C on B.alum_rut=C.alum_rut and C.elimina <> 'E' WHERE A.ELIMINA <> 'E' group by C.alum_rut, A.apod_rut, CONCAT(CONCAT(apod_nombre,' ',apod_paterno), ' ', apod_materno), A.apod_telefono, A.apod_telefono1, A.apod_mail, C.alum_rut, CONCAT(CONCAT(alum_nombre,' ',alum_paterno), ' ', alum_materno) order by A.apod_nombre "; // and C.elimina <> 'E' /*lista de alumnos*/ $sql_alu_xml1 =" SELECT distinct alum_rut, CONCAT(alum_rut,' - ', CONCAT(CONCAT(alum_nombre,' ',alum_paterno), ' ', alum_materno)) FROM ".$prefijo."alumnos A where A.ELIMINA <> 'E' order by alum_nombre "; /*lista de alumnos*/ $sql_alu_xml =" select alum_rut,CONCAT(CONCAT(alum_paterno,' ',alum_materno), ' ', alum_nombre), curs_descripcion, jorn_descripcion, (select curs_descripcion from ".$prefijo."cursos where curs_id=A.curs_id1), (select jorn_descripcion from ".$prefijo."jornadas where jorn_id=A.jorn_id1), aran_monto, alum_agno_acad from ".$prefijo."alumnos A left join ".$prefijo."cursos B on A.curs_id= B.curs_id left join ".$prefijo."jornadas C on A.jorn_id= C.jorn_id left join ".$prefijo."aranceles D on A.curs_id1 = D.curs_id1 and D.elimina<> 'E' and A.jorn_id1 = D.jorn_id and D.aran_agno=".$agno_actual. " where A.elimina<> 'E' "; $sql_alu_xml =" select alum_rut,CONCAT(CONCAT(alum_paterno,' ',alum_materno), ' ', alum_nombre), curs_descripcion, jorn_descripcion, (select curs_descripcion from jar_cursos where curs_id=A.curs_id1), (select jorn_descripcion from jar_jornadas where jorn_id=A.jorn_id1), aran_monto, alum_agno_acad from jar_alumnos A left join jar_cursos B on A.curs_id= B.curs_id left join jar_jornadas C on A.jorn_id= C.jorn_id left join jar_aranceles D on A.curs_id1 = D.curs_id and D.elimina<> 'E' and A.jorn_id = D.jorn_id where A.elimina<> 'E' and alum_agno_acad=".$agno_actual. " "; //nueva sql por cambio de arancel liubre 01.08.2022 $sql_alu_xml =" select alum_rut,CONCAT(CONCAT(alum_paterno,' ',alum_materno), ' ', alum_nombre), curs_descripcion, jorn_descripcion, (select curs_descripcion from jar_cursos where curs_id=A.curs_id1), jorn_descripcion , alum_arancel, alum_agno_acad from jar_alumnos A left join jar_cursos B on A.curs_id= B.curs_id left join jar_jornadas_nuevas C on A.jorn_id= C.jorn_id left join jar_aranceles D on A.curs_id1 = D.curs_id and D.elimina<> 'E' and A.jorn_id = D.jorn_id where A.elimina<> 'E' and alum_agno_acad=".$agno_actual. " "; $sql_emp_xml =" select empr_id id,empr_rut codigo,empr_nombre descripcion, empr_direccion, empr_telefono, ". " empr_nom_contacto, empr_fono_contacto, empr_mail_contacto, tiem_descripcion, ". " 1 ttec_nombre, a.tiem_id, a.paemp_id, EMPR_DV, c.padi_descripcion, a.padi_id, 3 contador ". " from ". " ".$prefijo."empresa a left join ".$prefijo."tipo_empresa b on b.tiem_id = a.tiem_id ". " left join ".$prefijo."pago_dias c on a.padi_id=c.padi_id ". " where a.elimina<> 'E' "; $sql_emp_xml_elim =" select empr_id id,empr_rut codigo,empr_nombre descripcion, empr_direccion, empr_telefono, ". " empr_nom_contacto, empr_fono_contacto, empr_mail_contacto, tiem_descripcion, ". " 1 ttec_nombre, a.tiem_id, a.paemp_id, EMPR_DV, c.padi_descripcion, a.padi_id, a.elimina_fecha, a.usua_rut ". " from ". " ".$prefijo."empresa a left join ".$prefijo."tipo_empresa b on b.tiem_id = a.tiem_id ". " left join ".$prefijo."pago_dias c on a.padi_id=c.padi_id ". " where a.elimina = 'E' order by a.elimina_fecha desc "; /*lista de alumnos eliminados*/ $sql_alu_xml_elim = "SELECT alum_rut, alum_nombre, alum_paterno, alum_materno, alum_direccion, DATE_FORMAT (alum_f_nacimiento , '%d-%m-%Y') alum_f_nacimiento, jorn_id, empr_rut, curs_id from jar_alumnos where elimina = 'E' order by elimina_fecha desc "; //SE FORMA EN EL XML $sql_man_elim_xml = ""; //SE FORMA EN crea_grilla_lista_xml_sql.php adjuntos ya confirmados $sql_archivos_xml = "SELECT arch_id, arch_nombre, DATE_FORMAT (arch_fecha_ing , '%d-%m-%Y %T'), ". " CONCAT('img/ver3.png^Ver Archivo^subida/',arch_carpeta,'/',arch_nombre), ". " 'img/borrar.gif^Eliminar^' ". " FROM ".$prefijo."archivos "; //SE FORMA EN crea_grilla_lista_xml_sql.php adjuntos temporales $sql_archivos_tmp_xml = "SELECT arch_id, arch_nombre, DATE_FORMAT (arch_fecha_ing , '%d-%m-%Y %T'), ". " CONCAT('img/ver3.png^Ver Archivo^subida/',arch_carpeta,'/',arch_nombre), ". " 'img/borrar.gif^Eliminar^' ". " FROM ".$prefijo."archivos_tmp "; //el where va en la pagina que lo llama, ya que es dinamico segun el valor seleccionado de la grilla $sql_mod_xml= " select PK,Campo,ValorOriginal,ValorNuevo,FechaTrn,Usuario ". " from logTransacciones "; //sql rescata los registros de ingreso al sistema de los usuarios $sql_ing_xml= " select a.usua_rut, usua_nombre, DATE_FORMAT (reac_fecha , '%d-%m-%Y %T') reac_fecha, DATE_FORMAT (reac_fecha, '%m - %Y') mes_agno from ".$prefijo."registro_accesos a, ".$prefijo."usuario b where a.usua_rut=b.usua_rut order by UNIX_TIMESTAMP(reac_fecha) desc "; //sql rescata los registros de envio de email automaticos del sistema $sql_log_xml= " select id_cuenta, error_descripcion, modulo, DATE_FORMAT (fecha_envio , '%d-%m-%Y %T') reac_fecha, ". " DATE_FORMAT (fecha_envio, '%m - %Y') mes_agno ". " from ".$prefijo."log_acciones a ". " order by UNIX_TIMESTAMP(fecha_envio) desc "; //sql rescata los registros de colaboradores del sistema $sql_col_xml= " SELECT cola_id, cola_rut, CONCAT(CONCAT(cola_nombres,' ',cola_paterno) , ' ', cola_materno), cola_telefono, tico_descripcion, salu_descripcion, afps_descripcion FROM ".$prefijo."colaboradores a, ".$prefijo."tipo_contrato b, ".$prefijo."salud c, ".$prefijo."afps d where a.tico_id = b.tico_id and a.salu_id=c.salu_id and a.afps_id=d.afps_id and a.elimina <> 'E' "; $sql_col_elim_xml= " SELECT cola_id, cola_rut, CONCAT(CONCAT(cola_nombres,' ',cola_paterno) , ' ', cola_materno), cola_telefono, tico_descripcion, salu_descripcion, afps_descripcion FROM ".$prefijo."colaboradores a, ".$prefijo."tipo_contrato b, ".$prefijo."salud c, ".$prefijo."afps d where a.tico_id = b.tico_id and a.salu_id=c.salu_id and a.afps_id=d.afps_id and a.elimina = 'E' "; // ************* ********************************** // ************* Sql standars sistema // ************* ********************************** /*meses*/ $sql_meses=" select id codigo, mes descripcion from ".$prefijo."meses ". " where vigencia='SI' and elimina <> 'E' order by codigo "; //empresas del sistems (cliente/proveedores) /*Jornada alumno*/ $sql_jornada=" select jorn_id codigo, jorn_descripcion descripcion from ".$prefijo."jornadas ". " where jorn_vigencia='SI' and elimina <> 'E' order by orden"; $sql_jornada=" SELECT -1 codigo , 'SELECCIONE JORNADA' jorn_descripcion from dual where 1=2 "; /*Cursos alumno*/ $sql_curso=" select curs_id codigo, curs_descripcion descripcion from ".$prefijo."cursos ". " where curs_vigencia='SI' and elimina <> 'E' order by descripcion"; //lista de resumen/detalle reporte maestro $sql_agrupa_rep=" SELECT 1 codigo ,'RESUMEN' descripcion from dual UNION ALL SELECT 2 codigo,'DETALLE' descripcion from dual "; /*Datos alumnos*/ //(alum_f_nacimiento, '%d-%m-%Y') alum_f_nacimiento $sql_alumnos=" select alum_rut, alum_nombre, alum_paterno, alum_materno, B.curs_descripcion , alum_direccion, DATE_FORMAT(alum_f_nacimiento, '%d-%m-%Y') alum_f_nacimiento from jar_alumnos A left join jar_cursos B on A.curs_id= B.curs_id where A.elimina <> 'E' "; $sql_alumnos = " select alum_agno_acad, curs_descripcion, jorn_descripcion, sum(pame_mensualidad) mensualidad, IF(max(cola_sueldo_base IS NULL) = 0, max(cola_sueldo_base), 0) sueldos, sum(pame_mensualidad) - IF(max(cola_sueldo_base IS NULL) = 0, max(cola_sueldo_base), 0) utilidad from jar_alumnos a left join jar_cursos b on a.curs_id= b.curs_id left join jar_jornadas_nuevas c on a.jorn_id= c.jorn_id left join jar_empresa d on a.empr_rut= d.empr_id and d.elimina <> 'E' left join jar_mensualidad e on a.alum_rut=e.alum_rut and e.elimina <> 'E' and e.pame_agno_pago = a.alum_agno_acad left join jar_colaboradores f on find_in_set(a.curs_id, f.cola_cursos) and f.elimina <> 'E' where a.elimina <> 'E' "; $sql_alumnos = " select alum_agno_acad, curs_descripcion, jorn_descripcion, if( e.pame_cierre_deuda=1,0, sum(if (pame_mes_pago=alum_mes_incorp,(alum_matricula+alum_arancel),pame_mensualidad))) mensualidad, 0 sueldos, 0 utilidad from jar_alumnos a left join jar_cursos b on a.curs_id= b.curs_id left join jar_jornadas_nuevas c on a.jorn_id= c.jorn_id left join jar_empresa d on a.empr_rut= d.empr_id and d.elimina <> 'E' left join jar_mensualidad e on a.alum_rut=e.alum_rut and e.elimina <> 'E' and e.pame_agno_pago = a.alum_agno_acad where a.elimina <> 'E' "; $sql_talleres=" select alum_rut, alum_nombre, alum_paterno, alum_materno, B.curs_descripcion , alum_direccion, DATE_FORMAT(alum_f_nacimiento, '%d-%m-%Y') alum_f_nacimiento from jar_alumnos A left join jar_cursos B on A.curs_id= B.curs_id where A.elimina <>'E' "; /* select alum_rut,CONCAT(CONCAT(alum_nombre,' ',alum_paterno), ' ', alum_materno), curs_descripcion, (select curs_descripcion from jar_cursos where curs_id=A.curs_id1), (select jorn_descripcion from jar_jornadas where jorn_id=A.jorn_id1), alum_agno_acad from jar_alumnos A left join jar_cursos B on A.curs_id= B.curs_id where A.elimina<> 'E'*/ $sql_tables= " SELECT table_name codigo, REPLACE(table_name, '_', ' ') descripcion FROM INFORMATION_SCHEMA.tables ". " WHERE TABLE_SCHEMA='tuestilo_jardin'"; //lista de años historial para reportes y otros $sql_agnos_historial = " SELECT DISTINCT pame_agno_pago codigo, pame_agno_pago descripcion FROM `jar_mensualidad` where elimina <> 'E' order by pame_agno_pago "; $sql_emp=" select empr_id codigo, CONCAT(empr_rut, ' - ', empr_nombre) descripcion from ".$prefijo."empresa where elimina <> 'E' "; //dias semana lunes, martes etc.. $sql_dias_semana=" select dise_id codigo, dise_descripcion descripcion from ".$prefijo."dias_semana ". " order by codigo"; //sql rescata los registros de colaboradores del sistema $sql_colaboradores= " SELECT cola_rut codigo, CONCAT(CONCAT(cola_nombres,' ',cola_paterno) , ' ', cola_materno) descripcion FROM jar_colaboradores a where a.elimina <> 'E' and cola_cursos <> null and 1=2 "; //dias mes 1,2,3..31 $sql_dias_mes=" select dime_id codigo, dime_descripcion descripcion from ".$prefijo."dias_mes ". " order by codigo"; //banco $sql_banco=" select baco_id codigo, baco_descripcion descripcion from ".$prefijo."bancos ". " where baco_vigencia='SI' and elimina <> 'E' order by descripcion"; //tipo contratgo $sql_tipo_contrato=" select tico_id codigo, tico_descripcion descripcion from ".$prefijo."tipo_contrato ". " where tico_vigencia='SI' and elimina <> 'E' order by descripcion"; //afp $sql_afp=" select afps_id codigo, afps_descripcion descripcion from ".$prefijo."afps ". " where afps_vigencia='SI' and elimina <> 'E' order by descripcion"; //salud $sql_salud=" select salu_id codigo, salu_descripcion descripcion from ".$prefijo."salud ". " where salu_vigencia='SI' and elimina <> 'E' order by descripcion"; //tipo gasto luz, agua etc.. $sql_tipo_gasto=" select tiga_id codigo, tiga_descripcion descripcion from ".$prefijo."tipo_gasto ". " where tiga_vigencia='SI' and elimina <> 'E' order by descripcion"; //tipo ingreso ploter etc.. $sql_tipo_ingreso=" select tisi_id codigo, tisi_descripcion descripcion from ".$prefijo."tipo_ingreso ". " where tisi_vigencia='SI' and elimina <> 'E' order by descripcion"; //estado documento pagado, pendiente etc... $sql_estado_doc=" select esdo_id codigo, esdo_descripcion descripcion from ".$prefijo."estado_doc ". " where esdo_vigencia='SI' and elimina <> 'E' order by descripcion"; //de que categoria es la empresa $sql_tipo_emp=" select tiem_id codigo, tiem_descripcion descripcion from ".$prefijo."tipo_empresa ". " where tiem_vigencia='SI' and elimina <> 'E'"; //metodo de pago de la empresa $sql_pago_emp=" select paemp_id codigo, paemp_descripcion descripcion from ".$prefijo."pago_emp ". " where paemp_vigencia='SI' and elimina <> 'E'"; //dias pago de la empresa $sql_dias_emp=" select padi_id codigo, padi_descripcion descripcion from ".$prefijo."pago_dias ". " where padi_vigencia='SI' and elimina <> 'E' "; //archivos adjuntos //$sql_pago_emp=" select paemp_id codigo, paemp_descripcion descripcion from ".$prefijo."archivos "; //sql para sacar los perfiles vigentes de la administración del sistema $sql_perfiles="SELECT DISTINCT upper(perf_nombre) descripcion, perf_id codigo ". " FROM ".$prefijo."perfil where perf_vigencia='SI' and elimina <> 'E'". " ORDER BY descripcion"; // ************* ********************************** // ************* Variables globales grid dinámica // ************* ********************************** $gv_encabezados =''; $gv_anchos =''; $gv_colalign =''; $gv_sorting =''; $gv_coltype =''; $gv_attachheader =''; $gv_nombregrilla =''; $gv_objgrilla =''; $gv_xml = 'formulario.carga_grid_xml';// única para todas las llamadas a grilla $gv_tabla =''; $gv_columnas =''; $gv_where =''; $gv_orderby =''; $gv_query =''; $gv_lista =''; $gv_proyecto = 10;//número del proyecto consultado, esta en duro debo cambiar $gv_prefijo =''; //prefijo de los objetos de la sección $gv_inpr_id ='';// variable global de los ingreso i+d $gv_inpr_codigo ='';// variable global de los ingreso proteccion $gv_objgrilla_aux ='';//para la grilla convenios $gv_nombregrilla1 =''; $gv_objgrilla1 =''; $gv_disabled_hist =''; //variable si aplica o no la pantalla de historial ?> 'E') THEN 'Cursando' WHEN EXISTS (SELECT 1 FROM jar_alumnos WHERE alum_rut = '$rut' AND elimina <> 'E') THEN 'Antiguo' ELSE 'Nuevo' END as existencia, CASE WHEN EXISTS (SELECT 1 FROM jar_alumnos WHERE alum_rut = '$rut' AND alum_agno_acad = '$agno' AND elimina <> 'E') THEN 'red' WHEN EXISTS (SELECT 1 FROM jar_alumnos WHERE alum_rut = '$rut' AND elimina <> 'E') THEN 'green' ELSE 'white' END as color; "; $result = mysqli_query($mysqli, $sql); $row = mysqli_fetch_assoc($result); return array($row["existencia"] , $row["color"] ); // Cerrar la conexión a la base de datos mysql_close($mysqli); } function Quitar_formato($numero){ if ($numero!=''){ //agregado el dia 10.10.2017 por las licitaciones montos vacios $numero= str_replace(",", "", $numero); $numero= str_replace(".", "", $numero); $numero= str_replace("$", "", $numero); $numero= str_replace(" ", "", $numero); }else{ $numero=0; } return $numero; } function validarRut($rut) { $rut = preg_replace('/[^k0-9]/i', '', $rut); $dv = substr($rut, -1); $numero = substr($rut, 0, strlen($rut)-1); $i = 2; $suma = 0; foreach(array_reverse(str_split($numero)) as $v) { if($i==8) $i = 2; $suma += $v * $i; ++$i; } $dvr = 11 - ($suma % 11); if($dvr == 11) $dvr = 0; if($dvr == 10) $dvr = 'K'; if($dvr == strtoupper($dv)) return true; else return false; } function AltiriaSMS_Creditos_final($sDestination,$sMessage,$debug) { $sData ="cmd=getcredit&"; $sData .="domainId=CLI_2577&"; $sData .="login=contacto@urbanogestores.cl&"; $sData .="passwd=uges123&"; $sData .="dest=".str_replace(",","&dest=",$sDestination)."&"; $sData .="msg=".urlencode(utf8_encode(substr($sMessage,0,160))); $fp = fsockopen("www.altiria.net", 80, $errno, $errstr, 10); if (!$fp) { //Error de conexion $output = "ERROR de conexion: $errno - $errstr
\n"; $output .= "Compruebe que ha configurado correctamente la direccion/url "; $output .= "suministrada por altiria
"; return $output; } else { // Reemplazar la cadena ’/sustituirPOSTsms’ por la parte correspondiente // de la URL suministrada por Altiria al dar de alta el servicio $buf = "POST /api/http HTTP/1.0\r\n"; $buf .= "Host: www.altiria.net\r\n"; $buf .= "Content-type: application/x-www-form-urlencoded; charset=UTF-8\r\n"; $buf .= "Content-length: ".strlen($sData)."\r\n"; $buf .= "\r\n"; $buf .= $sData; fputs($fp, $buf); $buf = ""; while (!feof($fp)) $buf .= fgets($fp,128); fclose($fp); if ($debug){ $creditos = $buf; // some IP address // $creditos_reales = split (":", $creditos); $creditos_reales=explode(":",$creditos); if (count($creditos_reales)>1){ return $creditos_reales[7]; }else{ echo 0 ; } } if (strpos($buf,"HTTP/1.1 200 OK") === false){ $output = "ERROR. Codigo error HTTP: ".substr($buf,9,3)."
\n"; $output .= "Compruebe que ha configurado correctamente la direccion/url "; $output .= "suministrada por Altiria
"; return $output; } //Se comprueba la respuesta de Altiria if (strstr($buf,"ERROR")){ $output = $buf."
\n"; $output .= " Codigo de error de Altiria. Compruebe la especificacion
"; return $output; } else return ""; } } function AltiriaSMS_Creditos($sDestination,$sMessage,$debug) { $sData ="cmd=getcredit&"; $sData .="domainId=disfrutatufuturo&"; $sData .="login=cristian.reyes.c@gmail.com&"; $sData .="passwd=dis2014frutAtuf27&"; $sData .="dest=".str_replace(",","&dest=",$sDestination)."&"; $sData .="msg=".urlencode(utf8_encode(substr($sMessage,0,160))); $fp = fsockopen("www.altiria.net", 80, $errno, $errstr, 10); if (!$fp) { //Error de conexion $output = "ERROR de conexion: $errno - $errstr
\n"; $output .= "Compruebe que ha configurado correctamente la direccion/url "; $output .= "suministrada por altiria
"; return $output; } else { // Reemplazar la cadena ’/sustituirPOSTsms’ por la parte correspondiente // de la URL suministrada por Altiria al dar de alta el servicio $buf = "POST /api/http HTTP/1.0\r\n"; $buf .= "Host: www.altiria.net\r\n"; $buf .= "Content-type: application/x-www-form-urlencoded; charset=UTF-8\r\n"; $buf .= "Content-length: ".strlen($sData)."\r\n"; $buf .= "\r\n"; $buf .= $sData; fputs($fp, $buf); $buf = ""; while (!feof($fp)) $buf .= fgets($fp,128); fclose($fp); if ($debug){ $creditos = $buf; // some IP address // $creditos_reales = split (":", $creditos); $creditos_reales=explode(":",$creditos); if (count($creditos_reales)>1){ return $creditos_reales[7]; }else{ echo 0 ; } } if (strpos($buf,"HTTP/1.1 200 OK") === false){ $output = "ERROR. Codigo error HTTP: ".substr($buf,9,3)."
\n"; $output .= "Compruebe que ha configurado correctamente la direccion/url "; $output .= "suministrada por Altiria
"; return $output; } //Se comprueba la respuesta de Altiria if (strstr($buf,"ERROR")){ $output = $buf."
\n"; $output .= " Codigo de error de Altiria. Compruebe la especificacion
"; return $output; } else return ""; } } function AltiriaSMS_Envios_final($sDestination,$sMessage,$debug) { $sData ="cmd=sendsms&"; //$sData .="domainId=demopr&"; //$sData .="login=crireyes&"; //$sData .="passwd=djfriylq&"; $sData .="domainId=CLI_2577&"; //$sData .="login=disfrutatufuturo&"; $sData .="login=contacto@urbanogestores.cl&"; $sData .="passwd=uges123&"; $sData .="dest=".str_replace(",","&dest=",$sDestination)."&"; $sData .="msg=".urlencode(utf8_encode(substr($sMessage,0,160))); $fp = fsockopen("www.altiria.net", 80, $errno, $errstr, 10); if (!$fp) { //Error de conexion $output = "ERROR de conexion: $errno - $errstr
\n"; $output .= "Compruebe que ha configurado correctamente la direccion/url "; $output .= "suministrada por altiria
"; return $output; } else { // Reemplazar la cadena ’/sustituirPOSTsms’ por la parte correspondiente // de la URL suministrada por Altiria al dar de alta el servicio $buf = "POST /api/http HTTP/1.0\r\n"; $buf .= "Host: www.altiria.net\r\n"; $buf .= "Content-type: application/x-www-form-urlencoded; charset=UTF-8\r\n"; $buf .= "Content-length: ".strlen($sData)."\r\n"; $buf .= "\r\n"; $buf .= $sData; fputs($fp, $buf); $buf = ""; while (!feof($fp)) $buf .= fgets($fp,128); fclose($fp); if (strpos($buf,"HTTP/1.1 200 OK") === false){ $output = "ERROR. Codigo error HTTP: ".substr($buf,9,3)."
\n"; $output .= "Compruebe que ha configurado correctamente la direccion/url "; $output .= "suministrada por Altiria
"; return $output; } //Se comprueba la respuesta de Altiria if (strstr($buf,"ERROR")){ $output = $buf."
\n"; $output .= " Codigo de error de Altiria. Compruebe la especificacion
"; return $output; } else return "Salio"; } } function AltiriaSMS_Envios($sDestination,$sMessage,$debug) { $sData ="cmd=sendsms&"; //$sData .="domainId=demopr&"; //$sData .="login=crireyes&"; //$sData .="passwd=djfriylq&"; $sData .="domainId=disfrutatufuturo&"; //$sData .="login=disfrutatufuturo&"; $sData .="login=cristian.reyes.c@gmail.com&"; $sData .="passwd=dis2014frutAtuf27&"; $sData .="dest=".str_replace(",","&dest=",$sDestination)."&"; $sData .="msg=".urlencode(utf8_encode(substr($sMessage,0,160))); $fp = fsockopen("www.altiria.net", 80, $errno, $errstr, 10); if (!$fp) { //Error de conexion $output = "ERROR de conexion: $errno - $errstr
\n"; $output .= "Compruebe que ha configurado correctamente la direccion/url "; $output .= "suministrada por altiria
"; return $output; } else { // Reemplazar la cadena ’/sustituirPOSTsms’ por la parte correspondiente // de la URL suministrada por Altiria al dar de alta el servicio $buf = "POST /api/http HTTP/1.0\r\n"; $buf .= "Host: www.altiria.net\r\n"; $buf .= "Content-type: application/x-www-form-urlencoded; charset=UTF-8\r\n"; $buf .= "Content-length: ".strlen($sData)."\r\n"; $buf .= "\r\n"; $buf .= $sData; fputs($fp, $buf); $buf = ""; while (!feof($fp)) $buf .= fgets($fp,128); fclose($fp); if (strpos($buf,"HTTP/1.1 200 OK") === false){ $output = "ERROR. Codigo error HTTP: ".substr($buf,9,3)."
\n"; $output .= "Compruebe que ha configurado correctamente la direccion/url "; $output .= "suministrada por Altiria
"; return $output; } //Se comprueba la respuesta de Altiria if (strstr($buf,"ERROR")){ $output = $buf."
\n"; $output .= " Codigo de error de Altiria. Compruebe la especificacion
"; return $output; } else return "Salio"; } } function formato_celular($fono){ //formato celulares if (substr($fono,0,3)=="569"){ //viene con codigo pais return $fono; }elseif (strlen($fono) == 9){ //viene con 9 adelante $fono=substr($fono,1, strlen($fono)); return "569".$fono; }elseif (strlen($fono) < 8){ //no viene con 9 adelante return "5699".$fono; }else{ return "569".$fono; } } function formato_numero_texbox($numero){ include "config.php"; if ($numero!=''){ //agregado el dia 10.10.2017 por las licitaciones montos vacios if ($separador_miles=='.'){ $numero=number_format($numero, $decimales,',','.'); }else{ $numero=number_format($numero, $decimales); } } return $numero; } function formato_numero($numero){ include "config.php"; if (is_numeric($numero)){ if ($separador_miles=='.'){ $numero=number_format($numero, $decimales,',','.'); }else{ $numero=number_format($numero, $decimales); } return "$ ".$numero; }else{ return $numero; } // if ($numero < 0){ //return "$ ".$numero.""; // }else{ // } } function cuenta_sms($creditos, $cant_envios){ if (round($creditos, 0) < $cant_envios){ return false; }else{ return true; } } //para simular la llamada por ajax if(isset($_POST['tipo'])) { echo controles ( $tipo,$obligatorio,$placeholder, $ID,$v_sql,$id_selected,$texto_alerta, $customizado ); /*echo "llego";*/ } function generarCodigo($longitud) { $key = ''; $pattern = '1234567890abcdefghijklmnopqrstuvwxyz'; $max = strlen($pattern)-1; for($i=0;$i < $longitud;$i++) $key .= $pattern[mt_rand(0,$max)]; return $key; } function botones ($id){ echo (' Guardar Nuevo Eliminar '); } /*botones sin eliminar*/ function botones_modal ($id){ echo (' Guardar Nuevo '); } function controles ( $tipo,$obligatorio,$placeholder, $ID,$v_sql,$id_selected,$texto_alerta, $customizado ){ $options_chosen_select=''; if ($tipo == 'text') { return ''; }elseif ($tipo == 'fecha') { /*le dibujo el icono de calendario*/ return '
'. ' '. '
'; ''; }elseif ($tipo == 'chosen-select') { return ''; }elseif ($tipo == 'select'){ return ''; }elseif ($tipo == 'select-multiple'){ return ( '  Excluir' ); }elseif ($tipo == 'select-multiple-append'){ /*para poder hacer una carga dinamica con append*/ return ( controles_sql_options ($placeholder, $v_sql, $id_selected ) ); }elseif ($tipo == 'textarea') { return ( '' ); }elseif ($tipo == 'password') { return ''; }elseif ($tipo == 'select-multiple') { return( '' ); return ( '' ); } } /* function that returns the options for chosen-select */ function controles_sql_options( $recurso,$v_sql,$id_selected ){ include "include/conexion.php"; $RESULT=''; $cso_where=''; $codigo=''; $descripcion=''; $v_query; $pl_codigo; $pl_descripcion; $RESULT = ''; /*sql dinamica que crea los options de los combos*/ $v_query = $v_sql; $result= $mysqli->query($v_query); if (is_array($id_selected)){ /*array se envia desde pagina principal*/ while ($row = $result->fetch_array()) { $v_selected= ""; for ($i=0; count($id_selected) > $i; $i++) { //echo $id_selected [$i]."
"; if ($row[0]==$id_selected [$i]){ $v_selected= " selected "; } } $RESULT =$RESULT.''; } }else{ while ($row = $result->fetch_array()) { if ($row[0] == $id_selected) { $RESULT =$RESULT.''; }else{ $RESULT =$RESULT.''; } } } return $RESULT; } /*correlativo de una tabla*/ function siguiente_numero ( $v_id,$v_tabla ){ $correlativo=1; include "include/conexion.php"; $v_query ='SELECT IFNULL(max('.$v_id.'),0)+1 as pl_correlativo FROM '.$v_tabla.' a'; $resultado = $mysqli->query($v_query); // or die('Consulta 1:** ' . mysql_error().$v_query); while ($fila = $resultado->fetch_assoc()) { $correlativo=$fila["pl_correlativo"]; } return $correlativo; } /*mueve archivo temporal a fijo, en el ingreso de registro*/ function mover_arch_tmp ($v_carpeta,$v_proyecto, $v_codigoUnico){ include("config.php"); include ( "include/conexion.php"); $v_sql = "insert into ".$prefijo."archivos (arch_proy, arch_nombre, arch_carpeta, arch_fecha_ing, arch_indice, arch_random) SELECT '".$v_proyecto."', arch_nombre, arch_carpeta, arch_fecha_ing, arch_indice, arch_random FROM ".$prefijo."archivos_tmp WHERE arch_carpeta='".$v_carpeta."' and arch_random='".$v_codigoUnico."' "; $resultado = $mysqli->query($v_sql); // or die('Consulta 1: ' . mysql_error().$v_sql); $v_sql = "delete from ".$prefijo."archivos_tmp where arch_random = '".$v_codigoUnico."' and upper(arch_carpeta) ='".$v_carpeta."' "; $resultado = $mysqli->query($v_sql); // or die('Consulta 1: ' . mysql_error().$v_sql); return $msj_success; } /*mesinicio y fin año academico del alumno*/ function rango_academido ($v_rut, $v_agno){ include ( "include/conexion.php"); $v_query =" SELECT alum_mes_incorp, alum_mes_termino FROM jar_alumnos A where A.ELIMINA <> 'E' and alum_rut='".$v_rut. "' and alum_agno_acad= ".$v_agno; $resultado = $mysqli->query($v_query); // or die('Consulta 1:** ' . mysql_error().$v_query); while ($fila = $resultado->fetch_assoc()) { $v_inicio = $fila["alum_mes_incorp"]; $v_fin = $fila["alum_mes_termino"]; } return array ($v_inicio, $v_fin); } function quitar_tildes($cadena) { $no_permitidas= array ("á","é","í","ó","ú","Á","É","Í","Ó","Ú","ñ","À","Ã","Ì","Ò","Ù","Ù","à ","è","ì","ò","ù","ç","Ç","â","ê","î","ô","û","Â","Ê","ÃŽ","Ô","Û","ü","ö","Ö","ï","ä","«","Ò","Ï","Ä","Ë"); $permitidas= array ("a","e","i","o","u","A","E","I","O","U","n","N","A","E","I","O","U","a","e","i","o","u","c","C","a","e","i","o","u","A","E","I","O","U","u","o","O","i","a","e","U","I","A","E"); $texto = str_replace($no_permitidas, $permitidas ,$cadena); return $texto; } ?> <? echo $sistema;?> | Recuperar password

Olvidó su password

Ingrese su email y recibirá su password por ese medio.

Login
Copyright
©  2025