**************************************************************************
      * DBGFMT00: Field Mapping Table for .csv field conversion
      * Copyright (C) 2001  Martin Rowe  <martin@dbg400.net>
      *
      * This program is free software; you can redistribute it and/or modify
      * it under the terms of the GNU General Public License as published by
      * the Free Software Foundation; either version 2 of the License, or
      * (at your option) any later version.
      *
      * This program is distributed in the hope that it will be useful,
      * but WITHOUT ANY WARRANTY; without even the implied warranty of
      * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
      * GNU General Public License for more details.
      *
      * You should have received a copy of the GNU General Public License
      * along with this program; if not, write to the Free Software Foundation,
      * Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307   USA
      **************************************************************************
     A          R DBGFMT0                   TEXT('Field Mapping Table')
     A            FMLIB         10          COLHDG('Library' 'Name')
     A            FMFILE        10          COLHDG('File' 'Name')
     A            FMFLD         10          COLHDG('Field' 'Name')
     A            FMRULE         1          COLHDG('Use' 'rules')
     A            FMZFIL         1          COLHDG('Zero' 'fill')
     A            FMNEGF         6          COLHDG('Negative' 'handling')
     A            FMDATE         1          COLHDG('Date' 'value')
     A            FMINTF         8          COLHDG('Internal' 'format')
     A            FMEXPF         8          COLHDG('Export' 'format')
     A            FMEDTD         1          COLHDG('Edit' 'date')
     A            FMDSEP         1          COLHDG('Date' 'separator')
     A            FMWINY         2  0       COLHDG('Window' 'year')
     A            FMLILS          L         COLHDG('Lillian' 'start')
     A            FMPFIX         1          COLHDG('Field' 'prefix')
      *
     A          K FMLIB
     A          K FMFILE
     A          K FMFLD