Subversion Repositories VORC

Rev

Rev 65 | Rev 101 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 65 Rev 80
Line 379... Line 379...
379 
print $h->div ({ class=>'rTableHeading' }, [ @tmptitlerow ], [ map { $h->div ({ class=>'rTableCell filters' }, filter ($_)) } @displayFields ], $h->div ({ class=>"rTableCell" }));
 379 
print $h->div ({ class=>'rTableHeading' }, [ @tmptitlerow ], [ map { $h->div ({ class=>'rTableCell filters' }, filter ($_)) } @displayFields ], $h->div ({ class=>"rTableCell" }));
Line 380... Line 380...
380 
 
 380 
 
381 
 
 381 
 
- 
 
 382 
if ($FORM{shiftinclude}) {  # Include all of the user's shifts at the top
382 
if ($FORM{shiftinclude}) {  # Include all of the user's shifts at the top
 383 
  foreach my $t (@shifts)	{
383 
  foreach my $t (@shifts)	{
 384 
    no strict;
384 
	  print $h->div ({ class=>'rTableRow highlighted' }, [ map { $h->div ({ class=>'rTableCell' }, exists &{"modify_".$_} ? &{"modify_".$_} ($t) : $t->{$_} ? $t->{$_} : "") } @displayFields ]);
 385 
	  print $h->div ({ class=>'rTableRow highlighted' }, [ map { $h->div ({ class=>'rTableCell' }, exists &{"modify_".$_} ? &{"modify_".$_} ($t) : $t->{$_} ? $t->{$_} : "") } @displayFields ]);
385 
  }
 386 
  }
Line 386... Line 387...
386 
  print $h->hr ({ width=>"500%" });
 387 
  print $h->hr ({ width=>"500%" });
387 
}
 388 
}
- 
 
 389 
 
388 
 
 390 
 
389 
 
 391 
# Print the things
390 
# Print the things
 392 
foreach my $t (@ProductList)	{
391 
foreach my $t (@ProductList)	{
 393 
  no strict;
392 
  if ($t->{RCid} eq $ORCUSER->{RCid}) {
 394 
  if ($t->{RCid} eq $ORCUSER->{RCid}) {