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