/**
* 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];
}
//Datos del Nivel de Grupo
$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);
</tbody>
</table>
</fieldset>
</form>
<?php
} else {
?>
<form name="frm_division_montos" method="POST" action="./frmgrupossolidarioscreditos.php?a=2">
<?php
//Imprimir el Grupos
$Grupo = $_POST["cGrupo"];
$tds = "";
$cG = new cGrupo($Grupo);
$DMonto = $cG->getDatosNivelProximo();
$monto = $DMonto["monto"];
$sqlGrupos = "SELECT\n\t\t\t\t\t\t`socios_general`.`codigo`,\n\t\t\t\t\t\tCONCAT(`socios_general`.`nombrecompleto`, ' ',\n\t\t\t\t\t\t`socios_general`.`apellidopaterno`, ' ',\n\t\t\t\t\t\t`socios_general`.`apellidomaterno`) AS 'nombre'\n\t\t\t\t\t\n\t\t\t\t\tFROM\n\t\t\t\t\t\t`socios_general` `socios_general` \n\t\t\t\t\tWHERE\n\t\t\t\t\t\t(`socios_general`.`grupo_solidario` ={$Grupo}) \n\t\t\t\t\t\tAND\n\t\t\t\t\t\t(`socios_general`.`grupo_solidario` !=" . DEFAULT_GRUPO . ")";
$rs = mysql_query($sqlGrupos, cnnGeneral());
$i = 0;
while ($rw = mysql_fetch_array($rs)) {
$codigo = $rw["codigo"];
$nombre = $rw["nombre"];
$tds .= "<tr id='tr-{$i}'>\n\t\t\t\t\t\t<td>{$codigo}\n\t\t\t\t\t\t\t<input type='hidden' name='cSocio-{$i}' id='idSocio-{$i}' value='{$codigo}'></td>\n\t\t\t\t\t\t<td>{$nombre}</td>\n\t\t\t\t\t\t<td><input type='text' name='cMonto-{$i}' id='idMonto-{$i}' value='{$monto}' class='mny'></td>\n\t\t\t\t\t\t<td><input type='text' name='cObservacion-{$i}' id='idObservacion-{$i}' value='' size='50' /></td>\n\t\t\t\t\t</tr>";
$i++;
}
//Imprimir datos de grupo
echo "<input type='hidden' name='cGrupo' id='idGrupo' value='{$Grupo}' />";
echo $cG->getFicha(true);
echo "<fieldset>\n\t\t<legend>Planeación del Crédito</legend>\n\t\t<table width='100%' align='center'>\n\t\t\t<tr>\n\t\t\t\t<th>Numero</th>\n\t\t\t\t<th>Nombre</th>\n\t\t\t\t<th>Monto</th>\n\t\t\t\t<th>Observaciones</th>\n\t\t\t</tr>\n\t\t\t{$tds}\n\t\t</table>\n\t\t</fieldset>";
/**
* Valida la Cuenta de Captacion
* @param boolean $ForzarCorreccion
*/
function setValidar($ForzarCorreccion = false)
{
$arrUp = array();
$DC = $this->getDatosInArray();
$socio = $this->mSocioTitular;
$cuenta = $this->mNumeroCuenta;
$grupo = $this->mGrupoAsociado;
$sucursal = $DC["sucursal"];
$user = $DC["idusuario"];
$oficial = $DC["oficial_de_captacion"];
$credito = $DC["numero_solicitud"];
$FApertura = $DC["fecha_apertura"];
$FAfecta = $DC["fecha_afectacion"];
//Fecha Valida
$FechaValida = true;
$msg = "VALIDAR CUENTA {$cuenta}\r\n";
//Datos propios de la Inversion
$FVencInv = $DC["inversion_fecha_vcto"];
$DiasInv = $DC["dias_invertidos"];
$TCuenta = $DC["tipo_cuenta"];
//Cuenta de Intereses
$CtaInts = $DC["cuenta_de_intereses"];
//Datos producto
$xDT = new cInformacionProductoCaptacion($TCuenta);
$DT = $xDT->init();
//validar socios
$xSoc = new cSocio($socio);
if ($xSoc->existe($socio) == false) {
$msg .= "CRITICO\tSOCIO\tEl Socio {$socio} no EXISTE \r\n";
if ($ForzarCorreccion == true) {
$xSoc->add("SOCIO_CUENTA_{$cuenta}");
$msg .= "NUEVO\tSOCIO\tAgregado el Socio {$socio}\r\n";
}
}
//validar grupo
if ($grupo == false or $grupo == 0) {
$arrUp["numero_grupo"] = DEFAULT_GRUPO;
$msg .= "ERROR\tGRUPO\tEl Grupo {$grupo} No es Valido, se actualiza al default \r\n";
} else {
//Controlar Grupo
$xGrp = new cGrupo($grupo);
if ($xGrp->existe($grupo) == false) {
$msg .= "CRITICO\tGRUPO\tEl Grupo {$grupo} no EXISTE \r\n";
if ($ForzarCorreccion == true) {
$xGrp->add("GRUPO_CUENTA_{$cuenta}", "", false, false, 10, 1, $grupo, $sucursal);
$msg .= "NUEVO\tGRUPO\tSe Agrego el Grupo {$grupo} \r\n";
}
}
}
//Restaurar Credito
if ($credito != DEFAULT_CREDITO) {
$arrUp["numero_solicitud"] = DEFAULT_CREDITO;
}
//
//Controlar Usuario
$xUsr = new cSystemUser($user);
if ($xUsr->existe($user) == false) {
$msg .= "CRITICO\tUSUARIO\tEl Usuario {$user} no EXISTE \r\n";
if ($ForzarCorreccion == true) {
$xUsr->add("usr{$user}", "", 2, "USR_CTA_{$cuenta}", "", "", "", false, "baja", "", $sucursal, $user);
$msg .= "NUEVO\tUSUARIO\tSe Agrego el Usuario {$user} \r\n";
}
}
//Controlar Oficial de Captacion
if ($xUsr->existe($oficial) == false) {
$msg .= "ERROR\tOFICIAL\tEl Oficial de Captacion {$oficial} no EXISTE \r\n";
if ($ForzarCorreccion == true) {
$xUsr->add("usr{$oficial}", "", 2, "OFICIAL_CTA_{$cuenta}", "", "", "", false, "baja", "", $sucursal, $oficial);
$msg .= "NUEVO\tOFICIAL\tSe Agrego el OFICIAL {$oficial} \r\n";
}
}
if ($FApertura == '0000-00-00') {
$msg .= "WARN\tLa fecha de Apertura {$FApertura} es INVALIDA\r\n";
$arrUp["fecha_apertura"] = fechasys();
$FechaValida = false;
}
if ($FAfecta == '0000-00-00') {
$msg .= "WARN\tLa fecha de Afectacion {$FAfecta} es INVALIDA\r\n";
$arrUp["fecha_afectacion"] = fechasys();
$FechaValida = false;
}
//Validar las fechas
if ($FechaValida == true) {
if (strtotime($FApertura) > strtotime($FAfecta)) {
$msg .= "WARN\tLa fecha de Apertura {$FApertura} es mayor a la de operaciones {$FAfecta}\r\n";
$arrUp["fecha_apertura"] = $FAfecta;
}
}
//Validar las funciones del Subproducto
if ($ForzarCorreccion == true) {
//Guardar Cambios
$this->setUpdate($arrUp);
return $msg;
}
}
function getListadoDeGrupoParaGuardar($solicitud, $socio)
{
$xNot = new cHNotif();
$xCred = new cCredito($solicitud, $socio);
$xCred->initCredito();
$DCred = $xCred->getDatosDeCredito();
$OConv = $xCred->getOProductoDeCredito();
$grupo = $xCred->getClaveDeGrupo();
$body = "";
$elements = 0;
$avisos = "";
if ($OConv->getEsProductoDeGrupos() == true) {
$body .= "<p class='aviso'>SE HA DETECTADO QUE ESTE CREDITO ES DEL GRUPO {$grupo}</p>";
$xGrp = new cGrupo($grupo);
$DPlan = $xGrp->getDatosDePlaneacionInArray();
$recibo = $DPlan["idoperaciones_recibos"];
$presidenta = $xGrp->getRepresentanteCodigo();
$tds = "";
if (isset($recibo)) {
$body .= "<p class='aviso'>SE CARGAN DATOS DE LA PLANEACION # {$recibo}</p>";
$sql = "SELECT\n\t\t\t\t\t`operaciones_mvtos`.`tipo_operacion`,\n\t\t\t\t\t`operaciones_mvtos`.`recibo_afectado`,\n\t\t\t\t\t`socios_general`.`codigo`,\n\t\t\t\t\tCONCAT(`socios_general`.`apellidopaterno`, ' ',\n\t\t\t\t\t`socios_general`.`apellidomaterno`, ' ',\n\t\t\t\t\t`socios_general`.`nombrecompleto`) AS 'nombre',\n\t\t\t\t\t`operaciones_mvtos`.`afectacion_real` AS 'monto',\n\t\t\t\t\t`operaciones_mvtos`.`detalles`\n\t\t\t\tFROM\n\t\t\t\t\t`operaciones_mvtos` `operaciones_mvtos`\n\t\t\t\t\t\tINNER JOIN `socios_general` `socios_general`\n\t\t\t\t\t\tON `operaciones_mvtos`.`socio_afectado` = `socios_general`.`codigo`\n\t\t\t\tWHERE\n\t\t\t\t\t(`operaciones_mvtos`.`tipo_operacion` =112) AND\n\t\t\t\t\t(`operaciones_mvtos`.`recibo_afectado` ={$recibo})";
$rs = mysql_query($sql, cnnGeneral());
while ($rw = mysql_fetch_array($rs)) {
$socio = $rw["codigo"];
$tds .= "\n\t\t\t\t\t\t\t<tr id=\"tr-{$grupo}-{$socio}\">\n\t\t\t\t\t\t\t\t<th>" . $socio . " <input type=\"hidden\" id=\"socio-{$grupo}-{$socio}\" value=\"" . $socio . "\" /></th>\n\t\t\t\t\t\t\t\t<td>" . htmlentities($rw["nombre"]) . "</td>\n\t\t\t\t\t\t\t\t<td><input type=\"text\" id=\"monto-{$grupo}-{$socio}\" value=\"" . $rw["monto"] . "\" class='mny' onchange=\"jsUpdateAutorizacion();\" maxlength=\"20\" /></td>\n\t\t\t\t\t\t\t\t<td><input type=\"text\" id=\"detalles-{$grupo}-{$socio}\" value=\"" . htmlentities($rw["detalles"]) . "\" maxlength=\"60\" /></td>\n\t\t\t\t\t\t\t</tr>";
$elements++;
}
$body .= "<fieldset>\n\t\t\t\t\t\t\t<legend>| GUARDAR DATOS DE LA AUTORIZACION POR GRUPO |</legend>\n\t\t\t\t\t\t\t\t<table width='100%' align='center'>\n\t\t\t\t\t\t\t<th>Socio(a)</th>\n\t\t\t\t\t\t\t<th>Nombre Completo</th>\n\t\t\t\t\t\t\t<th>Monto Autorizado</th>\n\t\t\t\t\t\t\t<th>Observaciones</th>\n\t\t\t\t\t\t\t\t\t<tbody>\n\t\t\t\t\t\t\t\t\t\t{$tds}\n\t\t\t\t\t\t\t\t\t</tbody>\n\t\t\t\t\t\t\t\t\t<th colspan='4'><a class='button' id='icmdGoGroup' onclick='jsSavePlaneacion({$elements})'>Guardar Autorizacion Grupal y Enviar Autorizacion</a></th>\n\t\t\t\t\t\t\t\t</table>\n\t\t\t\t\t\t\t</fieldset>";
//Crear el recibo
$fecha = fechasys();
$oficial = elusuario($_SESSION["SN_b80bb7740288fda1f201890375a60c8f"]);
$xRec = setNuevorecibo($presidenta, $solicitud, $fecha, 1, 40, "CREDITO_DE_GRUPO_ELABORADO_POR_{$oficial}", DEFAULT_CHEQUE, DEFAULT_TIPO_PAGO, DEFAULT_RECIBO_FISCAL, $grupo);
$body .= "<p class='aviso'>Se Crea el Recibo # {$xRec} para Trabajar</p>";
if (isset($_SESSION["recibo_en_proceso"])) {
$body .= "<p class='aviso'>Se Ha Liberado el Recibo # " . $_SESSION["recibo_en_proceso"] . " para Trabajar con # {$xRec}</p>";
unset($_SESSION["recibo_en_proceso"]);
}
$_SESSION["recibo_en_proceso"] = $xRec;
}
} else {
//XXX: COOOOOOOOOOOOOOOOOOOOOOOOOOOREGIR
$body .= $xNot->get("Credito Sin problemas<input type='hidden' id='idesautorizado' />");
}
$body .= $avisos;
return $body;
}
include_once "../core/core.common.inc.php";
$id = $_GET["id"];
$filter = "";
$oficial = elusuario($iduser);
?>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Listado de Personas</title>
</head>
<link href="../css/reporte.css" rel="stylesheet" type="text/css">
<body>
<!-- -->
<?php
echo "{$head_pagina}\n<p class='bigtitle'>LISTADO DE INTEGRANTES DE GRUPOS</p>\n";
$xG = new cGrupo($id);
echo $xG->getFicha(true);
$sqlids = "SELECT codigo FROM socios_general WHERE grupo_solidario={$id}";
$rs = mysql_query($sqlids);
while ($rws = mysql_fetch_array($rs)) {
$socio = $rws["codigo"];
$xSoc = new cSocio($socio);
$xSoc->init();
echo $xSoc->getFicha();
}
echo getRawFooter();
?>
</body>
</html>
$orden = $_POST["ordencompleta"];
$idrecibo = $_POST["idrecibo"];
$idgrupo = $_GET["grupo"];
$sucess = true;
$msg = "";
if (!isset($orden)) {
$sucess = false;
}
if (!isset($idrecibo)) {
$sucess = false;
}
if (!isset($idgrupo)) {
$sucess = false;
}
$orden = trim($orden);
$xG = new cGrupo($idgrupo);
$presidenta = $xG->getRepresentanteCodigo();
$DCredito = $xG->getDatosDelCreditoGrupalInArray();
$xP = $xG->getDatosDePlaneacionInArray();
echo $xG->getFicha(true);
if (isset($xP["idoperaciones_recibos"])) {
$msg .= "\tLa Planeacion Existe con el Numero " . $xP["idoperaciones_recibos"] . "\r\n";
//si el credito fue autorizado, mministrado o cualquier otro estatus
if ($DCredito["estatus_actual"] != 99) {
$msg .= "\tEl Credito tiene Estatus de " . $DCredito["estatus_actual"] . ", Diferente al Aceptable\r\n";
//Obtiene Datos de la Planeacion
$sucess = false;
//Si el registros sucede entoces se sale de la programacion
} else {
$msg .= "\tEl Estatus Es Aceptable\r\n";
$sucess = true;
function addRelacion($numero_de_socio = FALLBACK_CLAVE_DE_PERSONA, $tipo_de_relacion = DEFAULT_TIPO_RELACION, $consanguinidad = DEFAULT_TIPO_CONSANGUINIDAD, $depende = 0, $observaciones = "", $monto_relacionado = 0, $porcentaje_relacionado = 1, $fecha_de_alta = false, $documento = false)
{
$xSocRel = new cSocio($numero_de_socio);
$xSocRel->init();
$DSocR = $xSocRel->getDatosInArray();
$documento = $documento == false ? DEFAULT_CREDITO : $documento;
$nombres = $xSocRel->getNombre();
$apellido_paterno = $xSocRel->getApellidoPaterno();
$apellido_materno = $xSocRel->getApellidoMaterno();
$domicilio = $xSocRel->getDomicilio();
$DTel = $xSocRel->getTelefonos();
$telefono_fijo = isset($DTel[1]) ? $DTel[1] : 0;
$telefono_movil = isset($DTel[2]) ? $DTel[2] : 0;
$fecha_de_nacimiento = $xSocRel->getFechaDeNacimiento();
$curp = $xSocRel->getCURP();
$DOcup = $xSocRel->getOActividadEconomica();
$monto_relacionado = setNoMenorQueCero($monto_relacionado);
// ( !isset($monto_relacionado) OR $monto_relacionado === false ) ? 0 : $monto_relacionado;
$ocupacion = $DOcup == null ? "DESCONOCIDO" : $DOcup->getPuesto();
$socio_relacionado = $this->mPersona;
$sucursal = getSucursal();
$eacp = EACP_CLAVE;
$fecha_de_alta = $fecha_de_alta == false ? fechasys() : $fecha_de_alta;
$iduser = getUsuarioActual();
$estatus = 10;
$depende = setNoMenorQueCero($depende);
$this->mClaveDePersona = $numero_de_socio;
//Sentencia Sql
$sql = "INSERT INTO socios_relaciones(socio_relacionado, credito_relacionado, tipo_relacion,\n\t\tnumero_socio, nombres, apellido_paterno, apellido_materno, domicilio_completo,\n\t\ttelefono_residencia, telefono_movil, fecha_nacimiento, monto_relacionado,\n\t\tporcentaje_relacionado, fecha_alta, curp, observaciones, idusuario,\n\t\tconsanguinidad, estatus, dependiente, codigo, ocupacion, sucursal, eacp)\n\t\tVALUES ({$socio_relacionado}, {$documento}, {$tipo_de_relacion}, {$numero_de_socio}, '{$nombres}', '{$apellido_paterno}', '{$apellido_materno}',\n\t\t'{$domicilio}', '{$telefono_fijo}', '{$telefono_movil}', '{$fecha_de_nacimiento}', '{$monto_relacionado}', {$porcentaje_relacionado},\n\t\t'{$fecha_de_alta}', '{$curp}', '{$observaciones}', {$iduser}, {$consanguinidad},\n\t\t{$estatus}, {$depende}, {$socio_relacionado}, '{$ocupacion}', '{$sucursal}', '{$eacp}')\n\t\t";
//agregar relacion inversa
// Envio Sql
$res = my_query($sql);
$sucess = $res[SYS_ESTADO];
if ($sucess == true) {
//agregar modificaciones de Grupo
switch ($tipo_de_relacion) {
case GRUPO_CLAVE_INTEGRANTE:
$xPer = new cSocio($numero_de_socio);
$xPer->setUpdate(array("grupo_solidario" => "{$socio_relacionado}"));
break;
case GRUPO_CLAVE_PRESIDENTA:
$xGr = new cGrupo($socio_relacionado);
$xGr->setUpdate(array("representante_numerosocio" => "{$numero_de_socio}", "representante_nombrecompleto" => "{$apellido_paterno} {$apellido_materno} {$nombres}"));
$xPer = new cSocio($numero_de_socio);
$xPer->setUpdate(array("grupo_solidario" => "{$socio_relacionado}"));
break;
case GRUPO_CLAVE_VOCAL:
$xGr = new cGrupo($socio_relacionado);
$xGr->setUpdate(array("vocalvigilancia_numerosocio" => "{$numero_de_socio}", "vocalvigilancia_nombrecompleto" => "{$apellido_paterno} {$apellido_materno} {$nombres}"));
$xPer = new cSocio($numero_de_socio);
$xPer->setUpdate(array("grupo_solidario" => "{$socio_relacionado}"));
break;
}
//Agregar relación Inversa
} else {
$this->mMessages .= "ERROR\tError al guardar la relacion\r\n";
}
return $sucess;
}
$cUCredit = new cUtileriasParaCreditos();
$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 */ ";
$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);
function show($return = false)
{
$exoFicha = "";
$iNumTools = sizeof($this->mTool);
$trTool = "";
$wTable = $this->mTableWidth;
if ($iNumTools > 0) {
$iTools = "";
foreach ($this->mTool as $key => $value) {
$TParts = explode("@", $value);
$iImg = $TParts[0];
$iTitle = $TParts[1];
$srcImg = vIMG_PATH . "/common/{$iImg}";
$iTools = $iTools . "<td><img src=\"{$srcImg}\" onclick=\"{$key}(" . $this->mKey . ")\" />{$iTitle}</td>";
}
$trTool = "<tr>\r\n\t\t\t<td colspan=\"4\">\r\n\t\t\t<table width=\"100%\">\r\n\t\t\t\t<tbody>\r\n\t\t\t\t\t<tr>\r\n\t\t\t\t\t{$iTools}\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t</tbody>\r\n\t\t\t</table>\r\n\t\t\t</td>\r\n\t\t\t</tr>";
}
// end iNumTools
$cTyp = new cTipos();
switch ($this->mType) {
case iDE_SOCIO:
//INFO del Socio
$cSoc = new cSocio($this->mKey, true);
$exoFicha = $cSoc->getFicha($this->mSocioWithDomExt, false, $trTool);
unset($cSoc);
break;
case iDE_CREDITO:
// Creditos iDE_CREDITO
$cF = new cCredito($this->mKey);
$cF->initCredito();
$exoFicha = $cF->getFicha(false, $trTool);
unset($cF);
break;
case 101:
//Grupos iDE_GRUPO
$cG = new cGrupo($this->mKey);
$exoFicha = $cG->getFicha(false, $trTool);
unset($cG);
break;
case iDE_GARANTIA:
$sql = "SELECT creditos_garantias.idcreditos_garantias,\r\n\t\t\t\tcreditos_tgarantias.descripcion_tgarantias AS 'Tipo_de_Garantia',\r\n\t\t\t\t creditos_tvaluacion.descripcion_tvaluacion AS 'Tipo_de_Valuacion',\r\n\t\t\t\t creditos_garantias.fecha_recibo AS 'Fecha_de_Recibo',\r\n\t\t\t\t FORMAT(creditos_garantias.monto_valuado, 2) AS 'Monto_valuado',\r\n\t\t\t\t creditos_garantias.fecha_adquisicion AS 'Fecha_de_Adquisicion',\r\n\t\t\t\t creditos_garantias.documento_presentado AS 'Documento_Presentado',\r\n\t\t\t\t creditos_garantias.descripcion AS 'Descripcion',\r\n\t\t\t\t creditos_garantias.propietario AS 'Propietario'\r\n\t\t\t\t FROM creditos_tvaluacion, creditos_garantias, creditos_tgarantias\r\n\t\t\t\t WHERE creditos_tgarantias.idcreditos_tgarantias=creditos_garantias.tipo_garantia\r\n\t\t\t\t AND creditos_tvaluacion.idcreditos_tvaluacion=creditos_garantias.tipo_valuacion\r\n\t\t AND creditos_garantias.idcreditos_garantias=" . $this->mKey;
$tool = $trTool;
$rwt = obten_filas($sql);
$exoFicha = "\r\n\t<table {$wTable} border='0'>\r\n\t<tbody>\r\n\t\t<tr>\r\n\t\t\t<th class='izq'>Identificador</th><td>{$rwt['0']}</td>\r\n\t\t\t<th class='izq'>Tipo</th><td>{$rwt['1']}</td>\r\n\t\t</tr>\r\n\t\t<tr>\r\n\t\t\t<th class='izq'>Tipo de Valuacion</th><td>{$rwt['2']}</td>\r\n\t\t\t<th class='izq'>Fecha de Resguardo</th><td>{$rwt['3']}</td>\r\n\t\t</tr>\r\n\t\t<tr>\r\n\t\t\t<th class='izq'>Fecha de Adquisicion</th><td>{$rwt['5']}</td>\r\n\t\t\t<th class='izq'>Documento / Factura</th><td>{$rwt['6']}</td>\r\n\t\t</tr>\r\n\t\t<tr>\r\n\t\t\t<th class='izq'>Monto Valuado</th><td>" . getFMoney($rwt[4]) . "</td>\r\n\t\t\t<th class='izq'>Propietario</th><td>{$rwt['8']}</td>\r\n\t\t</tr>\r\n\t\t<tr>\r\n\t\t\t<th>Descripción</th>\r\n\t\t\t<td>{$rwt['7']}</td>\r\n\t\t</tr>\r\n\t\t{$tool}\r\n\t</tbody>\r\n\t</table>";
break;
case 300:
//TODO: Change this line.- cambiar por la clase global
$sqli = "\r\n\t\t\tSELECT\r\n\t\t\t\t\t`captacion_cuentas`.`numero_cuenta`,\r\n\t\t\t\t\t`captacion_cuentastipos`.`descripcion_cuentastipos` AS `modalidad`,\r\n\t\t\t\t\t`captacion_subproductos`.`descripcion_subproductos` AS `subproducto`,\r\n\t\t\t\t\t`captacion_cuentas`.`fecha_apertura` AS `fecha_de_apertura`,\r\n\t\t\t\t\t`captacion_cuentas`.`saldo_cuenta` AS `saldo_actual`,\r\n\t\t\t\t\t`captacion_cuentas`.`numero_grupo` AS `grupo_asociado`,\r\n\t\t\t\t\t`captacion_cuentas`.`numero_solicitud` AS `credito_asociado`,\r\n\t\t\t\t\t`captacion_cuentas`.`tasa_otorgada` AS `tasa`,\r\n\t\t\t\t\t`captacion_cuentas`.`observacion_cuenta` AS `observaciones`\r\n\t\t\t\tFROM\r\n\t\t\t\t\t`captacion_cuentas` `captacion_cuentas`\r\n\t\t\t\t\t\tINNER JOIN `captacion_cuentastipos` `captacion_cuentastipos`\r\n\t\t\t\t\t\tON `captacion_cuentas`.`tipo_cuenta` = `captacion_cuentastipos`.\r\n\t\t\t\t\t\t`idcaptacion_cuentastipos`\r\n\t\t\t\t\t\t\tINNER JOIN `captacion_subproductos` `captacion_subproductos`\r\n\t\t\t\t\t\t\tON `captacion_cuentas`.`tipo_subproducto` = `captacion_subproductos`\r\n\t\t\t\t\t\t\t.`idcaptacion_subproductos`\r\n\t\t\t\tWHERE\r\n\t\t\t\t\t(`captacion_cuentas`.`numero_cuenta` =" . $this->mKey . ")";
$rw = obten_filas($sqli);
$exoFicha = "\r\n\t\t\t\t<table width='100%' border='0'>\r\n\t\t\t\t<tr>\r\n\t\t\t\t\t<th class='izq'>Numero de Cuenta</th class='mny'><td>" . $rw["numero_cuenta"] . "</td>\r\n\t\t\t\t\t<th class='izq' >Fecha de Apertura</th><td>" . getFechaMediana($rw["fecha_de_apertura"]) . "</td>\r\n\t\t\t\t</tr>\r\n\t\t\t\t<tr>\r\n\t\t\t\t\t<th class='izq'>Modalidad</th><td>" . $rw["modalidad"] . "</td>\r\n\t\t\t\t\t<th class='izq'>Producto</th><td>" . $rw["subproducto"] . "</td>\r\n\t\t\t\t</tr>\r\n\t\t\t\t<tr>\r\n\t\t\t\t\t<th class='izq'>Tasa Actual</th><td class='mny'>% " . getFMoney($rw["tasa"] * 100) . "</td>\r\n\t\t\t\t\t<th class='izq'>Saldo Actual</th>\r\n\t\t\t\t\t<td class='mny'>" . getFMoney($rw["saldo_actual"]) . "</td>\r\n\t\t\t\t</tr>\r\n\t\t\t\t<tr>\r\n\t\t\t\t\t<th class='izq'>Observaciones</th><td colspan='2'>" . $rw["observaciones"] . "</td>\r\n\t\t\t\t</tr>\r\n\t\t\t\t</table>";
break;
case 310:
//Depositos a la vista iDE_CVISTA
$cCapt = new cCuentaALaVista($this->mKey);
$cCapt->init();
$exoFicha = $cCapt->getFicha(false, $trTool);
break;
case 320:
//iDE_CINVERSION
$xCI = new cCuentaInversionPlazoFijo($this->mKey);
$xCI->init();
$exoFicha = $xCI->getFicha(false, $trTool);
break;
case 400:
//RECIBO DE OPERACION
$cRec = new cReciboDeOperacion(99, false, $this->mKey);
//$cRec->initRecibo();
$exoFicha = $cRec->getFicha(false, $trTool);
unset($cRec);
break;
default:
break;
}
//retoque fieldset
if ($this->mTitle != "") {
$this->mTitle = "| " . $this->mTitle . " |";
}
$exoFicha = "<fieldset>\r\n\t\t\t\t\t\t<legend>" . $this->mTitle . "</legend>\r\n\t\t\t\t\t\t\t{$exoFicha}\r\n\t\t\t\t\t</fieldset>";
if ($return == true) {
return $exoFicha;
} else {
echo $exoFicha;
}
}
function jsaGetNombreGrupo($idgrupo)
{
$x = new cGrupo($idgrupo);
return $x->getNombre();
}
$archivo = "";
$xRPT = new cReportes($titulo);
$xRPT->setFile($archivo);
$xRPT->setOut($out);
$xRPT->setSQL($sql);
$xRPT->setTitle($xHP->getTitle());
//============ Reporte
$xT = new cTabla($sql, 2);
$xT->setTipoSalida($out);
$body = $xRPT->getEncabezado($xHP->getTitle(), $FechaInicial, $FechaFinal);
$xRPT->setBodyMail($body);
$xRPT->addContent($body);
//$xT->setEventKey("jsGoPanel");
//$xT->setKeyField("creditos_solicitud");
//$xRPT->addContent( $xT->Show( $xHP->getTitle() ) );
$xG = new cGrupo($grupo);
$xRPT->addContent($xG->getFicha());
$rs = $query->getDataRecord($sql);
foreach ($rs as $rows) {
$credito = $rows["numero_solicitud"];
$xCred = new cCredito($credito);
$xRPT->addContent($xCred->getFicha(false, "", false, true));
}
//============ Agregar HTML
//$xRPT->addContent( $xHP->init($jsEvent) );
//$xRPT->addContent( $xHP->end() );
$xRPT->setResponse();
$xRPT->setSenders($senders);
echo $xRPT->render(true);
exit;
include_once "../core/entidad.datos.php";
