home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Professional
/
OS2PRO194.ISO
/
os2
/
prgramer
/
cenvi
/
isday_2.cmd
< prev
next >
Wrap
OS/2 REXX Batch file
|
1994-03-08
|
744b
|
14 lines
@echo OFF
REM *************************************************************************
REM *** IsDay_2.cmd - This is like IsDay_1.cmd (Set ErrorLevel 1 if it is ***
REM *** ver.1 requested day of the week, and ErrorLeve 0 if not), ***
REM *** but accomplishes this in only one quick call to ***
REM *** CENVI. Unlike IsDay_1.cmd, this does no error ***
REM *** checking and provides no help. ***
REM *************************************************************************
cenvi day="%1" day[3]=0 return( strstr(strupr(ctime(time())),strupr(day)) ? 1 : 0 )
if ErrorLevel 1 ECHO Yes, today is %1
if not ErrorLevel 1 ECHO No, today is not %1