$observaciones = mifila($sqlrec, "observacion_recibo"); // $sql_d_mvto = "SELECT * FROM operaciones_mvtos\n\t\t\t\t\t\tWHERE recibo_afectado={$idrecibo}\n\t\t\t\t\t\tAND tipo_operacion=500 "; $sql_d_inv = "SELECT * FROM operaciones_mvtos\n\t\t\t\t\t\tWHERE recibo_afectado={$idrecibo}\n\t\t\t\t\t\tAND tipo_operacion=223 "; $sql_d_ide = "SELECT * FROM operaciones_mvtos\n\t\t\t\t\t\tWHERE\n\t\t\t\t\t\tfecha_operacion = '{$fechaRecibo}'\n\t\t\t\t\t\tAND docto_afectado = {$docto}\n\t\t\t\t\t\tAND tipo_operacion=235 "; $xInv = new cCuentaInversionPlazoFijo($docto, $idsocio); $dcuentas = $xInv->getDatosInArray(); $dmvto = obten_filas($sql_d_mvto); $dInv = obten_filas($sql_d_inv); $dIDE = obten_filas($sql_d_ide); // $iSocio = new cFicha(iDE_SOCIO, $idsocio); $iSocio->setTableWidth(); $iSocio->show(); echo "<hr />"; $cInv = new cFicha(iDE_CINVERSION, $docto); $cInv->setTableWidth(); $cInv->show(); ?> <hr /> <?php $tasa = getFMoney($dcuentas["tasa_otorgada"] * 100); $interes = getFMoney($dmvto["afectacion_real"]); //$capital = getFMoney($dInv["afectacion_real"]); $capital = getFMoney($dcuentas["saldo_cuenta"]); $dias = $dcuentas["dias_invertidos"]; $isr = getISRByInversion($dcuentas["saldo_cuenta"], $dias); $isr = round($isr, 2); $ide = $dIDE["afectacion_real"]; //$ide = 0; $aliquidar = $dInv["afectacion_real"] + $dmvto["afectacion_real"] - ($isr + $ide);
} $_SESSION["current_file"] = addslashes($theFile); //===================================================================================================== $xHP = new cHPage("TR.Credit Scoring", HP_FORM); $persona = parametro("persona", DEFAULT_SOCIO, MQL_INT); $persona = parametro("socio", $persona, MQL_INT); $persona = parametro("idsocio", $persona, MQL_INT); //$persona = parametro("i"); $xHP->init(); ?> <fieldset> <legend>Credit Scoring V 0.9</legend> <?php if ($persona != DEFAULT_SOCIO) { $action = $_GET["a"]; $cFSoc = new cFicha(iDE_SOCIO, $persona); $cFSoc->setTableWidth(); $cFSoc->show(); if (isset($action) and $action == "1") { //Capturar el resultado del Scoring $xTyp = new cTipos(); } else { ?> <form name="credit_scoring" method="post" action="frmscoring_de_creditos.php?a=1&i=<?php echo $persona; ?> "> <fieldset> <legend>Cuestionario Complemetario para Integrar el Scoring</legend> <table> <tbody>
</tr> <tr> <td>Observaciones</td> <td colspan="3"><input type="text" size="40" maxlength="50" name="cObservaciones" id="idObservaciones" /></td> </tr> </table> <input type="button" name="sendme" value="ENVIAR RECONVENIO DE CREDITO" onClick="frmSubmit();"> <p class="aviso">Este Modulo no cuenta con asignacion automatica de criterios, verifique los datos antes de enviarlo</p> </form> </fieldset> <?php } elseif (isset($action) && $action == "i") { $idsolicitud = $_POST["idsolicitud"]; $idsocio = $_POST["idsocio"]; //if($idsocio $mFCred = new cFicha(iDE_CREDITO, $idsolicitud); $mFCred->setTableWidth(); $mFCred->show(); //--------------------------------------------------- $monto = $_POST["monto"]; $tasa = $_POST["tasa"]; $fechaconv = $_POST["elanno0"] . "-" . $_POST["elmes0"] . "-" . $_POST["eldia0"]; $periocidad = $_POST["periocidad"]; $pagos = $_POST["pagos"]; $interesNoPag = $_POST["intereses"]; $observaciones = $_POST["cObservaciones"]; $cCred = new cCredito($idsolicitud, $idsocio); $cCred->initCredito(); $cCred->setReconvenido($monto, $interesNoPag, $tasa, $periocidad, $pagos, $observaciones, $fechaconv); $urlDMA = "c={$idsolicitud}&s={$idsocio}&o={$interesNoPag}&i=420"; echo "<p class='aviso'>EL RECONVENIO SE REGISTRO SATISFACTORIAMENTE</p>\n\t\t<input type='button' name='miplan' value='GENERAR PLAN DE PAGOS' onClick='generarplan(\"{$urlDMA}\");'>";
$interes = $_POST["interes"]; $idministrado = $_POST["idministrado"]; $idpago = $_POST["idpago"]; $montooriginal = $_POST["montooriginal"]; $aportsocial = $montoaport * EACP_TASA_RESERVA; $aportvol = $montoaport - $aportsocial; $cheque = $_POST["cheque"]; $comopago = $_POST["ctipo_pago"]; $foliofiscal = $_POST["foliofiscal"]; $fecha = fechasys(); $cRec = new cReciboDeOperacion(5, false); //$cRec->setGenerarBancos(); $cRec->setGenerarPoliza(); $cRec->setGenerarTesoreria(); $idrecibo = $cRec->setNuevoRecibo($idsocio, DEFAULT_CREDITO, $fecha, 1, 5, $observaciones, $cheque, $comopago, $foliofiscal, $idgrupo); $cRec->setNuevoMvto($fecha, $aportvol, 702, 1, $observaciones, 1, TM_ABONO, $idsocio); $cRec->setNuevoMvto($fecha, $aportsocial, 710, 1, $observaciones, 1, TM_ABONO, $idsocio); $cRec->addMvtoContableByTipoDePago($totalcuotas, TM_CARGO); $cRec->setFinalizarRecibo(true); //PolizaPorRecibo($idrecibo); $cFicha = new cFicha(iDE_SOCIO, $idsocio); $cFicha->setTableWidth(); $cFicha->show(); echo $cRec->getFicha(true); echo $msg_rec_end; echo $cRec->getJsPrint(true); } ?> </body> </html>
$foliofiscal = $_POST["foliofiscal"]; $idsocio = $_POST["idsocio"]; $fecha = fechasys(); $iddocto = $idsolicitud; //=================================================================================================== $cRec = new cReciboDeOperacion(15, true, false); $cRec->setGenerarBancos(); $cRec->setGenerarPoliza(); $cRec->setGenerarTesoreria(); $idrecibo = $cRec->setNuevoRecibo($idsocio, $iddocto, $fecha, 1, 15, $observaciones, $cheque, $comopago, $foliofiscal); $cRec->setNuevoMvto($fecha, $monto, 351, 1, $observaciones, 1, TM_ABONO, $idsocio); //IVA $cRec->setNuevoMvto($fecha, $iva, 151, 1, $observaciones, 1, TM_ABONO, $idsocio); $cRec->addMvtoContableByTipoDePago($montooperacion, TM_CARGO); $cRec->setFinalizarRecibo(true); $cfSocio = new cFicha(iDE_SOCIO, $idsocio); $cfSocio->setTableWidth(); $cfSocio->show(); echo $cRec->getFicha(); echo $msg_rec_end; // actualiza el interes Anticipado del Credito $sqlica = "UPDATE creditos_solicitud\n\t\tSET sdo_int_ant=(sdo_int_ant + ({$monto}))\n\t\tWHERE numero_solicitud={$idsolicitud}"; my_query($sqlica); // } ?> </body> <script > var wFrm = document.frminteresant; function printrec() { var elUrl= "../frmextras/frmrecibodepago.php?recibo=<?php
$idsocio = $_POST["idsocio"]; if (!isset($idsolicitud) or !isset($idsocio) or $montoop <= 0) { echo "<p class='aviso'>AGREGE UN NUMERO DE SOLICITUD. \n\n\t\t si sabe a Que Parcialidad afectara, indique el Numero\n\t\t</p>"; } else { $ulper = $_POST["idparcialidad"]; $idparcialidad = $_POST["idparcialidad"]; $iva = $_POST["iva_cargado"]; //$idsocio = mifila($sqlvs, "numero_socio"); $observaciones = $_POST["observaciones"]; $fecha = fechasys(); $cRec = new cReciboDeOperacion(97); $recibo = $cRec->setNuevoRecibo($idsocio, $idsolicitud, $fecha, $idparcialidad, 97, $observaciones); $cRec->setDefaultEstatusOperacion(40); $cRec->setNuevoMvto($fecha, $montoop, 601, $idparcialidad, $observaciones); $cRec->setNuevoMvto($fecha, $iva, 1202, $idparcialidad, $observaciones); $mSoc = new cFicha(iDE_SOCIO, $idsocio); $mSoc->setTableWidth(); $mSoc->show(); $cRec->setFinalizarRecibo(true); $cRec->getFicha(); echo "<p class='aviso'>EL MONTO DEL CARGO FUE DE: \$ " . getFMoney($montoop) . ", SE PODRA DISMUIR DESDE EL MODULO DE DESCUENTOS</p>"; echo $msg_rec_end; } ?> </body> <script > function printrec() { var elUrl= "../rpt_formatos/frmrecibogeneral.php?recibo=<?php echo $recibo; ?> ";
} if ($f16 == "yes") { $solo_con_saldos = " AND saldo_actual > 0 "; } $sqlcred = "SELECT numero_socio, numero_solicitud,\tsaldo_actual, monto_autorizado\tFROM creditos_solicitud\tWHERE\n\t\tnumero_solicitud={$idsolicitud}\t{$solo_con_saldos}\tORDER BY fecha_vencimiento DESC"; if ($idsolicitud) { $idsocio = mifila($sqlcred, "numero_socio"); } $NCreditos = 0; // if ($id) { $sqlcred = "SELECT numero_socio, numero_solicitud, saldo_actual, monto_autorizado FROM creditos_solicitud WHERE numero_socio={$id} {$solo_con_saldos} ORDER BY fecha_ministracion, fecha_vencimiento DESC"; $idsocio = $id; $porSocio = true; } $cF = new cFicha(iDE_SOCIO, $idsocio); $cF->setTableWidth(); $cF->show(); echo "<hr />"; $mycred = getRecordset($sqlcred); while ($rwc = mysql_fetch_array($mycred)) { $solicitud = $rwc["numero_solicitud"]; $NCreditos++; $cFC = new cCredito($solicitud); $cFC->initCredito(); $cFC->setForceVista($ExtInf); $sdoTemp = $cFC->getSaldoActual(); echo $cFC->getFicha(true, ""); $MontoAutorizado = $rwc["monto_autorizado"]; echo "<hr />"; $where = "";
echo "<p class='aviso'>FALTA EL NUMERO DE PERSONA</p>"; } if (!$idsol) { echo "<p class='aviso'>FALTA LA SOLICITUD</p>"; } $estatus = volcartabla("creditos_garantias", 10, "idcreditos_garantias={$idgar}"); if ($estatus == 3) { echo "<p class='aviso'>LA GARANTIA YA SE HA ENTREGADO</p>"; } elseif ($estatus == 2) { echo "<p class='aviso'>LA GARANTIA YA SE HA RESGUARDADO ANTERIORMENTE</p>"; } else { $fresguardo = fechasys(); $sqlug = "UPDATE creditos_garantias SET estatus_actual=2, fecha_resguardo='{$fresguardo}', idusuario={$iduser},\n\tobservaciones_del_resguardo='{$o_res}'\n\t WHERE socio_garantia={$idsoc} AND idcreditos_garantias={$idgar} AND solicitud_garantia={$idsol}"; my_query($sqlug); } $x = new cFicha(iDE_SOCIO, $idsoc); $x->setTableWidth(); $x->show(); minificha(4, $idgar); echo "<p class='aviso'>EL REGISTRO SE HA HECHO DE FORMA SATISFACTORIA</P>\n\t<p class='aviso'><input type='button' name='btnprint' value='IMPRIMIR RECIBO DE RESGUARDO' onclick='printrecibo();'>\n\t</p>"; } ?> </body> <script> function printrecibo() { var nURL = "../rpt_formatos/rptreciboresguardo.php?i=<?php echo $idgar; ?> "; var killrpt = window.open(nURL, "window"); killrpt.focus()
function setCredito($credito) { $this->mDocumento = $credito; $xFDE = new cFecha(); $xLng = new cLang(); $cCred = new cCredito($credito); $cCred->init(); $idsolicitud = $credito; $DCred = $cCred->getDatosDeCredito(); $DProd = $cCred->getOProductoDeCredito(); $OOParam = new cProductoDeCreditoOtrosDatosCatalogo(); $numero_de_socio = $cCred->getClaveDePersona(); $this->mPersona = $numero_de_socio; $cSoc = new cSocio($numero_de_socio); $cSoc->init(); $svar_info_cred = ""; $tblInfCred = new cFicha(iDE_CREDITO, $idsolicitud); $this->setPersona($numero_de_socio); $svar_info_cred = $tblInfCred->show(true); //Lista de Beneficiados $lst_beneficiados = ""; $this->getListadoDeAvales($idsolicitud); $SQLCBen = "SELECT `socios_relacionestipos`.`descripcion_relacionestipos` AS 'relacion', `socios_relaciones`.`nombres`,\t`socios_relaciones`.`apellido_paterno`,\t`socios_relaciones`.`apellido_materno`,\n\t\t\t`socios_consanguinidad`.`descripcion_consanguinidad` AS 'consaguinidad'\n\t\t\tFROM `socios_relaciones` `socios_relaciones` INNER JOIN `socios_consanguinidad` `socios_consanguinidad` ON `socios_relaciones`.`consanguinidad` = `socios_consanguinidad`.`idsocios_consanguinidad`\n\t\t\tINNER JOIN `socios_relacionestipos` `socios_relacionestipos` ON `socios_relaciones`.`tipo_relacion` = `socios_relacionestipos`.`idsocios_relacionestipos`\n\t\t\tWHERE (`socios_relaciones`.`socio_relacionado` ={$numero_de_socio}) AND (`socios_relaciones`.`credito_relacionado` ={$idsolicitud})\tAND\t(`socios_relaciones`.`tipo_relacion`=11)"; $tblCBen = new cTabla($SQLCBen); $lst_beneficiados = $tblCBen->Show(); $firmas_de_avales = $this->mFirmasAvales; // $cSoc->getCoResponsables("firmas", "avales", $idsolicitud ); //Plan de Pago segun SQL $splan_pagos = $cCred->getPlanDePago(OUT_HTML, true, true); //================================================================================== $fichas_de_avales = $this->mFichasAvales; //$cCred->getAvales_InText(); $fecha_larga_de_documento = $xFDE->getFechaLarga($cCred->getFechaDeMinistracion()); $fichas_de_respsolidarios = ""; //TODO: FALTA //Otros Datos $monto_ministrado = $cCred->getMontoAutorizado(); $tasa_interes_mensual_ordinario = round($cCred->getTasaDeInteres() / 12 * 100, 2); $tasa_interes_anual_ordinario = $cCred->getTasaDeInteres(); $fecha_de_vencimiento = $cCred->getFechaDeVencimiento(); $fecha_de_ministracion = $cCred->getFechaDeMinistracion(); $tasa_garantia_liquida = $DCred["porciento_garantia_liquida"] * 100; $monto_garantia_liquida = $monto_ministrado * $tasa_garantia_liquida; $tasa_interes_mensual_moratorio = round($cCred->getTasaDeMora() / 12 * 100, 2); $dias_del_credito = $cCred->getDiasAutorizados(); $meses_del_credito = sprintf("%02d", ceil($dias_del_credito / 30.416666666666668)); $periocidad = $cCred->getPeriocidadDePago(); //Tipo de Credito por SQL $SQLTCred = "SELECT * FROM creditos_modalidades WHERE idcreditos_modalidades=" . $DCred["tipo_credito"]; $tipo_de_credito = mifila($SQLTCred, "descripcion_modalidades"); //Datos del Grupo Solidarios por SQL $SQLGAsoc = "SELECT * FROM socios_grupossolidarios WHERE idsocios_grupossolidarios=" . $DCred["grupo_asociado"]; $InfoGrupo = obten_filas($SQLGAsoc); $nombre_rep_social = $InfoGrupo["representante_nombrecompleto"]; $codigo_rep_social = $InfoGrupo["representante_numerosocio"]; $nombre_voc_vigila = $InfoGrupo["vocalvigilancia_nombrecompleto"]; $nombre_del_grupo = $InfoGrupo["nombre_gruposolidario"]; $domicilio_rep_social = domicilio($codigo_rep_social); $tabla_asociadas = ""; $lista_asociadas = ""; $tasa_de_cat = $cCred->getCAT(); $DPeriocidad = new cPeriocidadDePago($cCred->getPeriocidadDePago()); $DPeriocidad->init(); $monto_con_interes = ""; $monto_con_interes_letras = ""; if ($DCred["grupo_asociado"] != DEFAULT_GRUPO) { $SQL_get_grupo = "SELECT `socios_general`.`codigo`, CONCAT(`socios_general`.`nombrecompleto`, ' ', `socios_general`.`apellidopaterno`, ' ', `socios_general`.`apellidomaterno`) AS 'nombre_completo'\n\t\t\t\t\t\t\t\t\tFROM `socios_general` `socios_general` WHERE (`socios_general`.`grupo_solidario` =" . $DCred["grupo_asociado"] . ")"; $rsg = getRecordset($SQL_get_grupo); while ($rwt = mysql_fetch_array($rsg)) { $lista_asociadas .= ", " . $rwt["nombre_completo"]; } } if (EACP_INCLUDE_INTERES_IN_PAGARE == true) { if ($periocidad == CREDITO_TIPO_PERIOCIDAD_FINAL_DE_PLAZO) { $monto_con_interes = $cCred->getMontoAutorizado() + $cCred->getInteresDiariogenerado() * $cCred->getDiasAutorizados(); } else { $sqlInt = "SELECT `operaciones_mvtos`.`docto_afectado`, `operaciones_mvtos`.`tipo_operacion`, COUNT(`operaciones_mvtos`.`idoperaciones_mvtos`) AS `mvtos`,\n\t\t\t\t\tSUM(`operaciones_mvtos`.`afectacion_real` *\t`eacp_config_bases_de_integracion_miembros`.`afectacion`) AS 'monto'\n\t\t\t\t\tFROM `operaciones_mvtos` `operaciones_mvtos` INNER JOIN `eacp_config_bases_de_integracion_miembros`\t`eacp_config_bases_de_integracion_miembros`\n\t\t\t\t\tON `operaciones_mvtos`.`tipo_operacion` = `eacp_config_bases_de_integracion_miembros`.`miembro` WHERE (`operaciones_mvtos`.`docto_afectado` = {$idsolicitud})\n\t\t\t\t\tAND (`eacp_config_bases_de_integracion_miembros`.`codigo_de_base` = 2601)\n\t\t\t\t\tGROUP BY `operaciones_mvtos`.`docto_afectado`, `eacp_config_bases_de_integracion_miembros`.`codigo_de_base`\n\t\t\t\t\tORDER BY `eacp_config_bases_de_integracion_miembros`.`codigo_de_base`, `operaciones_mvtos`.`fecha_afectacion`, `operaciones_mvtos`.`socio_afectado`\t"; $xF = obten_filas($sqlInt); $monto_con_interes = $xF["monto"]; } $monto_con_interes_letras = convertirletras($monto_con_interes); $monto_con_interes = getFMoney($monto_con_interes); } $this->mArr["variable_informacion_del_credito"] = $cCred->getFicha(); //"variable_lista_de_beneficiados" => $lst_beneficiados, $this->mArr["variable_tipo_de_credito"] = $tipo_de_credito; $this->mArr["variable_monto2_ministrado_con_intereses_en_letras"] = $monto_con_interes_letras; $this->mArr["variable_monto2_ministrado_con_intereses"] = $monto_con_interes; $this->mArr["variable_monto_ministrado"] = getFMoney($monto_ministrado); $this->mArr["variable_tasa_mensual_de_interes_ordinario"] = $tasa_interes_mensual_ordinario; $this->mArr["variable_credito_fecha_de_vencimiento"] = $xFDE->getFechaMediana($fecha_de_vencimiento); $this->mArr["variable_monto_garantia_liquida"] = getFMoney($monto_garantia_liquida); $this->mArr["variable_tasa_mensual_de_interes_moratorio"] = $tasa_interes_mensual_moratorio . ""; $this->mArr["variable_tasa_de_garantia_liquida"] = $tasa_garantia_liquida . ""; $this->mArr["variable_plan_de_pagos"] = $splan_pagos; $this->mArr["variable_docto_fecha_larga_actual"] = $fecha_larga_de_documento; $this->mArr["variable_nombre_de_la_representante_social"] = $nombre_rep_social; $this->mArr["variable_listado_de_integrantes"] = $lista_asociadas; $this->mArr["variable_nombre_de_la_vocal_de_vigilancia"] = $nombre_voc_vigila; $this->mArr["variable_nombre_del_grupo_solidario"] = $nombre_del_grupo; $this->mArr["variable_domicilio_de_la_representante_social"] = $domicilio_rep_social; $this->mArr["variable_meses_de_duracion_del_credito"] = $meses_del_credito; $this->mArr["variable_en_letras_monto_ministrado"] = convertirletras($monto_ministrado); $this->mArr["variable_credito_fecha_de_ministracion"] = $xFDE->getFechaCorta($fecha_de_ministracion); $this->mArr["variable_tasa_cat"] = $tasa_de_cat; $this->mArr["variable_credito_periocidad"] = $DPeriocidad->getNombre(); $this->mArr["variable_credito_monto_parcialidad_fija"] = getFMoney($cCred->getMontoDeParcialidad()); $this->mArr["variable_credito_numero_de_pagos"] = $cCred->getPagosAutorizados(); $this->mArr["variable_tasa_anual_de_interes_moratorio"] = $cCred->getTasaDeInteres() * 2 * 100 . "%"; $this->mArr["variable_tasa_anual_de_interes_ordinario"] = $cCred->getTasaDeInteres() * 100 . "%"; //sobreescribir datos de la empresa $xEmp = new cEmpresas($cCred->getClaveDeEmpresa()); $xEmp->init(); $this->mArr["variable_nombre_de_la_empresa"] = $xEmp->getNombre(); $this->mArr["variable_nombre_de_empresa"] = $xEmp->getNombre(); $this->mArr["variable_fecha_de_primer_pago"] = $xFDE->getFechaMediana($cCred->getFechaPrimeraParc()); $this->mArr["variable_avales_en_fichas"] = $fichas_de_avales; $this->mArr["variable_firmas_de_avales"] = $firmas_de_avales; $this->mArr["variable_avales_autorizacion_central_riesgo"] = $this->mFichaRiesgoAv; $this->mArr["variable_fecha_ultimo_abono"] = $xFDE->getFechaLarga($cCred->getFechaUltimaParc()); $this->mArr["variable_fecha_de_primer_abono"] = $xFDE->getFechaMediana($cCred->getFechaPrimeraParc()); //$this->mArr["variable_fecha_de_primer_abono"] = $this->mArr["variable_en_letras_tasa_mensual_de_interes_moratorio"] = convertirletras_porcentaje($tasa_interes_mensual_moratorio); $this->mArr["variable_lista_de_avales_con_domicilio"] = $this->mLAvalesConDir; /*variable_aval1_nombre_completo variable_aval1_domicilio_completo variable_aval1_domicilio_localidad variable_aval1_domicilio_municipio*/ //Cargar Avales $this->mArr["variable_listado_de_garantias"] = $this->getListadoDeGarantias(); //$this->mArr["variable_modalidad_de_credito"] = $cCred->getOEstado() $this->mArr["variable_estado_de_credito"] = $cCred->getOEstado()->descripcion_estatus()->v(OUT_TXT); //$this->mArr["variable_credito_num_de_pago_actual"] = $cCred->getPeriodoActual(); $this->mArr["variable_contrato_id_legal"] = $DProd->getOtrosParametros($OOParam->CONTRATO_ID_LEGAL); $this->mArr["variable_producto_comision_apertura"] = $DProd->getOtrosParametros($OOParam->TASA_DE_COMISION_AP); }
</head> <link href="../css/reporte.css" rel="stylesheet" type="text/css"> <body> <!-- --> <?php echo getRawHeader(); if (!$idsolicitud) { exit($msg_rpt_exit . $fhtm); } $SQLDCred = "SELECT\n\t`creditos_solicitud`.*,\n\t`creditos_tipoconvenio`.*,\n\t`socios_general`.*\nFROM\n\t`creditos_solicitud` `creditos_solicitud`\n\t\tINNER JOIN `socios_general` `socios_general`\n\t\tON `creditos_solicitud`.`numero_socio` =\n\t\t`socios_general`.`codigo`\n\t\t\tINNER JOIN `creditos_tipoconvenio`\n\t\t\t`creditos_tipoconvenio`\n\t\t\tON `creditos_solicitud`.`tipo_convenio` =\n\t\t\t`creditos_tipoconvenio`.\n\t\t\t`idcreditos_tipoconvenio`\nWHERE\n\t(`creditos_solicitud`.`numero_solicitud` ={$idsolicitud})\n\t"; $DCred = obten_filas($SQLDCred); $numero_de_socio = $DCred["codigo"]; $domicilio_del_socio = domicilio($DCred["codigo"]); //Info del Credito $svar_info_cred = ""; $tblInfCred = new cFicha(iDE_CREDITO, $idsolicitud); $tblInfCred->setTableWidth("80%"); $svar_info_cred = $tblInfCred->show(true); //Lista de Beneficiados $lst_beneficiados = ""; $SQLCBen = "SELECT\n\t`socios_relacionestipos`.`descripcion_relacionestipos` AS 'relacion',\n\t`socios_relaciones`.`nombres`,\n\t`socios_relaciones`.`apellido_paterno`,\n\t`socios_relaciones`.`apellido_materno`,\n\t`socios_consanguinidad`.`descripcion_consanguinidad` AS 'consaguinidad'\nFROM\n\t`socios_relaciones` `socios_relaciones`\n\t\tINNER JOIN `socios_consanguinidad`\n\t\t`socios_consanguinidad`\n\t\tON `socios_relaciones`.`consanguinidad` =\n\t\t`socios_consanguinidad`.`idsocios_consanguinidad`\n\t\t\tINNER JOIN `socios_relacionestipos`\n\t\t\t`socios_relacionestipos`\n\t\t\tON `socios_relaciones`.`tipo_relacion` =\n\t\t\t`socios_relacionestipos`.\n\t\t\t`idsocios_relacionestipos`\nWHERE\n\t(`socios_relaciones`.`socio_relacionado` ={$numero_de_socio}) AND\n\t(`socios_relaciones`.`credito_relacionado` ={$idsolicitud})\n\tAND\n\t(`socios_relaciones`.`tipo_relacion`=11)"; $tblCBen = new cTabla($SQLCBen); $tblCBen->setWidth(80); $lst_beneficiados = $tblCBen->Show(); //Caja local por SQL $SQLCL = "SELECT idsocios_cajalocal, descripcion_cajalocal, ultimosocio, region, sucursal\n \t\tFROM socios_cajalocal\n \t\tWHERE\n \t\tidsocios_cajalocal=" . $DCred["cajalocal"]; $caja_local = mifila($SQLCL, "descripcion_cajalocal"); //Tipo de Credito(COMERCIAL, VIVIENDA) por SQL //Plan de Pago segun SQL $splan_pagos = ""; $SQLPPagos = "SELECT\n\tDATE_FORMAT(MAX(`operaciones_mvtos`.`fecha_afectacion`),'%d-%m-%Y') AS `fecha`,\n\tSUM(`operaciones_mvtos`.`afectacion_real`) AS `monto`\nFROM\n\t`operaciones_recibos` `operaciones_recibos`\n\t\tINNER JOIN `operaciones_mvtos` `operaciones_mvtos`\n\t\tON `operaciones_recibos`.`idoperaciones_recibos` =\n\t\t`operaciones_mvtos`.`recibo_afectado`\nWHERE\n\t(`operaciones_recibos`.`numero_socio` ={$numero_de_socio}) AND\n\t(`operaciones_recibos`.`docto_afectado` = {$idsolicitud}) AND\n\t(`operaciones_recibos`.`tipo_docto` =11)\nGROUP BY\n\t`operaciones_mvtos`.`periodo_socio`";
} $xCDestino->init(); $msg .= $xCOrigen->setTraspaso($cuentaDestino, $tipoDestino, $observaciones, $monto); $ReciboTrasp = $xCOrigen->getReciboDeOperacion(); $msg .= $xCOrigen->getMessages(); $msg .= $xCDestino->getMessages(); //Imprime la Ficha del socio echo $xSoc->getFicha(); //$cCta->init(); //Imprime la Ficha del Documento $xCDestino->init(); $fd = $xCDestino->getFicha(true); $xCOrigen->init(); $fo = $xCOrigen->getFicha(true); echo "<fieldset><legend>DATOS DEL TRAPASO</legend>\n\t\t\t\tCuenta de Origen:<br />\n\t\t\t\t{$fo}\t\n\t\tCuenta de Destino:<br />\n\t\t{$fd}\n\t\t</fieldset>"; $mRec = new cFicha(iDE_RECIBO, $ReciboTrasp); $mRec->setTableWidth(); $mRec->show(); // ***************************************************************************** echo "<input type='button' name='btsend' value='IMPRIMIR/VER RECIBO DE TRASPASO' onClick='jsGetComprobanteDeTraspaso();'>"; } else { $xBtn = new cHButton(""); if (MODO_DEBUG == true) { $msg .= $xSoc->getMessages("html"); } echo "<p class='aviso'>{$msg}<br />" . $xBtn->getRegresar() . "</p>"; } } ?> </body> <script >
/** * Muestra una Ficha Informativa segun tipo pedido * @deprecated v 1.9.42 rev 38 */ function minificha($orden = 1, $filtro, $table, $showimage = "false", $ret = "false") { if (!isset($orden)) { $exoFicha = "----------------NADA QUE MOSTRAR----------"; } //FICHA DE SOLICITUD if ($orden == 2) { $cF = new cFicha(iDE_CREDITO, $filtro); $cF->setTableWidth(); $exoFicha = $cF->show(true); // FICHA GRUPO SOLIDARIO } elseif ($orden == 3) { $cF = new cFicha(iDE_GRUPO, $filtro); $cF->setTableWidth(); $exoFicha = $cF->show(true); //FICHA GARANTIA DE CREDITO } elseif ($orden == 4) { $cF = new cFicha(iDE_GARANTIA, $filtro); $cF->setTableWidth(); $exoFicha = $cF->show(true); //CUENTAS DE CAPTACION } elseif ($orden == 5) { $cF = new cFicha(iDE_CAPTACION, $filtro); $cF->setTableWidth(); $exoFicha = $cF->show(true); //FICHA DE RECIBO } elseif ($orden == 6) { $cF = new cFicha(iDE_RECIBO, $filtro); $cF->setTableWidth(); $exoFicha = $cF->show(true); //FICHA DE SOCIO } else { $cF = new cFicha(iDE_SOCIO, $filtro); $cF->setTableWidth(); $exoFicha = $cF->show(true); } if ($ret == "true") { return $exoFicha; } else { echo $exoFicha; } }