<% '------------------------------------------------------------ ' This function finds the last date of the given month '------------------------------------------------------------ Function GetLastDay(intMonthNum, intYearNum) Dim dNextStart If CInt(intMonthNum) = 12 Then dNextStart = CDate( "1/1/" & intYearNum) Else dNextStart = CDate(intMonthNum + 1 & "/1/" & intYearNum) End If GetLastDay = Day(dNextStart - 1) End Function '------------------------------------------------------------------------- ' This routine prints the individual table divisions for days of the month '------------------------------------------------------------------------- Sub Write_TD(sValue, sClass) Response.Write " " & sValue & "" & vbCrLf End Sub ' Constants for the days of the week Const cSUN = 1, cMON = 2, cTUE = 3, cWED = 4, cTHU = 5, cFRI = 6, cSAT = 7 ' Get the name of this file sScript = Request.ServerVariables("SCRIPT_NAME") ' Check for valid month input If IsEmpty(Request("MONTH")) OR NOT IsNumeric(Request("MONTH")) Then datToday = Date() intThisMonth = Month(datToday) ElseIf CInt(Request("MONTH")) < 1 OR CInt(Request("MONTH")) > 12 Then datToday = Date() intThisMonth = Month(datToday) Else intThisMonth = CInt(Request("MONTH")) End If ' Check for valid year input If IsEmpty(Request("YEAR")) OR NOT IsNumeric(Request("YEAR")) Then datToday = Date() intThisYear = Year(datToday) Else intThisYear = CInt(Request("YEAR")) End If strMonthName = MonthName(intThisMonth) datFirstDay = DateSerial(intThisYear, intThisMonth, 1) intFirstWeekDay = WeekDay(datFirstDay, vbSunday) intLastDay = GetLastDay(intThisMonth, intThisYear) ' Get the previous month and year intPrevMonth = intThisMonth - 1 If intPrevMonth = 0 Then intPrevMonth = 12 intPrevYear = intThisYear - 1 Else intPrevYear = intThisYear End If ' Get the next month and year intNextMonth = intThisMonth + 1 If intNextMonth > 12 Then intNextMonth = 1 intNextYear = intThisYear + 1 Else intNextYear = intThisYear End If ' Get the last day of previous month. Using this, find the sunday of ' last week of last month LastMonthDate = GetLastDay(intLastMonth, intPrevYear) - intFirstWeekDay + 2 NextMonthDate = 1 ' Initialize the print day to 1 intPrintDay = 1 ' Open a record set of schedules Set Rs = Server.CreateObject("ADODB.RecordSet") ' These dates are used in the SQL dFirstDay = intThisMonth & "/1/" & intThisYear dLastDay = intThisMonth & "/" & intLastDay & "/" & intThisYear sSQL = "SELECT DISTINCT Start_Date, End_Date FROM t50Events WHERE " & _ "(Start_Date >=#" & dFirstDay & "# AND Start_Date <= #" & dLastDay & "#) " & _ "OR " & _ "(End_Date >=#" & dFirstDay & "# AND End_Date <= #" & dLastDay & "#) " & _ "OR " & _ "(Start_Date < #" & dFirstDay & "# AND End_Date > #" & dLastDay & "# )" & _ "ORDER BY Start_Date" 'Response.Write sSQL ' Open the RecordSet with a static cursor. This cursor provides bi-directional navigation Rs.Open sSQL, sDSN, adOpenStatic, adLockReadOnly, adCmdText %> Richmond Parents Monthly | Fifty Plus - Richmond magazines for seniors and parents

 

Fifty Plus Logo Banner
First Thoughts by Angela Lehman-Rios

This month in Fifty Plus we hear the voices of men and women who, because they are gay, have an extra layer of concerns as they reach retirement and age into their 70s and beyond.
Writers Alberta Lindsey and Diane Lang interviewed gays and lesbians primarily from central Virginia to hear their perspectives on some of the issues they face as they age. A concern that emerged from many conversations is their inability to be legally married or even, in some cases, recognized as partners for the purposes of financial, health and Social Security benefits.
However, a number of interviewees expressed hope that these restrictions would eventually change, perhaps with a new president or with an increasingly vocal gay boomer population.

Several people mentioned that the young men and women who came out during the 1970s—when it was becoming literally less dangerous to be gay—are now in their 50s and, along with the boomer population in general, are poised to change the way the nation addresses aging and end-of-life issues.
Yet at least two people said they thought that the “gay community” focuses on youth or the “clubbing” experience. These remarks were not included in the articles, but they seem to point to a secondary problem. Perhaps the emphasis on youth—both among gays and in the perception of gay culture by the broader society—is even more pronounced because there’s so little attention being given to the situation of gays and aging.
(Diane Lang interviewed a Tennessee man in his 80s who said, half-jokingly, that once a person gets to be so old, they become asexual in the eyes of others and thus not so worrisome. Unfortunately, a decrease in hostility and rejection doesn’t mean an increase in real support.)

Despite changes in how the broader society regards homosexuality, it is telling that many people contacted for these articles chose not to be interviewed, or asked that their real names not be used because, for example, they had not fully come out and were concerned about reaction from coworkers, acquaintances or caregivers.
The names of both insurance professionals who spoke with Diane are real, and one cautioned us that interviewees who did choose to use their names should consider the small chance of negative repercussions to their health or life insurance coverage.
For the most part, however, the picture is not one of gloom. People find hope in small changes. Robert in Atlanta told Diane that three years ago, he and his partner couldn’t be on the same auto insurance policy. Now they can, and are saving hundreds of dollars. Janet Inwood shared with Alberta Lindsey how glad she was that her partner Donna could discuss questions with co-workers at a nursing seminar on end-of-life issues for gay patients.
Ultimately, despite the extra layers of complexity, if you’re 50 years old, you’re 50 whether you’re gay or straight. As David Toth of Petersburg said, “As more people come to accept us for who we are, they will see that there’s not much difference between straight and gay people.”

archives:

January 08February 08March 08

 September 07 October 07November 07December 07