/*--------------------------------------------------------------------
 * FICHERO:  IndRegis.c
 * OBJETIVO: Definir la funcin Ind_Registro()
 * AUTOR:    Pedro Reina
 * FECHA:    L.31.7.1995
 *------------------------------------------------------------------*/

/*--------------------------------------------------------------------
 * Ficheros de cabecera
 *------------------------------------------------------------------*/

#include "Indice.h"

/*--------------------------------------------------------------------
 * Definicin de funciones
 *------------------------------------------------------------------*/

/*--------------------------------------------------------------------
 * FUNCION:  Ind_Registro()
 * OBJETIVO: Decir el registro correspondiente a un item de la pgina
 *           en memoria
 * ENTRADAS: El ndice y el nmero de item
 * SALIDAS:  El nmero de registro
 * NOTAS:    1. Los items se cuentan a partir de 0
 *           2. No se comprueba que el item sea vlido
 *           3. Los registros se numeran a partir de 0
 * EJEMPLO:  Ind_Registro ( Agenda, 2 )
 *------------------------------------------------------------------*/
entero Ind_Registro (Indice,NumItem)
indice   Indice;
contador NumItem;
  {
  memoria Pos;
  entero  Respuesta;
  
  Pos = Ind_Pagina(Indice) + Ind_Desplazamiento (Indice,NumItem) + 4;
  Respuesta = Mem_LeeEntero (Pos,MEM_INTEL);
  
  return ( Respuesta-1 );
  }