$dias_solicitados = $numeropagos * $periocidad;
$fecha_vencimiento = $xFecha->setSumarDias($dias_solicitados, $fecha_ministracion);
}
$xConv = new cProductoDeCredito($tipoconvenio);
$xConv->init();
if (USE_OFICIAL_BY_PRODUCTO == true) {
$oficial_de_seguimiento = $xConv->getOficialDeSeguimiento();
}
if ($esrenovado == true) {
$TipoDeAutorizacion = CREDITO_AUTORIZACION_RENOVADO;
$msg .= "WARN\tCredito marcado como Renovado \r\n";
}
$xCred = new cCredito();
$result = $xCred->add($tipoconvenio, $persona, $contrato_corriente, $monto_solicitado, $periocidad, $numeropagos, $dias_solicitados, $rubro_destino, false, $grupo_asociado, $amp_destino, $observaciones, $oficial_de_credito, $fecha_solicitud, $tipo_de_pago, INTERES_POR_SALDO_INSOLUTO, false, $fecha_ministracion, $xSoc->getClaveDeEmpresa(), $TipoDeAutorizacion);
if ($result == false) {
$xFRM->addToolbar($xBtn->getRegresar("solicitud_de_credito.frm.php", true));
$xFRM->addAviso($xHP->lang(MSG_ERROR_SAVE));
$xFL = new cFileLog();
$xFL->setWrite($xCred->getMessages(OUT_TXT));
$xFL->setWrite($xSoc->getMessages());
$xFL->setClose();
$xFRM->addToolbar($xFL->getLinkDownload("Log de eventos", ""));
$xFRM->addAviso($xCred->getMessages());
} else {
$xCred->init();
$credito = $xCred->getNumeroDeCredito();
//Si es Automatizado
$xCat = new cCreditosOtrosDatos();
if ($tieneprops == true) {
$xCred->setOtrosDatos($xCat->AML_CON_PROPIETARIO, "1");
}
$xBtn = new cHButton("iact");
$oFRM = new cHForm("frmSubmit", "");
$oFRM->setElementByLine(2);
$oFRM->setTitle($xPage->getTitle() . " " . $xF->getFechaCorta());
echo $xPage->getHeader();
echo $xPage->setBodyinit();
$oFRM->addHTML("<a href=\"../utils/download.php?type=txt&download={$log}&file={$log}\" target=\"_blank\" class='button'>Descargar Archivo de EVENTOS DEL SISTEMA</a><br /><br />");
$log = getSucursal() . "-eventos-al-cierre-de-colocacion-del-dia-{$fechaop}";
$oFRM->addHTML("<a href=\"../utils/download.php?type=txt&download={$log}&file={$log}\" target=\"_blank\" class='button'>Descargar Archivo de EVENTOS de CIERRE DE COLOCACION</a><br /><br />");
if (MODULO_SEGUIMIENTO_ACTIVADO == true) {
$log = getSucursal() . "-eventos-al-cierre-de-seguimiento-del-dia-{$fechaop}";
$oFRM->addHTML("<a href=\"../utils/download.php?type=txt&download={$log}&file={$log}\" target=\"_blank\" class='button'>Descargar Archivo de EVENTOS de CIERRE DE SEGUIMIENTO</a><br /><br />");
}
if (MODULO_CONTABILIDAD_ACTIVADO == true) {
$log = getSucursal() . "-eventos-al-cierre-de-contabilidad-del-dia-{$fechaop}";
$oFRM->addHTML("<a href=\"../utils/download.php?type=txt&download={$log}&file={$log}\" target=\"_blank\" class='button'>Descargar Archivo de EVENTOS de CIERRE DE CONTABILIDAD</a><br /><br />");
}
if (MODULO_CAPTACION_ACTIVADO == true) {
$log = getSucursal() . "-eventos-al-cierre-de-captacion-del-dia-{$fechaop}";
$oFRM->addHTML("<a href=\"../utils/download.php?type=txt&download={$log}&file={$log}\" target=\"_blank\" class='button'>Descargar Archivo de EVENTOS de CIERRE DE CAPTACION</a><br /><br />");
}
if (MODULO_AML_ACTIVADO == true) {
$log = getSucursal() . "-eventos-al-cierre-de-riesgos-del-dia-{$fechaop}";
$oFRM->addHTML("<a href=\"../utils/download.php?type=txt&download={$log}&file={$log}\" target=\"_blank\" class='button'>Descargar Archivo de EVENTOS de CIERRE DE RIESGOS</a><br /><br />");
}
//Inicio
$oFRM->addFootElement($xBtn->getRegresar() . $xBtn->getSalir());
echo $oFRM->get();
$xPage->fin();
}
//}
$idsocio = getPersonaEnSession();
$oFrm->addCreditBasico();
$oFrm->addSubmit();
echo $oFrm->get();
//echo $xJs->get();
$idsolicitud = DEFAULT_CREDITO;
//exit( "<p class='aviso'>AGREGUE UN NUMERO DE SOLICITUD</p></body></html>");
} else {
$oFrm->OButton("TR.Recargar", "jsRecargar()", "refrescar", "refrescar");
//Tabs
$xHTabs = new cHTabs();
$xBtn = new cHButton("");
$xCred = new cCredito($idsolicitud);
if ($xCred->init() == false) {
$idsocio = getPersonaEnSession();
$oFrm->addToolbar($xBtn->getRegresar("../index.xul.php?p=frmcreditos/creditos.panel.frm.php", true));
$oFrm->addCreditBasico();
$oFrm->addSubmit();
$oFrm->addAviso($xCred->getMessages());
//echo $oFrm->get();
} else {
if (setNoMenorQueCero($idsocio) <= 0) {
$idsocio = $xCred->getClaveDePersona();
}
$xOPdto = $xCred->getOProductoDeCredito();
if ($idsocio != $xCred->getClaveDePersona()) {
$msg = "ERROR\tLa Persona {$idsocio} no es la propietaria del credito, el credito marca " . $xCred->getClaveDePersona() . "\r\n";
$oFrm->addToolbar($xBtn->getRegresar("../index.xul.php?p=frmcreditos/creditos.panel.frm.php", true));
$oFrm->addAviso($msg);
} else {
$oFrm->addHTML($xCred->getFichaDeSocio(true));
case 1:
$sqlset = "\n\t\t\t\t\tf_34023acbff254d34664f94c3e08d836e='{$contrasenna}',\n\t\t\t\t\tnombres = '{$nombrecompleto}',\n\t\t\t\t\tapellidopaterno = '{$apellidopaterno}',\n\t\t\t\t\tapellidomaterno = '{$apellidomaterno}',\n\t\t\t\t\tpuesto = '{$puesto}',\n\t\t\t\t\tf_f2cd801e90b78ef4dc673a4659c1482d = {$nivelacceso},\n\t\t\t\t\testatus = '{$estatus}',\n\t\t\t\t\tsucursal ='{$sucursal}',\n\t\t\t\t\tdate_expire ='{$FechaDeExpiracion}',\n\t\t\t\t\t`codigo_de_persona` = {$clavedepersona}\n\t\t\t\t\t";
$sqli = "UPDATE t_03f996214fba4a1d05a68b18fece8e71 SET {$sqlset}\n\t\t\t\t\t\t\t\t\t\tWHERE f_28fb96d57b21090705cfdf8bc3445d2a='{$nombreusuario}' ";
$inStat = my_query($sqli);
//exit($sqli);
if ($inStat["stat"] == false) {
$msg .= "ERROR\tERROR EN LA ACTUALIZACION DEL USUARIO; EL SISTEMA DEVOLVIO " . $inStat["error"] . "\r\n ";
} else {
$msg .= "SUCESS\tLA ACTUALIZACION DEL USUARIO SE HA EFECTUADO SATISFACTORIAMENTE\r\n";
}
break;
default:
$msg .= "ERROR\tNO HA ESTABLECIDO UNA ACCION\r\n";
break;
}
$oFRM->addToolbar($xBtn->getRegresar("", true));
$oFRM->addToolbar($xBtn->getSalir("", true));
$oFRM->addAviso($msg);
} else {
$oFRM->addAviso($msg);
}
echo $oFRM->get();
}
?>
<script >
jsWorkForm = document.frmAltaUsuarios;
function update_puesto() {
idopt = document.getElementById("idNivelAcceso").selectedIndex;
document.getElementById("idPuesto").value = document.getElementById("idNivelAcceso").options[idopt].text;
}
$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 >
function jsGetCuentas(){
getCuentasForPut();
}
function jsSetSaldoCuenta(){
jsGetSaldoCuenta();
}
function jsGetComprobanteDeTraspaso(){
var elUrl= "../rpt_formatos/frmrecibogeneral.php?recibo=<?php
echo $ReciboTrasp;
?>
$xhBtn = new cHButton();
$btns = "";
$defaultPago = OPERACION_PAGO_COMPLETO;
switch ($periocidad) {
case CREDITO_TIPO_PERIOCIDAD_FINAL_DE_PLAZO:
$oFrm->addToolbar($xhBtn->getBasic("TR.ABONO ORDINARIO", "jsGetPago('ao')", "dinero", "pc2", false));
$oFrm->addToolbar($xhBtn->getBasic("TR.PAGO COMPLETO", "jsGetPago('pc')", "dinero", "pc1", false));
break;
default:
$oFrm->addToolbar($xhBtn->getBasic("TR.LETRA COMPLETA", "jsGetPago('plc')", "dinero", "pc2", false));
$oFrm->addToolbar($xhBtn->getBasic("TR.LETRA VARIABLE", "jsGetPago('pli')", "dinero", "pc3", false));
$oFrm->addToolbar($xhBtn->getBasic("TR.PAGO COMPLETO", "jsGetPago('pc')", "dinero", "pc1", false));
$defaultPago = OPERACION_PAGO_LETRA_COMPLETA;
break;
}
$oFrm->addToolbar($xhBtn->getRegresar("../index.xul?p=frmcaja/frmcobrosdecreditos.php", true));
$oFrm->addToolbar($xhBtn->getBasic("TR.Recargar", "jsCargarFrame()", "refrescar", "idrefrescar", false));
if (MODO_DEBUG == true and $xCred->getTipoEnSistema() != CREDITO_PRODUCTO_NOMINA) {
$xLog = new cFileLog(false, true);
$xLog->setWrite($msg);
$xLog->setClose();
$oFrm->addToolbar($xLog->getLinkDownload("Log de descargas", ""));
}
$xSelP->addEvent("showInCommand()", "onblur");
$xTxt = new cHText("idobservaciones");
$html = "";
$oFrm->addFooterBar("<h3>FECHA DE PAGO : [" . $xF->getFechaDDMM($Fecha) . "] NUMERO DE PARCIALIDAD: [{$parcialidad}]</h3>");
$html .= $xCred->getFicha(false, "", false, true);
$xHCob->setEvents("onblur='jsGetPago()'");
$html .= $xHCob->get(false, "", "", false);
$html .= $xTxt->get("idobservaciones", "", "Observaciones");
$oficial_de_seguimiento = $iduser;
if (USE_OFICIAL_BY_PRODUCTO == true) {
$oficial_de_credito = $dconv["oficial_seguimiento"];
$oficial_de_seguimiento = $dconv["oficial_seguimiento"];
}
//----------------------------------------------------------------------
/* @param string $Observaciones
* @param integer $OficialDeCredito
* @param mixed $FechaDeSolicitud
* @param integer $TipoDePago
* @param integer $TipoDeCalculo
* @param float $TasaDeInteres*/
$xCred = new cCredito();
$result = $xCred->add($tipoconvenio, $socio, $contrato_corriente, $monto_solicitado, $periocidad, $numeropagos, $dias_solicitados, $rubro_destino, $solicitud, $grupo_asociado, $amp_destino, $observaciones, $oficial_de_credito, $fecha_solicitud, $tipo_de_pago, INTERES_POR_SALDO_INSOLUTO, false, $fecha_ministracion);
if ($result == false) {
$xFRM->addToolbar($xBtn->getRegresar("frmsolicitudcredito_v102.php", true));
$xFRM->addAviso($xHP->lang(MSG_ERROR_SAVE));
$xFL = new cFileLog();
$xFL->setWrite($xCred->getMessages(OUT_TXT));
$xFL->setClose();
$xFRM->addToolbar($xFL->getLinkDownload("Log de eventos", ""));
$xFRM->addAviso($xCred->getMessages(OUT_HTML));
} else {
$xCred->init();
$xFRM->addHTML($xCred->getFichaDeSocio());
$xFRM->addHTML($xCred->getFicha());
$xFRM->addCreditoComandos($xCred->getNumeroDeCredito());
$xFRM->addToolbar($xBtn->getBasic("TR.Autorizar credito", "var CGen=new CredGen();CGen.getFormaAutorizacion({$solicitud})", "imprimir", "cmdprintdes5", false));
$xFRM->addToolbar($xBtn->getBasic("TR.GENERAR PLAN_DE_PAGOS", "var CGen=new CredGen();CGen.getFormaPlanPagos({$solicitud})", "reporte", "generar-plan", false));
}
echo $xFRM->get();
$oRec->setFinalizarRecibo(true);
if (MODO_DEBUG == true) {
$msg .= $oRec->getMessages(OUT_TXT);
$msg .= $xCred->getMessages(OUT_TXT);
$xFL = new cFileLog(false, true);
$xFL->setWrite($msg);
$xFL->setClose();
if ($procesado != SYS_AUTOMATICO) {
$xFRM->addToolbar($xFL->getLinkDownload("TR.Archivo de sucesos", ""));
}
}
if ($procesado != SYS_AUTOMATICO) {
$xFRM->addHElem($oRec->getFicha(true));
$total_letras = convertirletras($total_recibo);
$xBtn = new cHButton("");
$xFRM->addToolbar($xBtn->getRegresar("./frmcobrosdecreditos.php", true));
$xFRM->addToolbar($xBtn->getBasic("TR.Imprimir Recibo", "printrec()", "imprimir", "cmdPrint", false));
$xFRM->addHTML("<table><tbody>{$tds}</tbody><tfoot><tr><th></th><th>TOTAL</th><th class='mny'>" . getFMoney($total_recibo) . "</th></tr><tr><th colspan=\"3\" class='warn'>{$total_letras}</th></tr></tfoot></table>");
echo $xFRM->get();
echo $oRec->getJsPrint(true);
?>
</body>
<script>
var Wo = new Gen();
function jsCloseRecibo(){ window.close(); }
function getEdoCtaCredito(){ Wo.w({url: "../rpt_edos_cuenta/rptestadocuentacredito.php?pb=" + mCredito}); }
</script>
</html>
<?php
} else {
$xho = new cHObject();
