view release on metacpan or  search on metacpan

lib/Daje/Database/Model/Super/MailMails.pm  view on Meta::CPAN

# It will be re-created by Daje Tools again and any changes
# will be over written.
#
# <!-- Autogenerated file 2026-02-13 15:59:42 -->

our $VERSION = '0.01';

has 'fields' => '"mail_mails_pkey", "editnum", "insby", "insdatetime", "modby", "moddatetime","recipients","carboncopy","subject","message",
"companies_companies_fkey",
"users_users_fkey",
"mail_status_fkey"';
has 'primary_key_name' => "mail_mails_pkey";
has 'table_name' => "mail_mails";
has 'mandatory' => 'recipients,subject,companies_companies_fkey,users_users_fkey,mail_status_fkey,';
has 'workflow' => '';

async sub load_companies_companies_fkey_p($self, $companies_companies_fkey) {
    return $self->load_companies_companies_fkey($companies_companies_fkey);
}

sub load_companies_companies_fkey($self, $companies_companies_fkey) {
    return $self->load_fkey(
        $self->table_name, $self->fields(), "companies_companies_fkey", $companies_companies_fkey
    );
}
async sub load_users_users_fkey_p($self, $users_users_fkey) {
    return $self->load_users_users_fkey($users_users_fkey);
}

sub load_users_users_fkey($self, $users_users_fkey) {
    return $self->load_fkey(
        $self->table_name, $self->fields(), "users_users_fkey", $users_users_fkey
    );
}
async sub load_mail_status_fkey_p($self, $mail_status_fkey) {
    return $self->load_mail_status_fkey($mail_status_fkey);
}

sub load_mail_status_fkey($self, $mail_status_fkey) {
    return $self->load_fkey(
        $self->table_name, $self->fields(), "mail_status_fkey", $mail_status_fkey
    );
}
async sub load_mail_mails_pkey_p($self, $mail_mails_pkey) {
    return $self->load_mail_mails_pkey($mail_mails_pkey);
}

sub load_mail_mails_pkey($self, $mail_mails_pkey) {
    return $self->load_pk(
        $self->table_name, $self->fields(), $self->primary_key_name(), $mail_mails_pkey
    );
}

sub insert($self, $data) {
    my $result = $self->SUPER::insert(
        $self->table_name, $data, $self->primary_key_name
    );
    return $result;
}

sub update($self, $data) {
    return $self->SUPER::update
    (
        $self->table_name, $data,
            {
                $self->primary_key_name() => $data->{$self->primary_key_name()}
            }
    );
}

sub delete($self, $primary_key) {
    return $self->SUPER::delete($self->table_name, { $self->primary_key_name() => $primary_key});
}
1;