foreach my $TAP ( keys %{$new} ) {
    ;
    if ( exists($old->{$TAP}) ) {
        ;
        my $hasUpdated = '0';

        foreach my $check_field ( qw(sdrpretax_vcd taxamt_vcd sdrposttax_vcd dchdetaildate) ) {
            ;
            if ( $new->{$TAP}->{$check_field} ne $old->{$TAP}->{$check_field} ) {
                ;
                $hasUpdated = 1;
                last;
            }
        }

        if ( $hasUpdated ) {
            print " Has to update the DB now ";
        }
    }
}