... FUNCTION FwXCalendar(dDate,nRow,nCol,oDlg) LOCAL oDlf, oBrf, aSem, nSem:=1, lSel:=.F. LOCAL cMes, oMes, nMes, aMes, nAno, oAno, dSel LOCAL aPos, nLen DEFAULT dDate:=DATE() dDate:=IF(Empty(dDate),Date(),dDate) aMes:={"Enero","Febrero","Marzo","Abril","Mayo","Junio","Julio",; ...