$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;
    echo "<tr>\n\t\t\t<td>{$codigo}</td>\n\t\t\t<td>{$nombre}</td>\n\t\t\t<td><input type='text' name='monto{$i}' value='{$monto}' class='mny'>\n\t\t\t<input type='hidden' name='idsocio{$i}' value='{$codigo}'>\n\t\t\t<input type='hidden' name='operacion{$i}' value='{$idoper}'>\n\t\t\t<td><input type='text' name='observacion{$i}' value='' size='50'></td>\n\n\t\t</tr>";
 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&oacute;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 = "|&nbsp;&nbsp;&nbsp;" . $this->mTitle . "&nbsp;&nbsp;&nbsp;|";
     }
     $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;
     }
 }
    //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&oacute;n del Cr&eacute;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>";
}
?>
</form>
<?php 
?>
</body>
<?php 
$jsb->show();
?>
<script  >
</script>
</html>
$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";
include_once "../core/core.deprecated.inc.php";