[Date Prev][Date Next][Thread Prev][Thread Next]
[Author Index] [Date Index] [Thread Index]
[SQR-USERS Info] [SQRUG Home Page]

[sqr-users] Wildcards with Evaluate Statements



Is there any way to use Wildcards with Evaluate-When statements in SQR?
 
I wanted to find class sections that begin with a certain letter and do
something. For example:
 
EVALUATE &CLSFEE2.CLASS_SECTION
 
  When = '%B%'         
        Let $ClassSection = &CLSFEE2.CLASS_SECTION
        Let $MND_ItemType = '152100000000'
        Let $MND_CrseRate = ' '
        Let $MND_AdjTerm  = $Term || 'STD'
        Let $MND_Waiver   = ' '
        Let $TUT_ItemType = '151000000000'
        Let $TUT_CrseRate = ' '
        Let $TUT_AdjTerm  = $Term || 'STD'
        Let $TUT_Waiver   = ' '
        Do Check-for-Prev-Acct-Type
        IF &A.ACCOUNT_TYPE_SF = 'MND'
              Do Insert-TUT-Sub-Fee
        Else
              Do Insert-MND-Sub-Fee
        End-if
        
  When = 'D%'   
        Let $ClassSection = &CLSFEE2.CLASS_SECTION
        Let $MND_ItemType = '202100000000'
        Let $MND_CrseRate = ' '
        Let $MND_AdjTerm  = $Term || 'STD'
        Let $MND_Waiver   = ' '
        Let $TUT_ItemType = '201000000000'
        Let $TUT_CrseRate = ' '
        Let $TUT_AdjTerm  = $Term || 'STD'
        Let $TUT_Waiver   = ' '
        Do Check-for-Prev-Acct-Type
        IF &A.ACCOUNT_TYPE_SF = 'MND'
                Do Insert-TUT-Sub-Fee
        Else
                Do Insert-MND-Sub-Fee
        End-if

 
etc............
 

*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~
Maria K Lindquist
mlindqui@uwc.edu
IS Programmer/Analyst - Business Office
University of Wisconsin Colleges
780 Regent St, PO Box 8680, Madison, WI  53708-8680
Phone: 608.265.2677 / Fax: 608.265.5770
*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*  

 

_______________________________________________
sqr-users mailing list
sqr-users@sqrug.org
http://www.sqrug.org/mailman/listinfo/sqr-users