if (exists $self->{'pk'}) {
  $self->{'pk_index'} = delete $self->{'fields_hash'}->{$self->{'pk'}};
  splice(@{$self->{'fields_arry'}},$self->{'pk_index'},1) if defined $self->{'pk_index'};
}