& "/contenido/components/title.msn" &>
<% $prop->{rusname} %> | % }||
---|---|---|
<% $a1 %><& "/contenido/components/show_dtime.msn", dtime => $doc->$attr &><% $a2 %> | % }else{<% $a1.$doc->$attr.$a2 %> | % } % }\ % if ($document_access == 2) { \ % } |
<% Dumper($docs->[0]->required_properties) %><%args> $id => undef $filter => undef $field => undef $from => undef $to => undef $class => undef $order_by => undef $p => 1 %args> <%init> my ($docs, $total); my $defaults = ''; my $size = 15; if ( $id && $filter && $class ) { my %opts = (); $opts{$filter} = $id; $opts{order_by} = $order_by if $order_by; $docs = $keeper->get_documents ( class => $class, return_mode => 'array_ref', offset => ($p-1)*$size, limit => $size, %opts, ); delete $opts{order_by}; $total = $keeper->get_documents ( class => $class, count => 1, %opts, ); } else { return; } if ( defined $from && defined $to ) { if ( ref $from eq 'ARRAY' && ref $to eq 'ARRAY' && (scalar @$from == scalar @$to) ) { for ( 0..(scalar @$from - 1) ) { $defaults .= '&'.$from->[$_].'='.$to->[$_]; } } elsif ( !ref $from && !ref $to ) { $defaults .= '&'.$from.'='.$to; } } %init>