PRSARC06 ;WOIFO/JAH - Recess Tracking ListManger Inteface ;10/16/06
Source file <PRSARC06.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
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) |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP("PRSARC" | ARAYMO+22*, DISPMO+32*, DISPMO+35*, DISPMO+39*, DISPMO+45* |
^TMP("PRSLI" | DISPMO+30*, DISPMO+34* |
Name | Line Occurrences |
---|---|
$$DAYSINMO | ARAYMO+13 |
$$GETHEAD | ARAYMO+20 |
$$WEEKDAY1 | ARAYMO+19 |
ARAYMO | MAIN+31, MAIN+43, MAIN+56 |
DISPMO | ARAYMO+24 |
GETPPS | ARAYMO+18 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%DT | ARAYMO+7~ |
BLNKS | DISPMO+12~, DISPMO+27*, DISPMO+32, DISPMO+35 |
CNTDWN | DISPMO+12~, DISPMO+13*, DISPMO+37, DISPMO+40* |
COUNT | ARAYMO+7~ |
D1 | GETPPS+1~, GETPPS+2*, GETPPS+4, GETPPS+5, GETPPS+7, GETPPS+9, GETPPS+10 |
DAY1 | ARAYMO+7~, ARAYMO+19*, ARAYMO+24 |
DAYNO | DISPMO~, DISPMO+21, DISPMO+23 |
DAYPOS | DISPMO+12~, DISPMO+23*, DISPMO+24, DISPMO+44, DISPMO+45 |
DAYS | ARAYMO+7~, ARAYMO+11*, ARAYMO+13*, ARAYMO+14, ARAYMO+24, DISPMO+12~ |
EOFYDT | MAIN+6~, MAIN+21*, MAIN+48, MAIN+54, MAIN+56 |
FFPPE | MAIN+6~, MAIN+11* |
FIRSTDAY | ARAYMO+7~, ARAYMO+14*, ARAYMO+18, GETPPS~, GETPPS+2, GETPPS+4 |
FIRSTPP | MAIN+6~, MAIN+10*, MAIN+11, MAIN+12 |
>> FMWKS( | MAIN+17 |
GOODM | DAYSINMO+4~*, DAYSINMO+6*, DAYSINMO+7 |
GOODY | DAYSINMO+4~*, DAYSINMO+5*, DAYSINMO+7 |
HDR | ARAYMO+7~, ARAYMO+20*, ARAYMO+22, GETHEAD+1~, GETHEAD+2*, GETHEAD+3, GETHEAD+4, GETHEAD+5 |
I | DISPMO+12~, DISPMO+22*, DISPMO+23, DISPMO+28, DISPMO+32, DISPMO+38, DISPMO+39, DISPMO+45* |
LASTDAY | ARAYMO+7~, ARAYMO+14*, ARAYMO+18, GETPPS~, GETPPS+7, GETPPS+9 |
LEADBLNK | DISPMO+12~, DISPMO+26*, DISPMO+32, DISPMO+35 |
LENOFDT | GETHEAD+1~, GETHEAD+4*, GETHEAD+5 |
LFPPE | MAIN+6~, MAIN+20* |
LINE | MAIN~, MAIN+28*, MAIN+31, MAIN+43, MAIN+56, ARAYMO~, ARAYMO+21*, ARAYMO+22, ARAYMO+24, DISPMO~ , DISPMO+25*, DISPMO+30, DISPMO+32, DISPMO+34, DISPMO+35, DISPMO+39, DISPMO+45 |
LISTI | MAIN~, MAIN+17*, MAIN+31, MAIN+43, MAIN+56, ARAYMO~, ARAYMO+24, DISPMO~, DISPMO+26, DISPMO+30 , DISPMO+32, DISPMO+34, DISPMO+35, DISPMO+36* |
LSTART | MAIN~, MAIN+17* |
M | DAYSINMO~, DAYSINMO+6 |
MONTH | ARAYMO+7~, ARAYMO+9*, ARAYMO+13, GETHEAD+1~, GETHEAD+3*, GETHEAD+6, DAYSINMO+8 |
MONTHCNT | MAIN+28*, MAIN+31, MAIN+42*, MAIN+43, MAIN+55*, MAIN+56, ARAYMO~ |
NODAYS | DISPMO~, DISPMO+13, DISPMO+22 |
OUT | MAIN+6~, MAIN+28*, MAIN+40*, MAIN+41, MAIN+48* |
PP4Y | GETPPS+1~ |
PPDAY | GETPPS+1~, GETPPS+5*, GETPPS+6, GETPPS+10*, GETPPS+11 |
PPE | GETPPS+1~, GETPPS+4*, GETPPS+6, GETPPS+8*, GETPPS+11 |
PPI | GETPPS+1~ |
PPOFFSET | DISPMO+12~, DISPMO+13*, DISPMO+35 |
PPS | ARAYMO+17~ |
PPS( | DISPMO+28, DISPMO+32, GETPPS+6*, GETPPS+11* |
PRSDT | MAIN~, MAIN+10, MAIN+12*, MAIN+17, MAIN+29, MAIN+30, MAIN+31, MAIN+32, ARAYMO~, ARAYMO+8 , ARAYMO+9, ARAYMO+14, ARAYMO+19 |
PRSDY | MAIN+6~, MAIN+32*, MAIN+34, MAIN+44*, MAIN+46 |
PRSFYRNG | MAIN~, MAIN+20, MAIN+21 |
PRSMO | MAIN+6~, MAIN+32*, MAIN+33, MAIN+34, MAIN+44*, MAIN+45, MAIN+46 |
PRSNMDT | MAIN+6~, MAIN+12*, MAIN+34*, MAIN+43, MAIN+44, MAIN+46*, MAIN+48, MAIN+54, MAIN+56 |
PRSNXTMO | MAIN+6~, MAIN+33*, MAIN+34, MAIN+45*, MAIN+46, MAIN+48, MAIN+54 |
PRSYR | MAIN+6~, MAIN+32*, MAIN+34, MAIN+44*, MAIN+46 |
SHORT | ARAYMO~, ARAYMO+10, ARAYMO+11 |
SKPW1 | DISPMO~, DISPMO+21 |
STARTDAY | MAIN+30*, MAIN+31, ARAYMO~, ARAYMO+24 |
STRTDY | DISPMO~, DISPMO+21*, DISPMO+22 |
U | MAIN+11, MAIN+12, MAIN+20, MAIN+21, DAYSINMO+8 |
WRTAB | DISPMO+12~, DISPMO+38*, DISPMO+39 |
X | ARAYMO+7~, ARAYMO+8* |
Y | ARAYMO+7~, ARAYMO+8, ARAYMO+20, GETHEAD~, GETHEAD+2, DAYSINMO~, DAYSINMO+5 |
YEAR | ARAYMO+7~, ARAYMO+9*, ARAYMO+13, GETHEAD+1~, GETHEAD+5*, GETHEAD+6, DAYSINMO+8 |
ZDATE | WEEKDAY1~, WEEKDAY1+5*, WEEKDAY1+6 |