<!--
// FIDSnet2000 Date Routines
// (c) Neatstep Solutions Ltd, 1997-2000, All Rights Reserved
// Developed for World Aviation Services & Products Ltd
// Supplied by Airport Information Systems Ltd

function getdayext(td){
var retstr = "";

//if(td<
//td = td % 10;
switch(td){
   case 1	 : retstr="st";
                    break;
   case 21	 : retstr="st";
                    break;
   case 31	 : retstr="st";
                    break;
   case 2	 : retstr="nd";
                    break;
   case 22	 : retstr="nd";
                    break;
   case 3	 : retstr="rd";
                    break;
   case 23	 : retstr="rd";
                    break;
   default       : retstr="th";
                    break;
}
return retstr;
}

function makedate(dstyle,incday,dz,dsep){
// The default Date separator (dsep) changes dependent on format
// selected, however, setting dsep in the call will override
// this.
// Timezone (tz) is supplied if UTC0 or GMT0 times are being used
// elsewhere on the screen (we wouldn't want the date to change
// before/after midnight would we?)

var longmonths= new Array("","January","February","March","April","May","June","July","August","September","October","November","December");
var shortmonths= new Array("","Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec");
var longdays= new Array("Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday");
var shortdays= new Array("Sun","Mon","Tue","Wed","Thu","Fri","Sat");

var tdt = new Date();

var dow = 0;
var dom = 0;
var mon = 0;
var year = 0;
var syear = 0;

if(dsep=="") desp="/";


if(dz!="GMT0" && dz!="UTC0"){
   dow = tdt.getDay();
   dom = tdt.getDate();
   mon = (tdt.getMonth())+1;
   year = tdt.getFullYear();
   syear = year % 100;          
}else{
   dow = tdt.getUTCDay();
   dom = tdt.getUTCDate();
   mon = (tdt.getUTCMonth())+1;
   year = tdt.getUTCFullYear();
   syear = year % 100;          
}

var retstr = "";
if(incday!=""){
  if(incday=="ld"){
     retstr = longdays[dow]+", ";
  }else{
     retstr=shortdays[dow]+",";
  }
}


   switch(dstyle){
       case "dd/mm/yy":
                 retstr = retstr+add0(dom)+"/"+add0(mon)+"/"+add0(syear);
                 break;
       case "dd/mm/yyyy":
                 retstr = retstr+add0(dom)+"/"+add0(mon)+"/"+year;
                 break;
       case "d/mm/yy":
                 retstr = retstr+dom+"/"+add0(mon)+"/"+add0(syear);
                 break;
       case "d/mm/yyyy":
                 retstr = retstr+dom+"/"+add0(mon)+"/"+year;
                 break;
       case "d/m/yy":
                 retstr = retstr+dom+"/"+mon+"/"+add0(syear);
                 break;
       case "d/m/yyyy":
                 retstr = retstr+dom+"/"+mon+"/"+year;
                 break;

       case "mm/dd/yy":
                 retstr = retstr+add0(mon)+"/"+add0(dom)+"/"+add0(syear);
                 break;
       case "mm/dd/yyyy":
                 retstr = retstr+add0(mon)+"/"+add0(dom)+"/"+year;
                 break;
       case "m/dd/yy":
                 retstr = retstr+mon+"/"+add0(dom)+"/"+add0(syear);
                 break;
       case "m/dd/yyyy":
                 retstr = retstr+mon+"/"+add0(dom)+"/"+year;
                 break;
       case "m/d/yy":
                 retstr = retstr+mon+"/"+dom+"/"+add0(syear);
                 break;
       case "m/d/yyyy":
                 retstr = retstr+mon+"/"+dom+"/"+year;
                 break;

       case "dd shortmonth yy":
                  retstr = retstr+add0(dom)+" "+shortmonths[mon]+" "+add0(syear);
                  break;
       case "d shortmonth yy":
                  retstr = retstr+dom+" "+shortmonths[mon]+" "+add0(syear);
                  break;
       case "d+(st.nd.rd.th) shortmonth yy":
                  retstr = retstr+dom+getdayext(dom)+" "+shortmonths[mon]+" "+add0(syear);
                  break;
       case "dd shortmonth yyyy":
                  retstr = retstr+add0(dom)+" "+shortmonths[mon]+" "+year;
                  break;
       case "d shortmonth yyyy":
                  retstr = retstr+dom+" "+shortmonths[mon]+" "+year;
                  break;
       case "d+(st.nd.rd.th) shortmonth yyyy":
                  retstr = retstr+dom+getdayext(dom)+" "+shortmonths[mon]+" "+year;
                  break;

       case "dd longmonth yy":
                  retstr = retstr+add0(dom)+" "+longmonths[mon]+" "+add0(syear);
                  break;
       case "d longmonth yy":
                  retstr = retstr+dom+" "+longmonths[mon]+" "+add0(syear);
                  break;
       case "d+(st.nd.rd.th) longmonth yy":
                  retstr = retstr+dom+getdayext(dom)+" "+longmonths[mon]+" "+add0(syear);
                  break;
       case "dd longmonth yyyy":
                  retstr = retstr+add0(dom)+" "+longmonths[mon]+" "+year;
                  break;
       case "d longmonth yyyy":
                  retstr = retstr+dom+" "+longmonths[mon]+" "+year;
                  break;
       case "d+(st.nd.rd.th) longmonth yyyy":
                  retstr = retstr+dom+getdayext(dom)+" "+longmonths[mon]+" "+year;
                  break;


       case "shortmonth, dd yy":
                  retstr = retstr+shortmonths[mon]+", "+add0(dom)+" "+add0(syear);
                  break;
       case "shortmonth, d yy":
                  retstr = retstr+shortmonths[mon]+", "+dom+" "+add0(syear);
                  break;
       case "shortmonth, d+(st,nd,rd,th) yy":
                  retstr = retstr+shortmonths[mon]+", "+dom+getdayext(dom)+" "+add0(syear);
                  break;
       case "shortmonth, dd yyyy":
                  retstr = retstr+shortmonths[mon]+", "+add0(dom)+" "+year;
                  break;
       case "shortmonth, d yyyy":
                  retstr = retstr+shortmonths[mon]+", "+dom+" "+year;
                  break;
       case "shortmonth, d+(st.nd.rd.th) yyyy":
                  retstr = retstr+shortmonths[mon]+", "+dom+getdayext(dom)+" "+year;
                  break;

       case "longmonth, dd yy":
                  retstr = retstr+longmonths[mon]+", "+add0(dom)+" "+add0(syear);
                  break;
       case "longmonth, d yy":
                  retstr = retstr+longmonths[mon]+", "+dom+" "+add0(syear);
                  break;
       case "longmonth, d+(st.nd.rd.th) yy":
                  retstr = retstr+longmonths[mon]+", "+dom+getdayext(dom)+" "+add0(syear);
                  break;
       case "longmonth, dd yyyy":
                  retstr = retstr+longmonths[mon]+", "+add0(dom)+" "+year;
                  break;
       case "longmonth, d yyyy":
                  retstr = retstr+longmonths[mon]+", "+dom+" "+year;
                  break;
       case "longmonth, d+(st.nd.rd.th) yyyy":
                  retstr = retstr+longmonths[mon]+", "+dom+getdayext(dom)+" "+year;
                  break;


       default:
        retstr = "ERR: Invalid date format requested";
   }
    return retstr;
}
-->