$cuenta = parametro("cuenta", DEFAULT_CUENTA_CORRIENTE, MQL_INT);
$cuenta = parametro("idcuenta", $cuenta, MQL_INT);
$jscallback = parametro("callback");
$tiny = parametro("tiny");
$form = parametro("form");
$action = parametro("action", SYS_NINGUNO);
$xHP->init();
$xFRM = new cHForm("frm", "./");
//$xSoc = new cSocio($persona);
//if( $xSoc->init()== true){
$xAml = new cAMLPersonas($persona);
$xAml->init();
$ln = $xAml->getBuscarEnListaNegra();
//$xFRM->addHElem("<a href=\"" . $xAml->getReporteConsultaListaNegra() . "\">CDescargar</a>" );
$xFRM->OButton("TR.Descargar Consulta", "jsGetConsulta()", $xFRM->ic()->DESCARGAR);
$xFRM->addAviso($xAml->getMessages());
//}
$msg = "";
//$xFRM->addJsBasico();
//$xFRM->addCreditBasico();
//$xFRM->addSubmit();
echo $xFRM->get();
?>
<script>
var xURL = "<?php
echo $xAml->getReporteConsultaListaNegra();
?>
";
var xG = new Gen();
function jsGetConsulta(){
xG.w({ url : xURL });
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));
$oFrm->addHTML($xCred->getFicha(true, "", true));
$codigo_de_oficial = $xCred->getClaveDeOficialDeCredito();
if (MODO_DEBUG == true) {
}
if (MODO_DEBUG == true) {
$msg .= $xCta->getMessages();
$msg .= $xRec->getMessages();
$xFL = new cFileLog(false, true);
$xFL->setWrite($msg);
$xFL->setClose();
$xFRM->addToolbar($xFL->getLinkDownload("TR.Archivo de sucesos", ""));
}
$xFRM->addToolbar($xBtn->getBasic("TR. Imprimir recibo de deposito", "jsImprimirRecibo()", "imprimir", "idrec-dep", false));
} else {
$msg .= "ERROR\tLA CUENTA NO ES OPERATIVA EN LA FECHA {$Fecha}\r\n";
}
$xFRM->addToolbar($xBtn->getIrAlInicio(true));
}
$xFRM->addAviso($msg, "idmsg", true);
}
echo $xFRM->get();
?>
</body>
<script >
function jsPrintIDE() {
var elUrl= "../rpt_formatos/frmreciboretiro.php?recibo=<?php
echo $reciboIDE;
?>
";
jsGenericWindow(elUrl);
}
</script>
</html>
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();
}
$xPol->init();
$xFRM->addHElem($xPol->getFicha());
$comp = "<table class='mvtoscontables'><td class=\"cuenta\"><input type='text' id='idcuenta' onkeyup='jsKeyAction(event, this)' list='listadocuentas' placeholder='numero de cuenta' autocomplete='off' onfocus='this.select()' onblur='jsaGetNombreCuenta()' /></td>";
$comp .= "<th class=\"nombrecuenta\"><input type='text' id='idnombrecuenta' disabled /></td>";
$comp .= "<td class=\"cargos\"><input type='number' id='idcargo' value='0' onfocus='this.select()' onchange='setFMonto(this)' onfocus='setFMonto(this)' /></td>";
$comp .= "<td class=\"abonos\"><input type='number' id='idabono' value='0' onfocus='this.select()' onchange='setFMonto(this)' onfocus='setFMonto(this)' /></td>";
$comp .= "<td class=\"referencia\"><input type='text' id='idreferencia' onfocus='this.select()' /></td>";
$comp .= "<td class=\"concepto\"><input type='text' id='idconcepto' onfocus='this.select()' onblur='jsSaveMvto()' /></td></table>";
$xFRM->addDivSolo($comp, "", "tx34", "txt14", array(1 => array("id" => "idagregados")));
$xFRM->addDivSolo(" ", "", "tx34", "txt14", array(1 => array("id" => "idlistado")));
$xFRM->addCerrar();
$xFRM->addRefrescar("jsaGetListadoDeMovimientos()");
$xFRM->OButton("TR.Eliminar", "jsEliminarPoliza()", $xFRM->ic()->ELIMINAR);
$xFRM->OButton("TR.Imprimir", "jsImprimirPoliza()", "imprimir");
$xFRM->OButton("TR.Finalizar", "jsFinalizarPoliza()", "guardar");
$xFRM->addAviso($poliza);
$xFRM->addFootElement("<input type='hidden' id='idpoliza' value='{$poliza}' />");
$xFRM->addFootElement("<datalist id='listadocuentas'></datalist>");
echo $xFRM->get();
?>
<script>
var xCont = new ContGen();
var xG = new Gen();
function setFMonto(obj){
obj.select();
var oMod = null;
if(obj.id == "idcargo"){ oMod = $("#idabono"); } else { oMod = $("#idcargo"); }
if(obj.value > 0){ oMod.val(0); $("#idreferencia").focus(); }
}
function jsImprimirPoliza(){ var xCont = new ContGen(); xCont.ImprimirPoliza($("#idpoliza").val() );}
function jsSaveMvto(){
$xFRM->setFieldsetClass("fieldform frmpanel");
$xSel = new cHSelect();
$xTxt = new cHText();
$xTxt->setDivClass("");
$xTxt->addEvent("jsaHeredarDatos()", "onblur");
$xTxt2 = new cHText();
$xTxt2->setDivClass("");
$msg = "";
$xFRM->addGuardar("jsaGuardarDatos()");
$xFRM->OButton("TR.Panel", "jsGoPanel()", $xFRM->ic()->EJECUTAR);
$xFRM->addDivSolo($xTxt->getDeCuentaContable("idcuenta", "", false), $xTxt2->getNormal("idnombrecuenta", "", "TR.Nombre de la Cuenta"), "tx14", "tx34");
$xFRM->addDivSolo("<input type='text' id='idcuentasuperior' disabled='true' />", "<input type='text' id='idnombresuperior' disabled='true' />", "tx14", "tx34");
$xFRM->OText("idequivalencia", "", "TR.Equivalencia");
//$xFRM->addHElem( $xSel->getListaDeNivelesDeCuentasContables()->get(true) );
$xFRM->addHElem($xSel->getListaDeTiposDeCuentasContables()->get(true));
$xFRM->addHElem($xSel->getListaDeTiposDeCentrosDeCosto()->get(true));
$xFRM->OHidden("idoperacion", "0", "TR.operacion");
//0 = nuevo, 1 = Actualizar
$xFRM->OTextArea("idmsg3", "", "TR.Texto");
$xFRM->addAviso(" ");
echo $xFRM->get();
$jxc->drawJavaScript(false, true);
?>
<script>
function jsGoPanel(){
var idcuenta = $("#idcuenta").val();
var xC = new ContGen(); xC.goToPanel(idcuenta);
}
</script>
<?php
$xHP->fin();
$xFRM->addHElem("<p>EL Nombre de la Localidad es " . $xColonia->getNombreLocalidad() . "</p>");
$xFRM->addHElem("<p>EL Tipo de Asentamiento es " . $xColonia->getTipoDeAsentamiento() . "</p>");
//$xFRM->addHElem( "La $miFecha, Dias del Mes", $xF->getDiasDelMes() ));
$xFRM->addHElem("<p class='aviso'>Probando con el C.P. 24010 y la palabra ERRONEA caisa</p>");
$xFRM->addHElem("<p class='aviso'>El sistema debe devolver valor por defecto</p>");
$existentes = $xColonia->existe(24010, false, "caisa", true);
$xFRM->addHElem("<p>Existentes en Guadalupe " . $existentes);
$xFRM->addHElem("<p>EL Nombre de la Colonia es " . $xColonia->getNombre() . "</p>");
$xFRM->addHElem("<p>EL Nombre del Municipio es " . $xColonia->getNombreMunicipio() . "</p>");
$xFRM->addHElem("<p>EL Nombre del Estado es " . $xColonia->getNombreEstado() . "</p>");
$xFRM->addHElem("<p>EL Nombre de la Localidad es " . $xColonia->getNombreLocalidad() . "</p>");
$xFRM->addHElem("<p>EL Tipo de Asentamiento es " . $xColonia->getTipoDeAsentamiento() . "</p>");
$xFRM->addHElem("<hr />");
$xFRM->addHElem("<hr />");
//$xSoc->setInitDatosDeCredito();
$xFRM->addAviso("Total de creditos activo " . $xSoc->getTotalCreditosActivos());
$xFRM->addAviso("Total de Saldo de Creditos " . $xSoc->getTotalCreditosSaldo());
//$xFRM->addHElem( "La $miFecha, Dias del Mes", $xF->getDiasDelMes() ));
//iniciando Domicilio de persona
$xFRM->addHElem("<hr />");
$DDOM = $xSoc->getODomicilio();
if ($DDOM == null) {
} else {
$DEstado = $DDOM->getOEstado();
$xFRM->addHElem("<p>El Nombre es " . $DDOM->getEstado() . "</p>");
$xFRM->addHElem("<p>La clave SIC es " . $DDOM->getClaveDeEstadoEnSIC() . "</p>");
}
$xFRM->addHTML("<p class='aviso'>" . $xColonia->getMessages(OUT_HTML) . "</p>");
$xFRM->addHTML("<h3>DATOS FISCALES</h3>");
$xFRM->addHTML("<p class='aviso'>RFC evaluado : " . $xSoc->getRFC(true) . "</p>");
$xFRM->addHTML("<p class='aviso'>RFC evaluado/ret: " . $xSoc->getRFC(true, true) . "</p>");
$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");
}
if ($tieneprovs == true) {
if ($comando == SYS_DEFAULT) {
echo $xHP->getHeader(true);
echo $xHP->setBodyinit("initComponents()");
$jsVars = "";
$location = "{$frm}.php?t={$tabla}&f={$filtro}&enc={$encode}&cmd={$comando}";
$xTxt = new cHText();
$xBtn = new cHButton();
$original = "";
if ($tabla != "" and ($filtro != "" or $clave != null)) {
$xFRM = new cHForm($frm, $location, $frm, SYS_GET);
//$DFiltro = explode("=", $filtro);
$conTitulo = false;
$xData = new cSAFETabla($tabla);
$mObj = $xData->obj();
if ($mObj == null) {
$xFRM->addAviso(MSG_NO_PARAM_VALID);
$xFRM->addHTML("<script>var g = new Gen(); g.close(); </script>");
} else {
$filtro = $filtro == "" ? $mObj->getKey() . "=" . $clave . "" : $filtro;
$data = $mObj->query()->getRow(" {$filtro} ");
$Boone = new cGeneral_structure();
$datos = $Boone->query()->select()->exec(" `general_structure`.`tabla` ='{$tabla}' ", " `general_structure`.`order_index`, `general_structure`.`tipo`");
//$original = json_encode($datos);
$hidden = "";
//var_dump($datos);
foreach ($datos as $clave => $valores) {
$Boone->setData($valores);
$id = "_" . $Boone->campo()->v();
$valor = $data[$Boone->campo()->v()];
$titulo = $xLng->getT($Boone->titulo()->v());
$equiva = $xDBTip[strtoupper($Boone->tipo()->v())];
$xChk = new cHCheckBox();
$msg = "";
$xFRM->addJsBasico();
$xFRM->addCreditBasico();
$xFRM->addSubmit();
$xFRM->addHElem($xSel->getListaDeTiposDeMemoPersonas()->get(true));
$xFRM->addHElem($xChk->get("TR.Notificar", "idnotificar"));
$xFRM->OTextArea("idmemo", $mem, "TR.Texto del memo");
if ($persona > DEFAULT_SOCIO) {
$idgrupo = parametro("idgrupo", DEFAULT_GRUPO, MQL_INT);
$txtmemo = parametro("idmemo");
$tipomemo = parametro("idtipodememo");
$notificar = parametro("idnotificar", false, MQL_BOOL);
$fechamemo = fechasys();
if (trim($txtmemo) != "") {
$xSoc = new cSocio($persona);
$xSoc->init();
$xSoc->addMemo($tipomemo, $txtmemo, $credito, $fechamemo, $notificar, $notificar);
$xFRM->addAviso("EL REGISTRO SE HA HECHO SATISFACTORIAMENTE");
if (MODO_DEBUG == true) {
$xFRM->addLog($xSoc->getMessages());
}
}
}
//.-
echo $xFRM->get();
?>
</body>
</html>
$messages .= "ERROR\tSDO_MIN\tEL saldo de la Inversion({$saldo}) es menor a " . INVERSION_MONTO_MINIMO . ", la Inversion no se efectua\r\n";
//LLevar a cuenta Corriente
$mCorriente = $xSoc->getCuentaDeCaptacionPrimaria(CAPTACION_TIPO_VISTA);
if ($xTyp->getEvalNotNull(array($mCorriente)) == true) {
$messages .= "WARN\tSDO_MIN\tSe intenta el Traspaso a cuenta Corriente\r\n";
$messages .= $xCta->setTraspaso($mCorriente, CAPTACION_TIPO_VISTA);
}
}
} else {
$messages .= "WARN\tLa Inversion permanece Abierta\r\n";
}
$url_recibo_inversion = $xCta->getURLReciboInversion($recibo_de_reinversion);
if (MODO_DEBUG == true) {
$xFRM->addLog($messages . $xCta->getMessages());
}
$xFRM->addAviso($messages);
$xCta->init();
$xFRM->addHElem($xCta->getFicha(true, "", true));
$xFRM->addToolbar($xBtn->getBasic("TR.Imprimir constancia_de_inversion", "jsPrintReporto()", "imprimir", "idnim", false));
}
echo $xFRM->get();
$jxc->drawJavaScript(false, true);
?>
</body>
<script >
var mjrsF = "../clsfunctions.inc.php";
var mIForm = document.frminversiones;
var localDate = "<?php
echo fechasys();
?>
";
$xFRM->addHTML('<hr id="divavisos" /><div id="reports"></div><input type="hidden" id="idcredito" /><div id="cbzafutura"></div>');
$xFRM->addAviso("", "idmsg");
echo $xFRM->get();
?>
<div class="inv" id="irecibos">
<?php
$xFRM4 = new cHForm("idcobranza");
$xFRM4->addToolbar($xBTN4->getBasic("TR.Enviar Listado", "getReporteEnMail()", "email", "idverreporte", false));
$xFRM4->addHTML("<div id=\"personas-de-envio\"></div>");
$xFRM4->addHElem($txt->getEmail("idmail1", "", "TR.correo_electronico destinatario 1"));
$xFRM4->addHElem($txt->getEmail("idmail2", "", "TR.correo_electronico destinatario 2"));
$xFRM4->addHElem($txt->getEmail("idmail3", "", "TR.correo_electronico destinatario 3"));
$xFRM4->addHElem($txt->getEmail("idmail4", "", "TR.correo_electronico destinatario 4"));
$xFRM4->addHElem($txt->getEmail("idmail5", "", "TR.correo_electronico destinatario 5"));
$xFRM4->addAviso("");
echo $xFRM4->get();
?>
</div>
<!-- cambiar fecha de Ministracion -->
<div class="inv" id="frmac" style="min-height:12em;">
<?php
$frm = new cHForm("mfrm");
$xFM = new cHDate(4);
$xFM->setIsSelect();
$xBtn = new cHButton("idcmdready");
$frm->addHElem($xFM->get("Escriba la Nueva Fecha"));
$frm->addFootElement($xBtn->getEjecutar("jsSetCambiarFechaMinistracion()"));
echo $frm->get();
?>
$tds .= "<tr><th>600</th><td>" . $xLng->getT("TR.GASTOS DE COBRANZA") . "</td>\n\t\t<th><input type=\"text\" name=\"c-{$claveCbza}\" id=\"id-{$claveCbza}\" value=\"{$gastos_de_cobranza_calculado}\" class='mny' onchange=\"jsEval(this);\" /></th></tr>";
}
//Sql de especiales
$sqlEsp = "SELECT\n\t\t\t`eacp_config_bases_de_integracion_miembros`.`miembro`,\n\t\t\t`operaciones_tipos`.`descripcion_operacion`\n\n\t\tFROM\n\t\t\t`operaciones_tipos` `operaciones_tipos`\n\t\t\t\tINNER JOIN `eacp_config_bases_de_integracion_miembros`\n\t\t\t\t`eacp_config_bases_de_integracion_miembros`\n\t\t\t\tON `operaciones_tipos`.`idoperaciones_tipos` =\n\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`miembro`\n\t\tWHERE\n\t\t\t(`eacp_config_bases_de_integracion_miembros`.`codigo_de_base` = 1001)\n\t\t\tAND\n\t\t\t(`operaciones_tipos`.`estatus` = 1)\n\t\t\tAND (`eacp_config_bases_de_integracion_miembros`.`subclasificacion` = 1)\n\t\tORDER BY\n\t\t\t`eacp_config_bases_de_integracion_miembros`.`codigo_de_base`";
$cEsps = new cSelect("cMvtosEsp", "idMvtosEsp", $sqlEsp);
$cEsps->setOptionSelect(OPERACION_CLAVE_DE_CARGOS_VARIOS);
$cEsps->setEsSql();
$cEsps->addEvent("onblur", "addEspMvto");
$SEsp = $cEsps->show();
$xBtn = new cHButton();
$xFRM->addToolbar($xBtn->getBasic("Ajustar", "jsGetPagoAjustado()", "dinero", "idajust", false));
$xFRM->addToolbar($xBtn->getBasic("Sin Mora", "jsEliminarCargos()", "trabajo", "idsinmora", false));
$xFRM->addToolbar($xBtn->getBasic("Vista Previa", "showVistaPago()", "ver", "idprev", false));
$xFRM->addToolbar($xBtn->getBasic("Guardar Pago", "FormSucess()", "guardar", "idsave", false));
$xFRM->addFootElement("<table>\n\t<tbody id=\"tbCobros\">\t{$tds} </tbody>\n\t<tfoot>\n\t<tr>\n\t\t<td></td>\n\t\t<td colspan='2'>{$SEsp}</td></tr>\n \t<tr>\n \t\t<th><mark>Letra : {$parcialidad}</mark></th>\n \t\t<th>TOTAL</th>\n \t\t<th><input type=\"text\" name=\"ctotal\" id=\"idtotal\" value=\"{$total}\" class='mny' /></th>\n \t</tr>\n\t</tfoot>\n</table>");
$xFRM->addAviso("", "id_letras_de_numeros", false, "success");
if (MODO_DEBUG == true) {
$xLog->add($xCred->getMessages(OUT_TXT), $xLog->DEVELOPER);
$xFRM->addLog($xLog->getMessages());
}
$xFRM->addAviso($xLog->getMessages(), "sysmsg", false, "notice");
echo $xFRM->get();
echo $xHP->setBodyEnd();
$jxc->drawJavaScript(false, true);
//XXX: Verificar generación de IVA
?>
<script>
var Wo = new Gen();
var mMny = 0;
var goSucess = true;
var Frm = document.frmprocesarpago;
//Pagos de solo interes
if ($xCred->getPagosSinCapital() == true) {
$arrUpdate["ultimo_periodo_afectado"] = $ultima_parcialidad;
}
$xCred->setUpdate($arrUpdate);
// -------------------------------------------- Actualiza el Saldo del Recibo
$xCred->init();
$xFRM->addHTML($xCred->getFicha(true, "", false, true));
$xFRM->addHTML($xPlan->getFicha());
$sqlparc = "SELECT periodo_socio AS 'parcialidad', MAX(fecha_afectacion) AS 'fecha_de_pago', SUM((afectacion_real * valor_afectacion)) AS 'total_parcialidad',\n\t\t\t\t\t MAX(saldo_anterior) AS 'saldo_anterior_', MIN(saldo_actual) AS 'saldo_actual_' FROM operaciones_mvtos\n\t\t\t\tWHERE recibo_afectado={$idrecibo} GROUP BY periodo_socio ORDER BY periodo_socio";
$cTMvtos = new cTabla($sqlparc);
$cTMvtos->setWidth();
$xFRM->addHTML($cTMvtos->Show());
$urctr = $xCred->getPathDelContrato();
$urlsend = $DProducto->getPathPagare($solicitud);
$xFRM->addAviso("Dias Totales: {$dias_netos} -- Vence: {$fecha_de_vencimiento}");
$xFRM->addToolbar($xBtn->getBasic($xFRM->lang("imprimir", "plan de pagos"), "jsImprimirPlanPagos({$idrecibo})", "lista", "cm1", false));
$xFRM->addToolbar($xBtn->getBasic($xFRM->lang("imprimir", "orden de desembolso"), "jsImprimirOrdenDesembolso()", "lista", "cm2", false));
$xFRM->addToolbar($xBtn->getBasic($xFRM->lang(array("imprimir", "CONTRATO de", "credito")), "jsImprimirContrato()", "lista", "cm3", false));
$xFRM->addToolbar($xBtn->getBasic($xFRM->lang("imprimir", "recibo"), "jsImprimirReciboDePrestamo()", "lista", "cm4", false));
$xFRM->addToolbar($xBtn->getBasic($xFRM->lang("imprimir", "mandato"), "jsImprimirMandato()", "lista", "cm5", false));
$xFRM->addToolbar($xBtn->getBasic($xFRM->lang("imprimir", "pagare"), "jsImprimirPagare()", "lista", "cm6", false));
$xFRM->addHElem("<div class='tx4'><label for='idNoAvales'>No Mostrar Avales</label><input name=\"noAvales\" id=\"idNoAvales\" type=\"checkbox\" onchange=\"setNoAvales()\" /></div>");
}
//Graba los Mensages del LOG y cierra el Archivo
$msg .= $xPlan->getMessages();
$msg .= $msgM;
$msg .= $msgC;
$msg .= $msgPIE;
if (MODO_DEBUG == true) {
$xLog->setWrite($msg);
$xUL2 = new cHUl();
$sysinfo = $xUL->li("Base de Datos:" . MY_DB_IN)->li("Servidor: " . WORK_HOST)->li("Sucursal: " . getSucursal())->li("Version S.A.F.E.: " . SAFE_VERSION)->li("Revision S.A.F.E: " . SAFE_REVISION)->li("Path Temporal: " . PATH_TMP)->li("Path Backups: " . PATH_BACKUPS)->li("Fecha del Sistema: " . date("Y-m-d H:i:s"))->li("Usuario Activo: " . $xUsr->getNombreCompleto())->li("ID de Usuario: " . $xUsr->getID())->li("Nivel de Usuario: " . $xUsr->getNivel())->li("SAFE DB version : " . SAFE_DB_VERSION)->end();
$sysinfo2 = $xUL2->li("Caja Local : " . $xLoc->getCajaLocal())->li("Localidad : " . $xLoc->DomicilioLocalidad())->li("Clave Localidad : " . $xLoc->DomicilioLocalidadClave())->li("Municipio : " . $xLoc->DomicilioMunicipio())->li("Estado : " . $xLoc->DomicilioEstado())->li("Clave Estado : " . $xLoc->DomicilioEstadoClaveABC())->li("C.P. : " . $xLoc->DomicilioCodigoPostal())->end();
$xFRM->addSeccion("idmaslogs", "TR.Sistema");
$xFRM->addDivSolo($sysinfo, $sysinfo2, "tx24", "tx24");
$xFRM->endSeccion();
}
if (getUsuarioActual(SYS_USER_NIVEL) == USUARIO_TIPO_CAJERO) {
$xNot = new cHNotif();
$xCaja = new cCaja();
if ($xCaja->getEstatus() == TESORERIA_CAJA_CERRADA) {
$xNot->get("", "idestadocaja", $xNot->ERROR);
} else {
}
}
$xFRM->addAviso("", "idavisos");
$xFRM->OHidden("id-KeyEditable", "", "");
//$xFRM->addHTML($menu);
echo $xFRM->get();
$jxc->drawJavaScript(false, true);
?>
</body>
<script>
$(document).ready( function(){
$('#idDateValue').pickadate({format: 'dd-mm-yyyy',formatSubmit:'yyyy-mm-dd'});
});
function jsGetPanelRecibo(id){ var xR = new RecGen(); xR.panel(id); }
function jsGetInformes(){
$xCat = new cPersonasCatalogoOtrosDatos();
//AGREGAR PEP
if ($espep == true and setNoMenorQueCero($persona) > 0) {
$xSoc->addOtrosParametros($xCat->AML_PEP_PRINCIPAL, "1");
}
if ($esextranjero == true and setNoMenorQueCero($persona) > 0) {
$xSoc->addOtrosParametros($xCat->PERSONAS_ES_EXTRANJERO, "1");
}
//agregar Relacion
if (MODO_DEBUG == true) {
$msg .= $xSoc->getMessages();
}
} else {
$xFRM->addCerrar();
}
$xFRM->addAviso($msg);
$xFRM->addJQDates("");
echo $xFRM->get();
//--------------------------------- ACTUALIZA EL ULTIMO SOCIO EN LA CAJA LOCAL
?>
<link href="../css/jtable/lightcolor/orange/jtable.min.css" rel="stylesheet" type="text/css" />
<script src="../js/jtable/jquery-ui-1.8.16.custom.min.js" type="text/javascript"></script>
<script src="../js/jtable/jquery.jtable.js" type="text/javascript"></script>
<script>
var xPer = new PersGen();
$(document).ready(function () {
var idxpersona = "<?php
echo setNoMenorQueCero($persona);
?>
//Insertar Nuevo Registro
$socio = $persona;
$solicitud = $credito;
$oficial = $_SESSION["SN_b80bb7740288fda1f201890375a60c8f"];
$fecha = $cH->getFechaISO($_POST["idfecha-0"]);
$hora = $_POST["idhora"];
$compromiso = $_POST["idtipocompromiso"];
$anotacion = $_POST["idnotas"];
//Valores Pre-establecidos
$eacp = EACP_CLAVE;
$sucursal = getSucursal();
$estatus = "pendiente";
//$xSeg = new cSe
$sqlIC = "INSERT INTO seguimiento_compromisos(socio_comprometido, oficial_de_seguimiento, fecha_vencimiento, hora_vencimiento, tipo_compromiso, anotacion, credito_comprometido, estatus_compromiso, sucursal, eacp)\n \t\t\tVALUES({$socio}, {$iduser}, '{$fecha}', '{$hora}', '{$compromiso}', '{$anotacion}', {$solicitud}, '{$estatus}', '{$sucursal}', '{$eacp}')";
$ms = my_query($sqlIC);
if ($ms["stat"] != false) {
$xFRM->addAviso("Se Agrego un compromiso para el socio num {$socio} por el Credito {$solicitud} el dia {$fecha}");
}
}
//Imprimir la Tabla de compromisos para hoy
$sql = $xQL->getListadoDeCompromisosSimple("", "", getUsuarioActual());
//echo $sqlTComp;
$cTbl = new cTabla($sql);
$cTbl->setWidth();
$cTbl->setKeyField("idseguimiento_compromisos");
$cTbl->addTool(1);
$cTbl->addTool(2);
$xFRM->addHTML($cTbl->Show());
echo $xFRM->get();
echo $cTbl->getJSActions(true);
echo $xP->fin();
$comopago = isset($_POST["ctipo_pago"]) ? $xT->cChar($_POST["ctipo_pago"]) : DEFAULT_TIPO_PAGO;
$foliofiscal = isset($_POST["foliofiscal"]) ? $xT->cChar($_POST["foliofiscal"]) : DEFAULT_RECIBO_FISCAL;
if (setNoMenorQueCero($idsocio) <= 0) {
//header("location: frmcobrodemultas.php?msg=FALTAN_DATOS");
$xFRM->addAvisoRegistroError();
} else {
if (setNoMenorQueCero($monto) <= 0) {
$xFRM->addAvisoRegistroError();
} else {
$iddocto = DEFAULT_CREDITO;
$xRec = new cReciboDeOperacion(RECIBOS_TIPO_TERCEROS, false, false);
$xRec->setGenerarBancos();
$xRec->setGenerarPoliza();
$xRec->setGenerarTesoreria();
$idrecibo = $xRec->setNuevoRecibo($idsocio, $iddocto, $fecha, 1, RECIBOS_TIPO_TERCEROS, $observaciones, $cheque, $comopago, $foliofiscal);
$xRec->setNuevoMvto($fecha, $monto, OPERACION_CLAVE_MULTAS, 1, $observaciones, 1, TM_ABONO, $idsocio);
$xRec->addMvtoContableByTipoDePago($monto, TM_CARGO);
$xRec->setFinalizarRecibo(true);
$xFRM->addHTML($xRec->getFichaSocio());
$xFRM->addHTML($xRec->getFicha());
$xFRM->addPrintRecibo();
$xFRM->addHTML($xRec->getJsPrint(true));
$xFRM->addAvisoRegistroOK();
if (MODO_DEBUG == true) {
$xFRM->addAviso($xRec->getMessages());
}
}
}
}
echo $xFRM->get();
$xHP->fin();
$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;
}
function posAction(){
setTimeout("evaluateAction()", 500);
$xFRM->addHTML("<textarea class=\"ckeditor\" name=\"ckeditor\" id=\"ckeditor\" rows=\"20\" cols=\"15\">{$text_default}</textarea>");
$xFRM->addFootElement("<input type='hidden' value='{$idcontrato}' name='idcontrato' />");
$xFRM->setAction("frmeditor_contratos.php?action=2");
} elseif ($action == SYS_DOS) {
//guardar
$s = isset($_REQUEST["ckeditor"]) ? $_REQUEST["ckeditor"] : "";
$i = parametro("idcontrato");
$text_default = stripslashes($s);
if ($s != "" && $i != "") {
$sqluc = "UPDATE general_contratos SET texto_del_contrato='{$s}' WHERE idgeneral_contratos={$i}";
$x = my_query($sqluc);
if ($x[SYS_ESTADO] != false) {
//$xFRM->addSubmit("", "", "");echo $text_default;
$xFRM->addSubmit("", "getForma({$i})");
} else {
$xFRM->addAviso("SURGIO UN PROBLEMA AL GUARDAR");
}
} else {
$xFRM->addAviso("FALTAN PARAMETROS");
}
}
echo $xFRM->get();
//echo "$datos_del_contrato[4] en contrato $idcontrato";
$jxc->drawJavaScript(false, true);
?>
</body>
<script>
var xG = new Gen();
function jsAddText(){
var txt = document.getElementById("idvariables").value;
//Modificar
//iniciar
$clave = parametro($xTabla->getKey(), null, MQL_INT);
if ($clave != null) {
$xTabla->setData($xTabla->query()->initByID($clave));
$xTabla->setData($_REQUEST);
$xTabla->query()->update()->save($clave);
$xFRM->addAvisoRegistroOK();
}
}
}
$xHP->init();
$msg = "";
$xAlert = new cAMLAlertas($codigo);
$xAlert->init();
$xFRM->addAviso($xAlert->getDescripcion());
$xFRM->OTextArea("razones_de_reporte", $xTabla->razones_de_reporte()->v(), "TR.AML_TEXTO_A");
$xFRM->OTextArea("acciones_tomadas", $xTabla->acciones_tomadas()->v(), "TR.AML_TEXTO_B");
$xFRM->OTextArea("notas_de_checking", $xTabla->notas_de_checking()->v(), "TR.Observaciones de la operacion");
$xFRM->OHidden("clave_de_riesgo", $xTabla->clave_de_riesgo()->v(), "");
$xFRM->OHidden("fecha_de_checking", $xF->getInt(), "");
echo $xFRM->get();
?>
<script>
var xG = new Gen();
//function jsDescartaRiesgo(){ xG.confirmar({ msg : "Desea Descartar la Alerta como Riesgo?", callback : "jsaDescartaRiesgo()", evaluador : jsRazonNoVacia(), alert : "La observacion no puede quedar vacia"}); }
//function jsConfirmaRiesgo(){ xG.confirmar({ msg : "Desea Confirmar la Alerta como Riesgo?", callback : "jsaConfirmaRiesgo()", evaluador : jsRazonNoVacia(), alert : "La observacion no puede quedar vacia" }); }
function jsRazonNoVacia(){
var valid = new ValidGen();
return valid.NoVacio( $("#notas_de_checking").val() );
}
$persona = parametro("socio", $persona, MQL_INT);
$persona = parametro("idsocio", $persona, MQL_INT);
$credito = parametro("credito", DEFAULT_CREDITO, MQL_INT);
$credito = parametro("idsolicitud", $credito, MQL_INT);
$credito = parametro("solicitud", $credito, MQL_INT);
$cuenta = parametro("cuenta", DEFAULT_CUENTA_CORRIENTE, MQL_INT);
$cuenta = parametro("idcuenta", $cuenta, MQL_INT);
$jscallback = parametro("callback");
$tiny = parametro("tiny");
$form = parametro("form");
$action = parametro("action", SYS_NINGUNO);
$xHP->init();
$xFRM = new cHForm("frm", "./");
$msg = "";
$xCta = new cCuentaContableEsquema("102010101");
$xFRM->addAviso($xCta->CUENTA_FORMATEADA);
$xFRM->addAviso($xCta->CUENTA);
$xFRM->addAviso($xCta->NIVEL_ACTUAL);
$xFRM->addAviso($xCta->CUENTARAW);
$xFRM->addAviso($xCta->SUPERIORES[1]);
$xFRM->addAviso($xCta->SUPERIORES[2]);
$xFRM->addAviso($xCta->SUPERIORES[3]);
$xFRM->addAviso($xCta->SUPERIORES[4]);
$xCta = new cCuentaContableEsquema("1-02-0000000");
$xFRM->addAviso($xCta->CUENTA_FORMATEADA);
$xFRM->addAviso($xCta->CUENTA);
$xFRM->addAviso($xCta->NIVEL_ACTUAL);
$xFRM->addAviso($xCta->CUENTARAW);
$xFRM->addSubmit();
echo $xFRM->get();
//$jxc ->drawJavaScript(false, true);
$xFRM->addHElem($xSel->getListaDePaises()->get(true));
$xFRM->addHElem($xSel->getListaDeEntidadesFed("", true)->get(true));
$xFRM->addHElem("<div class='tx4' id='txtmunicipio'></div>");
$xFRM->addHElem("<div class='tx4' id='txtlocalidad'></div>");
$xTxt->setClearProperties();
if ($asalariado == true) {
$xFRM->OText("idpuesto", $puesto, "TR.Cargo");
$xFRM->OText("iddepartamento", $departamento_ae, "TR. Departamento");
$xFRM->OText("idnumeroempleado", $numero_empleado, "TR.Clave de Empleado");
$xFRM->OText("idnss", $nss, "TR.ID_DE_SEGURIDADSOCIAL");
} else {
}
$xFRM->addHElem($xSel->getListaDeTiempo("idantiguedad")->get("TR.Tiempo en el Puesto", true));
$xFRM->addHElem($xTxt->getDeMoneda("idsalario", "TR.Ingreso Mensual", $montoper_ae));
$xFRM->OHidden("idsociorelacionado", $persona);
$xFRM->addAviso("", "msg");
$xFRM->addSubmit("", "frmSubmit(true)");
$xFRM->OButton("TR.Importar de Asociada", "jsaImportarDeAsociada", "importar");
echo $xFRM->get();
$jsb->show();
$jxc->drawJavaScript(false, true, $estado);
?>
<script>
var tform = document.frmaeconomica;
var mSocio = <?php
echo $persona;
?>
;
var nGen = new Gen();
function initComponents(){ $("#iddependencia").focus(); }
function jsGetDatosEmpresa(){
$jsb->setNameForm($xFRM->getName());
$selcat = $xSel->getListaDeTipoDeRiesgoEnAML();
$selcat->addEvent("onblur", "jsGetListadoAvisos()");
$selcat->addEvent("onchange", "jsGetListadoAvisos()");
$selcat->addEspOption(SYS_TODAS);
$selcat->setOptionSelect(SYS_TODAS);
$xFRM->OHidden("idfecha-1", "", "");
$xFRM->OHidden("idfecha-2", "", "");
//$xFRM->addHElem( $xDate->get( $xFRM->lang("fecha inicial"), $xF->getDiaInicial(), 1 ));
//$xFRM->addHElem( $xDate->get( $xFRM->lang("fecha final"), $xF->getDiaFinal(), 2 ));
$xFRM->addHElem($selcat->get(true));
$xFRM->addSubmit("", "jsGetListadoAvisos()");
$xFRM->OCheck("TR.Mostrar Inactivas", "idactivas");
//$xFRM->addCreditBasico();
$xFRM->addHTML("<div id='lstalertas'></div>");
$xFRM->addAviso("", "idmsg");
echo $xFRM->get();
echo $xHP->setBodyEnd();
$jsb->show();
$jxc->drawJavaScript(false, true);
?>
<!-- HTML content -->
<script>
var xG = new Gen();
function jsGetListadoAvisos(){
jsaGetListadoDeAvisos();
}
function jsModificarEstatus(id){
xG.w({ url : "estatus_de_alerta.frm.php?codigo=" +id , w: 800, h: 600, tiny : true, callback: jsGetListadoAvisos });
}
function jsCancelarAccion(){ $(window).qtip("hide"); }
}
}
//echo "<input type='button' name='btsend' value='IMPRIMIR/VER RECIBO DE DEPOSITO' onClick='jsImprimirRecibo();'>";
$xFRM->addToolbar($xBtn->getBasic("TR. Imprimir recibo de deposito", "jsImprimirRecibo()", "imprimir", "idrec-dep", false));
$xFRM->addToolbar($xBtn->getIrAlInicio(true));
if (MODO_DEBUG == true) {
$msg .= $xCta->getMessages();
$msg .= $xRec->getMessages();
$xFRM->addLog($msg);
}
$xFRM->addHTML($xRec->getJsPrint(true));
} else {
$msg .= "ERROR\tLa cuenta no existe\r\n";
}
}
$xFRM->addAviso($msg, "idmsg");
}
echo $xFRM->get();
?>
</body>
<script>
var xG = new Gen();
function jsPrintIDE() {
var elUrl= "../rpt_formatos/frmreciboretiro.php?recibo=<?php
echo $ReciboIDE;
?>
";
xG.w({ url: elUrl });
}
</script>