function jsShowGrupos($nombre_del_grupo) { settype($nombre_del_grupo, "string"); $rst = ""; if ($nombre_del_grupo) { $nombre_del_grupo = substr($nombre_del_grupo, 0, 6); /** * Sql */ $sql_grupos = "SELECT \r\n\t`socios_grupossolidarios`.`idsocios_grupossolidarios` AS 'numero',\r\n\t`socios_grupossolidarios`.`nombre_gruposolidario` \r\n\tAS `nombre`,\r\n\t`socios_grupossolidarios`.`colonia_gruposolidario` \r\n\tAS `colonia`,\r\n\t`socios_grupossolidarios`.`representante_nombrecompleto` \r\n\tAS `representante`\r\n\t\r\n\t\t\tFROM socios_grupossolidarios \r\n\t\t\tWHERE nombre_gruposolidario LIKE '%{$nombre_del_grupo}%'\r\n\t\t\t\t\tAND sucursal = '" . getSucursal() . "'\r\n\t\t\tLIMIT 0,10"; $ctb = new cTabla($sql_grupos); $ctb->setEventKey("setGrupo"); $ctb->setWidth(); $rst = $ctb->Show(); } return $rst; }
/** * Generar una Prepoliza de perfil * @param integer $recibo Numero de Recibo * @param integer $tipo_mvto Tipo de Operacion * @param float $monto Monto de la Operacion * @param integer $socio Numero de Socio * @param integer $docto Numero de documento * @param integer $operacion Tipo de Operacion Contable CARGO/ABONO * @param integer $usuario Usuario de la Operacion */ function addProforma($recibo, $tipo_mvto, $monto, $socio, $docto, $operacion = 1, $usuario = false, $banco = false) { if (MODULO_CONTABILIDAD_ACTIVADO == true) { $usuario = setNoMenorQueCero($usuario); $usuario = $usuario <= 0 ? getUsuarioActual() : $usuario; $sucursal = getSucursal(); $banco = setNoMenorQueCero($banco); if ($monto != 0) { $sqlI = "INSERT INTO contable_polizas_proforma\n\t\t\t\t(numero_de_recibo, tipo_de_mvto, monto, socio, documento, contable_operacion, idusuario, sucursal, banco)\n\t\t\t\tVALUES({$recibo}, {$tipo_mvto}, {$monto}, {$socio}, {$docto}, '{$operacion}', {$usuario}, '{$sucursal}', {$banco})"; my_query($sqlI); } } return "OK\tPROFORMA\t{$socio}\t{$docto}\t{$recibo}\t{$tipo_mvto}\t{$monto}\r\n"; }
$idregimenmatrimonial = parametro("idregimenmatrimonial", DEFAULT_REGIMEN_CONYUGAL); $idtipoidentificacion = parametro("idtipoidentificacion", DEFAULT_TIPO_IDENTIFICACION); $idnumerodocumento = parametro("idnumerodocumento"); $idemail = parametro("idemail", "", MQL_RAW); $idtelefono = parametro("idtelefono", 0, MQL_INT); $idcurp = parametro("idcurp"); $idrfc = parametro("idrfc"); $idclavefiel = parametro("idclavefiel"); $idrazonnofiel = parametro("idrazonnofiel"); $idobservaciones = parametro("idobservaciones"); $idcajalocal = parametro("idcajalocal", $xLoc->getCajaLocal(), MQL_INT); $iddependientes = parametro("iddependientes", 0, MQL_INT); $eacp = EACP_CLAVE; $razonSocial = parametro("idrazonsocial"); $descuento = parametro("iddescuento", 0, MQL_FLOAT); $sucursal = parametro("idsucursal", getSucursal(), MQL_RAW); $xSuc = new cSucursal($sucursal); $xSuc->init(); $gruposolidario = parametro("idgrupo", DEFAULT_GRUPO, MQL_INT); $gruposolidario = setNoMenorQueCero($gruposolidario) <= 0 ? DEFAULT_GRUPO : $gruposolidario; $empresa = parametro("empresa", FALLBACK_CLAVE_EMPRESA, MQL_INT); $empresa = parametro("iddependencia", $empresa, MQL_INT); $empresa = parametro("idempresa", $empresa, MQL_INT); $empresa = parametro("idcodigodeempresas", $empresa, MQL_INT); $empresa = setNoMenorQueCero($empresa) <= 0 ? FALLBACK_CLAVE_EMPRESA : $empresa; $calle = parametro("idnombreacceso"); $representante_legal = parametro("idsocio2", false, MQL_INT); $ingresos = parametro("idingresos", 0, MQL_FLOAT); $idactividad = parametro("idactividad", FALLBACK_ACTIVIDAD_ECONOMICA); $nombreempresa = parametro("idrazonsocialtrabajo", ""); $espep = parametro("espep", false, MQL_BOOL);
$completePath = $prePath . $usrFiles[$i]['name']; if (file_exists($completePath) == true) { unlink($completePath); echo "<p class='aviso'> SE ELIMINO EL ARCHIVO " . $usrFiles[$i]['name'] . "</p>"; } if (move_uploaded_file($usrFiles[$i]['tmp_name'], $completePath)) { //echo "<p class='aviso'> SE GUARDO EXITOSAMENTE EL ARCHIVO " . $usrFiles[$i]['name'] . "</p>"; } else { //echo "<p class='aviso'> SE FALLO AL GUARDAR " . $usrFiles[$i]['name'] . "</p>"; } //analizar el Archivo $gestor = @fopen($completePath, "r"); $iReg = 0; $cT = new cTipos(); //inicializa el LOG del proceso $aliasFil = getSucursal() . "-carga-batch-de-inversiones-" . fechasys(); $xLog = new cFileLog($aliasFil, true); if ($gestor) { while (!feof($gestor)) { $bufer = fgets($gestor, 4096); //$bufer = stream_get_line($gestor, "\r\n"); if (!isset($bufer)) { $msg .= "{$iReg}\t\tERROR\tLa Linea({$iReg}) no se leyo({$bufer})\r\n"; } else { $bufer = trim($bufer); $datos = explode(",", $bufer, 6); $socio = $cT->cInt($datos[0]); $importe = $cT->cFloat($datos[1]); $fechaApertura = $cT->cFecha($datos[2]); $plazo = $cT->cInt($datos[3]); $tasa = $cT->cFloat($datos[4]);
function execute($socio, $tipo) { if (isset($this->mFile)) { //Mover los Archivos $destFile = PATH_TMP . $this->mFile['name']; $imgFile = ""; $onProcess = true; if (move_uploaded_file($this->mFile['tmp_name'], $destFile)) { $md5FIl = md5_file($destFile); switch ($this->mFile["type"]) { case "image/png": $imgFile = imagecreatefrompng($destFile); break; case "image/jpeg": $imgFile = imagecreatefromjpeg($destFile); break; case "image/gif": $imgFile = imagecreatefromgif($destFile); break; default: $onProcess = false; $this->mMsg .= "<br /> EL TIPO DE ARCHIVO (" . $this->mFile["type"] . ") NO ES EL CORRECTO"; break; } if ($onProcess == true) { ob_start(); $txt = "[" . date("Ydm H:i:s") . "] " . EACP_NAME; imagettftext($imgFile, 9, 0, 10, 10, 20, "../fonts/arial.ttf", $txt); imagepng($imgFile); //Resize image $png = ob_get_contents(); ob_end_clean(); $png = str_replace('##', '##', mysql_escape_string($png)); $user = $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"]; $eacp = EACP_CLAVE; $sucursal = getSucursal(); $date = fechasys(); //Elimina las firmas anteriores $sqldel = "DELETE FROM socios_firmas WHERE numero_de_cuenta={$cuenta}\n\t\t\t\t\tAND tipo={$tipo}"; my_query($sqldel); $rsUQ = "INSERT INTO socios_firmas\n\t\t\t\t\t\t\t\t\t(numero_de_socio, tipo, \n\t\t\t\t\t\t\t\t\tfirma, md5_src, idusuario, sucursal, fecha_carga, eacp) \n \t\t\t\t\t\t\t\tVALUES\n \t\t\t\t\t\t\t\t({$socio}, {$tipo}, \"{$png}\", '{$md5FIl}', {$user}, '{$sucursal}', '{$date}', '{$eacp}')"; $rsM = my_query($rsUQ); if ($rsM["stat"] == false) { $this->mMsg .= "<br /> ERROR AL GUARDAR EL ARCHIVO EN LA DB, EL SISTEMA DEVOLVIO: " . $rsM["error"]; } else { $this->mMsg .= "<br /> PROCESO EXITOSO"; } } else { $this->mMsg .= "<br /> EL PROCESO NO SE LLEVO A CABO"; } //Elimina el Archivo unlink($destFile); } else { //no se Movio $this->mMsg .= "<br /> NO SE CARGO EL ARCHIVO " . $this->mFile["name"] . "(" . $this->mFile["error"] . ")"; } } else { $this->mMsg .= "<br /> NO EXISTE EL ARCHIVO "; } }
$tiempoead = $fm->tentregaad+$mashoras; $tiempoocurre = $fm->tentrega+$mashoras; //$x = "http://www.pmmentuempresa.com/axfbt5asd/cotizar.php?tipopaquete=Paquete&desde=2&hasta=2&largo=150&alto=214&ancho=122&cantidad=50&peso=50"; /*if($cantidad!="" && $cantidad!="0" && $cantidad>1){ $peso = $peso*$cantidad; }*/ if($volumen > $peso){ $peso = $volumen; } $nombreorigen = getSucursal($idorigen,$l); $nombredestino = getSucursal($iddestino,$l); $nombredorigen = getDestinos($iddorigen,$l); $nombreddestino = getDestinos($idddestino,$l); $s = "select catalogotiempodeentregas.*, hour(current_time) as tiempo from catalogotiempodeentregas where idorigen = $idorigen and iddestino = $iddestino"; $rm = mysql_query($s,$l) or die($s); $fm = mysql_fetch_object($rm); $horasparamensaje = array(0,12,14,16,8,9,10,11,13,15,17); if($fm->incrementartiempo==1){ $s = "select if(current_time>'".$horasparamensaje[$fm->siocurre]."',1,0) as validacion"; $rpr = mysql_query($s,$l) or die($s); $fpr = mysql_fetch_object($rpr); if($fpr->validacion=="1"){
$filename = str_replace("rpt", "", $filename); $filename = str_replace("-", "", $filename); $filename = "{$filename}-" . date("YmdHi") . "-from-" . $iduser . ".xls"; header("Content-type: application/x-msdownload"); header("Content-Disposition: attachment; filename={$filename}"); header("Pragma: no-cache"); header("Expires: 0"); } //array que determina el genero (sexo) de la persona $arrGenero = array(99 => "D", 1 => "H", 2 => "M"); $arrECivil = array(2 => "01", 3 => "03", 6 => "04", 1 => "05", 4 => "06", 5 => "99", 99 => "99"); $arrRegMat = array("BIENES_SEPARADOS" => 2, "SOCIEDAD_CONYUGAL" => 3, "NINGUNO" => 9); $arrELaboral = array(10 => "01", 11 => "01", 12 => "01", 13 => "01", 20 => "01", 40 => "02", 50 => "02", 99 => "99"); $tr = ""; //TODO: validar por sucursal $sql = "\n\tSELECT\n\t\t*\n\tFROM\n\t\t`socios_general` `socios_general`\n\tWHERE\n\t\t\t/* `socios_general`.`sucursal`\t= '" . getSucursal() . "'\n\t\t\tAND */\n\t\t\t(`socios_general`.`personalidad_juridica` = 1\n\t\t\tOR\n\t\t\t`socios_general`.`personalidad_juridica` = 3\n\t\t\tOR\n\t\t\t`socios_general`.`personalidad_juridica` = 4\n\t\t\tOR\n\t\t\t`socios_general`.`personalidad_juridica` = 9\n\t\t\tOR\n\t\t\t`socios_general`.`personalidad_juridica` = 99)\n\t\t\t/* AND\n\t\t\t(`socios_general`.`estatusactual` != 20)*/\n\tORDER BY\n\t\t`socios_general`.`fechaalta` DESC\n"; $rs = mysql_query($sql, cnnGeneral()); while ($rw = mysql_fetch_array($rs)) { $socio = $rw["codigo"]; // $ife = $rw["documento_de_identificacion"] $nombre = $rw["nombrecompleto"]; $apellidopaterno = $rw["apellidopaterno"]; $apellidomaterno = $rw["apellidomaterno"]; $genero = $arrGenero[$rw["genero"]]; $sucursal = $rw["sucursal"]; $fecha_de_alta = $rw["fechaalta"]; $estado_civil = $arrECivil[$rw["estadocivil"]]; $regimen_matrimonial = $arrRegMat[$rw["regimen_conyugal"]]; $fecha_nacimiento = $rw["fechanacimiento"]; $rfc = $rw["rfc"]; $curp = $rw["curp"];
</head> <link href="<?php echo CSS_GENERAL_FILE; ?> " rel="stylesheet" type="text/css"> <script src="../js/jsrsClient.js"></script> <body> <fieldset> <legend>Linea de Credito Autorizada</legend> <?php $idsocio = $_POST["idsocio"]; $montolinea = $_POST["montolinea"]; $observaciones = $_POST["observaciones"]; $numerohipoteca = $_POST["numerohipoteca"]; $montohipoteca = $_POST["montohipoteca"]; $fechavenc = $_POST["elanno0"] . "-" . $_POST["elmes0"] . "-" . $_POST["eldia0"]; $fechaalta = fechasys(); $eacp = EACP_CLAVE; $sucursal = getSucursal(); $estado = 1; // VIGENTE $sqllcf = "numero_socio, monto_linea, observaciones, numerohipoteca, monto_hipoteca, \r\n\t\t\t\t\tfecha_de_vencimiento, fecha_de_alta, estado, idusuario, sucursal, eacp"; $sqllcv = "{$idsocio}, {$montolinea}, '{$observaciones}', '{$numerohipoteca}', {$montolinea}, \r\n\t\t\t\t'{$fechavenc}', '{$fechaalta}', {$estado}, {$iduser}, '{$sucursal}', '{$eacp}'"; $sqllc = "INSERT INTO creditos_lineas({$sqllcf}) VALUES ({$sqllcv})"; my_query($sqllc); echo "<p class='aviso'>la Linea de Credito ha Sido Agregada como Autorizada, de esta fecha en adelante, el Socio <b>" . getNombreSocio($idsocio) . "</b>\r\n\tsera tomado en cuenta para Ministrarse Creditos por un monto no mayor a {$montolinea}; por lo que se tendra que respetar dicha cantidad.</p> \r\n\t<input type='button' name='btnprint' value='IMPRIMIR AUTORIZACION'>\r\n\t"; ?> </fieldset> </body> </html>
function jsaSetSucursal($sucursal) { getSucursal($sucursal); }
</table> <?php } else { $filename = $_SERVER['SCRIPT_NAME']; $filename = str_replace(".php", "", $filename); $filename = str_replace("rpt", "", $filename); $filename = str_replace("-", "", $filename); $filename = "{$filename}-" . date("YmdHi") . "-from-" . $iduser . ".xls"; header("Content-type: application/x-msdownload"); header("Content-Disposition: attachment; filename={$filename}"); header("Pragma: no-cache"); header("Expires: 0"); } echo "<table width='100%' >\n\t<tr>\n\t\t<th>Socio</th>\n\t\t<th>Credito</th>\n\t\t<th>Producto</th>\n\t\t<th>Sucursal</th>\n\t\t<th>fecha de ministracion</th>\n\t\t<th>fecha de vencimiento</th>\n\t\t<th>fecha de ultimo pago</th>\n\t\t<th>tasa normal</th>\n\t\t<th>tasa moratorio</th>\n\t\t<th>numero de pagos</th>\n\t\t<th>periocidad de pago</th>\n\t\t<th>unidad de medida</th>\n\t\t<th>importe prestado</th>\n\t\t<th>saldo actual</th>\n\t\t<th>importe de la proxima cuota</th>\n\t\t<th>cuenta eje</th>\n\t\t<th>cuenta de garantia liquida</th>\n\t\t<th>capital pagado</th>\n\t\t<th>interes normal pagado</th>\n\t\t<th>iva interes normal pagado</th>\n\t\t<th>interes moratorio pagado</th>\n\t\t<th>iva interes moratorio pagado</th>\n\t\t<th>multas pagadas</th>\n\t\t<th>iva multas pagadas</th>\n\t\t<th>comision apertura pagadas</th>\n\t\t<th>gastos de investigacion pagados</th>\n\t\t<th>monto de la garantia liquida</th>\n\t</tr>"; $tr = ""; $sql = "\nSELECT\n\t*\nFROM\n\t`creditos_solicitud` `creditos_solicitud`\nWHERE saldo_actual > " . TOLERANCIA_SALDOS . "\n\t/* AND\n\tsucursal\t= '" . getSucursal() . "' */\n\tAND\n\testatus_actual != 50\n/* LIMIT 0,100 */\n"; $rs = mysql_query($sql, cnnGeneral()); while ($rw = mysql_fetch_array($rs)) { $socio = $rw["numero_socio"]; $credito = $rw["numero_solicitud"]; $producto = $rw["tipo_convenio"]; $sucursal = $rw["sucursal"]; $fechamin = $rw["fecha_ministracion"]; $fechavenc = $rw["fecha_vencimiento"]; $tasa_normal = $rw["tasa_interes"]; $tasa_moratorio = $rw["tasa_moratorio"]; $pagos = $rw["pagos_autorizados"]; $periocidad = $rw["periocidad_de_pago"]; $monto = $rw["monto_autorizado"]; $saldo = $rw["saldo_actual"]; $fecha_ultimo_mvto = $rw["fecha_ultimo_mvto"];
function setExport($FechaInicial = false, $FechaFinal = false) { $wByFi = $FechaInicial == false ? "" : " WHERE fecha_de_alta>='{$FechaInicial}' "; $wByFf = $FechaFinal == false ? "" : " AND fecha_de_alta<='{$FechaFinal}' "; $sucursal = getSucursal(); $arrTipos = array("AD" => "A", "AA" => "B", "PD" => "C", "PA" => "D", "CD" => "E", "CA" => "F", "RD" => "G", "RA" => "H", "OD" => "K", "OA" => "L", "ED" => "I", "EA" => "J"); //safe => Compaq $arrMayor = array("3" => "1", "4" => "2", "1" => "3", "2" => "4"); //3 safe mayor $WriteText = "F 00000000000000\r\n"; //cuenta de flujo de efectivo $sql = "SELECT numero, equivalencia, nombre, tipo, ctamayor, afectable, centro_de_costo, fecha_de_alta, digitoagrupador \r\n \t\t\tFROM contable_catalogo {$wByFi} {$wByFf} \r\n \t\t\tORDER BY numero\r\n \t\t\t"; $rs = mysql_query($sql, cnnGeneral()); if (!$rs) { //Codigo de Control de Error saveError(2, $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"], "Depurar :" . mysql_error() . "|||Numero: " . mysql_errno() . "|||Instruccion SQL: \n " . $sql); } //$WriteText .= "$sql\r\n"; while ($rw = mysql_fetch_array($rs)) { //XXX: Si el titulo asignar 0 a superior //$WriteText .= "C "; //CompAQi $WriteText .= "C "; //$WriteText .= substr(str_pad($rw["numero"], 20, " ", STR_PAD_RIGHT), 0, 20); $WriteText .= substr(str_pad($rw["numero"], 30, " ", STR_PAD_RIGHT), 0, 30); $WriteText .= " "; $WriteText .= substr(str_pad(trim($rw["nombre"]), 50, " ", STR_PAD_RIGHT), 0, 50); $WriteText .= " "; $WriteText .= substr(str_pad("", 50, " ", STR_PAD_RIGHT), 0, 50); $WriteText .= " "; //cuenta superior, mod a 30. compaqi //$WriteText .= substr(str_pad( cuenta_superior( $rw["numero"] ), 20, " ", STR_PAD_RIGHT), 0, 20); $WriteText .= $rw["ctamayor"] == 1 ? substr(str_pad(cuenta_superior("0"), 30, " ", STR_PAD_RIGHT), 0, 30) : substr(str_pad(cuenta_superior($rw["numero"]), 30, " ", STR_PAD_RIGHT), 0, 30); $WriteText .= " "; $WriteText .= $arrTipos[$rw["tipo"]]; $WriteText .= " "; $WriteText .= "0 "; //Baja $WriteText .= $arrMayor[$rw["ctamayor"]]; $WriteText .= " "; $WriteText .= "0 "; $WriteText .= date("Ymd", strtotime($rw["fecha_de_alta"])); $WriteText .= " "; //Actualizacion ContPAQi $WriteText .= "81 "; //Sistema de Origen $WriteText .= " 1 "; //Moneda $WriteText .= " 0 "; //Digito Agrupador $WriteText .= "0 "; //Segmento de Negocio $WriteText .= "0 "; //Mvto.Segmento de Negocio $WriteText .= "\r\n"; //$WriteText .= "01 01 0000 000\r\n"; } $nombre = "{$sucursal}-catalogo-contable-" . date("Ymd", strtotime(fechasys())) . "-" . rand(0, 1000) . ""; $xFile = new cFileLog($nombre); $xFile->setWrite($WriteText); $xFile->setClose(); return $xFile->getLinkDownload($nombre); }
//Elimina el Archivo //unlink(PATH_TMP . $aliasFils . ".txt"); //Abre Otro, lo crea si no existe $URIFil = @fopen(PATH_TMP . $aliasFils . ".txt", "a+"); } switch ($step) { case 1: $msg .= "===================================== INICIANDO EL RESPALDO DE {$BkpSucursal} =============================\r\n"; $FechaDeCorte = $_POST["cFechaDeCorte"]; //Fecha Inicial de Corte $LstFolio = $_POST["cLastFolio"]; //Ultimo Folio de Recibo $msg .= date("H:i:s") . "\tLa Fecha de Corte es {$FechaDeCorte}\r\n"; //$msg .= "\tLa Fecha de Corte es $FechaDeCorte"; //step one: Socios a sus sucursales $xSuc = new cSucursal(getSucursal()); $msg .= $xSuc->setValidar(); $xCL = new cCajaLocal(getCajaLocal()); $msg .= $xCL->setValidar(); //step two: Folios al Maximo $msg .= setFoliosAlMaximo(); //Step_tree: Elimina los archivos en el tmp Backups $xop = new cUtileriasParaOperaciones(); //Genera un Recibo por los Mvtos Huerfanos de Recibo en Operaciones $msg .= $xop->setGenerarRecibosGlobales(); //Elimina Recibos Duplicados $msg .= $xop->setEliminarRecibosDuplicados(); $sql_ttmp = "DELETE FROM general_tmp"; my_query($sql_ttmp); $msg .= "\tSe eliminan Registros Temporales\r\n"; echo "\n\t\t\t\t<ol>\n\t\t\t\t\t<li>Se Actualizaron los Folios</li>\n\t\t\t\t\t<li>Se Actualizo el DEFAULT Socio para Operaciones que no tienen socio</li>\n\t\t\t\t\t<li>Se Actualizaron los Socios a su sucursal</li>\n\t\t\t\t\t<li>Se Actualizo el usuario ROOT para Operaciones que no tienen propietario</li>\n\t\t\t\t\t<li>Se Agrego el Recibo x para Mvtos Huerfanos</li>\n\t\t\t\t\t<li>Se Purgaron Recibos Duplicados</li>\n\t\t\t\t<li>Se Actualizo la sucursal de Creditos por usuario propietario</li>\n\t\t\t\t<li>Se Actualizo la sucursal de las Cuentas de Captacion por Usuario Propietario</li>\n\t\t\t\t<li>Se Actualizo la Sucursal de las Operaciones y recibos por Usuario Propietario</li>\n\t\t\t\t<li>La fecha de purga es a partir de {$FechaDeCorte}</li>\t\t\t\t\t\n\t\t\t\t</lo>\n\t\t\t\t<br />\n\t\t\t\t<a href=\"./sucursal.backup_offline.frm.php?a=1&s=2&f={$FechaDeCorte}&n={$LstFolio}\" target=\"_self\">Siguiente</a>\n\t\t\t";
if (isset($convenio) and $convenio != "todas") { $es_por_convenio = " AND creditos_solicitud.tipo_convenio = {$convenio} "; } if ($fecha_inicial && $fecha_final) { $rango_de_fechas = " AND creditos_solicitud.fecha_ministracion<='{$fecha_final}' "; } if (MODO_DEBUG == true) { $aliasFils = "log-de-informe_mesual-al-" . date("Y-m-d"); //Elimina el Archivo unlink(PATH_TMP . $aliasFils . ".txt"); //Abre Otro, lo crea si no existe $URIFil = fopen(PATH_TMP . $aliasFils . ".txt", "a+"); } $msg = "============\t\t\t\tINFORME MENSUAL DE CREDITOS \r\n"; $msg .= "============\t\t\t\tCREADOR\t\t{$oficial} \r\n"; $msg .= "============\t\t\t\tSUCURSAL\t\t" . getSucursal() . " \r\n"; $input = $_GET["out"]; if (!$input) { $input = "default"; } /** * Arrrays de Datos Complementarios */ $VFigura = array(1 => "FISICA", 2 => "MORAL", 3 => "COPROPIEDAD", 99 => "DESCONOCIDO"); $VClasificacion = array(1 => "COMERCIAL", 2 => "VIVIENDA", 3 => "CONSUMO", 99 => "DESCONOCIDO"); $VPeriocidad = array(7 => "PAGO PARCIAL DE CAPITAL E INTERÉS", 15 => "PAGO PARCIAL DE CAPITAL E INTERÉS", 30 => "PAGO PARCIAL DE CAPITAL E INTERÉS", 60 => "PAGO PARCIAL DE CAPITAL E INTERÉS", 90 => "PAGO PARCIAL DE CAPITAL E INTERÉS", 360 => "CAPITAL E INTERÉS AL VENCIMIENTO"); /** * Estatus del Credito para Efectos del Reporte */ $VEstatus = array(10 => "VIGENTE", 20 => "VENCIDA", 30 => "VIGENTE", 60 => "VIGENTE", 50 => "VENCIDA"); /**
$completePath = $prePath . $usrFiles[$i]['name']; if (file_exists($completePath) == true) { unlink($completePath); echo "<p class='aviso'> SE ELIMINO EL ARCHIVO " . $usrFiles[$i]['name'] . "</p>"; } if (move_uploaded_file($usrFiles[$i]['tmp_name'], $completePath)) { //echo "<p class='aviso'> SE GUARDO EXITOSAMENTE EL ARCHIVO " . $usrFiles[$i]['name'] . "</p>"; } else { //echo "<p class='aviso'> SE FALLO AL GUARDAR " . $usrFiles[$i]['name'] . "</p>"; } //analizar el Archivo $gestor = @fopen($completePath, "r"); $iReg = 0; $cT = new cTipos(); //inicializa el LOG del proceso $aliasFil = getSucursal() . "-carga-batch-de-vista-" . fechasys(); $xLog = new cFileLog($aliasFil, true); if ($gestor) { while (!feof($gestor)) { $bufer = fgets($gestor, 4096); //$bufer = stream_get_line($gestor, "\r\n"); if (!isset($bufer)) { $msg .= "{$iReg}\t\tERROR\tLa Linea({$iReg}) no se leyo({$bufer})\r\n"; } else { $bufer = trim($bufer); $datos = explode(",", $bufer, 6); //numero de socio //[numero de cuenta] //[FechaDeApertura] //[clave de producto] //saldo //[observaciones] $socio = $cT->cInt($datos[0]); $NumCuenta = $cT->cInt($datos[1]); $fechaApertura = $cT->cFecha($datos[2]); $Producto = $cT->cInt($datos[3]);
$xRel->dependiente(1); $xRel->domicilio_completo(""); $xRel->eacp(EACP_CLAVE); $xRel->estatus(10); $xRel->fecha_alta(fechasys()); $xRel->fecha_nacimiento($xSoc->getFechaDeNacimiento()); $xRel->idsocios_relaciones($xRel->query()->getLastID()); $xRel->idusuario(getUsuarioActual()); $xRel->monto_relacionado(0); $xRel->nombres($nombre); $xRel->numero_socio($idrelacion); $xRel->observaciones(""); $xRel->ocupacion($tipo); $xRel->porcentaje_relacionado(100); $xRel->socio_relacionado($id); $xRel->sucursal(getSucursal()); $xRel->telefono_movil(0); $xRel->telefono_residencia(0); $xRel->tipo_relacion($eq[$tipo]); $xRel->query()->insert()->save(); } break; } //end swicth } } $msg .= $xFil->getMessages(); if (MODO_DEBUG == true) { $xFl = new cFileLog(); $xFl->setWrite($msg); $xFl->setClose();
function addValorArqueado($valor_arqueado, $numero_arqueado, $documento, $notas = "", $fecha = false, $hora = false) { //eliminar valor anterior $fecha = $fecha == false ? fechasys() : $fecha; $hora = $hora == false ? time() : $hora; $monto = $valor_arqueado * $numero_arqueado; $xArq = new cTesoreria_caja_arqueos(); $id = $xArq->query()->getLastID(); $xArq->codigo_de_arqueo($id); $xArq->codigo_de_caja($this->mClaveDecaja); $xArq->documento($documento); $xArq->eacp(EACP_CLAVE); $xArq->fecha_de_arqueo($fecha); $xArq->hora_de_arqueo($hora); $xArq->idusuario(getUsuarioActual()); $xArq->monto_total_arqueado($monto); $xArq->observaciones($notas); $xArq->sucursal(getSucursal()); $xArq->valor_arqueado($valor_arqueado); $xArq->numero_arqueado($numero_arqueado); $cmd = $xArq->query()->insert(); $cmd->save(); if (MODO_DEBUG == true) { setLog($cmd->getMessages()); } return $id; }
/** * funcion que purga la Cuentas a la Vista Menores a Cero, llevandolas a Cero * @param boolean $DistinctSucursal Distinguir Sucursal?: Si/No * @return string Mensajes del Log de Proceso */ function setCleanCuentasMenoresACero_ALaVista($DistinctSucursal = false) { $msg = "============== ELIMINANDO CUENTAS CON SALDO NEGATIVO \r\n"; $msg .= "============== " . date("dmY h:i:s") . " \r\n"; $BySucursal = ""; if ($DistinctSucursal == true) { $BySucursal = " AND (`captacion_cuentas`.`sucursal`='" . getSucursal() . "') "; $msg .= "============== " . getSucursal() . " \r\n"; } $cRec = new cReciboDeOperacion(10); $xRec = $cRec->setNuevoRecibo(DEFAULT_SOCIO, DEFAULT_CREDITO, fechasys(), 1, 10, "RECIBO_DE_AJUSTES_DE_CAPTACION"); $msg .= "\t\tRECIBO\tEl Recibo de Operacion es {$xRec}\r\n"; $cRec->setNumeroDeRecibo($xRec, true); $msg .= $cRec->getMessages("txt"); $contar = 0; $xTb = new cSAFETabla(TCAPTACION_CUENTAS); $sql = $xTb->getQueryInicial() . "\n\t\t\t\t\t\t\t\t\t\tWHERE\n\t\t\t\t\t\t\t\t\t\t\t(\n\t\t\t\t\t\t\t\t\t\t\t(`captacion_cuentas`.`saldo_cuenta` <= " . TOLERANCIA_SALDOS . ")\n\t\t\t\t\t\t\t\t\t\t\t\tAND\n\t\t\t\t\t\t\t\t\t\t\t(`captacion_cuentas`.`saldo_cuenta` != 0)\n\t\t\t\t\t\t\t\t\t\t\t)\n\t\t\t\t\t\t\t\t\t\t\tAND\n\t\t\t\t\t\t\t\t\t\t\t(`captacion_cuentas`.`tipo_cuenta` =10)\n\t\t\t\t\t\t\t\t\t\t\t{$BySucursal}\n\t\t\t\t\t\t\t\t\t\tORDER BY\n\t\t\t\t\t\t\t\t\t\t\t`captacion_cuentas`.`saldo_cuenta`,\n\t\t\t\t\t\t\t\t\t\t\t`captacion_cuentas`.`fecha_afectacion` "; $rs = getRecordset($sql); while ($rw = mysql_fetch_array($rs)) { $numero = $rw["numero_cuenta"]; $monto = $rw["saldo_cuenta"]; $cuenta = $numero; $socio = $rw["numero_socio"]; $retirar = false; if ($monto < 0) { $monto = $monto * -1; } else { $retirar = true; } $xCuenta = new cCuentaALaVista($numero); $xCuenta->init($rw); $xCuenta->setReciboDeOperacion($xRec); $xCuenta->setForceOperations(); if ($retirar == true) { $xCuenta->setRetiro($monto); } else { $xCuenta->setDeposito($monto); } $NSaldo = $xCuenta->getNuevoSaldo(); $msg .= "{$contar}\t{$socio}\t{$cuenta}\tAGREGAR\tSe Agrega la Cuenta un monto de {$monto}, Saldo Actualizado a {$NSaldo}\r\n"; $msg .= $xCuenta->getMessages("txt"); $contar++; } return $msg; }
$diferencia = $saldo - $sdoCW; $msg .= "{$socio}\tSUCESS\t{$saldo}\t{$sdoCW}\t{$diferencia}\tSaldo Correcto, SIMILAR/IGUAL\r\n"; } else { $diferencia = $cT->cFloat($saldo - $sdoCW, 2); $msg .= "{$socio}\tERROR\t{$saldo}\t{$sdoCW}\t{$diferencia}\tSaldo Incorrecto\r\n"; $msgD .= "{$socio}\t{$saldo}\t{$sdoCW}\t{$diferencia}\t" . $aCompacWC[$socio] . "\r\n"; } break; } } else { $msg .= "{$socio}\tNO.EXIST\t0\t{$sdoCW}\t0\tSocio No existe en la Sucursal\r\n"; } } $html = new cHTMLObject(); $fileDw = getSucursal() . "-compacw-comparacion_auxiliares_del_catalogo-" . date("ydmHsi"); $fileDi = getSucursal() . "-{$TipoDeImportacion}-diferencias_compaqw-vs-safe_" . date("ydmHsi"); $cF = new cFileLog($fileDw); $cFd = new cFileLog($fileDi); $cF->setWrite($msg); $cF->setClose(); // $cFd->setWrite($msgD); $cFd->setClose(); echo $cFd->getLinkDownload("Archivo de diferencias"); echo $cF->getLinkDownload("Datos del proceso de Comparacion"); } else { echo "<p class='aviso'>EL TIPO DE ARCHIVO DE " . $usrFiles[$i]['name'] . "(" . $mExt . ") NO ES SOPORTADO</p>"; } } } ?>
$tipo_de_ingreso = FALLBACK_PERSONAS_TIPO_ING, $estado_civil = DEFAULT_ESTADO_CIVIL, $genero = DEFAULT_GENERO, $dependencia = FALLBACK_CLAVE_EMPRESA, $regimen_conyugal = DEFAULT_REGIMEN_CONYUGAL, $personalidad_juridica = 1, $grupo_solidario = DEFAULT_GRUPO, $observaciones = "", $identificado_con = 1, $documento_de_identificacion = "0", $codigo = false, $sucursal = false, $movil = "", $correo = "", $dependientes = 0, $fecha = false, $riesgo = AML_PERSONA_BAJO_RIESGO, $clave_fiel = "", $pais = EACP_CLAVE_DE_PAIS */ $idpersona = $xFi->getEntero($tmp->ID_PERSONA); if ($idpersona > 0) { $xSoc->setOmitirAML(); $pass = $xSoc->add($xFi->getV($tmp->NOMBRES), $xFi->getV($tmp->PRIMER_APELLIDO), $xFi->getV($tmp->SEGUNDO_APELLIDO), $xFi->getV($tmp->ID_FISCAL), $xFi->getV($tmp->ID_POBLACIONAL), getCajaLocal(), $xFi->getV($tmp->FECHA_NACIMIENTO), $xFi->getV($tmp->CIUDAD_NACIMIENTO), DEFAULT_TIPO_INGRESO, $xFi->getV($tmp->ESTADO_CIVIL, DEFAULT_ESTADO_CIVIL, MQL_INT, $arrEcivil), $xFi->getV($tmp->GENERO, DEFAULT_GENERO, MQL_INT, $arrGenero), FALLBACK_CLAVE_EMPRESA, DEFAULT_REGIMEN_CONYUGAL, $xFi->getV($tmp->TIPO_PERSONA, FALLBACK_PERSONAS_FIGURA_JURIDICA, MQL_INT, $arrFJuridica), FALLBACK_CLAVE_DE_GRUPO, "", FALLBACK_PERSONAS_TIPO_IDENTIFICACION, $xFi->getV($tmp->ID_POBLACIONAL), $idpersona, getSucursal(), 0, "", 0, $xFi->getV($tmp->FECHA_ALTA)); //sucess if ($pass == true) { $ingreso = $xFi->getFlotante($tmp->INGRESOS_MENSUALES); if ($ingreso > 0) { if ($xSoc->init() == true) { $xSoc->addActividadEconomica($xFi->getV($tmp->EMPRESA_TRABAJO, ""), $ingreso, $xFi->getV($tmp->OCUPACION, "")); } } } } $msg .= $xSoc->getMessages(); } $conteo++; } }
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> <title>Ficha de Informacion de Sucursal</title> </head> <link href="../css/reporte.css" rel="stylesheet" type="text/css"> <body > <!-- onLoad="javascript:window.print();"--> <?php echo getRawHeader(); /** * Filtrar si hay Fecha */ $fecha_inicial = $_GET["on"]; $fecha_final = $_GET["off"]; $BySuc = ""; $mSuc = isset($_GET["s"]) ? $_GET["s"] : "todas"; $mSuc = $mSuc == "todas" ? getSucursal() : $mSuc; if ($mSuc != "todas") { $BySuc = " \tAND\n\t(`creditos_solicitud`.`sucursal` ='{$mSuc}') "; } ?> <!-- --> <table > <thead> <tr> <td class="subtitle">REPORTE DE CIFRAS GENERALES POR SUCURSAL</td> </tr> <!-- DATOS GENERALES DEL REPORTE --> <tr> <td width="60%"> </td> <td width="20%">Fecha de Elaboracion:</td> <td width="20%"><?php
/** * @return integer Numero de Operacion **/ function setNuevoMvto($fecha_operacion, $monto, $tipo_operacion, $periodo_de_socio, $observaciones, $signo_afectacion = 1, $mvto_contable = false, $socio = false, $documento = false, $fecha_afectacion = false, $fecha_vencimiento = false, $saldo_anterior = false, $saldo_nuevo = false) { $sucess = false; //inicializa el recibo if (!isset($this->mCodigoDeRecibo) or $this->mCodigoDeRecibo == false) { // } //Si no hay valores, obtenerlos del recibo if ($documento == false or !isset($documento)) { $documento = $this->mDocto; } if ($socio == false or !isset($socio)) { $socio = $this->mSocio; } //Verificar la Cuenta Bancaria if ($this->mCuentaBancaria == false) { $this->mCuentaBancaria = DEFAULT_CUENTA_BANCARIA; } $recibo = $this->mCodigoDeRecibo; $fecha_afectacion = $fecha_afectacion == false ? $fecha_operacion : $fecha_afectacion; // --------------------------------------- VALOR SQL DEL MVTO.------------------------------------------------------- // VALORES FIJOS $smf = "idusuario, codigo_eacp, socio_afectado, docto_afectado, recibo_afectado, fecha_operacion, "; // PERIODOS $smf .= "periodo_contable, periodo_cobranza, periodo_seguimiento, "; $smf .= "periodo_anual, periodo_mensual, periodo_semanal, "; // AFECTACIONES $smf .= "afectacion_cobranza, afectacion_contable, afectacion_estadistica, "; $smf .= "afectacion_real, valor_afectacion, "; // FECHAS Y TIPOS $smf .= "idoperaciones_mvtos, tipo_operacion, estatus_mvto, periodo_socio, "; $smf .= "fecha_afectacion, fecha_vcto, "; // SALDOS $smf .= "saldo_anterior, saldo_actual, detalles, sucursal, tasa_asociada, dias_asociados, grupo_asociado"; // $iduser = $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"]; $eacp = EACP_CLAVE; // PERIODOS $percont = EACP_PER_CONTABLE; // Periodo Contable $percbza = EACP_PER_COBRANZA; // Periodo Cobranza. $perseg = EACP_PER_SEGUIMIENTO; // Period de Seguimiento. $permens = date("m", strtotime($fecha_operacion)); // Periodo mes $persem = date("N", strtotime($fecha_operacion)); // Periodo de dias en la semana. $peranual = date("Y", strtotime($fecha_operacion)); // A�o Natural. $persoc = $periodo_de_socio; // periodo del Socio. $estatus_mvto = $this->mDefMvtoStatus; $fecha_vcto = $fecha_vencimiento == false ? $this->mFechaDeVcto : $fecha_vencimiento; $saldo_anterior = $saldo_anterior === false ? 0 : $saldo_anterior; $saldo_nuevo = $saldo_nuevo === false ? $monto : $saldo_nuevo; $sucursal = getSucursal(); $afect_cbza = $monto; $afect_seg = $monto; $afect_cont = $monto; $afect_esta = $monto; $idoperacion = folios(2); $tasa = 0; $dias = 0; $grupo = $this->mGrupoAsociado; $viable = true; $xT = new cTipos(0); if ($this->mGrupoAsociado == false) { $grupo = DEFAULT_GRUPO; } $smv = "{$iduser}, '{$eacp}', {$socio}, {$documento}, {$recibo}, '{$fecha_operacion}',\n\t\t\t\t{$percont}, {$percbza}, {$perseg}, {$peranual}, {$permens}, {$persem},\n\t\t\t\t{$afect_cbza}, {$afect_cont}, {$afect_esta},\n\t\t\t\t{$monto}, {$signo_afectacion},\n\t\t\t\t{$idoperacion}, {$tipo_operacion}, {$estatus_mvto}, {$persoc},\n\t\t\t\t'{$fecha_afectacion}', '{$fecha_vcto}',\n\t\t\t\t{$saldo_anterior}, {$saldo_nuevo}, '{$observaciones}', '{$sucursal}', {$tasa}, {$dias}, {$grupo}\n\t\t\t\t"; $arrD = array($socio, $documento, $recibo); $viable = $xT->getEvalNotNull($arrD); if ($viable == false) { $this->mMessages .= "ERROR\tVARS\tError al Evaluar alguno de estos Valores Socio {$socio}, Documento {$documento}, Recibo {$recibo}\r\n"; $this->mMessages .= $xT->getMessages(); } $SQl_comp = "INSERT INTO operaciones_mvtos({$smf}) VALUES ({$smv})\n\t\t\t\t\t\tON DUPLICATE KEY UPDATE idoperaciones_mvtos = " . folios(2) . "\n\t\t\t\t\t"; if ($monto != 0 and isset($monto) and $this->mAfectar == true and $viable == true) { $exec = my_query($SQl_comp); if ($exec["stat"] == false) { $sucess = false; $this->mMessages .= "ERROR\t{$recibo}\tSe Fallo al Agregar la Operacion({$tipo_operacion}) por {$monto} con Numero {$idoperacion}\r\n"; } else { $sucess = true; $this->mMessages .= "SUCESS\t{$recibo}\tSe agrego Exitosamente la Operacion({$tipo_operacion}) por {$monto} con Numero {$idoperacion} \r\n"; } } else { $this->TxtLog .= "WARNING\tSe simula Agregar el Mvto {$idoperacion} del tipo {$tipo_operacion} por un monto de {$monto} \r\n"; } //Sumar al Recibo el Monto $this->mSumaDeRecibo += $monto; $this->mNumeroDeMvtos++; // return $idoperacion; }
/** * Funcion que agrega una nueva Cuenta * @param $origen Origen de la cuenta, lavado de dinero * @param $subproducto Subproducto al que pertenece * @param $socio * @param $observaciones * @param $credito * @param $mancomunado1 * @param $mancomunado2 * @param $grupo * @param $fecha_alta * @param $tipo_de_cuenta * @param $tipo_de_titulo * @param $DiasInvertidos * @param $tasa * @param $CuentaDeIntereses * @return unknown_type */ function setNuevaCuenta($origen, $subproducto, $socio, $observaciones = "", $credito = 1, $mancomunado1 = "", $mancomunado2 = "", $grupo = 99, $fecha_alta = false, $tipo_de_cuenta = 20, $tipo_de_titulo = 99, $DiasInvertidos = false, $tasa = false, $CuentaDeIntereses = false, $FechaVencimiento = false) { $xT = new cTipos(0); if ($this->mNumeroCuenta == false) { //Asigna una cuenta por estructura $cuenta = $xT->cSerial(2, $subproducto) . $xT->cSerial(DIGITOS_DE_CLAVE_DE_SOCIO, $socio) . "01"; $sqlNCta = "SELECT COUNT(numero_cuenta) AS 'cuentas'\n\t\t\t\t\t\t\t\t\tFROM captacion_cuentas\n\t\t\t\t\t\t\t\t\tWHERE numero_socio={$socio}"; $datos = obten_filas($sqlNCta); if (isset($datos["cuentas"]) or $datos["cuentas"] > 0) { $cuenta = $xT->cSerial(2, $subproducto) . $xT->cSerial(DIGITOS_DE_CLAVE_DE_SOCIO, $socio) . ($datos["cuentas"] + 1); $this->mMessages .= "WARN\tSe Presume al Numero de cuenta {$cuenta} por que el socio tiene " . $datos["cuentas"] . " cuentas\r\n"; } $this->mNumeroCuenta = $cuenta; unset($datos); } $idsolicitud = $credito; $idgrupo = $grupo; $observacion = $observaciones; $xF = new cFecha(); if ($DiasInvertidos == false) { $DiasInvertidos = $this->mDiasInvertidos; } $fechaalta = $fecha_alta == false ? $this->mFechaOperacion : $fecha_alta; if ($tasa == false) { $tasa = $this->mTasaInteres; } else { $this->mTasaInteres = $tasa; } if ($this->mSocioTitular != 0 and isset($this->mSocioTitular) and $this->mSocioTitular != false) { $idsocio = $this->mSocioTitular; } else { if (isset($socio) && $socio != false) { $idsocio = $socio; $this->mSocioTitular = $socio; } } if ($CuentaDeIntereses == false) { $CuentaDeIntereses = CTA_GLOBAL_CORRIENTE; } $FechaVencimiento = $FechaVencimiento == false ? $xF->setSumarDias($DiasInvertidos, $fechaalta) : $FechaVencimiento; $origencuenta = $origen; $tipotitulo = $tipo_de_titulo; $lacuenta = $this->mNumeroCuenta; $sucursal = getSucursal(); $fechabaja = "2029-12-31"; $estatus = 10; $man1 = $mancomunado1; $man2 = $mancomunado2; $subpdto = $subproducto; $sqlPdto = "SELECT * FROM captacion_subproductos\tWHERE idcaptacion_subproductos={$subpdto}"; $dPdto = obten_filas($sqlPdto); $tipocuenta = $dPdto["tipo_de_cuenta"]; $contrato = $dPdto["nombre_del_contrato"]; $iduser = $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"]; $eacp = EACP_CLAVE; //verifica si existe la Cuenta $cuentas_existentes = $this->setContarCuenta(); // if ($cuentas_existentes > 0) { //sumar otro folio $lacuenta++; $this->mNumeroCuenta = $lacuenta; $cuentas_existentes = $this->setContarCuenta(); if ($cuentas_existentes > 0) { $lacuenta++; $this->mNumeroCuenta = $lacuenta; } } // Si es Inversion la Cuenta Estara Inactiva if ($tipocuenta == 20) { $estatus = 20; } $sqlNR = "INSERT INTO captacion_cuentas(\n\t\t\t\t\t\tnumero_cuenta, numero_socio, numero_grupo, numero_solicitud, tipo_cuenta,\n\t\t\t\t\t\tfecha_apertura, fecha_afectacion, fecha_baja, estatus_cuenta, saldo_cuenta,\n\t\t\t\t\t\teacp, idusuario, inversion_fecha_vcto, inversion_periodo, tasa_otorgada, dias_invertidos, observacion_cuenta, origen_cuenta,\n\t\t\t\t\t\ttipo_titulo, tipo_subproducto, nombre_mancomunado1, nombre_mancomunado2, minimo_mancomunantes, saldo_conciliado, fecha_conciliada,\n\t\t\t\t\t\tsucursal, ultimo_sdpm, oficial_de_captacion,\n\t\t\t\t\t\tcuenta_de_intereses)\n \t\t\t\t\tVALUES(\n\t\t\t\t\t\t{$lacuenta}, {$idsocio}, {$idgrupo}, {$idsolicitud}, {$tipocuenta},\n\t\t\t\t\t'{$fechaalta}', '{$fechaalta}', '{$fechabaja}', {$estatus}, 0,\n\t\t\t\t\t'{$eacp}', {$iduser},\n\t\t\t\t\t'{$FechaVencimiento}', 1, {$tasa}, {$DiasInvertidos}, '{$observacion}', {$origencuenta},\n\t\t\t\t\t{$tipotitulo}, {$subpdto}, '{$man1}', '{$man2}', 0, 0, '{$fechaalta}',\n\t\t\t\t\t'{$sucursal}', 0, {$iduser},\n\t\t\t\t\t{$CuentaDeIntereses})"; $r = my_query($sqlNR); if ($r["stat"] == true) { $this->mMessages .= "OK\tSe Agrego Existosamente la Cuenta {$lacuenta} del subproducto {$subpdto} \r\n"; $this->mSucess = true; $this->mSocioTitular = $idsocio; $this->mGrupoAsociado = $grupo; $this->mCreditoAsoc = $idsolicitud; $this->mNumeroCuenta = $lacuenta; $this->mDiasInvertidos = $DiasInvertidos; $this->mFechaVencimiento = $FechaVencimiento; } else { $this->mMessages .= "ERROR\tal Agregar la Cuenta {$lacuenta} del subproducto {$subpdto}\r\n"; if (MODO_DEBUG == true) { $this->mMessages .= $r["info"]; } $this->mSucess = false; } return $this->mNumeroCuenta; }
$xDiv = new cHDiv(); $xHP->init(); $xFRM = new cHForm("frm", "./"); $msg = ""; $xFRM->addDivSolo('<img src="../images/banner-safe.png" />'); $xFRM->addHTML("<h3>AUTOR</h3>"); $xFRM->addHTML("<h5>Balam Gonzalez Luis Humberto 2005-2014</h5>"); $xUl2 = new cHUl(); $xUl2->li('<a href="http://www.opencorebanking.com/">Página del Proyecto : www.opencorebanking.com</a>'); $xUl2->li('<a href="http://sourceforge.net/projects/safemicrofin/"> Hosting del Proyecto : SourceForge</a>'); //$xUl2->li('Blog del Proyecto <a href="http://sourceforge.net/apps/wordpress/safemicrofin/">Hospedado en SourceForge</a>'); //$xFRM->addHTML( $xUl2->li('<a href="http://wiki.opencorebanking.com/">Wiki del Proyecto Hospedado en www.opencorebanking.com</a>')->end()); //$xFRM->addDivSolo("") $xFRM->addHTML("<h3>FINANCIAMIENTO</h3>"); $xUl3 = new cHUl(); //<a href="http://www.grupopadio.com.mx"> <a href="http://www.mulmeyah.org"> $xUl3->li('GRUPO PADIO, SOFOM ENR (Desde Agosto de 2013).- Calle 25 # 87-A, Col. México, Mérida, Yucatán'); $xFRM->addHTML($xUl3->li('CAJA SOLIDARIA MULMEYAH, S.C. DE A.P. DE C.V. DE R.L (Hasta Diciembre de 2006).- Calle 61 Num. 50 Entre 16 y 14, Col. Centro. San Francisco de Campeche, 01(981)8113766')->end()); $xFRM->addHTML("<h3>AGRADECIMIENTOS ESPECIALES</h3>"); $xUl = new cHUl(); $xUl->li("Lic. Alejandro Roberto de jesus Ojeda Mendez, Por su confianza en el proyecto."); $xUl->li("Ing. Jorge Alberto Poot Xiu.- Motivación, Base de datos, Normalización y su Gran Experiencia"); $xUl->li("Ing. Gabriel Orozco Ruiz Velazco.- Seguridad, Motivación y uso en otras entidades"); //$xUl->li(""); $xFRM->addHTML($xUl->li("L.I. Victor Rojas.- Motivación, Recomendación y uso del Now How")->end()); $xFRM->addHTML("<h3>DATOS DEL SISTEMA</h3>"); $xULi = new cHUl(); $xFRM->addHTML($xULi->li("Base de Datos:" . MY_DB_IN)->li("Servidor: " . WORK_HOST)->li("Sucursal: " . getSucursal())->li("Version S.A.F.E.:" . SAFE_VERSION)->li("Revision S.A.F.E: " . SAFE_REVISION)->li("Path Temporal:" . PATH_TMP)->li("Path Backups:" . PATH_BACKUPS)->li("Fecha del Sistema: " . date("Y-m-d H:i:s"))->li("Usuario Activo: " . elusuario(getUsuarioActual()))->end()); echo $xFRM->get(); //$jxc ->drawJavaScript(false, true); $xHP->fin();
/** * Generar el Archivo HTMl del LOG * eventos-del-cierre + fecha_de_cierre + .html * */ $aliasFil = getSucursal() . "-eventos-al-cierre-de-colocacion-del-dia-{$fechaop}"; $xLog = new cFileLog($aliasFil); $ql = new MQL(); $xRec = new cReciboDeOperacion(12); $xRec->setGenerarPoliza(); $xRec->setForceUpdateSaldos(); $idrecibo = $xRec->setNuevoRecibo(DEFAULT_SOCIO, DEFAULT_CREDITO, $fechaop, 1, 12, "CIERRE_DE_COLOCACION_{$fechaop}", DEFAULT_CHEQUE, DEFAULT_TIPO_PAGO, DEFAULT_RECIBO_FISCAL, DEFAULT_GRUPO); $xRec->setNumeroDeRecibo($idrecibo); $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 COLOCACION ====================\r\n"; $messages .= "=========================\t\tRECIBO: {$idrecibo}\t\t\t\t ====================\r\n"; //reconstruir db de pagos $ql->setRawQuery("CALL `proc_historial_de_pagos` "); $xCUtils = new cUtileriasParaCreditos(); $messages .= $xCUtils->setEstatusDeCreditos($idrecibo, $fechaop, false, true); if (date("Y-m-t", strtotime($fechaop)) == date("Y-m-d", strtotime($fechaop))) { $messages .= $xCUtils->setGenerarMvtoFinDeMes($xF->getDiaInicial(), $xF->getDiaFinal()); } if (CREDITO_CIERRE_FORZAR_DEVENGADOS == true) { $messages .= $xCUtils->setReestructurarSDPM_Planes(true, false, false, false, $xF->getDiaInicial(), false); $messages .= $xCUtils->setReestructurarSDPM(true, false, false, false, false, $xF->getDiaInicial(), false); $messages .= $xCUtils->setRegenerarInteresDevengado(false, $xF->get(), $xF->get()); }
$completePath = $prePath . $usrFiles[$i]['name']; if (file_exists($completePath) == true) { unlink($completePath); echo "<p class='aviso'> SE ELIMINO EL ARCHIVO " . $usrFiles[$i]['name'] . "</p>"; } if (move_uploaded_file($usrFiles[$i]['tmp_name'], $completePath)) { //echo "<p class='aviso'> SE GUARDO EXITOSAMENTE EL ARCHIVO " . $usrFiles[$i]['name'] . "</p>"; } else { //echo "<p class='aviso'> SE FALLO AL GUARDAR " . $usrFiles[$i]['name'] . "</p>"; } //analizar el Archivo $gestor = @fopen($completePath, "r"); $iReg = 0; $cT = new cTipos(); //inicializa el LOG del proceso $aliasFil = getSucursal() . "-analisis_de_saldos_cw-" . fechasys(); $xLog = new cFileLog($aliasFil, true); $msg = ""; //============================================================================================= if ($gestor) { while (!feof($gestor)) { $bufer = fgets($gestor, 4096); //$bufer = stream_get_line($gestor, "\r\n"); if (!isset($bufer)) { //$msg .= "$iReg\t\tERROR\tLa Linea($iReg) no se leyo($bufer)\r\n"; } else { $bufer = trim($bufer); $datos = explode(",", $bufer, 8); } $iReg++; }
</tr> <?php } ?> <?php if ( $var_propiedad != 0 ) { ?> <tr> <td><strong>Direccion:</strong></td> <td><?php echo utf8_encode($propiedad["direccion"]); ?></td> </tr> <tr> <td><strong>Kardex:</strong></td> <td><span class="label label-info"><?php echo $propiedad["kardex"]; ?></span></td> </tr> <tr> <td><strong>Sucursal:</strong></td> <td> <?php $sucursal = getSucursal($propiedad["sucursal"]); echo '<span class="label label-danger">'. $sucursal["nombre"] .'</span>'; ?> </td> </tr> <?php } ?> </tr> <?php if ( $var_asesor != 0 ) { ?> <tr> <td><strong>Asesor:</strong></td> <td><?php echo $asesor["vStaffname"]; ?></td> </tr> <?php } ?> </tbody> </table> <!-- END Info Content -->
$completePath = $prePath . $usrFiles[$i]['name']; if (file_exists($completePath) == true) { unlink($completePath); echo "<p class='aviso'> SE ELIMINO EL ARCHIVO " . $usrFiles[$i]['name'] . "</p>"; } if (move_uploaded_file($usrFiles[$i]['tmp_name'], $completePath)) { //echo "<p class='aviso'> SE GUARDO EXITOSAMENTE EL ARCHIVO " . $usrFiles[$i]['name'] . "</p>"; } else { //echo "<p class='aviso'> SE FALLO AL GUARDAR " . $usrFiles[$i]['name'] . "</p>"; } //analizar el Archivo $gestor = @fopen($completePath, "r"); $iReg = 0; $cT = new cTipos(); //inicializa el LOG del proceso $aliasFil = getSucursal() . "-carga -batch-de-socios-" . fechasys(); $xLog = new cFileLog($aliasFil, true); if ($gestor) { while (!feof($gestor)) { $bufer = fgets($gestor, 4096); //$bufer = stream_get_line($gestor, "\r\n"); if (!isset($bufer)) { $msg .= "{$iReg}\t\tERROR\tLa Linea({$iReg}) no se leyo({$bufer})\r\n"; } else { $bufer = trim($bufer); $datos = explode(",", $bufer, 6); $socio = $cT->cInt($datos[0]); } $iReg++; } }
$completePath = $prePath . $usrFiles[$i]['name']; if (file_exists($completePath) == true) { unlink($completePath); echo "<p class='aviso'> SE ELIMINO EL ARCHIVO " . $usrFiles[$i]['name'] . "</p>"; } if (move_uploaded_file($usrFiles[$i]['tmp_name'], $completePath)) { //echo "<p class='aviso'> SE GUARDO EXITOSAMENTE EL ARCHIVO " . $usrFiles[$i]['name'] . "</p>"; } else { //echo "<p class='aviso'> SE FALLO AL GUARDAR " . $usrFiles[$i]['name'] . "</p>"; } //analizar el Archivo $gestor = @fopen($completePath, "r"); $iReg = 0; $cT = new cTipos(); //inicializa el LOG del proceso $aliasFil = getSucursal() . "-carga -batch-de-creditos-" . fechasys(); $xLog = new cFileLog($aliasFil, true); if ($gestor) { while (!feof($gestor)) { $bufer = fgets($gestor, 4096); //$bufer = stream_get_line($gestor, "\r\n"); if (!isset($bufer)) { $msg .= "{$iReg}\t\tERROR\tLa Linea({$iReg}) no se leyo({$bufer})\r\n"; } else { $bufer = trim($bufer); $datos = explode(",", $bufer, 12); $socio = $cT->cInt($datos[0]); $credito = $cT->cInt($datos[1]); $producto = $cT->cInt($datos[2]); $monto = $cT->cFloat($datos[3]); $ministracion = $cT->cFecha($datos[4]);
function setCompacWtExportarPolizas($fecha_inicial, $fecha_final, $FolioInicial = 0, $FolioFinal = 999999, $mTipo = "todas") { $sucursal = getSucursal(); //Traducciones del ContPaqw $CWTipoMvto = array("1" => 1, "-1" => "2"); //Formato : polizas + fecha + sucursal; $mTmpFileAlias = "{$sucursal}-polizas-" . date("Y-m-d") . ""; $mNametmpFile = PATH_TMP . $mTmpFileAlias . ".txt"; if (file_exists($mNametmpFile)) { $BKPFile = fopen($mNametmpFile, "a+"); } else { //$mNametmpFile = tempnam (PATH_BACKUPS, "polizas" . date("Y-m-d") . $sucursal . ".sbk"); $BKPFile = fopen($mNametmpFile, "a"); } //filtros $wByTipo = $mTipo == "todas" ? "" : " AND (`contable_polizas`.`tipopoliza` =" . $mTipo . ") "; //Generar Polizas $FInicial = $FolioInicial; $FFinal = $FolioFinal; $sqlPol = "SELECT\r\n\t\t\t\t\t\t*\r\n\t\t\t\t\t\tFROM\r\n\t\t\t\t\t\t\t`contable_polizas` `contable_polizas` \r\n\t\t\t\t\t\tWHERE\r\n\t\t\t\t\t\t\t(`contable_polizas`.`fecha` >='{$fecha_inicial}')\r\n\t\t\t\t\t\t\tAND\r\n\t\t\t\t\t\t\t(`contable_polizas`.`fecha` <='{$fecha_final}')\r\n\t\t\t\t\t\t\tAND\r\n\t\t\t\t\t\t\t(\r\n\t\t\t\t\t\t\t(`contable_polizas`.`numeropoliza` >={$FInicial}) \r\n\t\t\t\t\t\t\tAND\r\n\t\t\t\t\t\t\t(`contable_polizas`.`numeropoliza` <={$FFinal}) \r\n\t\t\t\t\t\t\t) {$wByTipo} "; //echo $sqlPol; $rs = mysql_query($sqlPol, cnnGeneral()); if (!$rs) { //Codigo de Control de Error saveError(2, $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"], "Depurar :" . mysql_error() . "|||Numero: " . mysql_errno() . "|||Instruccion SQL: \n " . $sqlPol); } while ($rw = mysql_fetch_array($rs)) { //Seleccionar los Movimientos $ejercicio = $rw["ejercicio"]; $periodo = $rw["periodo"]; $tipoPoliza = $rw["tipopoliza"]; $numeroPoliza = $rw["numeropoliza"]; $fechaPoliza = $rw["fecha"]; $conceptoPoliza = $rw["concepto"]; $WriteText = "P " . date("Ymd", strtotime($fechaPoliza)); $WriteText .= " " . $tipoPoliza; $WriteText .= " " . substr(str_pad($numeroPoliza, 8, "0", STR_PAD_LEFT), -8); $WriteText .= " 1 000 " . substr(str_pad($conceptoPoliza, 100, " ", STR_PAD_RIGHT), 0, 100); $WriteText .= " 01 2 \r\n"; //Escribe la Poliza @fwrite($BKPFile, $WriteText); /* 3 Caracter para quien sabe.- Diario.- supongo 2 Caracter para quien sabe 1 Caracter Espacion 1 Caracter Para quien Sabe 1 Caracter Espacio */ $sqlMvtos = "SELECT\r\n\t\t\t\t\t\t`contable_movimientos`.* \r\n\t\t\t\t\t\tFROM\r\n\t\t\t\t\t\t\t`contable_movimientos` `contable_movimientos` \r\n\t\t\t\t\t\tWHERE\r\n\t\t\t\t\t\t\t(`contable_movimientos`.`ejercicio` ={$ejercicio}) AND\r\n\t\t\t\t\t\t\t(`contable_movimientos`.`periodo` ={$periodo}) AND\r\n\t\t\t\t\t\t\t(`contable_movimientos`.`tipopoliza` ={$tipoPoliza}) AND\r\n\t\t\t\t\t\t\t(`contable_movimientos`.`numeropoliza` ={$numeroPoliza})\r\n\t\t\t\t\t\tORDER BY `contable_movimientos`.`ejercicio`,\r\n\t\t\t\t\t\t`contable_movimientos`.`periodo`,\r\n\t\t\t\t\t\t`contable_movimientos`.`tipopoliza`,\r\n\t\t\t\t\t\t`contable_movimientos`.`numeropoliza`,\r\n\t\t\t\t\t\t`contable_movimientos`.`numeromovimiento`\r\n\t\t\t\t\t\t"; $MRs = mysql_query($sqlMvtos, cnnGeneral()); while ($MRw = mysql_fetch_array($MRs)) { $cuenta = $MRw["numerocuenta"]; $referencia = $MRw["referencia"]; //Corrige la Cuenta de Cuadre if ($cuenta == CUENTA_DE_CUADRE) { $cuenta = "_CUADRE"; } //Tipo M + espacio //Cuenta 20 //Referencia 10 //TipoMvto 2 espacios 1 Cargo 2 Abono //Importe 16 Alineado //espacio + 000 + espacio + " 0.00 " //concepto 30 + espacio $WriteMvto = "M " . substr(str_pad($cuenta, 20, " ", STR_PAD_RIGHT), 0, 20); $WriteMvto .= " " . substr(str_pad($referencia, 10, " ", STR_PAD_RIGHT), 0, 10); $WriteMvto .= " " . $CWTipoMvto[$MRw["tipomovimiento"]]; $WriteMvto .= " " . substr(str_pad($MRw["importe"], 16, " ", STR_PAD_LEFT), -16); $WriteMvto .= " 000 " . " 0.00 " . substr(str_pad($MRw["concepto"], 30, " ", STR_PAD_RIGHT), 0, 30) . " \r\n"; @fwrite($BKPFile, $WriteMvto); } } @fclose($BKPFile); return "<a href=\"../utils/download.php?type=txt&download={$mTmpFileAlias}&file={$mTmpFileAlias}\" target=\"_blank\" class='boton'>Descargar Archivo de Polizas</a>"; }
function add($tipo, $tipo_de_valuacion = false, $valor = 0, $persona_propietaria = false, $nombre_del_propietario = "", $fecha_de_adquisicion = false, $documento_presentado = "", $estado_fisico = false, $descripcion = "", $observaciones = "", $fecha_actual = false) { $fecha_actual = $fecha_actual == false ? fechasys() : $fecha_actual; $persona_propietaria = $persona_propietaria == false ? DEFAULT_SOCIO : $persona_propietaria; $tipo_de_valuacion = $tipo_de_valuacion == false ? FALLBACK_CRED_GARANTIAS_TVALUACION : $tipo_de_valuacion; $xGar = new cCreditos_garantias(); $xGar->idcreditos_garantias($xGar->query()->getLastID()); $xGar->descripcion($descripcion); $xGar->documento_presentado($documento_presentado); $xGar->eacp(EACP_CLAVE); $xGar->estado_presentado($estado_fisico); $xGar->estatus_actual(CREDITO_GARANTIA_ESTADO_PRESENTADO); $xGar->fecha_adquisicion($fecha_de_adquisicion); $xGar->fecha_devolucion($fecha_actual); $xGar->fecha_recibo($fecha_actual); $xGar->fecha_resguardo($fecha_actual); $xGar->idsocio_duenno($persona_propietaria); $xGar->idusuario(getUsuarioActual()); $xGar->observaciones($observaciones); $xGar->observaciones_del_resguardo(""); $xGar->propietario($nombre_del_propietario); $xGar->socio_garantia($this->mClavePersona); $xGar->solicitud_garantia($this->mClaveCredito); $xGar->sucursal(getSucursal()); $xGar->tipo_garantia($tipo); $xGar->tipo_valuacion($tipo_de_valuacion); $xGar->monto_valuado($valor); $q = $xGar->query()->insert(); $id = $q->save(); $this->mMessages .= $q->getMessages(OUT_TXT); return $id; }