CompuServe Messages

I have all the code to convert the dates, and currently I am trying to port it to ARexx but for some reason I can only boot my mcahine in AmigaDOS 1.3 (my 2.0 is not working) so A-Rexx is not accessible but if you want the easy way out and if you are not going to be multitasking while doing this. The easieast way to do this is using the foollowing function: /* easy way out REXX program for day of the week caution this program changes the date for a few seconds making it a bad solution for multitasking machines */ DDATE: PROCEDURE ARG InDate, Param SaveDate = DATE('U') /*saves the current date */ 'date' InDate /* assigns InDate to todays date */ RValue = DATE(Param) /* get date in desire format*/ 'date' SaveDate /*restore todays date */ return RValue /* example call: */ TodaysDay = DDATE('04/02/95', 'w') say TodaysDay /* should come up with Sunday */ This function will work similar to REXX DATE except it need todays date. I have not try this in the Amiga, but it works great under OS/2, as soon as I get my machine up I'll post the A-REXX code up. hope this helps Eduard Joseph