home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 5 / 05.iso / a / a005 / 7.ddi / VIDEO.ZIP / SORT-CNT.SC < prev    next >
Encoding:
Text File  |  1992-08-08  |  556 b   |  12 lines
  1. ; Sort-Cnt.SC - Example script included as part of the Video Store Application
  2. ;               This script is called as one step of a multi-action
  3. If IsTable("Answer") Then           ; Attempt to sort Answer Table
  4.   If FieldNo("Count","Answer")>0 Then
  5.     Sort "Answer" on "Count" D
  6.   Else                              ; No Count field
  7.     PPP_ErrShow_u("The Answer table does not have the proper structure.","")
  8.   EndIf
  9. Else                                ; No answer table to sort
  10.   PPP_ErrShow_u("There is no Answer table to sort.","")
  11. EndIf
  12.