$credito = $xCred->getNumeroDeCredito();
        //Si es Automatizado
        $xCat = new cCreditosOtrosDatos();
        if ($tieneprops == true) {
            $xCred->setOtrosDatos($xCat->AML_CON_PROPIETARIO, "1");
        }
        if ($tieneprovs == true) {
            $xCred->setOtrosDatos($xCat->AML_CON_PROVEEDOR, "1");
        }
        if ($xCred->getTipoDeAutorizacion() == CREDITO_TIPO_AUTORIZACION_AUTOMATICA) {
            //$saldo_actual = $monto_autorizado;
            //TODO: Acabar con este modulo
            $xFRM->addToolbar($xBtn->getBasic($xHP->lang("Imprimir", "Orden de Desembolso"), "jsImprimirOrdenDeDesembolso()", "imprimir", "cmdprintdes", false));
        }
        //----------------------------------------------------------------------
        $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({$credito})", "imprimir", "cmdprintdes5", false));
        $xFRM->addToolbar($xBtn->getBasic("TR.GENERAR PLAN_DE_PAGOS", "var CGen=new CredGen();CGen.getFormaPlanPagos({$credito})", "reporte", "generar-plan", false));
    }
}
$msg .= $xSoc->getMessages();
$xFRM->addAviso($msg);
echo $xFRM->get();
?>
<script>
var xGen	= new Gen();
var CGen	= new CredGen();

var idcredito	= <?php 
$oficial = elusuario($iduser);
$credito = isset($_REQUEST["credito"]) ? $_REQUEST["credito"] : false;
echo $xHP->getHeader();
echo $xHP->setBodyinit("importHTML()");
?>
<style media="all">
	#idMvtosEsp, input[type=button], input[type=submit], .button, .boton, button, nav { display: none; }
	
</style>
<!-- -->
<?php 
echo getRawHeader();
if ($credito != false) {
    $xCred = new cCredito($credito);
    $xCred->init();
    echo $xCred->getFichaDeSocio();
    echo $xCred->getFicha();
}
echo "<div id=\"iPhantom\"></div>";
echo getRawFooter();
?>
</body>
<script  >
function importHTML(){
	var h	= (typeof opener.serializeHTML != "undefined" ) ? opener.serializeHTML : opener.document.body.innerHTML;
	
	document.getElementById("iPhantom").innerHTML = h;
	//document.getElementById("iPhantom").( opener.document.body.innerText);;
	iFrms = document.forms.length - 1;
	for(i=0; i<=iFrms; i++){
		document.forms[i].disabled = true;
     $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) {
             $oFrm->addToolbar($xBtn->getBasic("TR.EDICION_AVANZADA", "jsActualizarCreditoRAW()", "aviso", "edit-credito2", false));
             $oFrm->addToolbar($xBtn->getBasic("TESTING", "var xG=new Gen();xG.w({url:'../unit/core.creditos.test.php?credito={$idsolicitud}'})", "checar", "test-cred", false));
         }
         $oFrm->addCreditoComandos($idsolicitud);
         $oFrm->addToolbar($xBtn->getBasic("TR.ACTUALIZAR DATOS", "jsActualizarCredito()", "editar", "edit-credito", false));
         $oFrm->addToolbar($xBtn->getBasic("TR.IMPRIMIR PAGARE", "printpagare()", "dinero", "view-pagare", false));
         $oFrm->addToolbar($xBtn->getBasic("TR.IMPRIMIR formato NOTARIAL", "cedulanotario({$idsolicitud})", "reporte", "view-cedula", false));
         $oFrm->addToolbar($xBtn->getBasic("TR.ORDEN_DE_DESEMBOLSO", "printodes()", "imprimir", "print-order", false));
         $oFrm->addToolbar($xBtn->getBasic("TR.CONTRATO", "contratocredito()", "imprimir", "print-contrato", false));
         $oFrm->addToolbar($xBtn->getBasic("TR.IMPRIMIR RECIBO DE credito", "printrec()", "imprimir", "print-recP", false));
         $oFrm->addToolbar($xBtn->getBasic("TR.IMPRIMIR MANDATO", "printMandato()", "imprimir", "print-mandato", false));
         $oFrm->addToolbar($xBtn->getBasic("TR.ESTADO_DE_CUENTA", "getEstadoDeCuenta({$idsolicitud})", "statistics", "estado-cta", false));