// Copyright 2004 - 2011, Productive Technologies LLC
// 10/15/11 10:38

var OMCUrlRoot=location.href.match(/(.+\/omc\/)/i)?RegExp.$1:"http://OnMyCalendar.com/";
function JSOPCLFcn(D,DNm){OMCAD.ListSADO(D,DNm)};
var OMCAD=new function(){var ParKey="",NewWin="";
this.ListSA=function(Pk,NW){ParKey=((isArg(Pk))?Pk:getUrlArg("PK"));NewWin=((isArg(NW))?NW:getUrlArg("NW")).toLowerCase();dw(bhScript(OMCUrlRoot+"CalServices/GetAcct.aspx?PK="+ParKey+"&DS=PCL"));}
this.ListSADO=function(D,DNm){if(D.RetCode!=1)dw("<div style='margin:10px;padding:20px;border:1px solid black;color:#000;background: #FFF;'>We're sorry. The information you trying to access is not available at this time. Please try again later.</div>");else GenHTML(D);}
function GenHTML(D){var L=D.CalList,CurSH,LstSH,CC,MaxRows,Row,Targ,SL=CreateSortList(L,D.NonPersList,D.ParAcctSort);LstSH="~";CC=0;MaxRows=SL.length;for(var i=0;i<SL.length;i++){CurSH=SL[i][0].charAt(0).toUpperCase();if(CurSH!=LstSH){LstSH=CurSH;MaxRows=MaxRows+2;}}if(MaxRows>20){MaxRows=MaxRows+6;MaxRows=Math.floor(MaxRows/2);CC=1;}dw("<style type='text/css'>.OMCSAL1{width:100%;margin:5px 0;font-family:Verdana,Arial;font-size:12px;}.OMCSAL1 td{vertical-align:top;text-align:left;}.OMCSAL2{width:48%;}.OMCSAL5{width:100%;}.OMCSAL6{font-weight:bold;padding-top:14px;}.OMCSAL7{width:10px;}.OMCSAL8{padding-top:5px;border-bottom:1px solid #CCCCCC;}.OMCSAL9{width:60px;padding-top:5px;border-bottom:1px solid #CCCCCC;}#OMCWu{width:150px;border:1px solid #000;padding:3px 0;text-align:center;font-family:Verdana,Arial;font-size:11px;background:#FFF;}#OMCWu a:link,#OMCWu a:visited,#OMCWu a:active,#OMCWu a:hover{color:#005BC3;background:#FFF;font-weight:normal;text-decoration:underline;}</style>");var F2="<td class='OMCSAL2'><table class='OMCSAL5' cellpadding='0' cellspacing='0' border='0' cols='3'>",F3="</table></td>",F4="<td style='width:4%;'>&nbsp;</td>",F5="<tr><td class='OMCSAL6' colspan='3'>",WuRoot=(OMCUrlRoot.indexOf("localhost")>=0)?OMCUrlRoot+"WhatsUp.aspx":"http://WhatsUp.OnMyCalendar.com/",F6="<tr><td class='OMCSAL6' colspan='3'>&nbsp;</td></tr><tr><td colspan='3'><div id='OMCWu'><img src='"+OMCUrlRoot+"Images/WuCreate.gif' /><br/><a href='"+WuRoot+"?PK="+D.PK+"' target='_blank'>Learn/Sign-up</a>&nbsp;&nbsp;<a href='"+WuRoot+"' target='_blank'>Log-in</a></div></td></tr>";dw("<table class='OMCSAL1' cellpadding='0' cellspacing='0' border='0'><tr>"+F2);Targ=(NewWin=="n"?"":" target='_blank'");LstSH="~";Row=0;for(var i=0;i<SL.length;i++){CurSH=SL[i][0].charAt(0).toUpperCase();if(CC==1&&Row>=MaxRows){dw(F3+F4+F2+F6);if(CurSH==LstSH){dw(F5+LstSH+"&nbsp;&nbsp; (cont)</td></tr>");}CC=2;}if(CurSH!=LstSH){LstSH=CurSH;dw(F5+LstSH+"</td></tr>");Row+=2;}var x=L[SL[i][1]];dw("<tr><td class='OMCSAL7'>&nbsp;</td><td class='OMCSAL8'>"+x[0]+"</td><td class='OMCSAL9'><a href='"+x[1]+"'"+Targ+">website</a></td></tr>");Row++;}if(CC<2){dw(F3+F4+F2+F6);dw("<tr><td>&nbsp;</td></tr>");}dw(F3+"</tr></table>");}
function CreateSortList(L,Leave,SortOpt){var SA=new Array(),Nm,i,t,Ln,LeaveRE=new RegExp("(^| )("+Leave.join("|")+")s?( |$)","i"),SfxRE=new RegExp("^(clu|co|cpa|dds|esq|i|ii|iii|iv|jr|md|phd|rn|sr)\\.?$","i");for(i=0;i<L.length;i++){Nm=L[i][0].toUpperCase();if(SortOpt==1&&Nm.length>0&&!LeaveRE.test(Nm)){t=Nm.split(/\s/);Ln=t.pop();if(Ln==""||SfxRE.test(Ln))Ln=t.pop().replace(/,/,"");Nm=Ln+" "+t.join(" ");}SA.push([Nm,i]);}return SA.sort();}
function dw(S){document.write(S)}
function gid(S){return document.getElementById(S)}
function isArg(v){if(typeof(v)!='undefined'&&v!=null)return true;return false;}
function getUrlArg(Nm){var US=location.search.replace(/&/g,"?").toUpperCase()+"?",x=US.indexOf("?"+Nm.toUpperCase());return(x<0)?"":location.search.substring(x+Nm.length+2,US.indexOf("?",x+1));}
function bhScript(S){return "<script type='text/javascript' src='"+S+"'><\/script>";}}