>Just done to see that :) Nadya I bet you and Nick don't do all these tag additions to color syntax manually. More don't tell me that this is part of profile setup of your account, is it ?

Yes, it's a part of my account. I'm a PUTM and a honor MOTD :)))))))

Ok, just kidding :) It's Mike Helland's mhHTMLCode utility, which you can take from Files section.


>
>>Thanks, Cetin.
>>
>>Nice to know there are 5 Sundays in April :)
>>
>>>Well George I won the bet you found the errors :) Here is improved tested version :)
>>

>>********************************************************************
>>*  Description.......: GetDays 
>>*  Calling Samples...: GetDays()
>>*  Parameter List....: tnMonth, tnYear, tnDow, tnFDow
>>*  Created by........: Cetin Basoz 04/12/2000 04:38:18 PM 
>>*  Modified by.......: 
>>********************************************************************
>>lparameters tnMonth, tnYear, tnDow, tnFDow
>>tnFdow = iif(type("tnFdow")#"N",1,tnFdow)
>>tnDow = iif(type("tnDow")#"N",1,tnDow)
>>tnYear = iif(type("tnYear")#"N",year(date()),tnYear)
>>tnMonth = iif(type("tnMonth")#"N",month(date()),tnMonth)
>>ldStart=ctod("^"+str(tnYear,4)+"/"+padl(int(tnMonth),2,"0")+"/"+"01")
>>ldEnd = gomonth(ldStart,1)-day(gomonth(ldStart,1))
>>IF dow(ldStart,tnFdow) # tnDow
>>  ldStart = ldStart + (7 + tnDow - dow(ldStart,tnFdow))
>>ENDIF
>>for ix = 0 to day(ldEnd-1) step 7
>> if month(ldStart+ix)=month(ldStart)
>>    ? ldStart+ix, cdow(ldStart+ix), dow(ldStart+ix,tnFdow) = tnDow
>> endif
>>endfor