home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 6 / 06.iso / b / b007 / 2.ddi / AMISG / IDXDISP.PRG < prev    next >
Encoding:
Text File  |  1990-04-18  |  198 b   |  14 lines
  1. ******  ╧╘╩╛╦≈╥²▒φ IDXDISP.PRG ******
  2. ******   DO IDXDISP            ******
  3. FN=''
  4. FNO=''
  5. DO SELEF
  6. IF LEN(FN)=0
  7. RETU
  8. ENDIF
  9. FN='IDX'
  10. EXP='F_NO=FNO'
  11. DO DBF0
  12. RETU
  13. ** END OF IDXDISP.PRG **
  14.