+sub check_trgm {
+ my ( $self ) = @_;
+
+ my $dbh = $::form->get_standard_dbh();
+ my $sql = "SELECT installed_version FROM pg_available_extensions WHERE name = 'pg_trgm'";
+ my @version = selectall_hashref_query($::form, $dbh, $sql);
+
+ return 1 if($version[0]->{installed_version});
+ return 0;
+}
+
+sub has_differing_delivery_address {
+ my ($self) = @_;
+ ($self->billing_firstname // '') ne ($self->delivery_firstname // '') ||
+ ($self->billing_lastname // '') ne ($self->delivery_lastname // '') ||
+ ($self->billing_city // '') ne ($self->delivery_city // '') ||
+ ($self->billing_street // '') ne ($self->delivery_street // '')
+}
+
+sub delivery_fullname {
+ ($_[0]->delivery_firstname // '') . " " . ($_[0]->delivery_lastname // '')
+}
+