function jsaGetLetras($idcredito)
{
$idcred = setNoMenorQueCero($idcredito);
$xF = new cFecha();
if ($idcred > DEFAULT_CREDITO) {
$xCred = new cCredito($idcred);
$xCred->init();
if ($xCred->getEsAfectable() == false or $xCred->getSaldoActual() <= 0) {
if (MODO_CORRECION == true) {
$xTxt = new cHText();
$xTxt->setDivClass("");
return $xTxt->getNumero("idparcialidad", $xCred->getPeriodoActual() + 1, "TR.Numero de Parcialidad");
} else {
return $xCred->getMessages();
}
} else {
if ($xCred->getPeriocidadDePago() == CREDITO_TIPO_PERIOCIDAD_FINAL_DE_PLAZO) {
//
$xTxt = new cHText();
$xTxt->setDivClass("");
return $xTxt->getNumero("idparcialidad", $xCred->getPeriodoActual() + 1, "TR.Numero de Parcialidad");
} else {
$plan = $xCred->getNumeroDePlanDePagos();
if ($plan != false) {
$xPlan = new cPlanDePagos($plan);
$xPlan->init();
$parcs = $xPlan->getParcsPendientes();
//$txt = "";
$arrD = array();
foreach ($parcs as $p) {
//setLog( $p[SYS_NUMERO]. " " . $xF->getFechaDDMM($p[SYS_FECHA]) . " ". getFMoney($p[SYS_TOTAL]));
if (setNoMenorQueCero($p[SYS_TOTAL]) > 0) {
$arrD[$p[SYS_NUMERO]] = $p[SYS_NUMERO] . " " . $xF->getFechaDDMM($p[SYS_FECHA]) . " " . getFMoney($p[SYS_TOTAL]);
}
}
$xSel = new cHSelect();
$xSel->addOptions($arrD);
$xSel->setEnclose(false);
return $xSel->get("idparcialidad", "TR.Numero de Parcialidad", $xCred->getPeriodoActual() + 1);
} else {
if (MODO_CORRECION == true) {
$xTxt = new cHText();
$xTxt->setDivClass("");
return $xTxt->getNumero("idparcialidad", $xCred->getPeriodoActual() + 1, "TR.Numero de Parcialidad");
}
}
}
}
}
}
$xFRM->addLog($msg);
}
}
$xTx3 = new cHText();
//$gssql= "SELECT * FROM socios_aeconomica_dependencias";
$cDE = $xSel->getListaDeEmpresas("iddependencia");
// new cSelect("iddependencia", "iddependencia", $gssql);
$cDE->addEvent("onchange", "jsGetDatosEmpresa");
$cDE->addEvent("onblur", "jsGetDatosEmpresa");
$cDE->setEsSql();
$cDE->setOptionSelect($empresa);
$xFRM->addHElem($cDE->get("TR.Empresa Relacionada", true));
$xFRM->addHElem($xTxt2->get("idrazonsocialtrabajo", $nombre_ae, "TR.Nombre_Comercial / razon_social"));
$xFRM->addHElem($xTxt6->getDeActividadEconomica("idactividad", $tipo_ae, "TR.Clave de Actividad"));
$xTxt->setClearEvents();
$xHSel->setEnclose(false);
$xHSel->addOptions(array("calle" => "Calle", "avenida" => "Avenida", "andador" => "Andador", "camino_rural" => "Camino Rural"));
$xTxtE->setDivClass("");
$xFRM->addDivSolo($xHSel->get("idtipoacceso", "TR.calle", $tipo_acceso), $xTxtE->getNormal("idnombreacceso", $calle), "tx14", "tx34");
$xFRM->OText("idnumeroexterior", $nexterior, "TR.Numero_Exterior");
$xFRM->addHElem($xTxt->getDeMoneda("idtelefono", "TR.Telefono", $telefono_ae));
$xFRM->addHElem($xTxt->getDeMoneda("idextension", "TR.Extension", ""));
$xCP = new cHText();
$xFRM->addHElem($xCP->getNumero("idcodigopostal", $xLoc->DomicilioCodigoPostal(), "TR.codigo_postal"));
$xFRM->addHElem($xTx3->getDeNombreDeColonia("idnombrecolonia", EACP_COLONIA, "TR.Colonia"));
$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) {
foreach ($Bdata as $clave => $valor) {
if (trim($valor) != "") {
if (strpos($valor, "@") !== false) {
$DD = explode("@", $valor);
$Cdata[$DD[0]] = strtoupper($DD[1]);
} else {
$Cdata[$valor] = strtoupper($valor);
}
}
}
$xHSel->addOptions($Cdata);
unset($Bdata);
} else {
$xHSel->setSQL($Boone->sql_select()->v());
}
$xHSel->setEnclose(true);
$xFRM->addHElem($xHSel->get($id, $titulo, $valor));
$proc = false;
}
if ($proc == true) {
//controles normales
if ($Boone->tipo()->v() == "date") {
$xHDate = new cHDate($Boone->order_index()->v());
$xHDate->setID($id);
$xFRM->addHElem($xHDate->get($titulo, $valor));
} else {
//moneda
switch ($equiva) {
case "float":
$xFRM->addHElem($xTxt->getDeMoneda($id, $titulo, $valor));
break;