Illinois Emergency Management Agency  
IEMA logo

Pat Quinn, Governor
" strSideMenu = strSideMenu & "" Next strSideMenu = strSideMenu & "" End If %>

IEMA Links

Director Monken
Disaster Preparedness, Response & Recovery
Mitigation
Training & Exercises
Annual Reports & Publications
Laws & Regulations
News
Freedom of Information
Interoperable Communications
Quick Nav:  

      Illinois Professional Emergency Manager Standards & Accreditation Program    


2009 IPEM Recipients

Connie Brooks - LaSalle County Health Department
Paul Burbank - Franklin County EMA
Beverly Carroll - Chicago Police Dept
Arthur Clark - Oak Lawn PD
Lisa Clinton - Bureau County LEPC
Mike Dacey - Chicago Dept of Aviation
Terry Donat - DuPage County Medical
Fernando Flores - Illinois State Police
Jim Goldasich - Putnam County
Greg Hertz - Illinois National Guard
Brett Johnson - Champaign Fire Dept
Kevin Lalley - Lee County EMA
Gary Little - Franklin County EMA
Richard Marks - Peoria County Health Dept
Bryce McCormick - Chapin Crisis and Emergency Management
Curt Mueller - IEMA
Chris Pulley - IEMA
Rick Shryock - IEMA


The following people have received approval to renew their IPEM Accreditation:

Lisa Anderson - IEMA
Chief Richard Carani - Libertyville Fire Dept
Ron Carlson - IEMA(Retired)
John Cheney - DuPage County OHSEM
Raymond Clark - Du Quoin ESDA
Sue Coers - IEMA
Harold Damron - Will County EMA
Brad Entler - Elgin PD
Bob Flemming - IEMA
Joe Gasparich - Illinois Fire Service Institute
Scott Gauvin - IEMA
Chuck Genesio - Du Quoin ESDA
Rita George - North Shore University Health
Alan Gower - Williamson County EMA
Steve Land - Williamson County EMA
Diane Logsdon - Logsdon Consultation Services
Janie Martin - IEMA
Kim McGee - IEMA
Christina Miller - Mid-America Preparedness
Randolph Miota - Lakeland HealthCare, Michigan
Chuck Morris - Piatt County EMA
Mary Murphy-Clohessy - Evergreen Park EMA
Dave Searby - Du Quoin ESDA
Chief Craig Shaw - Fairview PD
Steve Simms - IEMA
Dan Smith - IEMA
Pete Smith - ILEAS
Tom Smith - Palatine EMA
Kathy Spellman - IEMA
Russ Steil - IEMA
Terry Storer - Logan County EMA
Susan Vancil - Lake County Stormwater Mgnt Council

What does it take?
Accreditation Renewal
Review Committee Meeting Dates
Position Description Guidance
IPEM Home
2014 IPEM Recipients
2013 IPEM Recipients
2012 IPEM Recipients
2011 IPEM Recipients
2010 IPEM Recipients
2009 IPEM Recipients
2008 IPEM Recipients
2007 IPEM Recipients
2006 IPEM Recipients
2005 IPEM Recipients
2004 IPEM Recipients
2003 IPEM Recipients
2002 IPEM Recipients

 

<% Function GetActiveCourses() Dim arrSessions, xmlhttp, dom, url, node, i, j '*************************************************************************** 'set up call to the web service for Last Updated date '*************************************************************************** 'Set xmlhttp = Server.CreateObject("Microsoft.XMLHTTP") Set xmlhttp = Server.CreateObject("Msxml2.ServerXMLHTTP.3.0") Set dom = Server.CreateObject("Microsoft.XMLDOM") url = "http://tier2.iema.state.il.us/Training/Training.asmx/GetWebMenu" 'set option to ignore SSL errors const SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS = 13056 Call xmlhttp.setOption(2, SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS) 'call web service Call xmlhttp.Open("GET", url, False) Call xmlhttp.send 'Parse xml result dom.Load(xmlhttp.responseBody) Set node = dom.SelectSingleNode("//string") 'did we get a response back from the server? If not node is nothing then 'yes - convert the xml to an array dom.LoadXML(node.text) 'Did we find any records for the search criteria? If not dom.SelectSingleNode("//NewDataSet/Table") is nothing then Set rows = dom.SelectNodes("//NewDataSet/Table") For i = 0 To rows.length - 1 ReDim Preserve arrItems(2,i) For j = 0 to rows(i).childNodes.length - 1 arrItems(j,i) = rows(i).childNodes(j).text Next Next 'clean up your mess set doc = nothing set xmlhttp = nothing GetActiveCourses = arrItems Else 'clean up your mess set doc = nothing set xmlhttp = nothing End If Else 'clean up your mess set doc = nothing set xmlhttp = nothing End If End Function arrCourses = GetActiveCourses() If IsArray(arrCourses) Then strSideMenu = "
" 'strSideMenu = strSideMenu & "
" strSideMenu = strSideMenu & "" For i = LBound(arrCourses,2) To UBound(arrCourses,2) 'strSideMenu = strSideMenu & "
" & arrCourses(1,i) & "
<%=strSideMenu%>

Training/Exercises

Calendar
Exercise Information
FEMA Independent Study Program
Illinois Professional Emergency Manager Program
Illinois Professional Development Series
2013 IEMA Conference
Out-of-State Training Opportunities
Hazardous Materials Training Webpage
School & Campus Security Training
ICS 300 & 400 Training
FEMA Higher Education Project

Offered Courses

Copyright © IEMA Site Map | Disclaimer | Illinois Privacy Info | Kids Privacy | Web Accessibility | Plug-Ins | Webmaster