$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", "contabilidad_import-catalogo-otros.frm.php?action=" . MQL_TEST);
$xFil = new cHFile();
$xChk = new cHCheckBox();
$msg = "";
if ($action == SYS_NINGUNO) {
$xFRM->OFile("idarchivo");
$xFRM->addHElem($xChk->get("TR.Afectar Base de Datos", "idaplicar"));
$xFRM->OText("idcolcuenta", 1, "TR.Columna Cuenta");
$xFRM->OText("idcolnom", 2, "TR.Columna Nombre");
$xFRM->OText("idcolnat", 3, "TR.Columna Tipo");
//$xFRM->OTextArea("idmascara", "$esqueleto", "TR.Formato");
} else {
//
$doc1 = isset($_FILES["idarchivo"]) ? $_FILES["idarchivo"] : false;
$xFi = new cFileImporter();
$xT = new cTipos();
$colcuenta = parametro("idcolcuenta");
$colnombre = parametro("idcolnom");
$colnat = parametro("idcolnat");
$catImport = array();
$aplicar = parametro("idaplicar", false, MQL_BOOL);
$oficial = elusuario($iduser);
ini_set("max_execution_time", 600);
$action = isset($_GET["o"]) ? $_GET["o"] : "x";
echo $xHP->getHeader();
//$jxc ->drawJavaScript(false, true);
?>
<body>
<?php
//Si la Operacion es Configurar los Datos
if ($action == "x") {
$xFRM = new cHForm("frmSendFiles", "mae.prestamos.upload.frm.php?o=u");
$xHSel = new cHSelect();
//$xHFil = new cHFile()
$xFRM->setTitle("TR.ENVIAR ARCHIVO DE Creditos");
$xFRM->setEnc("multipart/form-data");
$xFRM->OFile("cFile1", "", "TR.Archivo");
$xFRM->addHElem($xHSel->getListaDeProductosDeCredito()->get(true));
$xFRM->addSubmit();
echo $xFRM->get();
} elseif ($action == "u") {
echo '<form name="frmConvs" method="POST" action="mae.prestamos.upload.frm.php?o=s">
<fieldset>
<legend>Mostrar Resultado de la Carga</legend> ';
$usrFiles = array();
$usrFiles[0] = $_FILES["cFile1"];
$msg = "";
$arrPeriodos = array("D" => 10, "Q" => 15, "C" => 14, "S" => 7, "M" => 30, "" => 30, "O" => 1, "F" => 360);
$prePath = PATH_BACKUPS;
$lim = 1;
//sizeof($usrFiles) -1;
for ($i = 0; $i <= $lim; $i++) {
$xSoc->init();
$ByType = $xSoc->getEsPersonaFisica() == true ? BASE_DOCTOS_PERSONAS_FISICAS : BASE_DOCTOS_PERSONAS_MORALES;
}
$xFRM = new cHForm("frmfirmas", "personas_documentos.frm.php?action=" . SYS_UNO . "&persona={$persona}");
$xFRM->setEnc("multipart/form-data");
$xFRM->setTitle($xHP->getTitle());
$xBtn = new cHButton();
$xTxt = new cHText();
$xTxt2 = new cHText();
$xTxtF = new cHText();
$xSel = new cHSelect();
$xImg = new cHImg();
if ($action == SYS_CERO) {
$xTxtF->setDivClass("");
//$xTxtF->setProperty("class", "")
$xFRM->OFile("idnuevoarchivo", "", "TR.Cargar Documento");
$xFRM->OText("iddocumento", "", "TR.Nombre del Archivo", true, $xImg->get24("common/search.png", " onclick='jsGetDocto()' "));
$xFRM->addHElem($xSel->getTiposDeDoctosPersonales("", $ByType)->get(true));
$xFRM->addHElem($xTxt2->getDeMoneda("idnumeropagina", "TR.Numero de Pagina"));
$xFRM->addObservaciones();
$xFRM->addSubmit();
} else {
$xFRM->addCerrar();
$doc1 = parametro("iddocumento", "", MQL_RAW);
$observaciones = isset($DDATA["idobservaciones"]) ? $DDATA["idobservaciones"] : "";
$tipodedocto = isset($DDATA["idtipodedocto"]) ? $DDATA["idtipodedocto"] : "";
$pagina = isset($DDATA["idnumeropagina"]) ? $DDATA["idnumeropagina"] : "";
$archivoenviado = isset($_FILES["idnuevoarchivo"]) ? $_FILES["idnuevoarchivo"] : null;
if (isset($_FILES["idnuevoarchivo"])) {
if (trim($_FILES["idnuevoarchivo"]["name"]) == "") {
$archivoenviado = null;
if (isset($keyFile[$pkey])) {
//$msg .= "OK\tEXISTE $pkey\r\n";
} else {
$rt = "";
//$msg .= "ERROR\tNO EXISTE $pkey\r\n";
foreach ($rec as $datos) {
$rt .= $datos . $delimiter;
}
$msg .= $rt . "\r\n";
}
//$keyFile[$pkey] = $pkey;
}
}
}
$xFRM = new cHForm("frm", "compare-sql.php?action=" . MQL_LOAD);
$xFRM->OTextArea("idsql", "SELECT `listado_de_ingresos`.`clave_empresa`, `listado_de_ingresos`.`empresa`, `listado_de_ingresos`.`codigo`, `listado_de_ingresos`.`nombre`, DATE_FORMAT(`listado_de_ingresos`.`fecha`, '%d-%m-%Y') AS `fecha`, SUM(`listado_de_ingresos`.`capital`) AS `capital`, SUM(`listado_de_ingresos`.`interes_normal`) AS `interes`, SUM(`listado_de_ingresos`.`interes_moratorio`) AS `moratorios`, SUM(`listado_de_ingresos`.`iva`) AS `iva`, SUM(`listado_de_ingresos`.`otros`) AS `otros` , ROUND(SUM(`capital`+ `interes_normal`+`interes_moratorio`+`iva`+`otros`),2) AS 'total', MAX(`listado_de_ingresos`.`parcialidad`) AS `parcialidad`, MAX(`listado_de_ingresos`.`periocidad`) AS `periocidad`, MAX(`listado_de_ingresos`.`banco`) AS `banco` , `listado_de_ingresos`.`tipo_de_pago` FROM `listado_de_ingresos` `listado_de_ingresos` \n WHERE (`listado_de_ingresos`.`fecha` >='2014-01-01') AND (`listado_de_ingresos`.`fecha` <='2014-01-31') \n GROUP BY `listado_de_ingresos`.`clave_empresa`, `listado_de_ingresos`.`codigo`, `listado_de_ingresos`.`fecha`, `listado_de_ingresos`.`banco` ORDER BY `listado_de_ingresos`.`fecha`, `listado_de_ingresos`.`clave_empresa`, `listado_de_ingresos`.`periocidad`, `listado_de_ingresos`.`nombre` ", "TR.SQL");
$xFRM->OText("idclave", "codigo,fecha,total", "TR.clave");
$xFRM->OText("idclave2", "3,5,11", "TR.Columnas");
$xFRM->OFile("idarchivo", "", "TR.Archivo");
$xFRM->OCheck("TR.Comparar SQL -> Archivo", "primerosql");
$xFRM->addSubmit();
//$xFRM->addAviso($msg);
if (MODO_DEBUG == true) {
$xLog = new cFileLog();
$xLog->setWrite($msg);
$xLog->setClose();
$xFRM->addToolbar($xLog->getLinkDownload("TR.Archivo del proceso", ""));
}
echo $xFRM->get();
//$jxc ->drawJavaScript(false, true);
$xHP->fin();
