{
    my $smb = $DB->get('smb');
    return unless defined $smb;

    ###Migrage CharacterSet->DisplayCharSet
    my $CharacterSet = $smb->prop('CharacterSet');
    if ($CharacterSet) {
        $smb->merge_props(
            DisplayCharSet => $CharacterSet,
                         );
        $smb->delete_prop('CharacterSet');
    }

    ###Migrate ClientCodePage->DosCharSet & UnixCharSet
    my $ClientCodePage = $smb->prop('ClientCodePage');
    if ($ClientCodePage) {
        $smb->merge_props(
            DosCharSet  => $ClientCodePage,
            UnixCharSet => $ClientCodePage,
                         );    
        $smb->delete_prop('ClientCodePage');
    }
    
    ###Migrate WINSServerOverride -> WinsServer
    my $WINSServerOverride = $smb->prop('WINSServerOverride');
    if($WINSServerOverride) {
        $smb->merge_props(
             WINSServer => $WINSServerOverride,
                        );
        $smb->delete_prop('WINSServerOverride');
    }
}


