<?php
include_once "core.config.inc.php";
include_once "core.error.inc.php";
include_once "core.init.inc.php";
include_once "core.db.inc.php";
$xC = new cConfiguration();
//========================================= DATOS DEL SISTEMA ===========================================
define("SYS_FECHA_DE_MIGRACION", $xC->get("fecha_de_migracion_al_sistema", "2012-01-01", $xC->SISTEMA));
//========================================= DATOS GENERALES DE LA ENTIDAD ===========================================
define("EACP_ID_DE_PERSONA", $xC->get("clave_de_persona_en_sistema", 10000, $xC->ENTIDAD));
define("EACP_NAME", $xC->get("nombre_de_la_entidad", "", $xC->ENTIDAD));
define("EACP_DESCRIPTION", $xC->get("descripcion_de_la_entidad", "", $xC->ENTIDAD));
define("EACP_PATH_LOGO", vIMG_PATH . "/logo.png");
//========================================= DATOS LEGALES DE LA ENTIDAD ===========================================
define("EACP_CLAVE", $xC->get("registro_ante_la_cnbv", "", $xC->ENTIDAD_LEGAL));
define("EACP_CLAVE_CASFIN", $xC->get("registro_casfin", "", $xC->ENTIDAD_LEGAL));
define("EACP_RFC", $xC->get("rfc_de_la_entidad", "", $xC->ENTIDAD_LEGAL));
define("EACP_REGISTRO_PATRONAL", $xC->get("registro_patronal_imss", "", $xC->ENTIDAD_LEGAL));
define("EACP_FECHA_DE_CONSTITUCION", $xC->get("fecha_de_constitucion", date("Y-m-d"), $xC->ENTIDAD_LEGAL));
define("ENTIDAD_CLAVE_SIC", $xC->get("entidad_clave_en_el_sic", "SinRegistro", $xC->ENTIDAD_LEGAL));
//Abril-2012 ;
define("ENTIDAD_NOMBRE_SIC", $xC->get("entidad_corto_en_el_sic", "FINANCIERA", $xC->ENTIDAD_LEGAL));
//Abril-2012 ;
define("EACP_DOCTO_CONSTITUCION", $xC->get("descripcion_del_documento_constitutivo", "", $xC->ENTIDAD_LEGAL));
define("EACP_REP_LEGAL", $xC->get("nombre_del_representante_legal", "", $xC->ENTIDAD_LEGAL));
define("EACP_RFC_REP_LEGAL", $xC->get("rfc_del_representante_legal", "", $xC->ENTIDAD_LEGAL));
define("EACP_CURP_REP_LEGAL", $xC->get("curp_del_representante_legal", "", $xC->ENTIDAD_LEGAL));
define("EACP_REGIMEN_FISCAL", $xC->get("regimen_fiscal_de_la_entidad", "REGIMEN GENERAL DE LEY PERSONAS MORALES", $xC->ENTIDAD_LEGAL));
define("EACP_DOCTO_REP_LEGAL", $xC->get("descripcion_del_documento_de_asignacion_del_representante", "", $xC->ENTIDAD_LEGAL));
define("EACP_PDTE_VIGILANCIA", $xC->get("nombre_del_presidente_del_consejo_de_vigilancia", "", $xC->ENTIDAD_LEGAL));
/**
* Modifica el periodo de Credito Actual
* @param integer $nuevo_periodo
*/
function setCambiar($nuevo_periodo)
{
$xC = new cConfiguration();
$msg = "";
$xC->set("periodo_de_solicitudes_anterior", EACP_PER_SOLICITUDES);
$xC->set("periodo_de_solicitudes_actual", $nuevo_periodo);
if ($nuevo_periodo != $xC->get("periodo_de_solicitudes_actual")) {
$msg .= "ERROR\tLa actualizacion del periodo ha Fallado\r\n";
} else {
$msg .= "SUCESS\tLa actualizacion del periodo({$nuevo_periodo}) ha sido un exito!!\r\n";
}
return $msg;
}
<?php
$OS = strtolower(substr(PHP_OS, 0, 3));
define("SAFE_OS", $OS);
$core_file_config = "core.config.os.{$OS}.inc.php";
include_once $core_file_config;
//if( include_once($core_file_config) == false){
//header("location:../install/install.php?f=" . urlencode(dirname(__FILE__) . "/" . $core_file_config));
// exit();
//}
$xC = new cConfiguration();
@session_start();
//======================================= INFORMACION DEL PROGRAMA
$codename = "Diana";
$version = "201501";
$revision = "01";
define("SAFE_VERSION", $version);
define("SAFE_REVISION", $revision);
//======================================= INCLUDE RUNTIME
ini_set("include_path", $os_path_includes_str);
//======================================= HOST DE TRABAJO
define("CURRENT_EACP", 1);
define("DEFAULT_SUCURSAL", $sucursal);
$url_host = $V_cf1e8c14e54505f60aa10c;
define("WORK_HOST", $V_67e92c8765a9bc7fb2d335);
define("PORT_HOST", "3306");
define("EN_CORRECCION", 'NO');
//======================================= MODULOS DEL SISTEMA
define("MMOD_PERSONAS", "personas");
define("MMOD_SISTEMA", "sistema");
define("MMOD_CAPTACION", "captacion");
* ====================================================================================================================================================
* Agregar codigo de actualizar menores a personas fisicas
* ====================================================================================================================================================
*/
$messages .= "=======================================================================================\r\n";
$messages .= "=========================\t\t" . EACP_NAME . " \r\n";
$messages .= "=========================\t\t" . getSucursal() . " \r\n";
$messages .= "=======================================================================================\r\n";
$messages .= "=========================\t\tINICIANDO EL CIERRE DE SISTEMA ====================\r\n";
$messages .= "=========================\t\tRECIBO: {$idrecibo}\t\t\t\t ====================\r\n";
//2011-01-26 : Agrega un recibo estadistico de control diario
$xNRec = new cReciboDeOperacion(10);
$diaSig = $xF->setSumarDias(1);
$xIdNRec = $xNRec->setNuevoRecibo(DEFAULT_SOCIO, DEFAULT_CREDITO, $diaSig, 1, 10, "MOVIMIENTOS_ESTADISTICOS_DEL_DIA", "NA", "ninguno", "NA", DEFAULT_GRUPO);
//actualiza la configuracion del sistema
$xCx = new cConfiguration();
$xUtil = new cUtileriasParaOperaciones();
$xCx->set("numero_de_recibo_por_defecto", $xIdNRec);
$messages .= date("Y-m-d") . "\tSe Agrego el Recibo {$xIdNRec} para ESTADISTICOS del proximo dia( {$diaSig} )\n";
//=================================
$messages .= $xUtil->setEliminarRecibosDuplicados();
$x20 = setFoliosAlMaximo();
$messages .= date("Y-m-d") . "\tSe llevaron Folios al Maximo, los recibos quedaron en " . $x20["recibos"] . " \n";
$messages .= date("Y-m-d") . "\tSe llevaron la Cuenta de Polizas Contables al Maximo \n";
setSociosAlMaximo();
clearCacheSessions();
$messages .= date("Y-m-d") . "\tSe limpio la Cache de sessiones\n";
$messages .= date("Y-m-d") . "\tSe llevaron los socios al Maximo \n";
if ($xF->getDiaFinal() == $xF->get()) {
$messages .= CongelarSaldos($idrecibo);
} else {
function patch($force = false, $version_inicial = false, $soloIdioma = false)
{
$ql = new MQL();
$xConf = new cConfiguration();
$localver = $xConf->get("safe_osms_database_version");
//Actualiza la configuracion
//if($force == true){ $xConf->set("safe_osms_database_version", $version); }
if (FORCE_UPDATES_ON_BOOT == true or $force == true) {
//Ejecutar Vistas y Functions
if ($soloIdioma == false) {
$this->setAplicarScripts();
}
$current = $version_inicial === false ? intval(SAFE_DB_VERSION) : $version_inicial;
//201406.01
$dbversion = intval(SAFE_VERSION . SAFE_REVISION);
$sqlMenu = "INSERT INTO `general_menu` (`idgeneral_menu`, `menu_parent`, `menu_title`, `menu_file`, `menu_type`, `menu_order`) VALUES ";
$lang = array();
$sql = array();
$xSrv = new MQLService("", "");
$ulang = $xSrv->getRequest(URL_UPDATES . "install/updates/lang.php");
$lang = json_decode($ulang, true);
$ulang2 = $xSrv->getRequest(URL_UPDATES . "install/updates/lang2.php");
$lang2 = json_decode($ulang2, true);
$usql = $xSrv->getRequest(URL_UPDATES . "install/updates/sql.php?version={$localver}");
$sql = json_decode($usql, true);
//setLog(URL_UPDATES . "install/updates/sql.php?version=$dbversion");
$this->mMessages .= "URL\t" . URL_UPDATES . "install/updates/sql.php?version={$localver}" . "\r\n";
$upt = false;
if (is_array($lang)) {
foreach ($lang as $version => $patchs) {
if ($current <= intval($version)) {
foreach ($patchs as $idx => $content) {
$palabra = $content[0];
$traduccion = $content[1];
$language = $content[2];
$this->addLang($palabra, $traduccion, $language);
}
$upt = true;
}
}
}
if (is_array($lang2)) {
foreach ($lang2 as $version2 => $patchs2) {
if ($current <= intval($version2)) {
foreach ($patchs2 as $idx2 => $content2) {
$palabra = $content2[0];
$spanish = $content2[1];
$english = $content2[2];
$this->addLang($palabra, $spanish, "es");
$this->addLang($palabra, $english, "en");
}
$upt = true;
}
}
}
if ($soloIdioma == false) {
foreach ($sql as $version => $patchs) {
if ($current <= intval($version)) {
$this->mMessages .= "WARN\t===========PATCH {$version}\r\n";
foreach ($patchs as $idx => $content) {
$ql->setRawQuery($content);
$content = preg_replace('!\\s+!', ' ', $content);
$this->mMessages .= "{$idx}\t===={$content}====\r\n";
$upt = true;
//syslog(E_ERROR, $content);
}
} else {
$this->mMessages .= "WARN\tDescartado por ser {$version} de {$current}\r\n";
}
}
//Obtener el codigo y parcharlo
//URL_UPDATES
//Convierte la DB a UTF8
//ALTER TABLE `operaciones_recibos` CHANGE COLUMN `clave_de_moneda` `clave_de_moneda` VARCHAR(6) NULL DEFAULT 'MXN', ADD COLUMN `archivo_fisico` VARCHAR(200) NULL COMMENT 'Archivo fisico del recibo, almacenado en server ftp' AFTER `origen_aml`
$codif = $ql->getDataRecord("SHOW TABLES IN " . MY_DB_IN);
foreach ($codif as $rows) {
$table = $rows["Tables_in_" . MY_DB_IN];
$trs = "ALTER TABLE `{$table}` CONVERT TO CHARACTER SET utf8 COLLATE utf8_general_ci";
//$ql->setRawQuery($trs);
}
$ql->setRawQuery("ALTER SCHEMA `" . MY_DB_IN . "` DEFAULT CHARACTER SET utf8 DEFAULT COLLATE utf8_general_ci");
}
//Actualizar vistas y functions
if ($soloIdioma == false) {
if ($this->setAplicarScripts() == false) {
$this->mMessages .= "ERROR\tAl Aplicar Vistas y funciones...\r\n";
} else {
$this->mMessages .= "OK\tSe aplicaron Vistas y funciones...\r\n";
}
}
//ejecutar Mensajes
$this->mMessages .= $ql->getMessages(OUT_TXT);
if ($upt == true) {
/*Actualiza la configuracion*/
$xConf->set("safe_osms_database_version", $dbversion);
}
} else {
$this->mMessages .= "WARN\tSistema no Actualizado\r\n";
}
return $this->mMessages;
}
function setPurgueDB()
{
$sqlT = array();
$msg = "";
$xF = new cFecha();
$sqlT[] = "DELETE FROM bancos_cuentas WHERE idbancos_cuentas != " . FALLBACK_CUENTA_BANCARIA;
$sqlT[] = "DELETE FROM bancos_operaciones ";
$sqlT[] = "DELETE FROM captacion_cuentas WHERE numero_cuenta!=" . CTA_GLOBAL_CORRIENTE;
$sqlT[] = "DELETE FROM captacion_sdpm_historico ";
$sqlT[] = "DELETE FROM captacion_firmas";
$sqlT[] = "DELETE FROM captacion_sdpm_historico";
$sqlT[] = "DELETE FROM contable_catalogo ";
$sqlT[] = "DELETE FROM contable_catalogorelacion ";
$sqlT[] = "DELETE FROM contable_movimientos ";
$sqlT[] = "DELETE FROM contable_polizas ";
$sqlT[] = "DELETE FROM contable_saldos";
$sqlT[] = "DELETE FROM contable_polizas_proforma ";
$sqlT[] = "DELETE FROM creditos_reconvenio";
$sqlT[] = "DELETE FROM creditos_solicitud WHERE numero_solicitud !=" . DEFAULT_CREDITO;
$sqlT[] = "DELETE FROM creditos_garantias";
$sqlT[] = "DELETE FROM creditos_flujoefvo";
$sqlT[] = "DELETE FROM creditos_lineas";
$sqlT[] = "DELETE FROM creditos_productos_otros_parametros ";
$sqlT[] = "DELETE FROM creditos_sdpm_historico";
$sqlT[] = "DELETE FROM creditos_periodos ";
//WHERE idcreditos_periodos !=
$sqlT[] = "DELETE FROM creditos_rechazados ";
$sqlT[] = "DELETE FROM general_sucursales WHERE codigo_sucursal != \"matriz\" AND codigo_sucursal !='" . getSucursal() . "' ";
$sqlT[] = "DELETE FROM general_log ";
$sqlT[] = "DELETE FROM general_tmp ";
$sqlT[] = "DELETE FROM general_import ";
$sqlT[] = "DELETE FROM operaciones_recibos";
$sqlT[] = "DELETE FROM operaciones_mvtos";
$sqlT[] = "DELETE FROM seguimiento_compromisos";
$sqlT[] = "DELETE FROM seguimiento_llamadas ";
$sqlT[] = "DELETE FROM seguimiento_notificaciones";
$sqlT[] = "DELETE FROM socios_aeconomica";
$sqlT[] = "DELETE FROM socios_aportaciones";
$sqlT[] = "DELETE FROM socios_baja";
$sqlT[] = "DELETE FROM socios_cajalocal WHERE idsocios_cajalocal != " . getCajaLocal() . " AND sucursal != '" . getSucursal() . "' ";
$sqlT[] = "DELETE FROM `socios_aeconomica_dependencias`\n\t\t\tWHERE `idsocios_aeconomica_dependencias` !=" . DEFAULT_EMPRESA . "\n\t\t\tAND `idsocios_aeconomica_dependencias` !=" . FALLBACK_CLAVE_EMPRESA;
$sqlT[] = "DELETE FROM socios_general WHERE codigo!=" . DEFAULT_SOCIO . " AND codigo !=" . EACP_ID_DE_PERSONA;
$sqlT[] = "DELETE FROM socios_memo";
$sqlT[] = "DELETE FROM socios_patrimonio";
$sqlT[] = "DELETE FROM socios_relaciones";
$sqlT[] = "DELETE FROM socios_vivienda";
$sqlT[] = "DELETE FROM socios_grupossolidarios WHERE idsocios_grupossolidarios!=" . DEFAULT_GRUPO;
$sqlT[] = "DELETE FROM `personas_documentacion` ";
$sqlT[] = "DELETE FROM `socios_otros_parametros` ";
$sqlT[] = "DELETE FROM t_03f996214fba4a1d05a68b18fece8e71 WHERE idusuarios !=99";
$sqlT[] = "DELETE FROM tesoreria_cajas";
$sqlT[] = "DELETE FROM `tesoreria_cajas_movimientos` ";
$sqlT[] = "DELETE FROM usuarios_web ";
$sqlT[] = "DELETE FROM usuarios_web_connected";
$sqlT[] = "DELETE FROM `usuarios_web_notas` ";
$sqlT[] = "DELETE FROM general_tmp";
$sqlT[] = "DELETE FROM general_folios ";
$sqlT[] = "DELETE FROM contable_polizas_proforma ";
$sqlT[] = "DELETE FROM contable_centrodecostos WHERE idcontable_centrodecostos !=0 ";
$sqlT[] = "DELETE FROM general_log ";
$sqlT[] = "UPDATE t_03f996214fba4a1d05a68b18fece8e71 SET f_34023acbff254d34664f94c3e08d836e = md5('root') WHERE f_28fb96d57b21090705cfdf8bc3445d2a = 'root'";
//*/
//TODO: Actualizar nombre de la tabla
$sqlT[] = "DELETE FROM `empresas_operaciones` ";
$sqlT[] = "DELETE FROM `empresas_cobranza`";
$sqlT[] = "DELETE FROM `sistema_programacion_de_avisos` ";
$sqlT[] = "DELETE FROM `personas_perfil_transaccional` ";
$sqlT[] = "DELETE FROM `creditos_rechazados` ";
//AML
$sqlT[] = "DELETE FROM `aml_risk_register`";
$sqlT[] = "DELETE FROM `aml_alerts`";
$sqlT[] = "DELETE FROM `personas_documentacion` ";
$sqlT[] = "DELETE FROM `socios_otros_parametros` ";
$sqlT[] = "UPDATE `general_contratos` SET `texto_del_contrato` = '' WHERE `idgeneral_contratos` = '5' ";
$sqlT[] = "UPDATE `general_contratos` SET `texto_del_contrato` = '' WHERE `idgeneral_contratos` = '9' ";
$sqlT[] = "UPDATE `general_contratos` SET `texto_del_contrato` = '' WHERE `idgeneral_contratos` = '8' ";
//$sqlT[] = "DELETE FROM ";
$sqlT[] = "DELETE FROM creditos_otros_datos ";
$sqlT[] = "DELETE FROM `aml_perfil_egresos_por_persona` ";
$sqlT[] = "DELETE FROM `historial_de_pagos` ";
$sqlT[] = "DELETE FROM `operaciones_archivo_de_facturas` ";
$sqlT[] = "DELETE FROM `personas_operaciones_recursivas` ";
$sqlT[] = "DELETE FROM `personas_relaciones_recursivas` ";
$sqlT[] = "DELETE FROM `tesoreria_caja_arqueos` ";
//$sqlT[] = "DELETE FROM ";
//$sqlT[] = "DELETE FROM ";
//$sqlT[] = "DELETE FROM ";
$sqlT[] = "UPDATE `socios_general` SET `nombrecompleto` = 'REGISTRO_INICIAL_FINANCIERA' WHERE `codigo` = '10000'";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'curp_del_representante_legal'";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'nombre_del_presidente_del_consejo_de_vigilancia'";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'nombre_del_representante_legal'";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'rfc_del_representante_legal'";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'domicilio.domicilio_integrado'";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'email_de_la_entidad'";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'nombre_de_la_entidad'";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'registro_ante_la_cnbv'";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'registro_casfin'";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'registro_patronal_imss'";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'rfc_de_la_entidad'";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'email_de_nominas'";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'entidad_corto_en_el_sic'";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'contrasenna_de_sms_automaticos'";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'usuario_de_sms_automaticos'";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'email_del_administrador'";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'password_de_usuario_ftp' ";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'nombre_de_usuario_ftp' ";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'system_pay_email_register'";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'password_del_email_del_administrador'";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'contrasenna_de_trabajos_automaticos'";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '' WHERE `nombre_del_parametro` = 'usuario_de_sms_automaticos'";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '00000000' WHERE `nombre_del_parametro` = 'entidad_clave_en_el_sic'";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '00000000' WHERE `nombre_del_parametro` = 'domicilio.telefono_principal'";
$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = 'https://demo.sipakal.com/' WHERE `nombre_del_parametro` = 'url_de_entidad_transmisora'";
//$sqlT[] = " UPDATE `entidad_configuracion` SET `valor_del_parametro` = '00000000' WHERE `nombre_del_parametro` = 'entidad_clave_en_el_sic'";
$sqlT[] = "INSERT INTO `bancos_entidades` (`idbancos_entidades`, `nombre_de_la_entidad`, `rfc_de_la_entidad`) VALUES ('999', 'BANCO_POR_DEFECTO', 'BAN999999') ";
$sqlT[] = "INSERT INTO `bancos_cuentas` (`idbancos_cuentas`, `descripcion_cuenta`, `fecha_de_apertura`, `estatus_actual`, `consecutivo_actual`, `saldo_actual`, `sucursal`, `entidad_bancaria`) VALUES ('99', 'FALLBACK_CUENTA', '2014-01-01', 'activo', '1', '100000000', 'matriz', '1') ";
$sqlT[] = "INSERT INTO `t_03f996214fba4a1d05a68b18fece8e71` (`idusuarios`, `f_28fb96d57b21090705cfdf8bc3445d2a`, `apellidopaterno`, `apellidomaterno`, `puesto`, `periodo_responsable`, `codigo_de_persona`) VALUES ('1', 'USUARIO POR DEFECTO', '', '', 'Usuario por Defecto', '1', '99999')";
$sqlT[] = "UPDATE `general_contratos` SET `texto_del_contrato` = '' WHERE `idgeneral_contratos` = '801'";
$sqlT[] = "UPDATE `general_contratos` SET `texto_del_contrato` = '' WHERE `idgeneral_contratos` = '4'";
$sqlT[] = "INSERT INTO `contable_centrodecostos` (`idcontable_centrodecostos`, `nombre_centrodecostos`) VALUES ('1', 'POR DEFECTO')";
foreach ($sqlT as $id => $sql) {
$x = my_query($sql);
if ($x[SYS_ESTADO] != false) {
if (isset($x[SYS_INFO])) {
$msg .= "OK\t" . $xF->getMarca() . "\t" . $x[SYS_INFO] . " SQL : {$sql}\r\n";
} else {
$msg .= "OK\t" . $xF->getMarca() . "\tSQL : {$sql} \r\n";
}
} else {
if (isset($x[SYS_ERROR])) {
$msg .= "ERROR\t" . $xF->getMarca() . "\t" . $x[SYS_ERROR] . " SQL : {$sql} \r\n";
} else {
$msg .= "ERROR\t" . $xF->getMarca() . "- \tSQL : {$sql} \r\n";
}
}
}
//llevar los folios al maximo
$msg .= setFoliosAlMaximo();
//
$xRec = new cReciboDeOperacion(12);
$idrecibo = $xRec->setNuevoRecibo(1, 1, fechasys(), 1, 12, "CIERRE_ESTABLECIDO_POR_DEFECTO", "NA", "ninguno", "NA", DEFAULT_GRUPO);
$xRec->setFinalizarRecibo(false);
//Crear periodo de credito
//TODO: Agregar informacion de valores por DEFAULT
$xP = new cPeriodoDeCredito();
$xP->add();
$msg .= $xP->setCambiar(EACP_PER_SOLICITUDES);
$xConf = new cConfiguration();
$xConf->set("fecha_de_inicio_de_operaciones_en_el_sistema", fechasys());
$msg .= "OK\tCONFIGURATION\tSe cambio la fecha de Inicio de Operaciones en el sistema\r\n";
$xSoc = new cSocio(10000);
//);
$xSoc->setOmitirAML();
$xSoc->add(EACP_NAME, "", "", EACP_RFC, "", getCajaLocal(), EACP_FECHA_DE_CONSTITUCION, EACP_LOCALIDAD);
$xSoc->addVivienda(EACP_DOMICILIO_CORTO, "", EACP_CODIGO_POSTAL, "", "", EACP_TELEFONO_PRINCIPAL, "", true, 1, 1, 99, EACP_COLONIA, "calle", "", EACP_CLAVE_DE_LOCALIDAD, EACP_CLAVE_DE_PAIS);
my_query("INSERT INTO `socios_general` (`codigo`, `nombrecompleto`, `estatusactual`, `cajalocal`, `sucursal`) VALUES ('10000', 'MICROFINANCIERA', '10', '1', 'matriz')");
return $msg;
}
$ejercicio = parametro("ejercicio", 0, MQL_INT);
$periodo = parametro("periodo", 0, MQL_INT);
$moneda = parametro("moneda", AML_CLAVE_MONEDA_LOCAL);
$fecha = $xF->getDiaFinal("{$ejercicio}-{$periodo}-01");
$sql = "";
$titulo = "";
$archivo = "";
$xRPT = new cReportes($titulo);
$xRPT->setFile($archivo);
$xRPT->setOut($out);
$xRPT->setSQL($sql);
$xRPT->setTitle($xHP->getTitle());
$activo = 1;
$xHP->init();
$xFormat = new cFormato(502);
//============ Reporte
$xSec = new cCuentasPorSector(5, $fecha);
$xSec->init(false);
$ingresos = $xSec->render();
$suma_ingresos = $xSec->getSumaTitulo();
$xSec = new cCuentasPorSector(4, $fecha);
$xSec->init(false);
$egresos = $xSec->render();
$suma_egresos = $xSec->getSumaTitulo();
$resultado = $suma_ingresos - $suma_egresos;
//Actualizar Resultados
$xConf = new cConfiguration();
$xConf->set("resultado_del_periodo_contable", $resultado);
$xFormat->setProcesarVars(array("variable_ficha_ingresos" => $ingresos, "variable_total_ingresos" => getFMoney($suma_ingresos), "variable_ficha_egresos" => $egresos, "variable_total_egresos" => getFMoney($suma_egresos), "variable_resultado_del_periodo" => $resultado));
echo $xFormat->get();
$xHP->fin();
