Select Code to Download

    return $self->{'dbh'}->selectrow_array("SELECT COUNT(*) FROM $Bod:
+:Variables::M_Table WHERE $Bod::Variables::C_Table_id$Bod::Variables:
+:C_Table = ?, $Bod::Variables::B_Table_id$Bod::Variables::B_Table = ?
+ AND Permission_idPermission = ? AND date > NOW() - INTERVAL 2 SECOND
+", undef, $contact, $business, $permission);

    return $self->{'dbh'}->selectrow_array(
        "SELECT COUNT(*) 
...
                AND date > NOW() - INTERVAL 2 SECOND",
        undef, $contact, $business, $permission
        );

    my %fields = (
        firstname => 'John',
...

    $crm->add(firstname => 'John', lastname => 'Smith', pri_email => '
+john@xxxx.com');
    my @contacts = $crm->find(firstname => 'John');