$pnivel = $nivel + 1;
$sqldnivel = "SELECT * FROM creditos_nivelesdegrupo WHERE nivel={$pnivel}";
$dtsnivel = obten_filas($sqldnivel);
$monto = $dtsnivel["monto_xintegrante"];
//Nivel de Ministracion
if (!isset($monto)) {
$monto = 0;
}
//
$socio_rep = $info_grupo["representante_numerosocio"];
if ($socio_rep == 1) {
exit("<p class='aviso'>LOS DATOS DEL GRUPO NO ESTAN CORRECTOS - NO SE ACEPTA PUBLICO GENERAL</p>");
}
//
$xGr = new cGrupo($idgrupo, true);
$xGr->init();
echo $xGr->getFicha(true);
//
$sqlgs = "SELECT codigo, nombrecompleto FROM socios_general WHERE grupo_solidario={$idgrupo} LIMIT 0,100 ";
$rsgs = mysql_query($sqlgs);
echo "<hr /><form name='myformls' action='clsgrupossolidarioscreditos.php?grupo={$idgrupo}' method='post'>\n\t<table border='0'>\n\t<caption>Nivel de Ministracion {$nivel}<caption>\n\t<tr>\n\t<th>Clave de Persona</th>\n\t<th>Nombre Completo</th>\n\t<th>Monto que se le Autoriza</th>\n\t<th>Observaciones</th>\n\t</tr>";
$foliorec = folios(4);
// Folio de Recibo
$idrecibo = $foliorec;
// Numero de Recibo: user + tipooper + folio obtenido
$i = 0;
while ($rwgs = mysql_fetch_array($rsgs)) {
$codigo = $rwgs[0];
$nombre = getNombreSocio($codigo);
$folioop = folios(2);
$idoper = $folioop + $i;
/**
* Probar : 2012-04-02 || terminar 2012-02-15
* @param integer $TipoDeConvenio
* @param integer $NumeroDeSocio
* @param integer $ContratoCorriente
* @param float $MontoSolicitado
* @param integer $PeriocidadDePago
* @param integer $NumeroDePagos
* @param integer $PlazoEnDias
* @param integer $DestinoDeCredito
* @param integer $NumeroDeCredito
* @param integer $GrupoAsociado
* @param string $DescripcionDelDestino
* @param string $Observaciones
* @param integer $OficialDeCredito
* @param mixed $FechaDeSolicitud
* @param integer $TipoDePago
* @param integer $TipoDeCalculo
* @param float $TasaDeInteres
* @return boolean true/false of query result
*/
function add($TipoDeConvenio, $NumeroDeSocio, $ContratoCorriente, $MontoSolicitado, $PeriocidadDePago = 0, $NumeroDePagos = 0, $PlazoEnDias = 0, $DestinoDeCredito = CREDITO_DEFAULT_DESTINO, $NumeroDeCredito = false, $GrupoAsociado = DEFAULT_GRUPO, $DescripcionDelDestino = "", $Observaciones = "", $OficialDeCredito = false, $FechaDeSolicitud = false, $TipoDePago = CREDITO_TIPO_PAGO_UNICO, $TipoDeCalculo = INTERES_POR_SALDO_INSOLUTO, $TasaDeInteres = false, $FechaDeMinistracion = false, $persona_asociada = false, $TipoDeAutorizacion = false)
{
$xF = new cFecha();
$xT = new cTipos();
$xSoc = new cSocio($NumeroDeSocio);
$xSoc->init();
$OficialDeCredito = $OficialDeCredito == false ? $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"] : $OficialDeCredito;
$PlazoEnDias = $PlazoEnDias == 0 ? $PeriocidadDePago * $NumeroDePagos : $PlazoEnDias;
$NumeroDePagos = $NumeroDePagos == 0 ? $PlazoEnDias / $PeriocidadDePago : $NumeroDePagos;
$ContratoCorriente = $xT->cInt($ContratoCorriente) < 0 ? CTA_GLOBAL_CORRIENTE : $ContratoCorriente;
$persona_asociada = $persona_asociada == false ? $xSoc->getClaveDeEmpresa() : $persona_asociada;
$GrupoAsociado = setNoMenorQueCero($GrupoAsociado);
$GrupoAsociado = $GrupoAsociado <= 0 ? DEFAULT_GRUPO : $GrupoAsociado;
if ($NumeroDeCredito == false) {
$NumeroDeCredito = $xSoc->getIDNuevoDocto(iDE_CREDITO);
}
$DConv = $this->getDatosDeProducto($TipoDeConvenio);
$DOConv = $this->getOProductoDeCredito($TipoDeConvenio);
$TasaDeInteres = $TasaDeInteres === false ? $DConv["interes_normal"] : $TasaDeInteres;
$TasaMoratorio = $DConv["interes_moratorio"];
$TasaDeAhorro = $DConv["tasa_ahorro"];
$NivelDeRiesgo = $DConv["nivel_riesgo"];
$TipoDeCredito = $DConv["tipo_de_credito"];
$TipoDeAutorizacion = $TipoDeAutorizacion == false ? $DConv["tipo_autorizacion"] : $TipoDeAutorizacion;
$PeriodoDeCredito = EACP_PER_SOLICITUDES;
$TipoDePago = $NumeroDePagos > 1 ? CREDITO_TIPO_PAGO_PERIODICO : CREDITO_TIPO_PAGO_UNICO;
$FechaDeSolicitud = $FechaDeSolicitud == false ? $xF->get() : $FechaDeSolicitud;
$FechaDeMinistracion = $FechaDeMinistracion == false ? $FechaDeSolicitud : $FechaDeMinistracion;
$FechaDeUltOperacion = $FechaDeSolicitud;
$FechaDeRevision = $FechaDeSolicitud;
$FechaConciliada = $FechaDeSolicitud;
$xP = new cPeriodoDeCredito($PeriodoDeCredito);
$FechaDeAutorizacion = $FechaDeMinistracion;
//$xP->getFechaDeReunion();
$CausaDeMora = 99;
$EstatusActual = 99;
$FechaDeVencimiento = $xF->setSumarDias($PlazoEnDias, $FechaDeMinistracion);
$FechaDeMora = $xF->getFechaMaximaOperativa();
$FechaDeVencimientoDinamico = $xF->getFechaMaximaOperativa();
$FechaDeCastigo = $xF->getFechaMaximaOperativa();
$PagosAutorizados = 0;
$PlazoEnDiasAutorizado = 0;
$MontoAutorizado = 0;
$SaldoActual = 0;
$SaldoVencido = 0;
$SaldoConciliado = 0;
$MontoParcialidad = 0;
$InteresNormalDevengado = 0;
$InteresNormalPagado = 0;
$InteresMoratorioPagado = 0;
$InteresMoratorioDevengado = 0;
$InteresDiario = 0;
$InteresAnticipado = 0;
$OficialDeSeguimiento = $OficialDeCredito;
$iduser = getUsuarioActual();
$PeriodoDeNotificacion = 0;
$PeriodoAfectado = 0;
$NotasDeAuditoria = "";
$CadenaH = "";
$DoctoDeAutorizacion = "";
$sucursal = getSucursal();
$eacp = EACP_CLAVE;
$sqlNC = "INSERT INTO creditos_solicitud(\n\t\t\t\t\tnumero_socio, numero_solicitud, grupo_asociado, contrato_corriente_relacionado,\n\t\t\t\t\ttipo_convenio, tipo_de_pago, tipo_de_calculo_de_interes, periocidad_de_pago, tipo_credito, nivel_riesgo,\n\t\t\t\t\testatus_actual, tipo_autorizacion, causa_de_mora, periodo_solicitudes, destino_credito,\n\t\t\t\t\tfecha_solicitud, fecha_autorizacion, fecha_ministracion, fecha_ultimo_mvto, fecha_revision, fecha_conciliada, \n\t\t\t\t\tfecha_mora, fecha_vencimiento, fecha_vencimiento_dinamico, fecha_castigo,\n\t\t\t\t\tplazo_en_dias, dias_autorizados, numero_pagos, pagos_autorizados,\n\t\t\t\t\tmonto_solicitado, monto_autorizado, saldo_actual, saldo_vencido, saldo_conciliado, monto_parcialidad, \n\t\t\t\t\tinteres_normal_devengado, interes_normal_pagado, interes_moratorio_devengado, interes_moratorio_pagado, interes_diario, sdo_int_ant,\n\t\t\t\t\ttasa_interes, tasa_moratorio, tasa_ahorro,\n\t\t\t\t\tultimo_periodo_afectado, periodo_notificacion,\n\t\t\t\t\tidusuario, oficial_seguimiento, oficial_credito,\n\t\t\t\t\tdocto_autorizacion, observacion_solicitud, cadena_heredada, notas_auditoria, descripcion_aplicacion,\n\t\t\t\t\tsucursal, eacp, persona_asociada)\n\t\t\t\t\tVALUES (\n\t\t\t\t\t{$NumeroDeSocio}, {$NumeroDeCredito}, {$GrupoAsociado}, {$ContratoCorriente},\n\t\t\t\t\t{$TipoDeConvenio}, {$TipoDePago}, {$TipoDeCalculo}, {$PeriocidadDePago}, {$TipoDeCredito}, {$NivelDeRiesgo},\n\t\t\t\t\t{$EstatusActual}, {$TipoDeAutorizacion}, {$CausaDeMora}, {$PeriodoDeCredito}, {$DestinoDeCredito},\n\t\t\t\t\t'{$FechaDeSolicitud}', '{$FechaDeAutorizacion}', '{$FechaDeMinistracion}', '{$FechaDeUltOperacion}', '{$FechaDeRevision}', '{$FechaConciliada}',\n\t\t\t\t\t'{$FechaDeMora}', '{$FechaDeVencimiento}', '{$FechaDeVencimientoDinamico}', '{$FechaDeCastigo}',\n\t\t\t\t\t{$PlazoEnDias}, {$PlazoEnDiasAutorizado}, {$NumeroDePagos}, {$PagosAutorizados}, \n\t\t\t\t\t{$MontoSolicitado}, {$MontoAutorizado}, {$SaldoActual}, {$SaldoVencido}, {$SaldoConciliado}, {$MontoParcialidad},\n\t\t\t\t\t{$InteresNormalDevengado}, {$InteresNormalPagado}, {$InteresMoratorioDevengado}, {$InteresMoratorioPagado}, {$InteresDiario}, {$InteresAnticipado},\n\t\t\t\t\t{$TasaDeInteres}, {$TasaMoratorio}, {$TasaDeAhorro},\n\t\t\t\t\t{$PeriodoAfectado}, {$PeriodoDeNotificacion},\n\t\t\t\t\t{$iduser}, {$OficialDeSeguimiento}, {$OficialDeCredito},\n\t\t\t\t\t'{$DoctoDeAutorizacion}', '{$Observaciones}', '{$CadenaH}', '{$NotasDeAuditoria}', '{$DescripcionDelDestino}',\n\t\t\t\t\t'{$sucursal}', '{$eacp}', {$persona_asociada}) ";
$x = my_query($sqlNC);
if ($x[SYS_ESTADO] == false) {
$this->mMessages .= "{$NumeroDeSocio}\t{$NumeroDeCredito}\tERROR\tError al agregar el credito {$NumeroDeCredito}\r\n";
//$this->mMessages .= $x[SYS_MSG];
} else {
$this->set($NumeroDeCredito, true);
//Actualizar Planeacion en Grupos
if ($DOConv->getEsProductoDeGrupos() == true) {
$xGrupo = new cGrupo($xSoc->getClaveDeGrupo());
$xGrupo->init();
$xGrupo->setActualizarPlaneacion($FechaDeSolicitud, $NumeroDeSocio, $NumeroDeCredito);
$this->mMessages .= $xGrupo->getMessages();
}
}
return $x[SYS_ESTADO];
}
$msg .= $cUCredit->setRegenerarCreditosAMora($fecha);
break;
case 876:
$fecha = $id;
$cUCredit = new cUtileriasParaCreditos();
$msg .= $cUCredit->setRegenerarCreditosAVencidos($fecha);
break;
//verifica si los grupos solidarios son validos
//verifica si los grupos solidarios son validos
case 877:
$sql = "SELECT * FROM socios_grupossolidarios ";
$rs = mysql_query($sql, cnnGeneral());
while ($rw = mysql_fetch_array($rs)) {
$codigo = $rw["idsocios_grupossolidarios"];
$xG = new cGrupo($codigo, false);
$xG->init($rw);
$msg .= $xG->setVerificarValidez(false, true);
}
break;
case 878:
$xMig = new cMigracionTCB();
$msg = $xMig->TCB_GenerarLetras();
break;
//ajusta las cuentas de ahorro por saldo actual y no por movimientos
//ajusta las cuentas de ahorro por saldo actual y no por movimientos
case 879:
$msg .= "============================ GENERANDO AJUSTES DE CUENTA A LA VISTA \r\n ";
$CRecibo = new cReciboDeOperacion(10, true);
$recibo = $CRecibo->setNuevoRecibo(DEFAULT_SOCIO, DEFAULT_CREDITO, fechasys(), 1, 10, "POLIZA_MASIVA_DE_AJUSTE", "NA", "ninguno", "NA", DEFAULT_GRUPO);
$sql = "SELECT SQL_CACHE * FROM captacion_saldos_comparados WHERE saldo_cuenta != saldo_obtenido /* LIMIT 0,500 */ ";
$rs = mysql_query($sql, cnnGeneral());
function addToGrupos($clave_de_presidente, $clave_de_vocal = false, $sucursal = false, $fecha = false)
{
$xGpo = new cGrupo(false);
//$nombre, $direccion = "", $representante = false, $vocal_de_vigilancia = false, $estatus = 10, $nivel = 1, $numero = false, $sucursal = false, $fecha = false, $clave_de_persona = false
$xPViv = new cPersonasVivienda($clave_de_presidente);
$xPViv->init();
$dom = "";
if ($xPViv->isInit() == true) {
$xPViv->setDuplicarDomicilio($this->mCodigo);
//duplicar
$dom = $xPViv->getDireccionBasica();
} else {
$this->mMessages .= "WARN\tError en la carga de domicilio\r\n";
}
$add = $xGpo->add($this->getNombreCompleto(), $dom, $clave_de_presidente, $clave_de_vocal, 10, 1, $this->getCodigo(), $sucursal, $fecha, $this->getCodigo());
if ($add == false) {
$this->mMessages .= "ERROR\tError No se agrego el grupo\r\n";
if (MODO_DEBUG == true) {
$this->mMessages .= $xGpo->getMessages();
}
} else {
$xGpo->init();
$this->mObjGrupoS = $xGpo;
}
return $add;
}
$permiso = getSIPAKALPermissions($theFile);
if ($permiso === false) {
header("location:../404.php?i=999");
}
$_SESSION["current_file"] = addslashes($theFile);
//<===== FIN_H
//=====================================================================================================
$xInit = new cHPage("", HP_SERVICE);
$xLi = new cSQLListas();
$txt = "";
$persona = parametro("persona", 0, MQL_INT);
// $nombre = parametro("n", $nombre);
$grupo = parametro("grupo", 0, MQL_INT);
// $nombre = parametro("n", $nombre);
$nombre = parametro("nombre");
$nombre = parametro("n", $nombre);
$action = "LIST";
//$ByPersona = ($persona == DEFAULT_SOCIO) ? "`idsocios_grupossolidarios` != " . DEFAULT_GRUPO . "" : "codigo = $persona ";
$ByPersona = setNoMenorQueCero($persona) > 0 ? " AND (`socios_grupossolidarios`.`clave_de_persona`={$persona}) " : "";
$ByNombre = "";
//($nombre != "") ? " AND (`nombre_gruposolidario` LIKE '%$nombre%' OR `representante_nombrecompleto` LIKE '%$nombre%' OR `vocalvigilancia_nombrecompleto` LIKE '%$nombre%') " : "";
$rs = array("error" => true);
if (setNoMenorQueCero($grupo) > 0) {
$xGpo = new cGrupo($grupo);
if ($xGpo->init() == true) {
$rs["descripcion"] = $xGpo->getDescripcion();
$rs["error"] = false;
}
}
header('Content-type: application/json');
echo json_encode($rs);