$sth_insert->execute ( @fields{qw/ITEMNO OPTFIELD AUDTUSER AUDTORG VALUE
     TYPE LENGTH DECIMALS ALLOWNULL VALIDATE SWSET/} )