$TotalSaldosVencidos = 0;
$TotalElementosNombres = 1;
$TotalElementosDireccion = 1;
$TotalElementosEmpleo = 1;
$TotalElementosCuenta = 1;
/*
ClaveOtorgante
NombreOtorgante
IdentificadorDeMedio
FechaExtraccion
NotaOtorgante
*/
$IdentificadorMedio = 1;
$NotaOtorgante = "";
$xSTb = new cSAFETabla(TCREDITOS_REGISTRO);
$sql = $mql->getQueryInicialDeCreditos("", "", " \tAND (`creditos_solicitud`.`fecha_ministracion` <= '" . $FechaFinal . "' )\n\t\t\t\tAND\n\t\t\t\t(`creditos_solicitud`.`numero_socio` !=" . DEFAULT_SOCIO . ")\n\t\t\t\tAND\n\t\t\t\t(`creditos_solicitud`.`monto_autorizado` > " . TOLERANCIA_SALDOS . ")\n\t\t\t\tAND\t\n\t\t\t\t(`creditos_solicitud`.`estatus_actual` !=" . CREDITO_ESTADO_AUTORIZADO . " AND `creditos_solicitud`.`estatus_actual` !=" . CREDITO_ESTADO_SOLICITADO . ")  \n\t\t\t\t{$ByPersona2}\n\t\t\t\t");
//exit($sql);
$arrEquivTipoDom = array(1 => "C", 2 => "N", 3 => "E", 99 => "O");
$arrEquivTipoRes = array(1 => 1, 2 => 2, 3 => 4, 4 => 3, 99 => "");
$arrEquivEstadoCiv = array(1 => "C", 2 => "S", 3 => "D", 4 => "L", 5 => "", 6 => "V", 7 => "E", 99 => "");
$arrEquivGenero = array(1 => "M", 2 => "F", 99 => "");
$version = 2;
$datos = $query->getDataRecord($sql);
$icnt = 0;
foreach ($datos as $rw) {
    $linea = "{$ClaveOtorgante}|{$NombreOtorgante}|{$IdentificadorMedio}|{$FechaExtraccion}|{$NotaOtorgante}|{$version}|";
    $idcredito = $rw["numero_solicitud"];
    $idpersona = $rw["numero_socio"];
    $xSoc = new cSocio($idpersona);
    $xSoc->init();
    $DSoc = $xSoc->getDatosInArray();