Subject: Species Codes in Data Base Tables, CR Habitat Type, Implicit None Updates
Name: R. Havis
Date: April 25, 2008
Variants affected: ALL

Description:

1) Species codes listed in the data base output tables are are shown in the
   FVS Alpha code format. The presentation of species codes in the following
   data base tables has been enhanced.

   FVS_Treelist Table
   FVS_ATRTlist Table
   FVS_Cutlist Table
   FVS_Mortality
   FVS_SnagDet

   FVS carries three forms of species codes, 1) FVS Alpha Codes, 2) FIA Codes,
   and 3) USDA Plants Symbols. By default, the species code appearing in the
   above data base tables is the type of symbol last read for a species in
   the input data. New species introduced through regeneration will use the
   Plants symbols. A second field has been added to the following keywords to
   allow users to set a uniform species code format for the above tables. The
   new second field applies to the the following keywords.
   
   TREELIST
   ATRTLIST
   CUTLIST 
   MORTREPT
   SNAGOUT

   FIELD      VALUE  DESCRIPTION
   Field 2:   1      FVS Alpha codes will be output to the Species column
                     in the data base table
              2      FIA codes will be output to the Species column in the
                     data base table
              3      USDA Plants Symbols will be output to the Species
                     column in the data base table

2) On October 1, 2007 (see FVS Update Bulletin No. 672) the most FVS variants,
   including the Central Rockies variant were updates to use PV code / PV Reference
   Code sets by translating them into standard FVS habitat type / ecoclass codes.
   An error in reading some standard FVS habitat codes was introduced into 
   the Central Rockies variant (Region 2 only) at that time.
   This has been corrected.


Impact on users: Users of the Central Rockies (CR) variant (R2) should obtain new
executables, and other FVS users may obtain new executables if species code format
in data base output tables is of interest.
   
Files:

The Implicit None statement was added to the SO33 and TT variant-specific files.

makefile - AK, BASE, CA, CR, CS, CS_NEW, IE, LS, LS_NEW, NE, NE_NEW, SN, SO22, UT, WC
           added PRGPRM.F77 and PLOT.F77 to the SPDECD routine list of dependencies.
           
GRINIT routines for all variant - initialized all elementS of the new JSPIN (see PLOT.F77
       for details) array to 3



./ak/obj/makefile
./ak/src/grinit.f
./base/obj/makefile
./base/src/evpred.f-- modified the logic to call FMEVMSN along with various other
                      logic changes.
./base/src/exfire.f- added an entry point FMEVMSN to calculate the dbh of the largest conifer snag
./base/src/initre.f- removed MAXSP from the SPDECD CALL statement list of arguments
./base/src/intree.f
./base/src/revise.f
./base/src/sdefet.f- removed MAXSP from the SPDECD CALL statement list of arguments
./base/src/sdefln.f- removed MAXSP from the SPDECD CALL statement list of arguments
./base/src/spdecd.f- removed MAXSP from the SPDECD SUBROUTINE statement list of arguments,
                     added INCLUDE 'PRGPRM.F77' and INCLUDE 'PLOT.F77' statement
./bm/src/grinit.f
./ca/obj/makefile
./ca/src/grinit.f
./ci/src/grinit.f
./common/PLOT.F77- added the JSPIN array
./cr/obj/makefile
./cr/src/grinit.f
./cr/src/habtyp.f- corrected logic digenting habitat type codes
./cs/obj/makefile
./cs/src/grinit.f
./cs_new/obj/makefile
./cs_new/src/grinit.f
./dbs/src/dbsatrtls.f- added logic for data base table species code format control
./dbs/src/DBSCOM.F77- added ISPOUT6,ISPOUT17,ISPOUT21,ISPOUT23,ISPOUT30,ISPOUT31
./dbs/src/dbscuts.f- added logic for data base table species code format control
./dbs/src/dbsfmdsnag.f- added logic for data base table species code format control
./dbs/src/dbsfmmort.f- added logic for data base table species code format control
./dbs/src/dbsin.f- removed MAXSP from the SPDECD CALL statement list of arguments
./dbs/src/dbsinit.f- initialized data base table keyword switches for controling
                     species code format
./dbs/src/dbsppget.f- added ISPOUT6,ISPOUT17,ISPOUT21,ISPOUT23,ISPOUT30,ISPOUT31
./dbs/src/dbsppput.f- added ISPOUT6,ISPOUT17,ISPOUT21,ISPOUT23,ISPOUT30,ISPOUT31
./dbs/src/dbstrls.f- added logic for data base table species code format control
./ec/src/grinit.f
./econ/src/ecin.f- removed MAXSP from the SPDECD CALL statement list of arguments
./em/src/grinit.f
./estb/src/esin.f- removed MAXSP from the SPDECD CALL statement list of arguments
./fire/base/src/fmevmon.f- added an entry point FMEVMSN to calculate the dbh of the largest conifer snag
./fire/base/src/fmin.f- removed MAXSP from the SPDECD SUBROUTINE statement list of arguments
./ie/obj/makefile
./ie/src/grinit.f
./kt/src/grinit.f
./ls/obj/makefile
./ls/src/grinit.f
./ls_new/obj/makefile
./ls_new/src/grinit.f
./mistoe/src/misin.f- removed MAXSP from the SPDECD CALL statement list of arguments
./nc/src/grinit.f
./ne/obj/makefile
./ne/src/grinit.f
./ne_new/obj/makefile
./ne_new/src/grinit.f
./ni/src/grinit.f
./ni/src/spctrn.f- added logic to set the JSPIN array
./pn/src/grinit.f
./ppbase/src/getstd.f- addeed JSPIN
./ppbase/src/putstd.f- addeed JSPIN
./rd/src/rdin.f- removed MAXSP from the SPDECD CALL statement list of arguments
./rd/src/rdinca.f- removed MAXSP from the SPDECD CALL statement list of arguments
./rd/src/rdincr.f- removed MAXSP from the SPDECD CALL statement list of arguments
./rd/src/rdinie.f- removed MAXSP from the SPDECD CALL statement list of arguments
./rd/src/rdinso33.f- removed MAXSP from the SPDECD CALL statement list of arguments
./rd/src/rdinut.f- removed MAXSP from the SPDECD CALL statement list of arguments
./sn/obj/makefile
./sn/src/grinit.f
./so/src/grinit.f
./so33/obj/makefile
./so33/src/adjmai.f
./so33/src/avht40.f
./so33/src/bfvol.f
./so33/src/blkdat.f
./so33/src/bratio.f
./so33/src/ccfcal.f
./so33/src/cratet.f
./so33/src/crown.f
./so33/src/cubrds.f
./so33/src/dgdriv.f
./so33/src/dgf.f
./so33/src/dubscr.f
./so33/src/dunn.f
./so33/src/ecocls.f
./so33/src/essubh.f
./so33/src/exppnb.f
./so33/src/findag.f
./so33/src/forkod.f
./so33/src/formcl.f
./so33/src/grinit.f
./so33/src/grohed.f
./so33/src/habtyp.f
./so33/src/htcalc.f
./so33/src/htdbh.f
./so33/src/htgf.f
./so33/src/logs.f
./so33/src/maical.f
./so33/src/morts.f
./so33/src/r6crwd.f
./so33/src/regent.f
./so33/src/scomrt.f
./so33/src/sichg.f
./so33/src/sitset.f
./so33/src/smhtgf.f
./so33/src/varvol.f
./strp/src/esin.f- removed MAXSP from the SPDECD CALL statement list of arguments
./tt/src/blkdat.f
./tt/src/ccfcal.f
./tt/src/cratet.f
./tt/src/crown.f
./tt/src/cubrds.f
./tt/src/dgf.f
./tt/src/estump.f
./tt/src/esuckr.f
./tt/src/forkod.f
./tt/src/grinit.f
./tt/src/grohed.f
./tt/src/htgf.f
./tt/src/maical.f
./tt/src/morts.f
./tt/src/regent.f
./tt/src/sitset.f
./tt/src/smhtgf.f
./tt/src/ttmrt.f
./tt/src/varvol.f
./ut/obj/makefile
./ut/src/grinit.f
./wc/obj/makefile
./wc/src/grinit.f
./ws/src/grinit.f

