[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]

> [scratchd ui_message]

[/if] [form-session-id]

[L]User name[/L] | [scratch passuser]
[if scratch old_needed]
[L]Old password[/L] |
[/if]
[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_@