Macro: Report_Index

Set a Reports Index and direction Format is: REPORT_INDEX BY|DOWN Index#|File.Field Set Ordering property

  #IFSAME !1 DOWN
    Set Find_Down_State to True
  #ELSE
    Set Find_Down_State to False
  #ENDIF
  #IFCLASS !2 "F"     // if File.Field then figure out which
    #PUSH !i          // index number to use at run-time
    #PUSH !l
    #SET L$ !2        // get file#
    #SET I$ %!2       // get field# -- aha-new undocumented features
    Set Ordering to (Which_Index(self,!l,!i))
    #POP L$
    #POP I$
  #ELSE
    Set ordering to !2 // if Index.# or # set ordering at compile-time
  #ENDIF