JDlist = new Array ();
JD = new Array ();
MyNameIs1 = new Array ();
MyNameIs2 = new Array ();
DayProf1 = new Array ();
DayProf2 = new Array ();
DataRec = new Array ();
UName1 = new Array ();
UName2 = new Array ();
EServ1 = new Array ();
EServ2 = new Array ();
MonNames = new Array('Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun', 'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec');
DateToPrint = new Array ();
function ConvToDate() {
    for (CollTimes = 0; CollTimes < CollnCnt ; CollTimes++) {
        FindDateNum = WhichDayIsIt[CollTimes];
        // this goes from days-from-zero to JD
        TheCollDate = JDlist[FindDateNum];
        // then backtracks to calendar date
        TheCollDate = TheCollDate + 0.5;
        IntPart = Math.floor(TheCollDate);
        F = TheCollDate - IntPart;
        if (IntPart > 2299160) {
                A = Math.floor((IntPart - 1867216.25)/36524.25);
                B = IntPart + 1 + A - Math.floor(A / 4);
        } else {
                B = IntPart;
        }
        C = B + 1524;
        D = Math.floor((C - 122.1) / 365.25);
        E = Math.floor(365.25 * D);
        G = Math.floor((C - E) / 30.6001);
        dom = C - E + F - Math.floor(30.6001 * G);
        IntDate = Math.floor(dom);
        IntDate = ((IntDate < 10) ? '0' : '') + IntDate;
        Hours = (dom - IntDate) * 24;
        Mins = (Hours - Math.floor(Hours)) * 60;
        Mins = Math.floor(Mins);
        Hours = Math.floor(Hours);
        if (G < 13.5) {
                mon = G - 1;
        } else {
                mon = G - 13;
        }
        theMonth = MonNames[mon - 1];
        if (mon > 2.5) {
                theYear = D - 4716;
        } else {
                theYear = D - 4715;
        }
        if (theYear <= 0) {
                theYear = (-theYear + 1) + ' BC';
        }
        DateToPrint[CollTimes] = IntDate + ' ' + theMonth + ' ' + theYear;
    }
}
EMmsg = new Array ();
demowin = new Array()
function SendMeMail() {
        for (msgcnt = 0 ; msgcnt < CollnCnt ; msgcnt++) {
                EMmsg[msgcnt] = '';
        }
        // does all the dates at once
        ConvToDate();
        for (CollTimes = 0; CollTimes < CollnCnt ; CollTimes++) {
                flag1 = 0;
                flag2 = 0;
                // find the date for that colln time
                FindDateNum = WhichDayIsIt[CollTimes];
                if ('' + UName1[FindDateNum] > '') {
                        // if uname1 for that date exists...
                        email1 = UName1[FindDateNum] + '@' + EServ1[FindDateNum];
                        whoamI1 = MyNameIs1[FindDateNum];
                        flag1 = 1;
                }
                if ('' + UName2[FindDateNum] > '') {
                        // if uname2 for that date exists...
                        email2 = UName2[FindDateNum] + '@' + EServ2[FindDateNum];
                        whoamI2 = MyNameIs2[FindDateNum];
                        flag2 = 1;
                }
                EMmsg[CollTimes] += 'mailto:';
                if (flag1 == 1) { EMmsg[CollTimes] += email1 }
                if (flag1 == 1 && flag2 == 1) { EMmsg[CollTimes] += ',' }
                if (flag2 == 1) { EMmsg[CollTimes] += email2 }
                EMmsg[CollTimes] += '?subject=Sap Collection for ' + DateToPrint[CollTimes] + '&body=';
                if (flag1 == 1) { EMmsg[CollTimes] += whoamI1 + ': ' + email1 + '\n' }
                if (flag1 == 1 && flag2 == 1) { EMmsg[CollTimes] += '<br />\n' }
                if (flag2 == 1) { EMmsg[CollTimes] += whoamI2 + ': ' + email2 + '\n' }
                WinName = 'DemoWindow' + CollTimes;
                demowin[CollTimes] = open ( '', WinName, 'toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=0,width=300,height=250');
                demowin[CollTimes].focus();
                demowin[CollTimes].location = EMmsg[CollTimes];
                demowin[CollTimes].document.close();
                demowin[CollTimes].close();
        }
}