}
} else {
if ($action == MQL_MOD) {
//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();
}
}
}
$xFRM->addSubmit();
$xFRM->OMoneda("idbancos_cuentas", $xTabla->idbancos_cuentas()->v(), "TR.clave_de_cuenta");
$xFRM->OText("descripcion_cuenta", $xTabla->descripcion_cuenta()->v(), "TR.descripcion cuenta");
$xFRM->ODate("fecha_de_apertura", $xTabla->fecha_de_apertura()->v(), "TR.fecha de registro");
//$xFRM->OHidden("sucursal", $xTabla->sucursal()->v(), "TR.sucursal");
$xFRM->addHElem($xSel->getListaDeSucursales("sucursal", $xTabla->sucursal()->v())->get(true));
$xFRM->OSelect("estatus_actual", $xTabla->estatus_actual()->v(), "TR.estatus actual", array("activo" => "ACTIVO", "baja" => "BAJA"));
$xFRM->OText("consecutivo_actual", $xTabla->consecutivo_actual()->v(), "TR.consecutivo actual");
$xFRM->OMoneda("saldo_actual", $xTabla->saldo_actual()->v(), "TR.saldo actual");
//$xTabla->entidad_bancaria()->v()
$xFRM->OText("codigo_contable", $xTabla->codigo_contable()->v(), "TR.codigo contable");
//$xFRM->OMoneda("entidad_bancaria", $xTabla->entidad_bancaria()->v(), "TR.entidad bancaria");
$xFRM->addHElem($xSel->getListadoDeBancos("entidad_bancaria", $xTabla->entidad_bancaria()->v())->get(true));
$xFRM->OSelect("tipo_de_cuenta", $xTabla->tipo_de_cuenta()->v(), "TR.tipo de cuenta", array("cheques" => "CHEQUES", "inversion" => "INVERSION"));
$xFRM->OHidden("eacp", EACP_CLAVE, "TR.eacp");
echo $xFRM->get();
//$jxc ->drawJavaScript(false, true);
if ($xSoc->getEsUsuario(true)) {
$oFrm->OButton("TR.Actualizar Usuario", "jsaActualizarUsuario()", $oFrm->ic()->EJECUTAR);
$oFrm->OHidden("idusuario", $xSoc->getOUsuario()->getID());
}
//Agregar convenios
$xTListaCreds = new cTabla($xql->getListadoDeCreditos($idsocio), 2);
$xTListaCreds->OButton("TR.Panel", "jsGoToPanelCredito(" . HP_REPLACE_ID . ")", $xTListaCreds->ODicIcons()->CONTROL);
$xHTabs->addTab("TR.Creditos", $xTListaCreds->Show());
//agregar cuenta de ahorro
$xTListaCapt = new cTabla($xql->getListadoDeCuentasDeCapt($idsocio));
$xHTabs->addTab("TR.Captacion", $xTListaCapt->Show());
//Actualizar Descuentos
$xDiv2 = new cHDiv("inv", "iddivdescuento");
$xFRM10 = new cHForm("frmdescuento");
$xFRM10->addSubmit("", "jsGuardarDescuento()", "jsCancelarAccion()");
$xFRM10->OMoneda("iddescuento", 0, "TR.Monto");
//======================================== AML
/*Validacion*/
if (MODO_DEBUG == true) {
$xHTabs->addTab("TR.Validacion", $xSoc->getValidacion(OUT_HTML));
}
$xDiv2->addHElem($xFRM10->get());
$oFrm->addHTML($xHTabs->get());
$oFrm->addHTML($xDiv2->get());
$oFrm->OHidden("idsocio", $idsocio);
$oFrm->OHidden("idmodificado", "");
$oFrm->OHidden("idcantidad", "0");
$oFrm->addFooterBar(" ");
echo $oFrm->get();
}
?>
if ($ODom != null) {
$xTabla->calle($ODom->getCalle());
$xTabla->codigo_postal($ODom->getCodigoPostal());
$xTabla->colonia($ODom->getColonia());
$xTabla->telefono($xSoc->getTelefonoPrincipal());
$xTabla->municipio($ODom->getMunicipio());
$xTabla->localidad($ODom->getClaveDeLocalidad());
$xTabla->estado($ODom->getEstado());
$xTabla->numero_exterior($ODom->getNumeroExterior());
$xTabla->numero_interior($ODom->getNumeroInterior());
}
$xTabla->query()->update()->save($clave);
$xFRM->addAvisoRegistroOK();
}
}
}
$msg = "";
//clave de sucursal
//$xFRM->addJsBasico();
$xFRM->addPersonaBasico("", false, $xTabla->clave_de_persona()->v(), "", "TR.Clave Vinculada");
$xFRM->OText("codigo_sucursal", $xTabla->codigo_sucursal()->v(), "TR.codigo sucursal");
$xFRM->OText("nombre_sucursal", $xTabla->nombre_sucursal()->v(), "TR.nombre sucursal");
$xFRM->OMoneda("clave_numerica", $xTabla->clave_numerica()->v(), "TR.clave numerica");
$xFRM->OMoneda("caja_local_residente", $xTabla->caja_local_residente()->v(), "TR.caja local residente");
$xFRM->addPersonaBasico("2", false, $xTabla->gerente_sucursal()->v(), "", "TR.gerente sucursal");
$xFRM->addPersonaBasico("3", false, $xTabla->titular_de_cumplimiento()->v(), "", "TR.Oficial de Cumplimiento");
$xFRM->OMoneda("hora_de_inicio_de_operaciones", $xTabla->hora_de_inicio_de_operaciones()->v(), "TR.hora de inicio de operaciones");
$xFRM->OMoneda("hora_de_fin_de_operaciones", $xTabla->hora_de_fin_de_operaciones()->v(), "TR.hora de fin de operaciones");
echo $xFRM->get();
//$jxc ->drawJavaScript(false, true);
$xHP->fin();
//$oFrm6->addHTML("<p class='aviso'></p>");
$oFrm6->addFootElement($oBtn->getBasic($lguardar, "jsaCambiarProducto();jsTipTimer()", "guardar", "idsapdto"));
$oFrm6->addFootElement($oBtn->getBasic($lcancelar, "jsCancelarAccion()", "cancelar", "idcancela6"));
echo $oFrm6->get();
?>
</div>
<!-- PERIOCIDAD DE PAGO -->
<div class="inv" id="divperiocidad">
<?php
$oFrm5 = new cHForm("frmperiocidad", "", "idfrmperiocidad");
$oFrm5->addHElem($xSelCP->get("idperiocidad", $xFRM->lang("Nueva", "Periocidad"), $xCred->getPeriocidadDePago()));
$oFrm5->addHElem($xSelTP->get("idtipopago", $xFRM->lang(array("Nuevo", "Tipo de", "Pago")), $xCred->getTipoDePago()));
$oFrm5->addHElem($oTxt->getDeMoneda("idpagos", $xFRM->lang("Numero de", "Pagos"), $xCred->getPagosAutorizados()));
$oFrm5->addHElem($oFch->get($xFRM->lang("Fecha de", "Vencimiento"), $xCred->getFechaDeVencimiento(), 2));
$oFrm5->OMoneda("idpagoactual", $xCred->getPeriodoActual(), "TR.Ultima Parcialidad");
$oFrm5->addHTML($oUL->li("Eliminar Plan de Pagos")->li("Reestructurar SDPM")->li("Recalcular Intereses Devengados")->li("Cambiar el Numero de Pagos")->li("Generar Movimiento de Fin de Mes")->end());
$oFrm5->addFootElement($oBtn->getBasic($lguardar, "jsaCambiarPeriocidad();jsTipTimer()", "guardar", "idmonto"));
$oFrm5->addFootElement($oBtn->getBasic($lcancelar, "jsCancelarAccion()", "cancelar", "idcancela"));
echo $oFrm5->get();
?>
</div>
<!-- ELIMINAR -->
<div class="inv" id="diveliminar">
<h3>Acciones</h3>
<ul>
<li>Eliminar Credito</li>
<li>Eliminar Operaciones</li>
<li>Eliminar Recibos</li>
<li>Eliminar Avales</li>
$xDoc->init();
$persona = $xDoc->getClaveDePersona();
$monto = $xDoc->getMontoAutorizado();
}
$xHP->init();
$xFRM = new cHForm("frm", "./");
$xHSel = new cHSelect();
$xChk = new cHCheckBox();
$xText = new cHText();
$msg = "";
$xFRM->addPersonaBasico();
$xFRM->addGuardar("jsVincularAval()");
$xFRM->addHElem($xChk->get("TR.es dependiente_economico", "dependiente"));
$xFRM->addHElem($xHSel->getListaDeTiposDeRelaciones("", PERSONAS_REL_CLASE_AVAL)->get(true));
$xFRM->addHElem($xHSel->getListaDeTiposDeParentesco()->get(true));
$xFRM->OMoneda("idmonto", $monto, "TR.Monto Avalado");
$xFRM->OHidden("iddocumentorelacionado", $credito, "");
$xFRM->OHidden("idpersonarelacionado", $persona, "");
$xFRM->addAviso("");
echo $xFRM->get();
$jxc->drawJavaScript(false, true);
?>
<script>
var xG = new Gen();
function jsVincularAval(){
jsaVincularAval();
setTimeout("jsClose()",2500);
}
function jsClose(){ xG.close(); }
</script>
<?php
//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();
}
}
}
$xSel1 = $xSel->getListaDeTipoDeRiesgoEnAML("tipo_de_riesgo");
$xSel1->setOptionSelect($xTabla->tipo_de_riesgo()->v());
$xSel2 = $xSel->getListaDeUnidadMedidaAML("unidad_de_medida");
$xSel2->setOptionSelect($xTabla->unidad_de_medida()->v(OUT_TXT));
$xSel3 = $xSel->getListaDeFormaReportaRiesgo("forma_de_reportar");
$xSel3->setOptionSelect($xTabla->forma_de_reportar()->v(OUT_TXT));
$xSel4 = $xSel->getListaDeFrecuenciaChequeoRiesgo("frecuencia_de_chequeo");
$xSel4->setOptionSelect($xTabla->frecuencia_de_chequeo()->v(OUT_TXT));
$xFRM->OMoneda("clave_de_control", $xTabla->clave_de_control()->v(), "TR.clave de control");
$xFRM->OText("descripcion", $xTabla->descripcion()->v(), "TR.descripcion");
$xFRM->addHElem($xSel1->get(true));
$xFRM->OMoneda("valor_ponderado", $xTabla->valor_ponderado()->v(), "TR.valor ponderado");
$xFRM->OMoneda("unidades_ponderadas", $xTabla->unidades_ponderadas()->v(), "TR.unidades ponderadas");
$xFRM->addHElem($xSel2->get(true));
$xFRM->addHElem($xSel3->get(true));
$xFRM->addHElem($xSel4->get(true));
$xFRM->OTextArea("fundamento_legal", $xTabla->fundamento_legal()->v(), "TR.fundamento legal");
echo $xFRM->get();
//$jxc ->drawJavaScript(false, true);
$xHP->fin();
$idrecibo = $xRec->setNuevoRecibo($persona, 1, $fecha_de_operacion, 1, 20, $observacion, $cheque, $comopago, $foliofiscal, DEFAULT_GRUPO);
$xRec->setNuevoMvto($fecha_de_operacion, $monto, 1001, 1, $observacion, 1, TM_ABONO);
//agregar Poliza
$xRec->addMvtoContableByTipoDePago();
//Finalizar recibo
$xRec->setFinalizarRecibo(true);
$xRec->init();
$xFRM->addHTML($xRec->getFichaSocio());
$xFRM->addHTML($xRec->getFicha(true));
$xFRM->addHTML($xRec->getJsPrint(true));
$xFRM->OButton("TR. Imprimir recibo", "jsImprimirRecibo()", "imprimir", "idrec-dep");
$xFRM->addCerrar();
if (MODO_DEBUG == true) {
$msg .= $xRec->getMessages();
$xFL = new cFileLog(false, true);
$xFL->setWrite($msg);
$xFL->setClose();
$xFRM->addToolbar($xFL->getLinkDownload("TR.Archivo de sucesos", ""));
}
} else {
$xFRM->addJsBasico();
$xFRM->addPersonaBasico();
$xFRM->addCobroBasico();
$xFRM->ODate("idfechadepago", "", "TR.Fecha de Pago");
$xFRM->OMoneda("idmonto", 0, "TR.Cuota", true);
$xFRM->addCerrar();
$xFRM->addGuardar();
}
echo $xFRM->get();
$jxc->drawJavaScript(false, true);
$xHP->fin();
$xFRM->addHElem($xTxt2->get("idapellidomaterno", "", "TR.segundo apellido"));
$xFRM->addHElem($xSel->getListaDeGeneros()->get("TR.genero", true));
$xFRM->addHElem($xSel->getListaDePaises("idpaisdeorigen")->get("TR.Pais de Origen", true));
if ($con_nacimiento == true) {
$xFRM->ODate("idfechanacimiento", false, "TR.fecha de Nacimiento");
$sEstados = $xSel->getListaDeEntidadesFed("identidadfederativanacimiento");
$xFRM->addHElem($sEstados->get("TR.entidad de nacimiento", true));
$xFRM->addHElem($xTxt->get("idlugardenacimiento", $xLoc->DomicilioMunicipio(), "TR.localidad de Nacimiento"));
} else {
$xFRM->OHidden("identidadfederativanacimiento", $xLoc->DomicilioEstadoClaveABC(), "");
$xFRM->OHidden("idlugardenacimiento", $xLoc->DomicilioMunicipio(), "");
$xFRM->OHidden("idfechanacimiento", "01-01-2001", "");
}
$xFRM->addHElem($xTxt->getEmail("idemail"));
$xFRM->addHElem($xTxt->getNumero("idtelefono", "", "TR.Telefono"));
$xFRM->OMoneda("iddependientes", 0, "TR.Dependientes_economicos");
if ($con_legal == true) {
$sCivil = $xSel->getListaDeEstadoCivil();
$xFRM->addHElem($sCivil->get("TR.estado civil", true));
$xFRM->addHElem($xSel->getListaDeRegimenMatrimonio()->get(true));
$xFRM->addHElem($xSel->getListaDeRegimenesFiscales("", PERSONAS_ES_FISICA)->get("TR.Regimen Fiscal", true));
$sFJ = $xSel->getListaDeTipoDeIdentificacion();
$xFRM->addHElem($sFJ->get(true));
$xFRM->OText("idnumerodocumento", "", "TR.Numero de Documento");
$xTCURP = new cHText();
$xTRFC = new cHText();
$xTCURP->setProperty("required", "true");
$xFRM->addHElem($xTCURP->get("idcurp", "", "TR.IDENTIFICACION_POBLACIONAL"));
$xFRM->addHElem($xTRFC->get("idrfc", DEFAULT_PERSONAS_RFC_GENERICO, "TR.IDENTIFICACION_FISCAL"));
if (EACP_CLAVE_DE_PAIS == "MX") {
if ($tipo_de_ingreso == TIPO_INGRESO_RELACION) {
$xBtn = new cHButton();
$xTxt = new cHText();
$xDate = new cHDate();
$xSel = new cHSelect();
$xFRM->addPersonaBasico();
$xFRM->ODate("idFechaDeSolicitud", false, "TR.Fecha de Solicitud");
$selPdto = $xSel->getListaDeProductosDeCredito();
$selPdto->addEvent("onchange", "jsaGetPerfilDeProducto()");
$selPdto->addEvent("onfocus", "jsaGetPerfilDeProducto()");
$xFRM->addHElem($selPdto->get("TR.producto de credito", true));
//$xFRM->addHElem($xTxt->getDeMoneda("idnuevocredito", "TR.clave_de_credito"));
$selFreq = $xSel->getListaDePeriocidadDePago();
$selFreq->addEvent("onblur", "jsSetFrecuenciaDePagos(this)");
$xFRM->addHElem($selFreq->get(true));
$xFRM->addHElem($xSel->getListaDeTipoDePago()->get(true));
$xFRM->OMoneda("idnumerodepagos", 1, "TR.Numero de pagos");
$xFRM->ODate("idFechaVencimiento", false, "TR.Fecha de Vencimiento");
$xFRM->ODate("idFechaMinistracion", false, "TR.Fecha de Ministracion");
$xFRM->addHElem($xTxt->getDeMoneda("idmonto", "TR.Monto Solicitado", 0, true));
if (MODULO_CAPTACION_ACTIVADO == true) {
$xFRM->addCuentaCaptacionBasico(false);
} else {
$xFRM->addHTML("<input type='hidden' value='" . DEFAULT_CUENTA_CORRIENTE . "' id='idcuenta' name='idcuenta' />");
}
$txt2 = new cHText();
$txt2->setDivClass("");
$xFRM->addDivSolo($xSel->getListaDeDestinosDeCredito()->get(false), $txt2->get("iddescripciondestino", false, "TR.Descripcion del Destino de los_recursos"), "tx14", "tx34");
$xFRM->addObservaciones();
//si es credito renovado
$xFRM->OCheck("TR.Es Credito Renovado", "idrenovado");
if (MODULO_AML_ACTIVADO == true) {
$xTabla->persona_relacionada($persona);
$xTabla->tercero_relacionado($tercero);
if ($action == MQL_ADD) {
$xTabla->query()->insert()->save();
} else {
$xTabla->query()->update()->save($clave);
}
$xFRM->addAvisoRegistroOK();
}
$xFRM->OHidden("clave_de_riesgo", $xTabla->clave_de_riesgo()->v(), "TR.clave de riesgo");
$xFRM->addHElem($xTxt->getDeSocio("0", false, $xTabla->persona_relacionada()->v(), "", "TR.persona"));
$xFRM->addHElem($xTxt->getDeSocio("1", false, $xTabla->tercero_relacionado()->v(), "", "TR.persona relacionada"));
//$xFRM->OMoneda("persona_relacionada"
//$xFRM->OMoneda("tercero_relacionado"
$xFRM->addHElem($xSel->getListaDeRiesgosAML("tipo_de_riesgo", "", $xTabla->tipo_de_riesgo()->v())->get(true));
$xFRM->OMoneda("documento_relacionado", $xTabla->documento_relacionado()->v(), "TR.documento relacionado");
$xFRM->addHElem($xSel->getListaDeObjetosEnSistema("tipo_de_documento", $xTabla->tipo_de_documento()->v())->get(true));
//$xFRM->OMoneda("tipo_de_documento", $xTabla->tipo_de_documento()->v(), "TR.tipo de documento");
$ti = $xSel->getListadoGenerico("aml_tipos_de_operacion", "tipo_de_operacion");
$ti->setOptionSelect($xTabla->tipo_de_operacion()->v());
$xFRM->addHElem($ti->get("TR.tipo de operacion", true));
$ti2 = $xSel->getListadoGenerico("aml_instrumentos_financieros", "instrumento_financiero");
$ti2->setOptionSelect($xTabla->instrumento_financiero()->v());
$xFRM->addHElem($ti2->get("TR.instrumento_financiero", true));
//$xFRM->OText("tipo_de_operacion", $xTabla->tipo_de_operacion()->v(), "TR.tipo de operacion");
//$xFRM->OMoneda("instrumento_financiero", $xTabla->instrumento_financiero()->v(), "TR.instrumento financiero");
$xFRM->OMoneda("monto_total_relacionado", $xTabla->monto_total_relacionado()->v(), "TR.monto total relacionado");
//$xFRM->OTextArea("notas_de_checking", $xTabla->notas_de_checking()->v(), "TR.notas de checking");
//$xFRM->OTextArea("mensajes_del_sistema", $xTabla->mensajes_del_sistema()->v(), "TR.mensajes del sistema");
//$xFRM->OMoneda("tipo_de_riesgo", $xTabla->tipo_de_riesgo()->v(), "TR.tipo de riesgo");
//$xFRM->OMoneda("fecha_de_envio", $xTabla->fecha_de_envio()->v(), "TR.fecha de envio");
$jxc = new TinyAjax();
function jsaSetClonarProducto($idclonado, $nuevoid, $nombre)
{
$xProducto = new cProductoDeCredito($idclonado);
$xProducto->add($nuevoid, $nombre, $idclonado);
return $xProducto->getMessages(OUT_HTML);
}
$jxc->exportFunction('jsaSetClonarProducto', array('idclonado', 'idnumero', 'iddescripcion'), "#fb_frm");
$jxc->process();
$producto = parametro("producto", null, MQL_INT);
$jscallback = parametro("callback");
$tiny = parametro("tiny");
$form = parametro("form");
$action = parametro("action", SYS_NINGUNO, MQL_RAW);
$opcion = parametro("tema", SYS_NINGUNO, MQL_RAW);
$xHP->init();
$xSel = new cHSelect();
$xFRM = new cHForm("frm", "./");
$xProd = new cCreditos_tipoconvenio();
$lastid = $xProd->query()->getLastID();
$xProd->setData($xProd->query()->initByID($producto));
$nombre = $xProd->descripcion_tipoconvenio()->v();
$xFRM->setTitle($xFRM->lang("duplicar") . " {$nombre}");
$xFRM->OMoneda("idnumero", $lastid, "TR.Codigo");
$xFRM->OText("iddescripcion", "", "TR.Nombre");
$xFRM->OHidden("idclonado", $producto);
$xFRM->addGuardar("jsaSetClonarProducto()");
$xFRM->addFooterBar(" ");
echo $xFRM->get();
$jxc->drawJavaScript(false, true);
$xHP->fin();
return $xCred->getMessages(OUT_HTML);
}
$jxc->exportFunction('jsaGuardarDatosBanco', array('idcredito', 'idbanco', 'idctabancaria', 'idctaclabe'), "#idmsgs");
$jxc->process();
$fecha = parametro("idfecha-0", false, MQL_DATE);
$fecha = parametro("idfechaactual", $fecha, MQL_DATE);
$persona = parametro("persona", DEFAULT_SOCIO, MQL_INT);
$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("frmdatosbanco", "./");
$xSel = new cHSelect();
$xFRM->addHElem($xSel->getListadoDeBancos("idbanco")->get("TR.Banco de transferencia", true));
$xFRM->OMoneda("idctabancaria", "", "TR.clave_de_cuenta de transferencia");
$xFRM->OMoneda("idctaclabe", "", "TR.Numero de CLABE");
$xFRM->addGuardar("jsaGuardarDatosBanco()");
$xFRM->OHidden("idcredito", $credito, "");
$xFRM->addAviso("");
$msg = "";
echo $xFRM->get();
$jxc->drawJavaScript(false, true);
$xHP->fin();
$xFRM->addHElem($xTxt->get("contable_intereses_devengados", $xTabla->contable_intereses_devengados()->v(), "TR.Cuenta de Balance para Interes Vigente devengado"));
$xFRM->addHElem($xTxt->get("contable_intereses_moratorios", $xTabla->contable_intereses_moratorios()->v(), "TR.Cuenta de Resultados para Abono en Intereses Moratorios Devengados"));
$xFRM->addHElem($xTxt->get("contable_intereses_vencidos", $xTabla->contable_intereses_vencidos()->v(), "TR.Cuenta de Balance para Interes Vencidos"));
$xFRM->addHElem($xTxt->get("interes_vigente_normal", $xTabla->interes_vigente_normal()->v(), "TR.Cuenta_de_Balance para Interes Vigente devengado"));
$xFRM->addHElem($xTxt->get("interes_vigente_reestructurado", $xTabla->interes_vigente_reestructurado()->v(), "TR.Cuenta de Balance para Interes Vigente Reestructurados"));
$xFRM->addHElem($xTxt->get("interes_vigente_renovado", $xTabla->interes_vigente_renovado()->v(), "TR.Cuenta de Balance para Interes Vigente Renovados"));
$xFRM->addHElem($xTxt->get("interes_vencido_normal", $xTabla->interes_vencido_normal()->v(), "TR.Cuenta de Balance para Interes Vencido devengado"));
$xFRM->addHElem($xTxt->get("interes_vencido_reestructurado", $xTabla->interes_vencido_reestructurado()->v(), "TR.Cuenta de Balance para Interes Vencido Reestructurado"));
$xFRM->addHElem($xTxt->get("interes_vencido_renovado", $xTabla->interes_vencido_renovado()->v(), "TR.Cuenta de Balance para Interes Vencido devengado"));
$xFRM->addHElem($xTxt->get("interes_cobrado", $xTabla->interes_cobrado()->v(), "TR.Cuenta de Ingresos por Intereses Normales Cobrados"));
$xFRM->addHElem($xTxt->get("moratorio_cobrado", $xTabla->moratorio_cobrado()->v(), "TR.Cuenta de Ingresos para Intereses Moratorios Cobrados"));
$xFRM->addHElem($xTxt->get("contable_cartera_castigada", $xTabla->contable_cartera_castigada()->v(), "TR.Cuenta_Contable para Capital de Cartera Castigada"));
$xFRM->addHElem($xTxt->get("contable_intereses_anticipados", $xTabla->contable_intereses_anticipados()->v(), "TR.Cuenta_Contable para Intereses Cobrado por Anticipado"));
break;
case "tasas":
$xFRM->OMoneda("interes_moratorio", $xTabla->interes_moratorio()->v(), "TR.Tasa anualizada de interes moratorio");
$xFRM->OMoneda("interes_normal", $xTabla->interes_normal()->v(), "TR.Tasa anualizada del interes normal");
$d34 = $ql->getArrayRecord("SELECT * FROM `creditos_tipo_de_calculo_de_interes`");
$xFRM->OSelect("base_de_calculo_de_interes", $xTabla->base_de_calculo_de_interes()->v(), "TR.base de calculo de interes", $d34);
$xFRM->OMoneda("porcentaje_ica", $xTabla->porcentaje_ica()->v(), "TR.porcentaje de tasa de Interes Cobrado por Anticipado");
$xFRM->OMoneda("porcentaje_otro_credito", $xTabla->porcentaje_otro_credito()->v(), "TR.porcentaje para obtener otro credito");
$xFRM->OMoneda("porciento_garantia_liquida", $xTabla->porciento_garantia_liquida()->v(), "TR.Porcentaje de deposito en garantia liquida");
$xFRM->OMoneda("tasa_ahorro", $xTabla->tasa_ahorro()->v(), "TR.Porcentaje de Ahorro condicionado sobre el Credito");
$xFRM->OMoneda("tasa_iva", $xTabla->tasa_iva()->v(), "TR.Tasa de Impuesto_al_Consumo");
$xFRM->OSelect("iva_incluido", $xTabla->iva_incluido()->v(), "TR.impuesto_al_consumo en la Tasa de Interes", $dSN);
break;
case "dias":
$xFRM->OMoneda("dias_maximo", $xTabla->dias_maximo()->v(), "TR.Numero de Dias Maximo de Plazo");
$xFRM->OMoneda("tolerancia_dias_no_pago", $xTabla->tolerancia_dias_no_pago()->v(), "TR.tolerancia de espera en dias por falta de pago");
$xFRM->OMoneda("tolerancia_dias_primer_abono", $xTabla->tolerancia_dias_primer_abono()->v(), "TR.tolerancia dias para el primer abono");
break;
//remote values
$msgs = isset($_GET[SYS_MSG]) ? isset($_GET[SYS_MSG]) : "RELLENE LOS DATOS SOLICITADO Y GUARDELO";
$dMonto = isset($_GET["mn"]) ? isset($_GET["mn"]) : 0;
$dSocio = isset($_GET["s"]) ? isset($_GET["s"]) : DEFAULT_SOCIO;
$dCon = isset($_GET["c"]) ? isset($_GET["c"]) : "";
if ($xCaja->getEstatus() == TESORERIA_CAJA_CERRADA) {
$xHP->goToPageError(200);
}
$xHP->init();
$xFRM = new cHForm("frmmultas", "frmcobrodemultas.php?action=" . MQL_ADD);
if ($action == SYS_NINGUNO) {
$xFRM->addPersonaBasico();
$xFRM->ODate("idfechaactual", false, "TR.Fecha de cobro");
$xFRM->addCobroBasico();
$xFRM->OText("idconceptomulta", "", "TR.Concepto de Multa");
$xFRM->OMoneda("idmontomulta", 0, "TR.Monto de Multa", true);
$xFRM->addGuardar();
} else {
$xT = new cTipos();
//===========================================================================
$idsocio = isset($_POST["idsocio"]) ? $xT->cInt($_POST["idsocio"]) : 0;
$observaciones = isset($_POST["idconceptomulta"]) ? $xT->cChar($_POST["idconceptomulta"]) : "";
$monto = isset($_POST["idmontomulta"]) ? $xT->cFloat($_POST["idmontomulta"]) : 0;
$cheque = isset($_POST["cheque"]) ? $xT->cChar($_POST["cheque"]) : DEFAULT_CHEQUE;
$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) {
echo $xP->setBodyinit();
//Crear formularios
$xFRM = new cHForm("frmTest", "./test.php");
$xHTxt = new cHText("");
$xHChk = new cHCheckBox();
$xFRM->setTitle("TR.Pruebas HTML");
//$xFRM->addHTML("<p>Esto es un parrafo de prueba</p>");
$xFRM->addHElem($xHChk->get("id1"));
$xFRM->addHElem($xHChk->get("id2"));
$xFRM->addHElem($xHChk->get("id3"));
$xFRM->addHElem($xHChk->get("id4"));
$xSoc = new cSocios_general();
$xSoc->setData($xSoc->query()->initByID(DEFAULT_SOCIO));
var_dump($xSoc->query()->getCampos());
//$xFRM->addAviso( $xSoc->query()->getListaDeCampos() );
$xFRM->OMoneda("ix", 4500, convertirletras("4,455.05"));
$xFRM->OMoneda("ix", 4500, convertirletras("4454.455.05"));
$xFRM->OMoneda("ix", 4500, convertirletras(45000));
//echo $xFRM->get();
$xTabla = new cCreditos_tipoconvenio();
$xFRM = new cHForm("frmcreditos_tipoconvenio", "creditos_tipoconvenio");
$xFRM->addSubmit();
$xEmp = new cEmpresas(100);
$xEmp->init();
if ($xEmp->getOPersona() == null) {
$xFRM->OText("idper", "SIN PERSONA", "TR.Persona");
} else {
$xPer = $xEmp->getOPersona()->init();
$xFRM->OText("idper", $xEmp->getOPersona()->getNombreCompleto(), "TR.Persona");
}
echo $xFRM->get();
$xFRM->addGuardar();
} else {
$xFRM->addSubmit();
}
$clave = parametro($xTabla->getKey(), null, MQL_INT);
if (($action == MQL_ADD or $action == MQL_MOD) and $clave != null) {
$xTabla->setData($xTabla->query()->initByID($clave));
$xTabla->setData($_REQUEST);
if ($action == MQL_ADD) {
$xTabla->query()->insert()->save();
} else {
$xTabla->query()->update()->save($clave);
}
$xFRM->addAvisoRegistroOK();
}
$xFRM->OMoneda("deuda_total", $xTabla->deuda_total()->v(), "TR.total");
$xFRM->OText("telefono_uno", $xTabla->telefono_uno()->v(), "TR.telefono 1");
$xFRM->OText("telefono_dos", $xTabla->telefono_dos()->v(), "TR.telefono 2");
$xFRM->OText("fecha_llamada", $xTabla->fecha_llamada()->v(), "TR.fecha");
$xFRM->OText("hora_llamada", $xTabla->hora_llamada()->v(), "TR.hora");
$xFRM->OTextArea("observaciones", $xTabla->observaciones()->v(), "TR.observaciones");
$xFRM->OSelect("estatus_llamada", $xTabla->estatus_llamada()->v(), "TR.estatus llamada", array("efectuado" => "EFECTUADO", "cancelado" => "CANCELADO", "pendiente" => "PENDIENTE", "vencido" => "VENCIDO"));
$xFRM->OMoneda("grupo_relacionado", $xTabla->grupo_relacionado()->v(), "TR.grupo relacionado");
$xFRM->OHidden("idseguimiento_llamadas", $xTabla->idseguimiento_llamadas()->v(), "TR.idseguimiento llamadas");
$xFRM->OHidden("numero_socio", $xTabla->numero_socio()->v(), "TR.numero socio");
$xFRM->OHidden("numero_solicitud", $xTabla->numero_solicitud()->v(), "TR.numero solicitud");
$xFRM->OHidden("oficial_a_cargo", $xTabla->oficial_a_cargo()->v(), "TR.oficial a cargo");
$xFRM->OHidden("sucursal", $xTabla->sucursal()->v(), "TR.sucursal");
$xFRM->OHidden("eacp", $xTabla->eacp()->v(), "TR.eacp");
} else {
$xFRM->addCreditBasico();
$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", "./");
$xSel = new cHSelect();
$xTxt = new cHText();
$msg = "";
//$xFRM->addJsBasico();
if ($persona > DEFAULT_SOCIO and $credito > DEFAULT_CREDITO) {
} else {
//$xFRM->addCreditBasico();
}
$xFRM->setFieldsetClass("fieldform frmpanel");
$xFRM->addSeccion("iddatoscred", "TR.Datos del Credito");
$xFRM->OMoneda("idcredito", 0, "TR.clave_de_credito");
$xFRM->OMoneda("idtasadeinteres", "0", "TR.Tasa de Interes");
$xFRM->OMoneda("idtasademora", "0", "TR.Tasa de Moratorio");
$xFRM->OMoneda("idsaldoinsoluto", "0", "TR.Saldo del Credito", true);
$xFRM->endSeccion();
$xFRM->addSeccion("iddatospago", "TR.Datos del Pago");
$xFRM->OMoneda("idbasedecalculo", "0", "TR.Monto del Pago", true);
$xFRM->addSubmit();
echo $xFRM->get();
//$jxc ->drawJavaScript(false, true);
$xHP->fin();
