function Common_52d87bf9711abf3a850de1dc12a14895($strOrden) { $v = explode(STD_LITERAL_DIVISOR, $strOrden, 2); $socio = $v[0]; $xCl = new cCajaLocal(0); $xCl->setAdmitirSocio($socio); }
} $arrQ = array("aumento" => 1, "disminucion" => -1, "ninguna" => 0); //capturar datos del recibo $xRec = new cReciboDeOperacion(false, false, $recibo); $xRec->init(); $DRec = $xRec->getDatosInArray(); $idsocio = $xRec->getCodigoDeSocio(); // $DRec["numero_socio"]; $numero_de_socio = $xRec->getCodigoDeSocio(); //$DRec["numero_socio"]; $afectaCaja = $arrQ[$DRec["afectacion_en_flujo_efvo"]]; //datos del socio $cSoc = new cSocio($numero_de_socio); $DSoc = $cSoc->getDatosInArray(); $numero_caja_local = $DSoc["cajalocal"]; $cCL = new cCajaLocal($numero_caja_local); $caja_local = $cCL->getNombre(); $variable_nombre_del_socio = $idsocio == DEFAULT_SOCIO ? $DRec["cadena_distributiva"] : $cSoc->getNombreCompleto(); $tipo_de_pago = $xRec->getTipoDePago(); //$variable_nombre_del_cajero // $tipoderecibo = $DRec["tipo_docto"]; $docto = $xRec->getCodigoDeDocumento(); $origen = $xRec->getOrigen(); $variable_tipo_de_recibo = $xRec->getOTipoRecibo()->getNombre(); $totaloperacion = $xRec->getTotal(); //<------------- Verificar Si existe El Pago ---------------- $xCaja = new cCaja(); $TesMontoPagado = $xCaja->getReciboEnCorte($recibo); $eventOnLoad = ""; $scripts = "";
if ($xFJ->isFisica() == false) { $idnombrecompleto = $razonSocial; //rfc completo $idapellidopaterno = ""; $idapellidomaterno = ""; } $agregardom = trim($calle) == "" ? false : true; if (SISTEMA_CAJASLOCALES_ACTIVA == false) { $idcajalocal = $xSuc->getCajaLocalResidente(); } if (trim($idnombrecompleto . $idapellidopaterno) == "") { $msg .= "ERROR\tNo existe la persona en alta\r\n"; $ready = false; } if ($ready == true) { $xCL = new cCajaLocal($idcajalocal); $xCL->init(); $xSoc = new cSocio(false); //verificar si existe el socio $success = $xSoc->add($idnombrecompleto, $idapellidopaterno, $idapellidomaterno, $idrfc, $idcurp, $idcajalocal, $idfechanacimiento, $idlugardenacimiento, $idtipodeingreso, $idestadocivil, $idgenero, $empresa, $idregimenmatrimonial, $idfigurajuridica, $gruposolidario, $idobservaciones, $idtipoidentificacion, $idnumerodocumento, false, $sucursal, $idtelefono, $idemail, $iddependientes, $idfecharegistro, AML_PERSONA_BAJO_RIESGO, $idclavefiel, $idpais, $idregimenfiscal); //razones de no fiel ... como nota if ($success == true) { if ($descuento > 0) { $xSoc->setMontoAhorroPreferente($descuento); } if ($empresa != FALLBACK_CLAVE_EMPRESA) { $xSoc->setResetEmpresa($empresa); } if (trim($idrazonnofiel) == "") { } else { $xSoc->setRazonesDeNoFIEL($idrazonnofiel);
$msg .= "=========================================================================================================\r\n"; $xSuc = new cSucursal(getSucursal()); $msg .= $xSuc->setValidar(); $xCL = new cCajaLocal(getCajaLocal()); $msg .= $xCL->setValidar(); $msg .= date("H:i:s") . "\tActualizar a la Sucursal el USUARIO POR DEFECTO\r\n"; //Elimina el Registro de Temporal $sqlDTmp = "DELETE FROM general_tmp"; $msg .= date("H:i:s") . "\tEliminar la Tabla de Registros Temporales\r\n"; my_query($sqlDTmp); //PURGA LAS OPERACIONES DE OTRAS SUCURSALES $chri = STD_LITERAL_DIVISOR; $sucursal = getSucursal(); $bkpath = PATH_BACKUPS; //step one: Socios a sus sucursales $xCL = new cCajaLocal(getCajaLocal()); $msg = $xCL->setValidar(); //step two: Folios al Maximo $msg .= setFoliosAlMaximo(); /** @since 2010-11-30 */ $cDB = new cSAFEData(); $msg .= $cDB->setLowerSucursal(); //====================================PURGAR DATOS DE A SUCURSAL =================================================== $msg .= $cDB->setDeleteSucursal($sucursal); //===================================================================================================================== $inFiles = array(); $inQuerys = array(); $inSQL = array(); $inPath = "{$bkpath}/{$LoadSucursal}-{$FechaCorte}"; //step one: Socios a sus sucursales $msg = $xCL->setValidar();
//$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]); $observaciones = $cT->cChar($datos[5]); $ClaveCuenta = false; //Iniciar el Socio //$msg .= "$iReg\t$socio\tERROR_SOCIO\t$socio -- $importe -- $fechaApertura -- $plazo -- $tasa -- $observaciones\r\n"; $xCL = new cCajaLocal(99); if ($xCL->getExistenciaSocio($socio) <= 0) { $msg .= "{$iReg}\t{$socio}\tERROR_SOCIO\tLa Linea({$iReg}) no se leyo por que no existe el socio({$bufer})\r\n"; } else { $xInv = new cCuentaInversionPlazoFijo(false, $socio, $plazo, $tasa, $fechaApertura); //Agrega la Cuenta $ClaveCuenta = $xInv->setNuevaCuenta(99, 2, $socio, $observaciones, DEFAULT_CREDITO, "", "", DEFAULT_GRUPO, $fechaApertura, CAPTACION_TIPO_PLAZO, 99, $plazo, $tasa); if ($ClaveCuenta != false) { $msg .= "{$iReg}\t{$socio}\tCUENTA\tSe Agrego Exitosamente la cuenta {$ClaveCuenta}\r\n"; if ($importe > 0) { $xInv->init(); $xInv->setFechaDeOperacion($fechaApertura); $xInv->setDiasInvertidos($plazo); $RDeposito = $xInv->setDeposito($importe, DEFAULT_CHEQUE, DEFAULT_TIPO_PAGO, DEFAULT_RECIBO_FISCAL, $observaciones, DEFAULT_GRUPO, $fechaApertura); $msg .= "{$iReg}\t{$socio}\tRECIBO_DEPOSITO\tSe Efectua un Deposito de {$importe} al Recibo {$RDeposito}\r\n"; $xInv->init();
//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"; //$x145 = "UPDATE socios_general SET sucursal = '" . $sucursal . "' WHERE codigo = " . DEFAULT_SOCIO; //$xQ = my_query($x145);
/** * Agrega una vivienda a la persona * @param string $calle * @param string $numero_exterior * @param string $codigo_postal * @param string $numero_interior * @param string $referencia * @param string $telefono_fijo * @param string $telefono_movil * @param string $es_principal * @param number $regimen * @param number $tipo * @param number $tiempo_de_residir * @param string $colonia Nombre del colonia * @param string $TipoDeAcceso Calle, Andador, etc * @param string $gps Claves GPS 0,0,0 * @param string $clave_de_localidad * @param string $clave_de_pais Ejemplo MX * @param string $nombre_pais Ejemplo Mexico * @return string Mensaje de resultado */ function addVivienda($calle, $numero_exterior, $codigo_postal = false, $numero_interior = "", $referencia = "", $telefono_fijo = "0", $telefono_movil = "0", $es_principal = false, $regimen = FALLBACK_PERSONAS_REGIMEN_VIV, $tipo = FALLBACK_PERSONAS_TIPO_VIV, $tiempo_de_residir = DEFAULT_TIEMPO, $colonia = "", $TipoDeAcceso = "", $gps = "", $clave_de_localidad = false, $clave_de_pais = EACP_CLAVE_DE_PAIS, $nombre_pais = "", $nombre_estado = "", $nombre_municipo = "", $nombre_localidad = "") { //$xViv = new cPersonasVivienda($this->getCodigo(), $tipo); $fechaalta = fechasys(); $eacp = EACP_CLAVE; $socio = $this->mCodigo; $xT = new cTipos(); $xLc = new cLocal(); $xQL = new MQL(); //depurar calle y numero 18Jul2013 $calle = str_replace("CALLE", "", strtoupper($calle)); //Inicia al Socio 20120620 $this->init(); $DSocio = $this->getDatosInArray(); $TipoDeIngreso = $DSocio["tipoingreso"]; $codigo_postal = setNoMenorQueCero($codigo_postal); $sucursal = getSucursal(); $sucess = true; $usuario = getUsuarioActual(); //Fixed $msg = ""; $TipoDeAcceso = $TipoDeAcceso == "" ? "calle" : $TipoDeAcceso; $clave_de_municipio = $xLc->DomicilioMunicipioClave(); $clave_de_estado = $xLc->DomicilioEstadoClaveNum(); $clave_de_localidad = setNoMenorQueCero($clave_de_localidad); $clave_de_pais = trim($clave_de_pais) == "" ? EACP_CLAVE_DE_PAIS : $clave_de_pais; /* 1 part 2 fiscal 3 laboral*/ //verifica los codigos postales $xCol = new cDomiciliosColonias(); if ($clave_de_pais == EACP_CLAVE_DE_PAIS) { if ($xCol->existe($codigo_postal) == true) { $estado = $xCol->getNombreEstado(); $nombre_localidad = $xCol->getNombreLocalidad(); $municipio = $xCol->getNombreMunicipio(); $colonia = trim($colonia) == "" ? $xCol->getNombre() : $xT->cChar($colonia); $clave_de_estado = $xCol->getClaveDeEstado(); $clave_de_municipio = $xCol->getClaveDeMunicipio(); $msg .= "WARN\t{$socio}\tEl CP queda en {$codigo_postal}, Localidad en {$nombre_localidad}, municipio en {$municipio}, Colonia {$colonia}\r\n"; } else { $msg .= "WARN\tEL C.P.({$codigo_postal}) No existe, se carga el de la Caja Local\r\n"; if (SISTEMA_CAJASLOCALES_ACTIVA == true) { $this->init(); $xCL = new cCajaLocal($this->mCajaLocal); $DCols = $xCL->getDatosInArray(); $codigo_postal = isset($DCols["codigo_postal"]) ? setNoMenorQueCero($DCols["codigo_postal"]) : $xLc->DomicilioCodigoPostal(); $msg .= "WARN\tSe obtiene el C.P. por caja Local ({$codigo_postal}) \r\n"; if ($xCol->existe($codigo_postal) == true) { $estado = $xCol->getNombreEstado(); $nombre_localidad = $xCol->getNombreLocalidad(); $municipio = $xCol->getNombreMunicipio(); $colonia = trim($colonia) == "" ? $xCol->getNombre() : $xT->cChar($colonia); $clave_de_estado = $xCol->getClaveDeEstado(); $clave_de_municipio = $xCol->getClaveDeMunicipio(); } } if ($codigo_postal <= 0) { $msg .= "ERROR\tEL C.P.({$codigo_postal}) No existe, se carga el de la Sucursal\r\n"; $codigo_postal = $xLc->DomicilioCodigoPostal(); } } } else { $clave_de_estado = FALLBACK_PERSONAS_DOMICILIO_ID_ESTADO; $clave_de_municipio = FALLBACK_PERSONAS_DOMICILIO_ID_MUNICIPIO; if ($codigo_postal <= 0) { $codigo_postal = 1; } } $xLoc = new cDomicilioLocalidad($clave_de_localidad); if ($clave_de_localidad <= 0) { $clave_de_localidad = $xLoc->setBuscar($nombre_localidad, $clave_de_estado, $clave_de_municipio); if (setNoMenorQueCero($clave_de_localidad) <= 0) { $clave_de_localidad = $xLc->DomicilioLocalidadClave(); } $xLoc->set($clave_de_localidad); } else { $xLoc->init(); } $nombre_localidad = $nombre_localidad == "" ? $xLoc->getNombre() : $nombre_localidad; //Tipos de Acceso calle, avenida, callejon privada, andador if ($nombre_pais == "") { $xPais = new cDomiciliosPaises($clave_de_pais); //$xPais->getPaisPorMoneda($moneda) $xTP = new cPersonas_domicilios_paises(); $xTP->setData($xTP->query()->initByID($clave_de_pais)); $nombre_pais = $xTP->nombre_oficial()->v(); $municipio = $nombre_municipo == "" ? $nombre_localidad : strtoupper($nombre_municipo); $estado = $nombre_estado == "" ? $nombre_localidad : strtoupper($nombre_estado); } $estado = $nombre_estado == "" ? $xLc->DomicilioEstado() : strtoupper($nombre_estado); $nombre_localidad = $nombre_localidad == "" ? $xLc->DomicilioLocalidad() : strtoupper($nombre_localidad); $municipio = $nombre_municipo == "" ? $xLc->DomicilioMunicipio() : strtoupper($nombre_municipo); $calle = setCadenaVal($calle); $colonia = setCadenaVal($colonia); $estado = setCadenaVal($estado); $nombre_localidad = setCadenaVal($nombre_localidad); $municipio = setCadenaVal($municipio); $sql = "INSERT INTO socios_vivienda(socio_numero, tipo_regimen, calle, numero_exterior, numero_interior, colonia,\n\t\t\t\tlocalidad, estado, municipio, telefono_residencial, telefono_movil,\n\t\t\t\ttiempo_residencia, referencia, idusuario, principal, tipo_domicilio, codigo_postal,\n\t\t\t\tfecha_alta, codigo , sucursal,\n\t\t\t\teacp, coordenadas_gps, tipo_de_acceso, fecha_de_verificacion, oficial_de_verificacion, estado_actual, clave_de_localidad,\n\t\t\t\tclave_de_pais, nombre_de_pais)\n\t\t\t\tVALUES\n\t\t\t\t({$socio}, {$regimen}, '{$calle}', '{$numero_exterior}', '{$numero_interior}', '{$colonia}',\n\t\t\t\t'{$nombre_localidad}', '{$estado}', '{$municipio}', '{$telefono_fijo}','{$telefono_movil}',\n\t\t\t\t{$tiempo_de_residir}, '{$referencia}', {$usuario}, '{$es_principal}', {$tipo}, '{$codigo_postal}',\n\t\t\t\t'{$fechaalta}', {$socio}, '{$sucursal}',\n\t\t\t\t'{$eacp}', '{$gps}', '{$TipoDeAcceso}', '{$fechaalta}', {$usuario}, 99, {$clave_de_localidad},\n\t\t\t\t'{$clave_de_pais}', '{$nombre_pais}')"; $sucess = $xQL->setRawQuery($sql); if ($sucess != false) { $id = $xQL->getLastInsertID(); $this->mIDVivienda = $id; $msg .= "OK\tSe agrega la Vivienda con ID {$id} CP {$codigo_postal} y Localidad {$clave_de_localidad} del pais {$nombre_pais}\r\n"; //Actualiza el Dato de Domicilio del Grupo Solidario if ($TipoDeIngreso == TIPO_INGRESO_GRUPO and intval($es_principal) == SYS_UNO) { $xGrp = new cGrupo($this->mCodigo); $DDom = $this->getDatosDomicilio(); $arrUp = array("direccion_gruposolidario" => $this->getDomicilio(), "colonia_gruposolidario" => $DDom["colonia"]); $xGrp->setUpdate($arrUp); $msg .= $xGrp->getMessages(); } $this->setCuandoSeActualiza(); } $this->mMessages .= $msg; return $sucess; }
//ES EXCEL $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"); } //tabla de Cajas Locales. . " WHERE socios_cajalocal.idsocios_cajalocal=$rw[0]" $sqlSoc = "SELECT\n\t\t\t\t\t\t`socios_cajalocal`.*,\n\t\t\t\t\t\t`socios_region`.*,\n\t\t\t\t\t\t`socios_cajalocal`.`idsocios_cajalocal`\n\t\t\t\t\tFROM\n\t\t\t\t\t\t`socios_cajalocal` `socios_cajalocal`\n\t\t\t\t\t\t\tINNER JOIN `socios_region` `socios_region`\n\t\t\t\t\t\t\tON `socios_cajalocal`.`region` = `socios_region`.`idsocios_region`\n\t\t\t\t\t{$ByCL}\n\t\t\t\t\t"; $rs = mysql_query($sqlSoc, cnnGeneral()); while ($rw = mysql_fetch_array($rs)) { $cl = new cCajaLocal($rw["idsocios_cajalocal"]); $cl->init($rw); echo $cl->getFicha($fieldset); $cajalocal = $rw["idsocios_cajalocal"]; $sqlComplete = "SELECT SQL_CACHE\n\t\t\t\t\t\t\t\t\t`socios_general`.`codigo`,\n\n\t\t\t\t\t\t\t\t\t`socios_general`.`apellidopaterno` AS\n\t\t\t\t\t\t\t\t\t`apellido_paterno`,\n\t\t\t\t\t\t\t\t\t`socios_general`.`apellidomaterno` AS\n\t\t\t\t\t\t\t\t\t`apellido_materno`,\n\n\t\t\t\t\t\t\t\t\t`socios_general`.`nombrecompleto` AS `nombre`,\n\n\t\t\t\t\t\t\t\t\t`socios_general`.`curp`,\n\t\t\t\t\t\t\t\t\t`socios_genero`.`descripcion_genero` AS `genero`,\n\t\t\t\t\t\t\t\t\t`socios_aeconomica_dependencias`.`descripcion_dependencia` AS `dependencia`,\n\t\t\t\t\t\t\t\t\t`socios_estatus`.`nombre_estatus` AS `estatus`,\n\t\t\t\t\t\t\t\t\t`socios_estadocivil`.`descripcion_estadocivil` AS `estado_civil`\n\t\t\t\t\t\t\t\t\t,\n\t\t\t\t\t\t\t\t\t`socios_grupossolidarios`.`nombre_gruposolidario` AS\n\t\t\t\t\t\t\t\t\t`grupo_solidario`\n\n\t\t\t\t\t\t\t\tFROM\n\t\t\t\t\t\t\t\t\t`socios_general` `socios_general`\n\t\t\t\t\t\t\t\t\t\tLEFT OUTER JOIN `socios_grupossolidarios` `socios_grupossolidarios`\n\t\t\t\t\t\t\t\t\t\tON `socios_general`.`grupo_solidario` = `socios_grupossolidarios`.\n\t\t\t\t\t\t\t\t\t\t`idsocios_grupossolidarios`\n\t\t\t\t\t\t\t\t\t\t\tLEFT OUTER JOIN `socios_genero` `socios_genero`\n\t\t\t\t\t\t\t\t\t\t\tON `socios_general`.`genero` = `socios_genero`.`idsocios_genero`\n\t\t\t\t\t\t\t\t\t\t\t\tLEFT OUTER JOIN `socios_estadocivil` `socios_estadocivil`\n\t\t\t\t\t\t\t\t\t\t\t\tON `socios_general`.`estadocivil` = `socios_estadocivil`.\n\t\t\t\t\t\t\t\t\t\t\t\t`idsocios_estadocivil`\n\t\t\t\t\t\t\t\t\t\t\t\t\tLEFT OUTER JOIN `socios_aeconomica_dependencias`\n\t\t\t\t\t\t\t\t\t\t\t\t\t`socios_aeconomica_dependencias`\n\t\t\t\t\t\t\t\t\t\t\t\t\tON `socios_general`.`dependencia` =\n\t\t\t\t\t\t\t\t\t\t\t\t\t`socios_aeconomica_dependencias`.\n\t\t\t\t\t\t\t\t\t\t\t\t\t`idsocios_aeconomica_dependencias`\n\t\t\t\t\t\t\t\t\t\t\t\t\t\tLEFT OUTER JOIN `socios_estatus` `socios_estatus`\n\t\t\t\t\t\t\t\t\t\t\t\t\t\tON `socios_general`.`estatusactual` = `socios_estatus`.\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t`tipo_estatus`\n\t\t\t\t\t\t\t\t\t\tWHERE\n\t\t\t\t\t\t\t\t\t\t(`socios_general`.`cajalocal` = {$cajalocal} )\n\t\t\t\t\t\t\t\t\t\t{$ByEstatus}\n\t\t\t\t\t\t\t\t\tORDER BY\n\t\t\t\t\t\t\t\t\t\t`socios_general`.`cajalocal`,\n\t\t\t\t\t\t\t\t\t\t`socios_general`.`codigo`\n\t\t\t\t\t\t\t\t\t\t"; $ctbl = new cTabla($sqlComplete, 0); $ctbl->setTdClassByType(); $ctbl->Show("", false); //$sumSoc = $ctbl->getFieldsSum(); $regs = $ctbl->getRowCount(); echo "<table width='100%'>\n\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t<th>CLAVE DE PERSONAS</th>\n\t\t\t\t\t\t<th>{$regs}</th>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t</table>\n\t\t\t\t"; } if ($out != OUT_EXCEL) { echo getRawFooter(); ?> </body>
$xFRM->addHElem($xTxt->getDeNombreDeLocalidad("idnombrelocalidad", $xLoc->DomicilioLocalidad(), "TR.localidad")); } else { $xFRM->addHElem("<div class='tx4' id='txtmunicipio'></div>"); $xFRM->addHElem("<div class='tx4' id='txtlocalidad'></div>"); } $xFRM->OHidden("idpais", EACP_CLAVE_DE_PAIS, "TR.Pais"); //$xFRM->addHElem( "<hr />"); $xFRM->addObservaciones(); $xFRM->addFootElement("<input type='hidden' name='credito' id='credito' value='{$credito}' />"); $xFRM->addFootElement("<input type='hidden' name='personarelacionada' id='personarelacionada' value='' />"); $xFRM->addFootElement("<input type='hidden' id='idcolonia' name='idcolonia' value='' />"); if ($action == SYS_DOS) { $xSuc = new cSucursal(getSucursal()); $xSuc->init(); $cajalocal = $xSuc->getCajaLocalResidente(); $xCL = new cCajaLocal($cajalocal); $xCL->init(); $numeropropio = parametro("personarelacionada", DEFAULT_SOCIO); $avalado = parametro("avalado", 0, MQL_FLOAT); $depende = parametro("dependiente", false, MQL_BOOL); $tiporelacion = parametro("idtipoderelacion", DEFAULT_TIPO_RELACION); $tipoparentesco = parametro("idtipodeparentesco", DEFAULT_TIPO_CONSANGUINIDAD); $observaciones = parametro("idobservaciones"); $xSoc = new cSocio($numeropropio); if ($xSoc->existe($numeropropio) == true and $numeropropio != DEFAULT_SOCIO) { $msg .= "WARN\tSE ENCONTRARON COINCIDENCIAS CON EL MISMO CODIGO, POR LO QUE SE CARGA LA CLAVE DE PERSONA\r\n"; //$persona = $xCL->getUltimoSocioRegistrado(true); //$xSoc->set($persona); } else { $nombre = parametro("nombre"); $materno = parametro("materno");