Cartography - Fall 2013

NOTE: As of Fall 2013 the Official Class Web Site has been moved to the WWU Course Canvas page.

Location: AH-16 (SAL) What All Good Maps Should Have    
           Single Page Print (pdf)         Counterpoint
Time: T-Th 10-11:50 Cartography Tips & 'Rules'
Instructor:  Stefan Freelan ArcGIS Cartography Tips & Demos
Office: AH-201   650-2949ESRI Books folder (J:\SAL_info\esri_misc\esri_books)
Email: * ESRI GIS Dictionary
TA:  ESRI ArcGIS 10.2 Help (Web version)


In Brief: (see Syllabus for details)

 

        Assignments (see below and Schedule) due at the beginning of class

                Late assignments lose 15%

        Text book NOT REQUIRED

        Course readings will be online

        ESRI Virtual Campus  (notes on using the virtual campus)

        No mid-term, No Final Exam

   

ESRI Styles:                    C:\Program Files (x86)\ArcGIS\Desktop10.0\Styles\
ESRI Picture Symbols:      C:\Program Files (x86)\ArcGIS\Desktop10.0\Styles\Pictures\

Virtual Campus Data:        J:\GEO\GEO_data\ESRI_data\Virtual_Campus\Carto9



PROPER CASE Code (also adding a carriage return and the word "Island" (copy paste into a label text string expression - editing field names, etc. as desired):

Function FindLabel ([Name])
  FindLabel = PCase([Name]) & VBCR & "Island"
End Function

Function PCase(strInput)
  Dim iPosition
  Dim iSpace
  Dim strOutput
  iPosition = 1
  Do While InStr(iPosition, strInput, " ", 1) <> 0
    iSpace = InStr(iPosition, strInput, " ", 1)
    strOutput = strOutput & UCase(Mid(strInput, iPosition, 1))
    strOutput = strOutput & LCase(Mid(strInput, iPosition + 1, iSpace - iPosition))
    iPosition = iSpace + 1
  Loop
  strOutput = strOutput & UCase(Mid(strInput, iPosition, 1))
  strOutput = strOutput & LCase(Mid(strInput, iPosition + 1))
  PCase = strOutput
End Function

 

              * please put ENVS-321 in the subject line of all emails to Stefan