PRSARC06 ;WOIFO/JAH - Recess Tracking ListManger Inteface ;10/16/06
Source file <PRSARC06.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| MAIN(LSTART,LISTI,LINE,PRSDT,PRSFYRNG) | ; BUILD LIST OF CALENDER FROM PP WITH PRSDT
; THROUGH PP CONTAINING SEPTEMBER 30 |
|
| ARAYMO(LISTI,LINE,PRSDT,MONTHCNT,STARTDAY,SHORT) | ;SILENT CALL TO PLACE MONTH IN ARRAY
; INPUT: PRSDT - must be fileman date ; SHORT - set to # of days to show if a short month ; is desired. i.e. to stop listing after the ; first PP then specify the # of ; days to that date from the 1st of the month |
|
| DISPMO(LISTI,LINE,DAYNO,NODAYS,SKPW1,STRTDY) | ;store a month into an array
|
|
| GETPPS(FIRSTDAY,LASTDAY) | ;
|
|
| GETHEAD(Y) | ;
|
|
| WEEKDAY1(ZDATE) | ;get the weekday of the 1st day of the month
; INPUT: ZDATE - FileMan date, used as the month to display ; OUTPUT: return - Integer corresponding to day of week ; (i.e. Sunday[1], Monday[2]) for the 1st day of ; the month |
|
| DAYSINMO(Y,M) | ; Return # of days in month based on year and month
; Input: Y = year in 4 digit format between 1700 and 3000 ; M = month expressed as an integer from 1 to 12 (Jan - Dec) |
