[%# Invite Code Trace # # Authors: # Afuna -- original page # Jen Griffin -- TT conversion # # Copyright (c) 2009-2020 by Dreamwidth Studios, LLC. # # This program is free software; you may redistribute it and/or modify it # under the same terms as Perl itself. For a copy of the license, please # reference 'perldoc perlartistic' or 'perldoc perlgpl'. # %] [%- sections.title = '.title' | ml -%]

[% '.intro' | ml %]

[%- form.textbox( name = 'code' size = 27 maxlength = maxlength_code ) -%]
[%- form.textbox( name = 'account' size = 27 maxlength = maxlength_user ) -%]
[%- form.submit( value = dw.ml( ".btn.view" ) ) -%]

[%- IF display_error -%]

[% display_error %]

[%- ELSIF display_codes -%] [%- FOREACH code = display_codes; owner = load_code_owner( code ); recipient = load_code_recipient( code ) -%] [%- END -%]
[% '.col.code' | ml %] [% '.col.owner' | ml %] [% '.col.recipient' | ml %] [% '.col.reason' | ml %] [% '.col.dategen' | ml %] [% '.col.datesent' | ml %] [% '.col.dateused' | ml %] [% '.col.email' | ml %]
[% code.code %] [% IF owner; owner.ljuser_display; END %] [% IF recipient; recipient.ljuser_display; END %] [% code.reason %] [% time_to_http( code.timegenerate ) %] [% IF code.timesent; time_to_http( code.timesent ); END %] [% IF recipient; time_to_http( recipient.timecreate ); END %] [% code.email %]
[%- END -%]