[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]Change password: [scratch passuser][/seti] [seti page_banner]Change password: [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]
User name [scratch passuser]
Old password
New password
Verify password
[if-mm advanced access=e] [button text="[if scratch old_needed]Change[else]Set Password[/else][/if]"] mv_todo=set mv_click=MMChange [/button] [button text=Permissions] mv_todo=set mv_click=MMChange mv_nextpage=__UI_BASE__/access_permissions [/button] [button text=Cancel] [/button] [else] [button text=Back] [/button] [/else] [/if-mm]
@_UI_STD_FOOTER_@