// version 04.03.000 of SP_INIT.JS file

var DocName = '';
var ProgramPage = false;

var ProgramNow = '';
var ProgramNow_Prev;
var ProgramNow_Next;
var ProgramPlan;


var PortalSize = 1;

var NowMonth   = 1;
var NowYear    = 2003;

var ThisMonth  = 0;
var ThisYear   = 0;

var MonthTable = new Array('LEDEN','ÚNOR', 'BŘEZEN', 'DUBEN',
    								'KVĚTEN','ČERVEN','ČERVENEC', 'SRPEN',
                    'ZÁŘÍ','ŘÍJEN','LISTOPAD','PROSINEC');

// version 01.00.000 of PAGEINIT function
function PageInit(par_PortalSize, par_ProgramPage, par_EmulYM)
  {
  // nastavení aktuálního měsíce a roku
  var_Today = new Date();
  NowYear = '' + var_Today.getFullYear();
  NowMonth = var_Today.getMonth() + 1;
  //alert('NowYear/Month=' + NowYear + NowMonth);

  // nastavení jména dokumentu s aktuálním programem
  var_YearStr = NowYear.substr(2,2);     
  var_MonthStr = NowMonth;
  if (var_MonthStr < 10)
   	var_MonthStr = '0' + var_MonthStr;  
  ProgramNow = 'prog_' + var_YearStr + var_MonthStr + '.html';
  ProgramNow_Next     = IncMonth(ProgramNow);
  ProgramNow_Prev     = DecMonth(ProgramNow);
  ProgramPlan         = IncMonth(ProgramNow_Next); 

  
  // nastavení jména dokumentu
  DocName = "" + document.location;
  DocName = "" + DocName.toLowerCase();
  DocName = "" + DocName.substr(DocName.lastIndexOf("/")+1);
  
  // nastavení velikosti portálu
  if (par_PortalSize == null)
    PortalSize = 1;
  else
    PortalSize = par_PortalSize;
    
  // zjištění, je-li to programová stránka
  if (par_ProgramPage == null)
    par_ProgramPage = '';
  switch (par_ProgramPage)
    {
    case '':
    case 'auto':
      if (DocName.substr(0,5) == 'prog_')
        ProgramPage = true;
      else
        ProgramPage = false;
      break;
    case 'yes':
      ProgramPage = true;
      break;
    case 'no':
      ProgramPage = false;
    }
  if (ProgramPage)
    ProgramInit(par_EmulYM);
    //alert('Now=' + ProgramNow + ', prev=' + ProgramNow_Prev + ', next=' + ProgramNow_Next);
  }

// 01.00.000    
function IncMonth(par_ProgDate)
  {
  W = par_ProgDate.substr(7,2);
  M = W*1;
  
  W = par_ProgDate.substr(5,2);
  if (W == '__')
    Y = -1;
  else
    Y = W*1;
  //alert('dec: ' + par_ProgDate + ', ' + M + '*' + Y);
  M++;
  //alert('dec: ' + par_ProgDate + ', ' + M + '*' + Y);
  if (M == 13)
    {
    M = 1;
    Y++;
    }
  //alert('dec: ' + par_ProgDate + ', ' + M + '*' + Y);
  if (Y < 0)
    newdate = '__';
  else
    {
    if (Y < 10)
      newdate = '0' + Y;
    else
      newdate = Y;
    }
  if (M < 10)
    newdate = newdate + '0' + M;
  else
    newdate = newdate + M;
  return ('prog_' + newdate + '.html');
  }  

// 01.00.000  
function DecMonth(par_ProgDate)
  {
  W = par_ProgDate.substr(7,2);
  M = W*1;
  
  W = par_ProgDate.substr(5,2);
  if (W == '__')
    Y = -1;
  else
    Y = W*1;
  //alert('dec: ' + par_ProgDate + ', ' + M + '*' + Y);
  M--;
  //alert('dec: ' + par_ProgDate + ', ' + M + '*' + Y);
  if (M == 0)
    {
    M = 12;
    Y--;
    }
  //alert('dec: ' + par_ProgDate + ', ' + M + '*' + Y);
  if (Y < 0)
    newdate = '__';
  else
    {
    if (Y < 10)
      newdate = '0' + Y;
    else
      newdate = Y;
    }
  if (M < 10)
    newdate = newdate + '0' + M;
  else
    newdate = newdate + M;
  return ('prog_' + newdate + '.html');
  }      

