FUNCTION eis_search_pointing_files , start_time


IF (STRLEN(GETENV('CMDPLN')) EQ 0) THEN RETURN , ''

disp_start = start_time

ds = eis_create_datestring_array(disp_start , 24.)

FOR i = 0, N_ELEMENTS(ds) -1 DO BEGIN



    pathName = STRJOIN([GETENV('CMDPLN'),ds[i]] , PATH_SEP() , /SINGLE)
    baseName = STRJOIN(['re-point_',ds[i],'*','.','*'] , /SINGLE)
    filter   = CONCAT_DIR(pathName , baseName)
    search   = FILE_SEARCH(filter , count = count , /FOLD_CASE)

    IF (count EQ 1) THEN BEGIN
        fileName = search[0]

        ; Check file has at least 3 lines
        n_lines  = FILE_LINES(fileName)
        IF (n_lines LT 3) THEN stop

        ; Read lines 1 and 2
        block = rd_ascii(fileName , lines = [2,3] , lun = lun)
        FREE_LUN , lun

        ; Get start_time time
        split     = STRSPLIT(block[0] , /EXTRACT)
        time_from = eis_stev2tai(STRJOIN([split[1],split[2]],'.',/SINGLE))
        ; Get stop_time time
        split     = STRSPLIT(block[1] , /EXTRACT)
        time_to   = eis_stev2tai(STRJOIN([split[1],split[2]],'.',/SINGLE))

        IF (start_time GT time_from) AND                                      $
           (start_time LT time_to)   THEN BEGIN
            print , '*************************************************'
            print , '*'
            print , '* Reading:  ' + fileName
            print , '*'
            print , '*************************************************'
            RETURN , fileName
        ENDIF

    ENDIF

ENDFOR


RETURN , ''


END