| Line 59... |
Line 59... |
| 59 |
v_class_new.date = v_shift.date and
|
59 |
v_class_new.date = v_shift.date and
|
| 60 |
time(v_class_new.start_time) = time(v_shift.start_time) and
|
60 |
time(v_class_new.start_time) = time(v_shift.start_time) and
|
| 61 |
v_class_new.location = v_shift.location and
|
61 |
v_class_new.location = v_shift.location and
|
| 62 |
v_shift.dept = "COA"
|
62 |
v_shift.dept = "COA"
|
| 63 |
where RCid = ? and year(v_class_new.date) = year(now())
|
63 |
where RCid = ? and year(v_class_new.date) = year(now())
|
| 64 |
order by v_class_new.date desc, v_class_new.start_time desc
|
64 |
order by v_class_new.date, v_class_new.start_time
|
| 65 |
class_list_sql
|
65 |
class_list_sql
|
| Line 66... |
Line 66... |
| 66 |
|
66 |
|
| 67 |
my @keys = qw(id class day date time start_time location level available);
|
67 |
my @keys = qw(id class day date time start_time location level available);
|
| 68 |
my @classes = ($h->div ({ class=>"rTableRow" },[ $h->div ({ class=>"rTableHead", style=>"font-size: smaller;" }, qw(Class Day Date Time Location Level SignUp) ) ]));
|
68 |
my @classes = ($h->div ({ class=>"rTableRow" },[ $h->div ({ class=>"rTableHead", style=>"font-size: smaller;" }, qw(Class Day Date Time Location Level SignUp) ) ]));
|