$variable_tipo_de_pago = "";
$xCajero = new cSystemUser($DRec["idusuario"]);
$variable_nombre_del_cajero = $xCajero->getNombreCompleto();
$variable_observacion_del_recibo = $DRec["observacion_recibo"];
$variable_datos_de_pago = $xRec->getDatosDeCobro();
$xSuc = new cSucursal($DRec["sucursal"]);
$xSuc->init();
$DSuc = $xSuc->getDatosInArray();
$variable_lugar = $DSuc["municipio"] . ", " . $DSuc["estado"];
$variable_marca_de_tiempo = date("Ymd:His");
$tipoDocto = "";
$estatDocto = "";
$letras = "";
/* -----------------Verifica si es solicitud, si es imprime el saldo actual */
if ($origen == TESORERIA_RECIBOS_ORIGEN_CRED or $origen == TESORERIA_RECIBOS_ORIGEN_MIXTO) {
$DD = $xRec->getInfoDoctoInArray();
if ($DD != false and is_array($DD)) {
$sdoctacred = $DD["saldo_actual"];
$sdov = $DD["saldo_vencido"];
$nota = "Capital Insoluto: \$ " . getFMoney($sdoctacred) . "|";
$tipoDocto = eltipo("creditos_modalidades", $DD["tipo_credito"]);
$estatDocto = eltipo("creditos_estatus", $DD["estatus_actual"]);
$letras = "/" . $DD["pagos_autorizados"];
//$DD["ultimo_periodo_afectado"] .
}
}
//inicializa variables vacias
$svar_info_cred = "_NO_APLICA_";
$variable_lista_beneficiados = "_NO_APLICA_";
$tipo_de_credito = "_NO_APLICA_";
$monto_ministrado = "_NO_APLICA_";