| Line 368... |
Line 368... |
| 368 |
$F->{person_id} =~ /^\d+$/ ? $h->div ({ class=>"rTableRow" },[ $h->div ({ class=>"rTableCellr", style=>"font-size: unset;" }, "User Added: ", $F->{created}) ]) : "",
|
368 |
$F->{person_id} =~ /^\d+$/ ? $h->div ({ class=>"rTableRow" },[ $h->div ({ class=>"rTableCellr", style=>"font-size: unset;" }, "User Added: ", $F->{created}) ]) : "",
|
| 369 |
$F->{person_id} =~ /^\d+$/ ? $h->div ({ class=>"rTableRow" },[ $h->div ({ class=>"rTableCellr", style=>"font-size: unset;" }, "Last Login: ", $F->{last_login}) ]) : "",
|
369 |
$F->{person_id} =~ /^\d+$/ ? $h->div ({ class=>"rTableRow" },[ $h->div ({ class=>"rTableCellr", style=>"font-size: unset;" }, "Last Login: ", $F->{last_login}) ]) : "",
|
| 370 |
# $h->div ({ class=>"rTableRow" },[ $h->div ({ class=>"rTableCellr", style=>"font-size: unset;" }, "vORC Access Level: ", $F->{access}) ]),
|
370 |
# $h->div ({ class=>"rTableRow" },[ $h->div ({ class=>"rTableCellr", style=>"font-size: unset;" }, "vORC Access Level: ", $F->{access}) ]),
|
| 371 |
# @printDepartments,
|
371 |
# @printDepartments,
|
| 372 |
$h->div ({ class=>"rTableRow" },[ $h->div ({ class=>"rTableCell" }, " ") ]),
|
372 |
$h->div ({ class=>"rTableRow" },[ $h->div ({ class=>"rTableCell" }, " ") ]),
|
| 373 |
$h->div ({ class=>"rTableRow" },[ $h->div ({ class=>"rTableCellr" }, $h->a ({ href=>$goback }, "[go back]"), $F->{buttons}) ])
|
373 |
$h->div ({ class=>"rTableRow" },[ $h->div ({ class=>"rTableCellr" }, $h->input ({ type=>"button", onClick=>"window.location.href='$goback'", value=>"Back"}), $F->{buttons}) ])
|
| 374 |
])
|
374 |
])
|
| 375 |
]);
|
375 |
]);
|
| 376 |
my $YEAR = 1900 + (localtime)[5];
|
376 |
my $YEAR = 1900 + (localtime)[5];
|
| Line -... |
Line 377... |
| - |
|
377 |
|
| - |
|
378 |
# Everything beyond here only applies to an existing user.
|
| - |
|
379 |
return unless $view ne "New User";
|
| 377 |
|
380 |
|
| Line 378... |
Line 381... |
| 378 |
my ($isAWFTDAAdmin) = $dbh->selectrow_array ("select 1 from role where role = ? and member_org_id = ? and person_id = ?", undef, "System Admin", 4276, $ORCUSER->{person_id});
|
381 |
my ($isAWFTDAAdmin) = $dbh->selectrow_array ("select 1 from role where role = ? and member_org_id = ? and person_id = ?", undef, "System Admin", 4276, $ORCUSER->{person_id});
|
| 379 |
|
382 |
|
| 380 |
# Display the list of roles per League Affiliation. If the viewing user is a league (or wftda) admin, include a button to manage roles.
|
383 |
# Display the list of roles per League Affiliation. If the viewing user is a league (or wftda) admin, include a button to manage roles.
|