function find_primary_cell(&$import_record)
{
    // already processed?
    if (import_user_log_get_by_rid_type($import_record->recordId, 'id-primary-cell')) {
        msg("find_primary_cell already processed rid {$import_record->recordId}");
        return;
    }
    // existing sms_user?
    //   mark as processed
    if ($row = import_user_log_get_by_rid_type_value($import_record->recordId, 'import', 'existing')) {
        msg("find_primary_cell existing sms_user for rid {$import_record->recordId}");
        $sms_user = db_fetch_object(db_query("select * from sms_user where uid = %d limit 1", $row->uid));
        $log = import_user_log_get_default($row->uid, $import_record->recordId, 'id-primary-cell', $sms_user->number);
        import_user_log_insert($log);
        return;
    }
    //  has a cell phone?
    //    create sms_user record
    //    mark as processed
    $row = import_user_log_get_by_rid_type_value($import_record->recordId, 'import', 'new');
    $uniq_phone = get_unique_phones($import_record);
    foreach ($uniq_phone as $phone) {
        // else lookup by api and save
        $url = 'http://digits.cloudvox.com/' . $phone . '.json';
        $ch = curl_init($url);
        curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);
        $data = curl_exec($ch);
        $json = json_decode($data, false);
        foreach ($json as $cloudvox_info) {
            if ($cloudvox_info->access_type == "wireless") {
                msg("find_primary_cell wireless found {$row->uid}, {$phone}");
                $result = db_query("\n                        insert into sms_user \n                        (uid,number, status) values (%d, '%s', %d)\n                        ", $row->uid, $phone, 2);
                $log = import_user_log_get_default($row->uid, $import_record->recordId, 'id-primary-cell', $phone);
                import_user_log_insert($log);
                // only take the primary, we're done
                return;
            }
        }
    }
}
function enroll_new_user($user, $row)
{
    // must be type import/new
    if (!import_user_log_get_by_rid_type_value($row->record_id, 'import', 'new')) {
        msg("not import new rid {$row->record_id}");
        return;
    }
    if (!import_user_log_get_by_rid_type_value($row->record_id, 'welcome', 'messaged')) {
        // send via API
        // Welcome, you signed up for Healthy Families texts with a paper form (DCH-Dr. Ponder).
        // Reply STOP to stop all messages.
        $message = "Welcome, you signed up for Healthy Families texts with a paper form (" . $row->referred_by . "). Reply STOP to stop all messages.";
        msg($message);
        if ($row->is_cell_valid) {
            healthimo_sms_outgoing($row->cell, $message, $options);
        }
        $log = import_user_log_get_default($user->uid, $row->record_id, 'welcome', 'messaged');
        import_user_log_insert($log);
    }
    //    if ($row->is_email_valid) {
    //        healthimo_email_outgoing($row->email, $message, $options);
    //    }
    if (!import_user_log_get_by_rid_type_value($row->record_id, 'welcome', 'enrolled')) {
        msg("profile set flags");
        healthimo_profile_save($user, 'profile_keyword_healthy', 1, NULL);
        $log = import_user_log_get_default($user->uid, $row->record_id, 'welcome', 'enrolled');
        import_user_log_insert($log);
    }
}