$fecha_de_corte = $fecha_final;
$xT = new cTipos();
echo "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\n<DeclaracionInformativaMensualIDE denominacion=\"{$NombreEntidad}\" rfcDeclarante=\"{$RFC_Declarante}\" version=\"1.0\" xsi:noNamespaceSchemaLocation=\"ide_20080818.xsd\" xmlns:xsi=\"http://www.w3.org/2001/XMLSchema-instance\">\n\t<RepresentanteLegal rfc=\"{$RFC_Representante}\">\n\t\t<Nombre>\n\t\t\t<Nombres>{$RepNom}</Nombres>\n\t\t\t<PrimerApellido>{$RepAP}</PrimerApellido>\n\t\t\t</SegundoApellido>{$RepAM}</SegundoApellido>\n\t\t</Nombre>\n\t</RepresentanteLegal>\n\t<Normal ejercicio=\"{$ejercicio}\" periodo=\"{$periodo}\"/>\n\n\t<InstitucionDeCredito>\n";
echo "\n\t\t<ReporteDeRecaudacionYEnteroDiaria fechaDeCorte=\"{$fecha_de_corte}\">\n\t\t\t<RegistroDeDetalle>\n";
$sqlCaracter = "SELECT\n\t\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`codigo_de_base`,\n\t\t\t\t\t\t\t`operaciones_mvtos`.`socio_afectado`,\n\t\t\t\t\t\t\tSUM(`operaciones_mvtos`.`afectacion_real`) AS `monto`\n\t\t\t\t\t\tFROM\n\t\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`\n\t\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`\n\t\t\t\t\t\t\t\tINNER JOIN `operaciones_mvtos` `operaciones_mvtos`\n\t\t\t\t\t\t\t\tON `eacp_config_bases_de_integracion_miembros`.`miembro` =\n\t\t\t\t\t\t\t\t`operaciones_mvtos`.`tipo_operacion`\n\t\t\t\t\t\tWHERE\n\t\t\t\t\t\t\t(`eacp_config_bases_de_integracion_miembros`.`codigo_de_base` =7001)\n\t\t\t\t\t\t\tAND\n\t\t\t\t\t\t\t(\n\t\t\t\t\t\t\t\t(`operaciones_mvtos`.`fecha_operacion` >='{$fecha_inicial}')\n\t\t\t\t\t\t\tAND\n\t\t\t\t\t\t\t\t(`operaciones_mvtos`.`fecha_operacion` <='{$fecha_final}')\n\t\t\t\t\t\t\t)\n\t\t\t\t\t\tGROUP BY\n\t\t\t\t\t\t\t`operaciones_mvtos`.`socio_afectado`\n\t\t\t\t\t\tORDER BY\n\t\t\t\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`codigo_de_base` ";
$rsMSoc = mysql_query($sqlCaracter, cnnGeneral());
while ($rx = mysql_fetch_array($rsMSoc)) {
$socio = $rx["socio_afectado"];
$xSoc = new cSocio($socio);
$xSoc->init();
$DSoc = $xSoc->getDatosInArray();
$curp = $DSoc["curp"];
$rfc = $DSoc["rfc"];
$xT = new cImpuestoIDE();
$xTi = new cTipos();
$nombre = $xTi->setNoAcentos($xSoc->getNombreCompleto());
$domicilio = $xSoc->getDomicilio();
//Ide Individual a la fecha de Corte
$IDEPend = $xT->getIDENoPagado($socio, $fecha_final);
// $xT = new cImpuestoIDE();
// $xF = new cFecha(0, $fecha);
// $FechaAnterior = $xF->getFechaMesAnterior();
//$IDEPerA = $xSoc->getIDEPeriodoAnterior($fecha_final);//IDE Periodos anteriores
//Remanente de periodos anteriores se refiere a la suma de Remanentes en los Meses Anteriores
$RemPerA = 0;
$IDERet = $xSoc->getIDEPagadoByPeriodo($fecha_final);
$MontoGrav = $xSoc->getBaseGravadaIDE($fecha_final);
$IDECalc = $xSoc->getIDECalculado($fecha_final);
$totalExcedente += $MontoGrav;
$totalOperaciones++;
$totalPendiente += $IDEPend;
$xFi->setDataRow($rows);
$cuenta = $xFi->getV($colcuenta, "");
//$cuenta = $xT->cSerial($largo)
$xEQ = new cCuentaContableEsquema($cuenta);
//$xCW = new cCatalogoCompacW();
//echo $xEQ->CUENTA_FORMATEADA . "<br/>" . $xEQ->CUENTARAW ."<br />" . $xCW->getEquivalencia( $xFi->getV($tmp->NATURALEZA, "") ) . $xEQ->NIVEL_ACTUAL . "<hr />";
$cuenta = $xEQ->CUENTA_FORMATEADA;
$xCCont = new cCuentaContable($cuenta);
$nivel = $xCCont->determineNivel($cuenta);
$sucess = true;
$nombre = $xFi->getV($colnombre, "");
$nombre = trim($nombre);
$superior = $xEQ->CUENTA_SUPERIOR;
// $xCCont->getInmediatoSuperior();
$cuenta = $xCCont->getCuentaCompleta($cuenta);
$nombre = $xT->setNoAcentos($nombre);
$nombre = str_replace("'", "", $nombre);
$nombre = strtoupper($nombre);
$naturaleza = $xFi->getV($colnat, "");
if ($sucess == true and $action == MQL_ADD) {
if (setNoMenorQueCero($cuenta) > 0) {
$xCta = new cCuentaContable($cuenta);
$xCta->add($nombre, $naturaleza, false, false, $nivel, false, false, $superior);
$msg .= $xCta->getMessages(OUT_TXT);
}
}
} else {
//$msg .= "$conteo\t===============\r\n";
}
$conteo++;
}
echo $xFRM->get();
} else {
$doc1 = isset($_FILES["f1"]) ? $_FILES["f1"] : false;
$observaciones = isset($DDATA["idobservaciones"]) ? $DDATA["idobservaciones"] : "";
$xFil = new cFileImporter();
$xFil->setCharDelimiter("|");
//var_dump($_FILES["f1"]);
if ($xFil->processFile($doc1) == true) {
$data = $xFil->getData();
$linea = 0;
foreach ($data as $valores => $cont) {
//
if ($linea == 0) {
} else {
$idlocalidad = $cont[0];
$nombrelocal = $xT->setNoAcentos($cont[1]);
$estadolocal = $cont[2];
$paislocal = $cont[3];
$idestadoloc = $xT->cInt($cont[4]);
//cosulta de pais
$municipio = EACP_CLAVE_DE_MUNICIPIO;
$estado = EACP_CLAVE_DE_ENTIDADFED;
if (setNoMenorQueCero($idestadoloc) == 0) {
$D = obten_filas("SELECT * FROM general_estados WHERE nombre LIKE '%{$estadolocal}%' LIMIT 0,1");
if (isset($D["clave_numerica"])) {
$idestadoloc = $D["clave_numerica"];
}
}
//calcular pais
$D = obten_filas("SELECT * FROM `personas_domicilios_paises` WHERE `nombre_oficial` LIKE '%{$paislocal}%' LIMIT 0,1");
if (isset($D["clave_de_control"])) {
$observaciones = isset($DDATA["idobservaciones"]) ? $DDATA["idobservaciones"] : "";
$xFil = new cFileImporter();
$xFil->setCharDelimiter("|");
//var_dump($_FILES["f1"]);
if ($xFil->processFile($doc1) == true) {
$data = $xFil->getData();
$linea = 0;
foreach ($data as $valores => $cont) {
//
if ($linea == 0) {
} else {
//0clave_interna 1clave_de_actividad 2nombre_de_la_actividad
//3descripcion_detallada 4productos 5clasificacion 6clave_de_superior
//7nivel_de_riesgo 8califica_para_pep
$idactividad = $cont[0];
$nombre = $xT->setNoAcentos($cont[2]);
$claveuif = $xT->cSerial(7, $cont[1]);
$esPep = setNoMenorQueCero($cont[8]);
$riesgo = $xT->cInt($cont[7]);
$xAct = new cPersonas_actividad_economica_tipos();
//eliminar primero
$xAct->query()->setRawQuery("DELETE FROM personas_actividad_economica_tipos WHERE clave_interna={$idactividad}");
//asignar valores
$xAct->califica_para_pep($esPep);
$xAct->clasificacion("CLASE");
$xAct->clave_de_actividad($claveuif);
$xAct->clave_de_superior(0);
$xAct->clave_interna($idactividad);
$xAct->descripcion_detallada($nombre);
$xAct->nivel_de_riesgo($riesgo);
$xAct->nombre_de_la_actividad($nombre);
<th width='4%'>Letra</th>
<th width='8%'>Capital</th>
<th width='8%'>Interes</th>
<th width='8%'>I.V.A.</th>
<th width='8%'>Ahorro</th>
<th width='8%'>TOTAL</th>
<th width='22%'>Observaciones</th>
</tr>";*/
$iReg = 0;
if ($EliminarDatos == 1) {
my_query("DELETE FROM general_colonias");
}
$cT = new cTipos();
if ($gestor) {
while (!feof($gestor)) {
$bufer = $cT->setNoAcentos(fgets($gestor, 4096));
//$bufer = stream_get_line($gestor, "\r\n");
if (!isset($bufer)) {
$msg .= "La Linea({$iReg}) no se leyo({$bufer})\r\n";
$msg .= "DEL\tSe Eiminan todas las Colonias\r\n";
} else {
$datos = explode("|", $bufer, 16);
$cpostal = $datos[0];
$ncolonia = $cT->cChar($datos[1]);
$tcolonia = $cT->cChar($datos[2]);
$estado = $cT->cChar($datos[4]);
$municipio = $cT->cChar($datos[3]);
$numEstado = $cT->cInt($datos[7]);
$ciudad = $cT->cChar($datos[5]);
if (trim($ciudad) == "") {
$ciudad = $ncolonia;
/**
* Obtiene un nombre limpio, para guardar como un archivo
* @param $mNombreArchivo
*/
function getNombreExportable($mNombreArchivo)
{
$filename = $mNombreArchivo;
$filename = str_replace(".php", "", $filename);
$filename = str_replace("rpt_", "", $filename);
$filename = str_replace("frm_", "", $filename);
$filename = str_replace(".", "", $filename);
$filename = str_replace("rpt", "", $filename);
$filename = str_replace("frm", "", $filename);
//$filename = str_replace("-", "", $filename);
$filename = str_replace("___", "-", $filename);
$filename = str_replace("__", "-", $filename);
$filename = str_replace("_", "-", $filename);
$filename = str_replace("---", "-", $filename);
$filename = str_replace("--", "-", $filename);
$filename = str_replace(" ", "", $filename);
$xT = new cTipos();
$filename = $xT->setNoAcentos($filename);
return $filename;
}
function getText($txt = "", $tamannio = false)
{
$xT = new cTipos();
$txt = $xT->setNoAcentos($txt);
$txt = strtoupper($txt);
if ($tamannio != false) {
$txt = $xT->cSerial($tamannio, $txt);
}
return $txt;
}
$gestor = @fopen($completePath, "r");
$grupo_solidario = DEFAULT_GRUPO;
$caja_local = getCajaLocal();
$iReg = 0;
$cT = new cTipos();
//inicializa el LOG del proceso
$aliasFil = getSucursal() . "-carga -batch-de-socios-" . fechasys();
$xLog = new cFileLog($aliasFil, true);
if ($gestor) {
while (!feof($gestor)) {
$bufer = fgets($gestor, 4096);
//$bufer = stream_get_line($gestor, "\r\n");
if (!isset($bufer)) {
$msg .= "{$iReg}\t\tERROR\tLa Linea({$iReg}) no se leyo({$bufer})\r\n";
} else {
$bufer = $cT->setNoAcentos(trim($bufer));
$datos = explode(",", $bufer, 30);
$socio = $cT->cInt($datos[1]);
if ($socio != 0 and $socio != DEFAULT_SOCIO) {
$xSoc = new cSocio($socio);
$relNombre = $cT->cChar(trim($datos[8]));
$relApMat = $cT->cChar(trim($datos[7]));
$relApPat = $cT->cChar(trim($datos[6]));
$relTelP = $cT->cChar(trim($datos[14]));
$relMail = $cT->cChar(trim($datos[20]));
$relCalle = $cT->cChar(trim($datos[12]));
$relColonia = $cT->cChar(trim($datos[6]));
$relGenero = DEFAULT_GENERO;
$idRelSocio = $socio + 100000 * rand(2, 9);
$xRel = new cSocio($idRelSocio);
$numero = "";
