Subject: Code Maintenance - IMPLICIT NONE Statement in metric code
Name: R. Havis
Date: June 24, 2010
Variants affected: ALL

Description:
The IMPLICIT NONE statement was added to routines in the metric directory where needed. Added Dunning code
write message to database stand reader, and other minor code maintenance as described below.

Impact on users: A statement in the database section of the main output file will be written when
                 dunning codes are used in CS, NC, SO and WS variants, and read from a database.

Files:

./base/src/prtrls.f  - migrated away from DIMENSION statement
./dbs/src/dbsstandin.f      - added write statement indicating that input site indexes are interpreted
                              as Dunning codes when read from the StandIninit Table with R5 variants
./estb/src/estab.f   - migrated away from DIMENSION statement
./metric/base/src/filopn.f - added IMPLICIT NONE statement and declared variables where needed.
./metric/base/src/mcnvrt.f - added IMPLICIT NONE statement and declared variables where needed.
./metric/base/src/prtrls.f - added IMPLICIT NONE statement and declared variables where needed, and updated
                             declarations to Sync. with base code.
./metric/base/src/sumhed.f - added IMPLICIT NONE statement and declared variables where needed.
./metric/dbs/src/dbsstandin.f - added write statement indicating that input site indecies are interpreted
                                as Dunning codes in R5 variants
./metric/estb/src/esin.f - added IMPLICIT NONE statement and declared variables where needed.
./metric/estb/src/estab.f - added IMPLICIT NONE statement and declared variables where needed.
./metric/ls/src/sumhed.f - added IMPLICIT NONE statement and declared variables where needed.
./metric/ni/src/sitset.f - added IMPLICIT NONE statement and declared variables where needed. added VOLSTD.F77
                           with INCLUDE statement. added code to load and write, to output, Volume Eq.
                           Nos. Updated SDIDEF array write statement. 