%@ Language=VBScript %>
<%
'====== Hit Counter section
'Dimension variables
Dim fsoObject 'File System Object
Dim tsObject 'Text Stream Object
Dim filObject 'File Object
Dim lngVisitorNumber 'Holds the visitor number
Dim intWriteDigitLoopCount 'Loop counter to display the graphical hit count
'Create a File System Object variable
Set fsoObject = Server.CreateObject("Scripting.FileSystemObject")
'Initialise a File Object with the path and name of text file to open
Set filObject = fsoObject.GetFile(Server.MapPath("Plans-2-150hit_count.txt"))
'Open the visitor counter text file
Set tsObject = filObject.OpenAsTextStream
'Read in the visitor number from the visitor counter file
lngVisitorNumber = CLng(tsObject.ReadAll)
'Increment the visitor counter number by 1
lngVisitorNumber = lngVisitorNumber + 1
'Create a new visitor counter text file over writing the previous one
Set tsObject = fsoObject.CreateTextFile(Server.MapPath("Plans-2-150hit_count.txt"))
'Write the new visitor number to the text file
tsObject.Write CStr(lngVisitorNumber)
'Reset server objects
Set fsoObject = Nothing
Set tsObject = Nothing
Set filObject = Nothing
'====== End Hit Counter section
'=========== Date Function ==========
Function kaos_date(ByVal StringStructure,ByVal Timestamp)
'-- validate arguments --
If Not IsDate(Timestamp) Then 'invalid date
kaos_date = Timestamp
Exit Function
End If
If InStr(1,StringStructure,"%",0) = 0 Then 'invalid structure
kaos_date = Timestamp
Exit Function
End If
Dim zTmpDate1,zTmp1,zTmp2
zTmpDate1 = StringStructure
'# day of month / suffixes #
zTmp1 = Day(Timestamp) 'day of month number
Select Case zTmp1 'day suffix
Case 1,21,31
zTmp2 = "st"
Case 2,22
zTmp2 = "nd"
Case 3,23
zTmp2 = "rd"
Case Else
zTmp2 = "th"
End Select
zTmpDate1 = Replace(zTmpDate1,"%d",zTmp1,1,-1,0)
zTmpDate1 = Replace(zTmpDate1,"%D",Right(("0" & zTmp1),2),1,-1,0)
zTmpDate1 = Replace(zTmpDate1,"%s",zTmp2,1,-1,0)
zTmpDate1 = Replace(zTmpDate1,"%S",UCase(zTmp2),1,-1,0)
'# weekday name / number #
zTmp1 = Weekday(Timestamp)
zTmp2 = WeekdayName(zTmp1)
zTmpDate1 = Replace(zTmpDate1,"%e",Left(zTmp2,3),1,-1,0)
zTmpDate1 = Replace(zTmpDate1,"%E",zTmp2,1,-1,0)
zTmpDate1 = Replace(zTmpDate1,"%w",zTmp1,1,-1,0)
'# month name / number #
zTmp1 = Month(Timestamp)
zTmp2 = MonthName(zTmp1)
zTmpDate1 = Replace(zTmpDate1,"%m",zTmp1,1,-1,0)
zTmpDate1 = Replace(zTmpDate1,"%M",Right(("0" & zTmp1),2),1,-1,0)
zTmpDate1 = Replace(zTmpDate1,"%n",Left(zTmp2,3),1,-1,0)
zTmpDate1 = Replace(zTmpDate1,"%N",zTmp2,1,-1,0)
'# year / day of year #
zTmp1 = Year(Timestamp)
zTmpDate1 = Replace(zTmpDate1,"%y",Right(CStr(zTmp1),2),1,-1,0)
zTmpDate1 = Replace(zTmpDate1,"%Y",zTmp1,1,-1,0)
zTmpDate1 = Replace(zTmpDate1,"%z",DatePart("y",Timestamp),1,-1,0)
'# times #
'am/pm indicator
zTmp1 = Hour(Timestamp)
If zTmp1 < 12 Then
zTmp2 = "am"
Else
zTmp2 = "pm"
End If
zTmpDate1 = Replace(zTmpDate1,"%a",zTmp2,1,-1,0)
zTmpDate1 = Replace(zTmpDate1,"%A",UCase(zTmp2),1,-1,0)
'24hr hour number
zTmpDate1 = Replace(zTmpDate1,"%h",zTmp1,1,-1,0)
zTmpDate1 = Replace(zTmpDate1,"%H",Right(("0" & zTmp1),2),1,-1,0)
'12hr hour number
If zTmp1 > 12 Then
zTmp1 = zTmp1 - 12
End If
'hour 0 fix, courtesy of Bob Gregorius. thanks Bob :)
If zTmp1 = 0 Then
zTmp1 = 12
End If
zTmpDate1 = Replace(zTmpDate1,"%g",zTmp1,1,-1,0)
zTmpDate1 = Replace(zTmpDate1,"%G",Right(("0" & zTmp1),2),1,-1,0)
'minutes and seconds
zTmpDate1 = Replace(zTmpDate1,"%t",Right(("0" & Minute(Timestamp)),2),1,-1,0)
zTmpDate1 = Replace(zTmpDate1,"%T",Right(("0" & Second(Timestamp)),2),1,-1,0)
'# return the now parsed date string to the function #
kaos_date = zTmpDate1
End Function
'=========== End Date Function ==========
%>
Our Effective Quit Plans
OUR
EFFECTIVE QUIT PLANS A healthier future for your
employees!
Helping
employees quit smoking in just 17 days without
the
use of any substance or drug!
New
Corporate/Group Seminars and Smoking Cessation Programs
- As
a part of our smoke-free workplace outreach program, we
offer group seminars to help employers, social groups and
other large or small organizations to better educate their
employees and patrons about the health and socioeconomic
effects of smoking on their lives. Our seminars and workshops,
along with our proven stop smoking plans, products and services
are strong quitting programs and techniques without the
use of any substance or drug. They also provide an effective
tool to bring together, unify, inform and educate all employees,
smokers as well as non-smokers, of the health hazards, financial
burden and long-term negative impact that smoking has on
them, their children and loved ones. Most importantly, it
will create an environment that includes openness, cooperation,
support and care that smokers need to quit and stay tobacco
free. Click here
to email us with your request.
An
estimated 1 out of 4 Americans smoke - that
means, unfortunately, 1 out of 4 of your employees smoke
and/or live with one who smokes! Tobacco use
and smoking among employees can be reduced to improve their
health, productivity and socioeconomic well-being while
saving employers a great amount of money! An average smoker
loses 3 hours and 20 minutes of their waking hours to smoking
-- that means in an 8-hour shift, the employer is losing
nearly 2 hours of productivity or over $9,300 a year! Nearly
45 million smokers have quit smoking in the past decade,
they can too!
It is most certain that in
the near future it is going to get more expensive, if not
outright impossible, to obtain health insurance for your
employees who smoke. They may even have to be smoke free
for 5 to 10 years before they can be qualified to obtain
health insurance!
Paying
for tobacco and smoking cessation treatments is
the single most cost-effective health insurance
benefit for adults that can be provided to employees. —
US Surgeon General
Investing
in tobacco cessation provides a proven return on investment
for your company - Recent
studies suggest the benefits of cessation outweigh the
costs and offer a net gain over time. Researchers at
the University of Michigan simulated the financial results
of a workplace cessation program. The results suggested
that, by the third year, the savings to the company
matched the total costs of the cessation program. By
the fifth year, the financial benefits were almost twice
the costs.
ESTIMATED
COST SAVINGS TO EMPLOYER FOR IMPLEMENTING
SFSC SMOKE-FREE WORKPLACE SEMINAR AND PROGRAM
Smoking
is costly to employees as is to employers both in terms of
smoking-related medical
expenses and lost productivity. SFSC smoking cessation seminars,
programs and plans help
educate all employees on the adverse effects of smoking on
their health and wealth while
cutting costs and increasing employee productivity
Number
of Employees
(All included)
Estimated
Number of Smokers
(1 out of 4)
Estimated Annual Loss to Employer
($9,349 each smoker)
Estimated
SFSC Seminar and
Program Cost
(Total)
Percentage
of Savings
to Employer
25
6
$ 56,094
$
13,800
75%
50
13
$
121,537
$
15,900
87%
100
25
$
233,725
$
19,500
92%
250
63
$
588,987
$
39,510
93%
500
125
$
1,168,625
$
78,750
93%
1000
250
$
2,337,250
$ 150,000
94%
2000
500
$
4,674,500
$ 240,000
95%
No
matter how small or large the group, our
professional Associates are ready to provide you with a Smoke-Free
Workplace Seminar and Program proposal specially
tailored for your organization to help cut
costs and increase productivity.
Please email us with
your inquiries.
These
plans are based on our Proven Stop Smoking Technique™
and our key, three-step
principle: preparation, quitting and support to help smokers quit smoking in just 17 days without the
use of any substance or drug and stay smoke free! This effective
and proven technique gradually weans smokers off of their cigarettes,
reducing their craving and painful withdrawal symptoms that weaken
their resolve and force them to smoke again!
Quit
now.™
Quit right!
6 Proven Quit Smoking Plans Each
just as effective
Average
time lost smoking cigarettes for each smoker
and its toll on employers
Based
on 20 cigarettes per day with an average of 10 minutes per cigarette
Time
Loss
to employee
Loss
to employer
In
a day
3
hours and 20 minutes of
a waking day
1
hour and 40 minutes of
productive work
In
a week
24
waking hours or
1.5 waking days
8
hours and 22 minutes of
productive work
In
a month
101
waking hours or nearly
7 waking days
34
hours and 40 minutes of
productive work
In
a year
1,205
waking hours or nearly
2.5 waking
months
Nearly
2.5 months of
productive work
In
10 years
12,050
waking hours or nearly
25 waking months
Over
2.3 years of
productive work
In
30 years
36,150
waking hours or nearly
6.5 years of their life!
Over
6 years of
productive work
These
calculations are based on a smoker staying up 16 hours a day
with 8 hours sleep
These
calculations are based on a smoker working 8 hours a day,
5 days a week,
50 weeks a year
Cessation
is Cost Effective for Health Plans
Investment
in smoking cessation leads to improved health outcomes, lower health
care costs and to more affordable health insurance premiums
- According to a recent study by Leif Associates, Inc., a health
care actuarial consulting firm.
In
addition:
Smoking adds approximately
7% to the total cost of health care.
Smokers average 31% higher health
care costs than nonsmokers.
If a health plan had no smokers,
estimated savings would be approximately $1.3 million per year
per 10,000 smokers.
Over a three-year period, expenditures
for smoking cessation programs in the range of $100 to $300 per
smoker attempting to quit should be fully offset by health care
cost savings in a typical commercial population.
Greater cost savings will likely
occur within special populations such as pregnant women and persons
with cardiac conditions.
The Surgeon General
has indicated smokers who quit dramatically reduce the risk of illness.
Research shows health care costs for smokers who quit decline over
time, while health care costs of continuing smokers increase over
time.
Research also shows
quit rates improve when managed care organizations set guidelines
and compensate their employees for treating tobacco dependence.
According to the
CDC, smoking is the leading cause of preventable death each year
in the United States, claiming more than 440,000 lives each year.
That is more than the combined death rates for AIDS, drugs, alcohol,
homicide, suicide and motor vehicle accidents. Smokers tend to incur
more medical costs, see physicians more often, and be admitted to
hospitals for longer periods than nonsmokers.
Economic
Impact of Tobacco Use!
The
economic impact of tobacco use is well documented and creates a
compelling argument for smoking cessation - Direct
medical costs associated with smoking are approximately $75 billion
a year. Productivity and lost earnings, because of smoking-related
disease and premature deaths, cost an additional $50 billion a year.
It is estimated that Medicare will spend $800 billion over the next
20 years caring for people with smoking-related illnesses.
The Centers for
Disease Control and Prevention (CDC) estimated that $2.06 was spent
on smoking-related medical care for every one of the 24 billion
packs of cigarettes sold in 1993. A 1991 study of Medicaid payments
showed that tobacco use accounted for 41 percent of substance abuse-related
hospital days — the same amount accounted for by illicit drug
use.
As an employer, you bear the cost burden of tobacco use among covered
populations.
Here's
why - Smokers have
higher medical costs than non-smokers - an estimated $1,623 more
per year. Turnover and absenteeism are higher for smokers than for
non-smokers; Smokers have more accidents and injuries than non-smokers;
Because of smoking breaks, non-smokers are more productive on the
job than smokers.
There are few preventive
health treatments that are more cost-effective than tobacco cessation.
The cost per quality-adjusted life year saved (QALYS) of implementing
the U.S. Public Health Service tobacco cessation Clinical Practice
Guideline ranges from $1,108 to $4,524. In contrast, the cost per
QALYS of annual mammography for women ages 40 to 49 is $61,744 and
$23,335 for hypertension screening for 40-year old men.
Smoking adds
approximately
7%
to the total
cost of
healthcare
!
WE CAN
HELP!
Please Click here to email us
with your inquiries
for our free and
no-obligation review.
Thank
You
Good
News!
Over
a three-year period,
expenditures for smoking cessation programs in the range of
$100 to $300 per smoker attempting to quit should be fully
offset by healthcare cost savings in a typical commercial
population
!
More
Americans die from
cigarette-related
illnesses than car accidents, AIDS, alcohol, suicide, homicide
and illegal drugs combined
!