home *** CD-ROM | disk | FTP | other *** search
- ******************************************************
- * CAL.CMD (CALENDAR - DBASE II) *
- * DAN JONES, JULY 1985 *
- ******************************************************
-
- CAL.LBR CONSISTS OF:
- CAL.DBF - 12 RECORDS, ONE FOR EACH MONTH
- CAL.CMD - COMPUTES DISPLAYS CALENDAR ON SCREEN.
- CAL.DOC - THIS DOCUMENT.
-
- HAVE BEEN WANTING A WAY OF CALLING UP A SCREEN CALENDAR
- WHENEVER I WANTED IT FOR SOME TIME. THIS LITTLE ROUTINE
- DOES THE TRICK FOR ME.
-
- CAL.DBF CONTAINS THE DAY NAME JUST FOR THE PURPOSE OF
- KNOWING WHERE TO START THE DAY NUMBER ON THE CALENDAR, AND
- IS NOT USED BY THE ROUTINE ITSELF.
- CAL.DBF FILE STRUCTURE.
- MO - MONTH DIGIT 01=JAN,O2=FEB,ETC. (TYPE 'C')
- DN1 - NOT USED BY CAL.CND. JUST HERE AS A NOTE FOR ME TO KNOW
- WHAT DAY THE FIRST DAY IS. AND WHAT 'COL' SHOULD BE.
- TD - TOTAL DAYS IN MONTH.
- COL - THE COLUMN TO PRINT THE RESPECTIVE DAY NUMBERS AT. VERY
- IMPORTANT TO PROPER DISPLAY.
-
- A WORD ABOUT HOW I USE THIS ROUTINE.
- FROM A MAIN MENU, I CAN PRESS 'C' AND PULL UP THE
- CALENDAR. I HAVE IT NEAR THE BOTTOM HALF OF THE SCREEN, 'CAUSE
- IT FITS NEATLY UNDER MY MAIN MENU. MORE IMPORTANT IS THE MEMORY
- VARIABLE CALLED 'MDATE' WHICH MIGHT CONTAIN (FOR EXAMPLE)
- '08/01/85'. CAL.CMD TAKES THE FIRST TWO CHARACTERS FROM MDATE,
- AND LOCATES THE PROPER MONTH IN CAL.DBF.. THEN, THE REST AS YOU
- WILL SEE, DISPLAYS THE CALENDAR.
- I'M STORING A BOOGUS DATE TO MDATE FOR YOU SO THAT
- YOU CAN SEE WHERE THE SCREEN IS PRINTED AND AS ONLY AN EXAMPLE.
- IF YOU USE ANY KIND OF DATE VARIABLE IN YOUR PROGRAMS, JUST CHANGE
- THE NAME OF MDATE TO WHATEVER VARIABLE THAT YOU USE..
- THIS PROGRAM HAS BEEN KEPT VERY SIMPLE AS TO ALLOW YOU
- TO INCORPORATE INTO WHAT YOU WILL.
- ** ALSO, PLEASE REMEMBER THAT IT ONLY COVERS 1985.
- THERE IS NO CUMULATIVE ROUTINE FOR SUCCESIVE YEARS. THAT IN FACT IS
- THE REAL PURPOSE OF CAL.DBF.. BIG DEAL SO ONCE A YEAR I HAVE TO CHANGE
- 12 RECORDS. **
-
- THE CALENDAR LOOKS LIKE THIS:
-
- SUN MON TUE WED THR FRI SAT
- 1 2 3 4 5 6 7
- 8 9 10 11 12 13 14
- 15 16 17 18 19 20 21 AN EXAMPLE
- 22 23 24 25 26 27 28
- 29 30 31
-
-
- I DIDN'T PUT IN ALOT OF COMMENT LINES ON CAL.CMD BECAUSE I FIGURE
- IT'S REAL EASY TO FIGURE OUT WHAT I WAS UP TO. HOPEFULLY, LIKE ALL
- PUBLIC DOMAIN MATERIAL YOU CAN EITHER LEARN FROM IT AND/OR
- INCORPORATE IT INTO YOUR DBASE ROUTINES WHEN YOU NEED TO SEE A
- CALENDAR. THANKS FOR PICKING IT UP WHOEVER YOU ARE.
- ENJOY.... DAN JONES - IRVING,TEXAS
- BASE ROUTINES WHEN YOU NEED TO SEE A
- CALENDAR. THANKS FOR PICKING IT UP WHOEVER YOU ARE.
- ENJOY.... DAN JONES - IRVING