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

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

#include "Indice.h"

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

/*--------------------------------------------------------------------
 * FUNCION:  Ind_PonClave()
 * OBJETIVO: Anotar la clave que corresponde a un item de la
 *           pgina en memoria
 * ENTRADAS: El ndice, el nmero de item y una cadena con la clave
 * SALIDAS:  Ninguna
 * NOTAS:    1. Los items se cuentan a partir de 0
 *           2. No se comprueba que el item sea vlido
 * EJEMPLO:  Ind_PonClave ( Agenda, 2, Clave )
 *------------------------------------------------------------------*/
void Ind_PonClave (Indice, NumItem, Clave)
indice   Indice;
contador NumItem;
cadena   Clave;
  {
  caracter *Pos;
  contador  i;
  
  Pos = (caracter *) ( Ind_Pagina (Indice) +
                       Ind_Desplazamiento (Indice,NumItem) + 8 );
  
  for ( i=0 ; i<Ind_LongitudClave(Indice) ; i++ , Pos++ )
    { *Pos = Clave[i]; }
  }