- # LOCAL CHANGE FOR HKS 2024
- # Piece together HKS users.
- $q = $dbh->prepare('SELECT userid, TO_CHAR(last_added, \'YYYY-mm-dd HH24:MI\') AS last_added FROM current_reactions_with_ts WHERE channel=? and ts=? and reaction=? ORDER BY current_reactions_with_ts.last_added;');
- $q->execute('C06C34L2R6G', '1712686401.430939', 'heart'); # #hks-2024-05-04
- my @hks_runners = ();
- while (my $ref = $q->fetchrow_hashref) {
- my $userid = $ref->{'userid'};
- if (!exists($slack_userid_to_real_name{$userid}) && !exists($slack_userid_to_slack_name{$userid})) {
- my $slack_name = get_slack_name($ua, $userid);
- my $write_row = $cur_row++;
- push @slack_mapping_updates, {
- range => "Slack-mapping!A$write_row:A$write_row",
- values => [ [ $userid ]]
- };
- push @slack_mapping_updates, {
- range => "Slack-mapping!B$write_row:B$write_row",
- values => [ [ $slack_name ]]
- };
- $slack_userid_to_slack_name{$userid} = $slack_name;
- }
- my $name = $slack_userid_to_real_name{$userid} // $slack_userid_to_slack_name{$userid} // $userid;
- push @hks_runners, {
- values => [
- { userEnteredValue => { stringValue => $name } },
- { userEnteredValue => { stringValue => $ref->{'last_added'} } },
- ]
- };
- }
- push @hks_runners, { values => [{ userEnteredValue => { stringValue => '' } }, { userEnteredValue => { stringValue => '' } }] };
- push @hks_runners, { values => [{ userEnteredValue => { stringValue => '' } }, { userEnteredValue => { stringValue => '' } }] };
- push @hks_runners, { values => [{ userEnteredValue => { stringValue => '' } }, { userEnteredValue => { stringValue => '' } }] };
- # END LOCAL CHANGE FOR HKS 2024