Showing posts with label REXX Select Statement. Show all posts
Showing posts with label REXX Select Statement. Show all posts

Wednesday, August 10, 2016

REXX Select Statement

This post is pretty much self explanatory. All the best.


                     /*REXX*/
                     
         MONTH = "AUG"

         SELECT                                                                 
         WHEN MONTH = 'JAN' THEN MONTH_NUM = '01'                               
         WHEN MONTH = 'FEB' THEN MONTH_NUM = '02'                               
         WHEN MONTH = 'MAR' THEN MONTH_NUM = '03'                               
         WHEN MONTH = 'APR' THEN MONTH_NUM = '04'                               
         WHEN MONTH = 'MAY' THEN MONTH_NUM = '05'                               
         WHEN MONTH = 'JUN' THEN MONTH_NUM = '06'                               
         WHEN MONTH = 'JUL' THEN MONTH_NUM = '07'                               
         WHEN MONTH = 'AUG' THEN MONTH_NUM = '08'                               
         WHEN MONTH = 'SEP' THEN MONTH_NUM = '09'                               
         WHEN MONTH = 'OCT' THEN MONTH_NUM = '10'                               
         WHEN MONTH = 'NOV' THEN MONTH_NUM = '11'                               
         WHEN MONTH = 'DEC' THEN MONTH_NUM = '12'                               
         END                                                                  
         SAY 'Month In Number :' MONTH_NUM

         EXIT  

Featured Post

REXX Skeleton: Submitting jobs through Rexx

Submitting jobs through REXX and reading the spool through REXX gives us immense potential to automate many manual activities in mainframes....