query.num_bloque = emufs_create_new_block(emu);
/*inserto el nuevo registro en el nuevo bloque y obtengo la clave del menor*/
clave = grabar_ordenado_en_bloque(emu,ptr,size,new_bloque,query.num_bloque, emu->tam_bloque-move_size,err);
query.num_bloque = emufs_create_new_block(emu);
/*inserto el nuevo registro en el nuevo bloque y obtengo la clave del menor*/
clave = grabar_ordenado_en_bloque(emu,ptr,size,new_bloque,query.num_bloque, emu->tam_bloque-move_size,err);