ÿþ// JScript source code

function TESTF( Y){

  var M = Y - 12;

  M = parseInt(M / 29);

  M = M * 29;

  M = M - (-12);

  M = Y - M;

  M = M % 4;

  var N = Y;

  N++;

  N = N - 12;

  N = parseInt(N / 29);

  N = N * 29;

  N = N - (-12);

  T = Y -(-1);

  N = T - N;

  N = N % 4;

  if( (M ==0) && (N != 0) )

    return true;

  else

    return false;  

}    



//========================================================

function TESTM (Y){

  if(Y % 4 ==0)

    return true;

  else

    return false;

}      

//========================================================

function DaysF(N){

  switch(N){

    case 0 : return "JC 4F(G";

    case 1 : return "/H4F(G";    

    case 2 : return "3G 4F(G";

    case 3 : return "†G'1 4F(G";

    case 4 : return "~F, 4F(G";

    case 5 : return ",E9G";

    case 6 : return "4F(G";

  }  

  return;

}

//========================================================

function DaysM(N){

  switch(N){

    case 1 : return "Mon";    

    case 2 : return "Tue";

    case 3 : return "Wed";

    case 4 : return "Thu";

    case 5 : return "Fri";

    case 6 : return "Sat";

    case 0 : return "Sun";

  }  

  return;

}

//========================================================

function MonthF(N){

  switch(N){

    case 1  : return "A1H1/JF";

    case 2  : return "'1/J(G4*";

    case 3  : return ".1/'/";

    case 4  : return "*J1";

    case 5  : return "E1/'/";

    case 6  : return "4G1JH1";

    case 7  : return "EG1";

    case 8  : return ""('F";

    case 9  : return ""01";

    case 10 : return "/J";

    case 11 : return "(GEF";

    case 12 : return "'3AF/";

  }

  return;

}

//========================================================

function MonthM(N){

  switch(N){

    case 1  : return "January";

    case 2  : return "February";

    case 3  : return "March";

    case 4  : return "April";

    case 5  : return "May";

    case 6  : return "June";

    case 7  : return "July";

    case 8  : return "August";

    case 9  : return "September";

    case 10 : return "October";

    case 11 : return "November";

    case 12 : return "December";

  }

  return;

}

//========================================================

function DateF(Num){

  var TDate = new Date();

  var Y = TDate.getFullYear();

  var M = TDate.getMonth() + 1;

  var D = TDate.getDate();

  var Dw = TDate.getDay();    

  // Sal Miladi Kabiseh 

  var M_YEAR366 = new Array(0,00,01,00,02,01,01,00,00,00,-1,00,00);  

  // Sal Shamsi Kabiseh 

  var SH_YEAR366 = new Array(0,00,01,-1,00,-1,-1,-2,-2,-2,-3,-2,-2);  

  // Sal Shamsi And Miladi Kabise

  var SH_YEAR366_AND_SH_YEAR366 = new Array(0,00,01,00,01,00,00,-1,-1,-1,-2,-1,-1);   

  var YEARS = new Array(0,00,01,-1,01,00,00,-1,-1,-1,-2,-1,-1);  

  var Y1,M1,D1;

  var SH_YEAR,M_YEAR;

  var GG;

  var MKABISEH,SKABISEH;

  var MKABISEHB,SKABISEHB;

  var MKABISEHN,SKABISEHN;

  

  GG = true;  

  SH_YEAR = 1374;

  M_YEAR  = 1996;

  D1 = D-1;

  M1 = M-1;

  Y1 = Y-Y;

  SH_YEAR = SH_YEAR + (Y - M_YEAR);

  MF = 10 + M1;

  YF = SH_YEAR + Y1;  

  MKABISEH = TESTM (Y);    

  SKABISEH = TESTF (YF);

  MKABISEHB = TESTM (Y-1);  

  SKABISEHB = TESTF (YF-1);

  MKABISEHN = TESTM (Y+1);  

  SKABISEHN = TESTF (YF+1);

      

  if( (!SKABISEH) && (!MKABISEH))

    if((SKABISEHN) && (MKABISEHB))

      DF = 12+D1+(YEARS[M]);

    else      

      DF = 11 + D1 + (YEARS[M]);      

  else

    if( (SKABISEH) && (MKABISEH))

       DF = 11 + D1 + (SH_YEAR366_AND_SH_YEAR366[M]);

    else

     if((SKABISEH) && (MKABISEHN))

       DF = 11 + D1 + (SH_YEAR366[M]);

     else     

       if((SKABISEH) && (!MKABISEHN))

         DF = 12 + D1 + (SH_YEAR366[M]);

       else       

         if((MKABISEH) && (SKABISEHB))

             DF = 10 + D1 + (M_YEAR366[M]);

         else         

           if((MKABISEH) && (!SKABISEHB))

              DF = 11 + D1 + (M_YEAR366[M]);

  GG = true;  

  do{

    if((DF>31) && (MF<7)){

      DF = DF-31;

      MF = MF+1;

    }

    else

      if( (DF>30) && ((MF>6) && (MF<12))){

        DF = DF - 30;

        MF = MF + 1;

      }

      else

        if( (DF>29) && (MF == 12) && (!SKABISEH)){

          DF = DF - 29;

          MF = MF + 1;

        }

        else

          if( (DF>30) && (MF == 12) && (SKABISEH) ){

            DF = DF - 30;

            MF = MF + 1;

          }

          else

            GG = false;

          if(MF>12){

            MF = MF-12;

            YF = YF+1;

            GG = true;

          }

      else

        GG = false;

        

  }while(GG);

//  document.writeln("<BR><B> Function Result of DateF : Year="+YF+" Month = "+MF+" Day = "+DF+"</B><BR>");  

  var Full_Shamsi = DaysF(Dw) + " " + DF + " " + MonthF(MF) + " " + YF;

//  document.writeln("<BR><B>"+Full_Shamsi+"</B><BR>");  

  switch(Num){

    case 1 :

      return YF;

      break;

    case 2 :

      return MF;

      break;

    case 3 :

      return DF;

    case 4 :

      return Full_Shamsi;

  }    

}

//========================================================

function DateM(Y,M,D,Num){

  var SH_YEAR366 = new Array(0,00,00,01,01,02,02,02,02,01,01,00,-1);

  var YEARS      = new Array(0,01,01,02,02,03,03,03,03,02,02,01,00);

  var Y1,M1,D1;

  var SH_YEAR = 1377;

  var M_YEAR = 1998;

  var GG = true;

  var MKABISEH,SKABISEH;

  var MKABISEHB,SKABISEHB;

  var MKABISEHN,SKABISEHN;

  var Include;

  

  D1 = D-1;

  M1 = M-1;

  Y1 = Y-Y;

  M_YEAR = M_YEAR-(-(Y-SH_YEAR));

  MM = (3+M1);

  YM = M_YEAR + Y1;

  MKABISEH = TESTM(YM);

  SKABISEH = TESTF(Y);

  MKABISEHB = TESTM(YM-1);

  SKABISEHB = TESTF(Y-1);

  MKABISEHN = TESTM(YM+1);

  SKABISEHN = TESTF(Y+1);

  if((!MKABISEH) && (!SKABISEH))

    DM = 20+D1+(YEARS[M]);    

  else

    if((MKABISEH) && (SKABISEHB))

      DM = 21 + D1 + (YEARS[M]);

    else

      if( ((!MKABISEHN) && (SKABISEH)) || (MKABISEHB))

        DM = 20+D1+(SH_YEAR366[M]);

  GG = true;

  do{

    var Include = false;

    if( (MM == 1) || (MM == 3) || (MM == 5) || (MM == 7) || (MM == 8) ||

        (MM == 10) || (MM == 12))

      Include = true;

    else

      Include = false;      

    if( (DM>31) && Include){

      DM = DM - 31;

      MM++;

    }

    else

      if( (DM>30) && ( (MM == 4) || (MM == 6) || (MM == 9) || (MM == 11))){

        DM = DM-30;

        MM++;

      }

      else

        if( (DM>28) && (MM==2) && (!MKABISEH)){

          DM = DM-28;

          MM++;

        }

        else

          if( (DM>29) && (MM=2) && (MKABISEH)){

            DM = DM-29;

            MM++;

          }

          else

            GG = false;

    if( MM > 12){

      MM = MM-12;

      YM++;

      GG = true;

    }

    else

      GG = false;

  }while(GG);

  var Full_Miladi = DaysM(DM) + " " + DM + " " + MonthM(MM) + " " + YM;  

  switch(Num){

    case 1 : return DM;

    case 2 : return MM;

    case 3 : return YM;

    case 4 : return Full_Miladi;

  }  

}

//==================================================

function RDateM(Num)

{

  var TDate = new Date();

  var Y = TDate.getFullYear();

  var M = TDate.getMonth() + 1;

  var D = TDate.getDate();

  var Dw = TDate.getDay();    

  var Full_Date = DaysM(Dw) + " " + D + " " + MonthM(M) + " " + Y;

  switch(Num){

    case 1 :

      return Y;

      break;

    case 2 :

      return M;

      break;

    case 3 :

      return D;

    case 4 :

      return Full_Date;

  }    



}

//==================================================

function Active_User()

{

  document.all('UID').focus();    

}

//==================================================

function Active_User1()

{  

  document.all('FullName').focus();    

}

//==================================================