home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / netdor3.zip / DISK_11 / IMAGE10.ZIP / PMCAL / CALPRT.CMD < prev    next >
OS/2 REXX Batch file  |  1991-08-08  |  839b  |  28 lines
  1. rem CALPRT beginmonth endmonth year file
  2. rem  where beginmonth is the first month to be printed
  3. rem  where endmonth is the last month to be printed
  4. rem  where year is the year to be printed
  5. setlocal
  6. set beginmonth=%1
  7. set endmonth=%2
  8. set year=%3
  9. set file=calprt.ps
  10. if %1.==. set beginmonth=1
  11. if %2.==. set endmonth=12
  12. if %3.==. set year=1991
  13. if not %4.==. set file=%4
  14. set filetmp=calprtmp.ps
  15. cal2ps %year% %beginmonth% %endmonth% >%filetmp%
  16. echo /year %year% def >>%filetmp%
  17. echo /beginmonth %beginmonth% def >>%filetmp%
  18. echo /endmonth %endmonth% def >>%filetmp%
  19. copy  %filetmp% + pmcal.ps %file%
  20. rem copy  %filetmp% + %CORE.DRIVE%pmcal\pmcal.ps %file%
  21. shift
  22. shift
  23. shift
  24. shift
  25. if %file%==gprint.ps  gprint %file% %1 %2 %3 %4 %5 %6 %7 %8 %9
  26. if %file%==GPRINT.PS  gprint %file% %1 %2 %3 %4 %5 %6 %7 %8 %9
  27. endlocal
  28.