[tmp passuser][either][cgi username][or][cgi user_id][/either][/tmp] [calc] $CGI->{no_dbmenu} = 1; $CGI->{access_menu} = 1; return; [/calc] [seti page_title][L]Change password[/L]: [scratch passuser][/seti] [seti page_banner][L]Change password[/L]: [scratch passuser][/seti] [set ui_class]Admin[/set] [set page_perm]access=e[/set] [set help_name]change.password[/set] [set icon_name]icon_config.gif[/set] [tmp old_needed]1[/tmp] [if-mm super] [calc] # Note that the final authority on whether the old password is needed # is &Vend::UserDB::change_pass -- this logic is for widget display only. $Scratch->{old_needed} = 0 if $CGI->{user_id} ne $Session->{username}; return; [/calc] [/if-mm] @_UI_STD_HEAD_@ [if session failure]

 

[L]Failure:[/L] [data session failure][data base=session field=failure value=""]

  [/if] [if scratch ui_message]

[scratch ui_message][set ui_message][/set]

  [/if]

[if scratch old_needed] [/if]
[L]User name[/L] [scratch passuser]
[L]Old password[/L]
[L]New password[/L]
[L]Verify password[/L]
[if-mm advanced access=e] [button text="[if scratch old_needed][L]Change[/L][else][L]Set Password[/L][/else][/if]"] mv_todo=set mv_click=MMChange [/button] [button text=[L]Permissions[/L]] mv_todo=set mv_click=MMChange mv_nextpage=__UI_BASE__/access_permissions [/button] [button text=[L]Cancel[/L]] [/button] [else] [button text=[L]Back[/L]] [/button] [/else] [/if-mm]
@_UI_STD_FOOTER_@