%# Law of Probable Dispersal:
%# Whatever it is that hits the fan will not be evenly distributed.
<& /Work/Elements/104Header, Title => 'My Approvals', Method => 'POST', Action => 'Update.html' &>
% while (my $Approval = $List->Next) {
<& /Work/Approvals/Elements/ShowApproval, Approval => $Approval, ShowActions => 0, ReadOnly => 0 &>
% }
<& /Work/Approvals/Elements/Actions, Submit => 1 &>
% my $CurList = $List->ItemsArrayRef || [];
% $List = [ ((undef) x $Begin ), @$CurList, ((undef) x ($Count - @$CurList - $Begin )) ];
<& /Edit/Elements/Page, Size => $Size, List => $List, Begin => $Begin, ARGS => \%ARGS &>
<%INIT>
my $Size = 14;
my $List = RT::Tickets->new($session{CurrentUser});
$List->ThawLimits($Bookmark) if $Bookmark;
$List->OrderBy(FIELD => 'Id', ORDER => 'DESC');
my $Count = $List->Count;
$List->FirstRow($Begin + 1);
$List->RowsPerPage($Size);
%INIT>
<%ARGS>
$Begin => 0
$Bookmark => undef
%ARGS>