$nombres = explode(" ", $r["nombrecompleto"]);
$primerNombre = $nombres[0];
$segundoNombre = isset($nombres[1]) ? $nombres[1] : "";
$tipoPersona = "0";
$fechaInscripcion = date("Y/m/d", strtotime($r["fechaalta"]));
$genero = $arrEquivGenero[$r["genero"]];
//datos del Domicilio
$DDom = $xSoc->getDatosDomicilio();
$calle = $xT->getCSV($DDom["calle"]);
$numero = $xT->getCSV($DDom["numero_exterior"]);
$colonia = $xT->getCSV($DDom["colonia"]);
$xCol = new cDomiciliosColonias();
$codCol = $xCol->getClavePorCodigoPostal($DDom["codigo_postal"]);
$xCol->set($codCol);
$xCol->init();
$DCol = $xCol->getDatosInArray();
$cp = $xT->cSerial(5, $DDom["codigo_postal"]);
$claveMun = $DCol["codigo_de_municipio"];
$claveEnt = $DCol["codigo_de_estado"];
$localidad = $DDom["localidad"];
$xLoc = new cDomicilioLocalidad("");
$claveLoc = $xLoc->setBuscar($localidad, $claveEnt, $claveMun);
$xLoc->set($claveLoc);
$DLoc = $xLoc->getDatosInArray();
$claveLocInegi = $DLoc["clave_de_localidad"];
$DAports = $xSoc->getDatosAportaciones();
$montoParteSoc = $xSoc->getAportacionesSociales();
$linea = "{$punto_de_acceso},{$socio},{$tipoDato},{$fechaNac},{$primerApellido},{$segundoApellido},{$primerNombre},{$segundoNombre},{$tipoPersona},{$fechaInscripcion}";
$linea .= ",{$genero},{$calle},{$numero},{$colonia},{$cp},{$claveLocInegi},{$montoParteSoc},\r\n";
echo $linea;
}
