$xTa->addTH("Actividad economica");
//$xTa->addTH("Puesto o Ocupacion");
$xTa->addTH("Direccion");
$xTa->addTH("Telefono Principal");
$xTa->addTH("Apoderado");
$xTa->addTH("Es PEP");
$xTa->addTH("Lista Negra");
$xTa->addTH("Grado de Riesgo");
$xTa->addTH("Servicios");
$xTa->addTH("Monto Otorgado");
$xTa->addTH("Monto Actual");
$xTa->addTH("Perfil Transaccional");
$xTa->addTH("Numero Maximo de Operaciones");
$xTa->addTH("Monto Maximo de Operaciones");
$xTa->endRow();
$xT = new cFileImporter();
foreach ($rs as $rows) {
$xDSoc->setData($rows);
$codigo_de_socio = $xDSoc->codigo()->v();
$xSoc = new cSocio($codigo_de_socio);
$xSoc->init($rows);
$xSoc->getOEstats()->initDatosDeCredito();
$saldoCred = setNoMenorQueCero($xSoc->getCreditosComprometidos());
if ($saldoCred > 0) {
$xTa->initRow();
$xTa->addTD($xSoc->getSucursal());
$xTa->addTD(htmlentities($xSoc->getNombreCompleto()));
$xTa->addTD($xF->getFechaMX($xSoc->getFechaDeNacimiento()));
$xTa->addTD("MEXICANA");
$xTa->addTD($xSoc->getRFC());
$xOAE = $xSoc->getOActividadEconomica();
$xTxt2 = new cHText();
$xSel = new cHSelect();
$xF = new cFecha();
$xT = new cTipos();
$msg = "";
if ($action == SYS_CERO) {
$xFRM->addHElem("<div class='tx4'><label for='f1'>" . $xFRM->lang("archivo") . "</label><input type='file' name='f1' id='f1' /></div>");
//$xFRM->addHElem( $xTxt2->getDeMoneda("idnumeropagina", $xFRM->lang("numero de", "pagina")) );
$xFRM->addHElem($xTxt->get("idobservaciones", "", "Observaciones"));
$xFRM->addSubmit();
$xFRM->addFootElement('<input type="hidden" name="MAX_FILE_SIZE" value="1024000">');
echo $xFRM->get();
} else {
$doc1 = isset($_FILES["f1"]) ? $_FILES["f1"] : false;
$observaciones = isset($DDATA["idobservaciones"]) ? $DDATA["idobservaciones"] : "";
$xFil = new cFileImporter();
//var_dump($_FILES["f1"]);
if ($xFil->processFile($doc1) == true) {
$data = $xFil->getData();
$xPlan = new cPlanDePagos();
//eliminar credito
$xCred = new cCredito($credito);
$xCred->init();
$fecha_operacion = $xCred->getFechaDeMinistracion();
if ($xCred->getNumeroDePlanDePagos() != false) {
$xPlan->init($xCred->getNumeroDePlanDePagos());
$xPlan->setEliminar();
}
$xPlan->initByCredito($credito);
$xPlan->setClaveDeCredito($credito);
$xPlan->setClaveDePersona($xCred->getClaveDePersona());
$afectable = parametro("idaplicar", false, MQL_BOOL);
$prePath = PATH_BACKUPS;
$lim = 1;
//sizeof($usrFiles) -1;
$xF = new cFecha();
////Arrays de Control
$arrTipoIdent = array(1 => 1, 4 => 9);
$arrEmpresas = array("PARTICULAR" => DEFAULT_EMPRESA, "" => DEFAULT_EMPRESA, "#N/D" => DEFAULT_EMPRESA, "#N/A" => DEFAULT_EMPRESA, "COLOMER" => 120, "LAB. DENTAL R Y E" => 101, "LAB. DENTAL GML" => 102, "REPSSA" => 103, "RATTMI" => 104, "DELTA" => 105, "POLIESSA" => 107, "ORCA" => 108, "SILCER" => 111, "MESSINAS" => 112, "FERVAB" => 113, "DIVACUN" => 115, "CADENITA" => 116, "HECCSA" => 117, "SAGSA" => 118, "MAGRA" => 119, "COLOMER" => 120, "BORDEX" => 121, "SERVICLIMAS" => 123, "CORECO" => 124, "CMV" => 125, "MAYCO" => 126, "TABLAROCA" => 127, "KAUA" => 129, "GONELA" => 130, "SVM" => 109, "ABIMERHI" => 106, "PREVE" => 110, "SEY" => 110, "CASTALDI" => 132, "HINO" => 114, "LAMOL" => 99, "BICIMAYA" => 131, "COUNTRY" => 132, "KOHLBERG" => 128, "POLIOBRAS" => 134, "TZUNCACAB" => 135, "GML" => 102, "RYE" => 101, "OH" => 136, "GRUPO NICXA" => 137, "SAXON" => 138, "EXHIBIT" => 122);
$arrGeneroInv = array(1 => 2, 2 => 1, 99 => 99);
$arrGenero = array("HOMBRE" => 1, "MUJER" => 2, "NINGUNO" => 99, "" => 99, "MASCULINO" => 1, "MASCULINA" => 1, "FEMENINO" => 2, "FEMENINA" => 2);
$arrFJuridica = array("PERSONA FISICA" => 1, "PERSONA MORAL" => 2, "FISICA" => 1, "MORAL" => 2, "NATURAL" => 1, "JURIDICA" => 2, "" => 1, "NINGUNO" => 99);
$arrEcivil = array("CASADO" => 1, "CASADA" => 1, "SOLTERO" => 2, "SOLTERA" => 2, "NINGUNO" => 99, "" => 99, "DIVORCIADO" => 3, "DIVORCIADA" => 3, "UNION LIBRE" => 4, "VIUDO" => 6);
$arr2RegMat = array("" => "NINGUNO", "MANCOMUNADO" => "SOCIEDAD_CONYUGAL", "SEPARADOS" => "BIENES_SEPARADOS");
$arrVivienda = array("PROPIA" => 1, "RENTADA" => 2, "NA" => 99, "NINGUNO" => 99);
$doc1 = isset($_FILES["idarchivo"]) ? $_FILES["idarchivo"] : false;
$xFi = new cFileImporter();
class cTmp
{
public $SUCURSAL = 1;
public $ID_EMPRESA = 2;
public $ID_PERSONA = 3;
public $TIPO_PERSONA = 4;
public $OCUPACION = 5;
public $FECHA_ALTA = 6;
public $PRIMER_APELLIDO = 7;
public $SEGUNDO_APELLIDO = 8;
public $NOMBRES = 9;
public $FECHA_NACIMIENTO = 10;
public $ID_FISCAL = 11;
public $ID_POBLACIONAL = 12;
public $ESTADO_CIVIL = 13;
$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);
if ($aplicar == true) {
$action = MQL_ADD;
}
//Cedula de Identidad
$xFi->setCharDelimiter("|");
$xFi->setLimitCampos(4);
//$xFi->setToUTF8();
//var_dump($_FILES["f1"]);
//$xFi->setExo($esqueleto);
$xTxt2 = new cHText();
$xSel = new cHSelect();
$xF = new cFecha();
$xT = new cTipos();
$msg = "";
if ($action == SYS_CERO) {
$xFRM->addHElem("<div class='tx4'><label for='f1'>" . $xFRM->lang("archivo") . "</label><input type='file' name='f1' id='f1' /></div>");
//$xFRM->addHElem( $xTxt2->getDeMoneda("idnumeropagina", $xFRM->lang("numero de", "pagina")) );
$xFRM->addHElem($xTxt->get("idobservaciones", "", "Observaciones"));
$xFRM->addSubmit();
$xFRM->addFootElement('<input type="hidden" name="MAX_FILE_SIZE" value="1024000">');
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
$msg = "";
$xSel = new cHSelect();
$xChk = new cHCheckBox();
$xFRM->setEnc("multipart/form-data");
if ($action == SYS_NINGUNO) {
$xFRM->OFile("idarchivo", "");
$xFRM->addHElem($xSel->getListaDeEmpresas()->get("TR.Empresas", true));
$xFRM->addHElem($xSel->getListaDeCaptacionProductos()->get("TR.Producto de Destino", true));
$xFRM->addHElem($xChk->get("TR.Omitir Importacion", "idimporta"));
//if( MODO_MIGRACION == true ){
$xFRM->addHElem($xChk->get("TR.Omitir AML", "idaml"));
//}
$xFRM->addSubmit("TR.Probar");
$xFRM->OButton("TR.Guardar", "setEnviarDocto()", "ejecutar");
} else {
$xFi = new cFileImporter();
$doc1 = isset($_FILES["idarchivo"]) ? $_FILES["idarchivo"] : false;
$observaciones = parametro("idobservaciones");
$importar = parametro("idimporta", false, MQL_BOOL);
$aml = parametro("idaml", false, MQL_BOOL);
$producto_destino = parametro("idproductocaptacion", CAPTACION_PRODUCTO_ORDINARIO, MQL_INT);
class cTmp
{
public $ID_PERSONA = 1;
public $ID_FISCAL = 2;
public $ID_POBLACIONAL = 3;
public $NOMBRE_PERSONA = 4;
public $PRIMER_APELLIDO = 5;
public $SEGUNDO_APELLIDO = 6;
public $ID_CUENTA = 7;
public $DEPOSITO = 8;
$xF = new cFecha();
$xT = new cTipos();
$msg = "";
if ($action == SYS_CERO) {
$xFRM->addHElem("<div class='tx4'><label for='f1'>" . $xFRM->lang("archivo") . "</label><input type='file' name='f1' id='f1' /></div>");
$xFRM->addHElem($xSel->get("", "TR.tipo de importacion"));
//$xFRM->addHElem( $xTxt2->getDeMoneda("idnumeropagina", $xFRM->lang("numero de", "pagina")) );
$xFRM->addHElem($xTxt->get("idobservaciones", "", "Observaciones"));
$xFRM->addSubmit();
$xFRM->addFootElement('<input type="hidden" name="MAX_FILE_SIZE" value="1024000">');
echo $xFRM->get();
} else {
$doc1 = isset($_FILES["f1"]) ? $_FILES["f1"] : false;
$observaciones = isset($DDATA["idobservaciones"]) ? $DDATA["idobservaciones"] : "";
$tipoimportacion = isset($DDATA["idtipoimportacion"]) ? $DDATA["idtipoimportacion"] : "SDN";
$xFil = new cFileImporter();
$limit = $tipoimportacion == "SDN" ? 12 : 6;
$xFil->setLimitCampos($limit);
$xFil->setCharDelimiter("|");
$xFil->setType("PIP");
//var_dump($_FILES["f1"]);
if ($xFil->processFile($doc1) == true) {
$data = $xFil->getData();
foreach ($data as $valores => $cont) {
$id = $xT->cInt($cont[0]);
switch ($tipoimportacion) {
case "SDN":
$xFil->setDataRow($cont);
/*
4149|"CAVIEDES CRUZ, Leonardo"|"individual"|"SDNT"|
-5 - 6 - 7 - 8 - 9 - 10 - 11
$tiny = parametro("tiny");
$form = parametro("form");
$action = parametro("action", SYS_NINGUNO);
$xHP->init();
$xFRM = new cHForm("frm", "contabilidad_import-catalogocw.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("idmascara", $esqueleto, "TR.Mascara");
} else {
//
$doc1 = isset($_FILES["idarchivo"]) ? $_FILES["idarchivo"] : false;
$xFi = new cFileImporter();
$xT = new cTipos();
class cTmp
{
public $CUENTA = 2;
public $NATURALEZA = 5;
public $NIVEL = 3;
//NA
public $CTA1 = 3;
public $CTA2 = 5;
//NA
public $CTA3 = 6;
//NA
public $CTA4 = 7;
//NA
public $CTA5 = 8;
$xTxt2 = new cHText();
$xSel = new cHSelect();
$xF = new cFecha();
$xT = new cTipos();
$msg = "";
if ($action == SYS_CERO) {
$xFRM->addHElem("<div class='tx4'><label for='f1'>" . $xFRM->lang("archivo") . "</label><input type='file' name='f1' id='f1' /></div>");
//$xFRM->addHElem( $xTxt2->getDeMoneda("idnumeropagina", $xFRM->lang("numero de", "pagina")) );
$xFRM->addHElem($xTxt->get("idobservaciones", "", "Observaciones"));
$xFRM->addSubmit();
$xFRM->addFootElement('<input type="hidden" name="MAX_FILE_SIZE" value="1024000">');
echo $xFRM->get();
} else {
$doc1 = isset($_FILES["f1"]) ? $_FILES["f1"] : false;
$observaciones = isset($DDATA["idobservaciones"]) ? $DDATA["idobservaciones"] : "";
$xFil = new cFileImporter();
$xFil->setCharDelimiter("\",");
$xTmp = new cTmp();
//var_dump($_FILES["f1"]);
if ($xFil->processFile($doc1) == true) {
$data = $xFil->getData();
$linea = 0;
foreach ($data as $valores => $cont) {
//
$xFil->setDataRow($data);
$xSoc = new cSocio(false);
/*$nombre, $apellidopaterno = "", $apellidomaterno = "",
$rfc = "", $curp = "", $cajalocal = DEFAULT_CAJA_LOCAL,
$fecha_de_nacimiento = false, $lugar_de_nacimiento = "",
$tipo_de_ingreso = FALLBACK_PERSONAS_TIPO_ING, $estado_civil = ,
$genero = , $dependencia = , $regimen_conyugal = ,
$tiny = parametro("tiny");
$form = parametro("form");
$action = parametro("action", SYS_NINGUNO);
$xHP->init();
$xFRM = new cHForm("frm", "contabilidad_importar-catalogo.frm.php?action=" . MQL_TEST);
$xFil = new cHFile();
$xChk = new cHCheckBox();
$msg = "";
if ($action == SYS_NINGUNO) {
$xFRM->addHElem($xFil->getBasic("idarchivo", ""));
$xFRM->addHElem($xChk->get("TR.Afectar Base de Datos", "idaplicar"));
$xFRM->setEnc("multipart/form-data");
} else {
//
$doc1 = isset($_FILES["idarchivo"]) ? $_FILES["idarchivo"] : false;
$xFi = new cFileImporter();
$xT = new cTipos();
class cTmp
{
public $CUENTA = 1;
public $NATURALEZA = 2;
public $NIVEL = 3;
public $CTA1 = 4;
public $CTA2 = 5;
public $CTA3 = 6;
public $CTA4 = 7;
public $CTA5 = 8;
public $CTA6 = 9;
}
$catImport = array();
$aplicar = parametro("idaplicar", false, MQL_BOOL);
$tiny = parametro("tiny");
$form = parametro("form");
$action = parametro("action", SYS_NINGUNO);
$xHP->init();
$xFRM = new cHForm("frm", "mae.vivienda.upload.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->OTextArea("idmascara", "$esqueleto", "TR.Formato");
} else {
//
$doc1 = isset($_FILES["idarchivo"]) ? $_FILES["idarchivo"] : false;
$xFi = new cFileImporter();
$aplicar = parametro("idaplicar", false, MQL_BOOL);
if ($aplicar == true) {
$action = MQL_ADD;
}
//Cedula de Identidad
class cTmp
{
public $SUCURSAL = 1;
public $IDPERSONA = 2;
public $PRINCIPAL = 3;
public $CALLE = 4;
public $NUMERO = 5;
public $CRUCE = 6;
public $FECHA = 7;
public $TEL1 = 8;
$jscallback = parametro("callback");
$tiny = parametro("tiny");
$form = parametro("form");
$action = parametro("action", SYS_NINGUNO);
$xHP->init();
if ($action == MQL_LOAD) {
$doc1 = isset($_FILES["idarchivo"]) ? $_FILES["idarchivo"] : false;
$primerosql = parametro("primerosql", false, MQL_BOOL);
$sql = parametro("idsql", "", MQL_RAW);
$clave = parametro("idclave", "", MQL_RAW);
$clave2 = parametro("idclave2", "", MQL_RAW);
$keyFile = array();
$keySQL = array();
$aKeyFile = explode(",", $clave2);
$aKeySql = explode(",", $clave);
$xFi = new cFileImporter();
$xT = new cTipos();
$delimiter = "|";
//var_dump($_FILES);
$xFi->setCharDelimiter($delimiter);
$xFi->setLimitCampos(16);
$xFi->setToUTF8();
if ($primerosql == true) {
if ($xFi->processFile($doc1) == true) {
$data = $xFi->getData();
$conteo = 1;
foreach ($data as $rows) {
$xFi->setDataRow($rows);
$pkey = "";
//var_dump($rows);
foreach ($aKeyFile as $ikey) {
