This could help you Shylaja :
<CODE>
-SET &MTH0 = EDIT(&YYMD,'$$$$99') ;
-TYPE &MTH0
-*
-REPEAT GETMTH FOR &I FROM 1 TO 6 ;
-SET &MTHXX = &MTH0 - &I;
-SET &MTH.&I = IF (&MTHXX GT 0) THEN &MTHXX ELSE (&MTHXX + 12) ;
-*
-GETMTH
-*
-HTMLFORM BEGIN
<html>
<head><title> abc </title></head>
<body>
Select Month :
<select name="SELMNTH">
<option value="!IBI.AMP.MTH1;"selected>!IBI.AMP.MTH1;</option>
<option value="!IBI.AMP.MTH2;">!IBI.AMP.MTH2;</option>
<option value="!IBI.AMP.MTH3;">!IBI.AMP.MTH3;</option>
<option value="!IBI.AMP.MTH4;">!IBI.AMP.MTH4;</option>
<option value="!IBI.AMP.MTH5;">!IBI.AMP.MTH5;</option>
</select>
</body>
</html>
</CODE>
-*
You could modify this code and put the 5 records in a file, to use the !IBI.FIL.Fnm technique if that would work better in your setting.
Please also update your signature to show your environment details.
Gooooooooood day !!
Sandeep Mamidenna
-------------------------------------------------------------------------------------------------
Blue Cross & Blue Shield of MS
WF.76-10 on (WS2003 + WebSphere) / EDA on z/OS + DB2 + MS-SQL
MRE, BID, Dev. Studio, Self-Service apps & a dash of fun !!