home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: InfoMgt / InfoMgt.zip / marb91c.zip / repub.cmd < prev    next >
OS/2 REXX Batch file  |  1996-03-01  |  200b  |  8 lines
  1. /* REXX: Select on Party (Republican) */
  2.     SELECT
  3.         WHEN SUBSTR(GetData(),18,11)== "Republican"
  4.             THEN
  5.                 RETURN 1
  6.         OTHERWISE
  7.             RETURN 0
  8.     END