$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 = ,
            		$personalidad_juridica = , $grupo_solidario = , $observaciones = "",
     public $REGIMEN_MATRIMONIAL = 14;
     public $GENERO = 15;
     public $TIPO_VIVIENDA = 16;
     public $DEPENDIENTES_ECONOMICOS = 17;
     public $TIPO_IDENTIFICACION = 18;
     public $ID_IDENTIFICACION = 19;
     public $EMPRESA_TRABAJO = 20;
     public $PUESTO = 21;
     public $TRABAJO_FECHA_INGRESO = 22;
     public $NACIONALIDAD = 23;
     public $CIUDAD_NACIMIENTO = 24;
     public $INGRESOS_MENSUALES = 25;
 }
 //Cedula de Identidad
 $tmp = new cTmp();
 $xFi->setCharDelimiter("|");
 $xFi->setLimitCampos(26);
 //var_dump($_FILES["f1"]);
 if ($xFi->processFile($doc1) == true) {
     $data = $xFi->getData();
     $conteo = 1;
     foreach ($data as $rows) {
         if ($conteo > 1) {
             $xFi->setDataRow($rows);
             $xSoc = new cSocio(false);
             /*$nombre, $apellidopaterno = "", $apellidomaterno = "",
             		$rfc = "POR_REGISTRAR", $curp = "POR_REGISTRAR", $cajalocal = 99,
             		$fecha_de_nacimiento = false, $lugar_de_nacimiento = "DESCONOCIDO",
             		
             		$tipo_de_ingreso = FALLBACK_PERSONAS_TIPO_ING, $estado_civil = DEFAULT_ESTADO_CIVIL,
             		
$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) {
                    $pkey .= $xFi->getV($ikey);
                    // $rows[$ikey];
                }
                $pkey = preg_replace("/[^a-zA-Z0-9]+/", "", $pkey);