terminado FIRST y NEXT +subrutinas auxiliares

añadidas subrutinas auxiliares:
- BUSCA_OCUPADO
- ULTIMO_ELEMENTO
Merge remote-tracking branch 'origin/alfredo'
Eliminada macro BUSCA_OCUPADO