2001-11-22 06:23:56 +00:00
< ? PHP // $Id$
// Display profile for a particular user
2006-08-09 13:53:12 +00:00
2003-01-05 14:19:20 +00:00
require_once ( " ../config.php " );
2005-04-04 03:55:37 +00:00
$id = optional_param ( 'id' , 0 , PARAM_INT ); // user id
$course = optional_param ( 'course' , SITEID , PARAM_INT ); // course id (defaults to Site)
$enable = optional_param ( 'enable' , '' ); // enable email
$disable = optional_param ( 'disable' , '' ); // disable email
2001-11-22 06:23:56 +00:00
2004-09-25 12:53:35 +00:00
if ( empty ( $id )) { // See your own profile by default
require_login ();
$id = $USER -> id ;
}
2001-11-22 06:23:56 +00:00
if ( ! $user = get_record ( " user " , " id " , $id ) ) {
error ( " No such user in this course " );
}
if ( ! $course = get_record ( " course " , " id " , $course ) ) {
error ( " No such course id " );
}
2006-10-01 05:26:38 +00:00
/// Make sure the current user is allowed to see this user
if ( empty ( $USER -> id )) {
$currentuser = false ;
} else {
$currentuser = ( $user -> id == $USER -> id );
}
2005-12-28 19:54:08 +00:00
if ( ! empty ( $CFG -> forcelogin ) || $course -> id != SITEID ) {
2001-11-22 06:23:56 +00:00
require_login ( $course -> id );
2005-12-28 19:54:08 +00:00
}
2006-10-04 02:14:25 +00:00
if ( $course -> id == SITEID ) {
$coursecontext = get_context_instance ( CONTEXT_SYSTEM , SITEID ); // SYSTEM context
} else {
$coursecontext = get_context_instance ( CONTEXT_COURSE , $course -> id ); // Course context
}
2006-10-01 05:26:38 +00:00
$usercontext = get_context_instance ( CONTEXT_USER , $user -> id ); // User context
2006-09-15 15:04:38 +00:00
2005-12-28 19:54:08 +00:00
if ( ! empty ( $CFG -> forceloginforprofiles )) {
require_login ();
2004-05-03 15:03:31 +00:00
if ( isguest ()) {
redirect ( " $CFG->wwwroot /login/index.php " );
}
2001-11-22 06:23:56 +00:00
}
2006-10-04 02:14:25 +00:00
if ( ! $currentuser && $course -> id != SITEID &&
! has_capability ( 'moodle/course:view' , $coursecontext , $user -> id , false )) {
2006-10-01 05:26:38 +00:00
print_error ( 'usernotavailable' );
}
2001-11-22 06:23:56 +00:00
2004-10-27 06:01:20 +00:00
if ( $course -> id != SITEID ) {
2006-09-14 06:30:02 +00:00
if ( $lastaccess = get_record ( 'user_lastaccess' , 'userid' , $user -> id , 'courseid' , $course -> id )) {
2006-09-13 06:56:25 +00:00
$user -> lastaccess = $lastaccess -> timeaccess ;
2004-10-27 06:01:20 +00:00
}
2003-10-27 14:15:05 +00:00
}
2006-10-01 05:26:38 +00:00
$personalprofile = get_string ( 'personalprofile' );
2002-07-04 07:52:06 +00:00
$participants = get_string ( " participants " );
2004-08-16 02:15:24 +00:00
2006-09-20 09:00:04 +00:00
if ( groupmode ( $course ) == SEPARATEGROUPS and ! has_capability ( 'moodle/site:accessallgroups' , $coursecontext )) { // Groups must be kept separate
2004-03-13 15:22:33 +00:00
require_login ();
2005-11-08 07:19:27 +00:00
///this is changed because of mygroupid
$gtrue = false ;
if ( $mygroups = mygroupid ( $course -> id )){
foreach ( $mygroups as $group ){
if ( ismember ( $group , $user -> id )){
$gtrue = true ;
}
}
}
2006-09-20 09:00:04 +00:00
// took the teacheredit check out because teacheredit will have moodle/site:accessallgroups capability
// which was already checked
if ( ! $currentuser && ! $gtrue ) {
2004-03-13 15:22:33 +00:00
print_header ( " $personalprofile : " , " $personalprofile : " ,
" <a href= \" ../course/view.php?id= $course->id\ " > $course -> shortname </ a > ->
< a href = \ " index.php?id= $course->id\ " > $participants </ a > " ,
" " , " " , true , " " , navmenu ( $course ));
error ( get_string ( " groupnotamember " ), " ../course/view.php?id= $course->id " );
2004-03-09 23:07:35 +00:00
}
}
2005-11-28 02:29:19 +00:00
2005-02-05 02:08:25 +00:00
if ( $course -> id == SITEID and ! $currentuser ) { // To reduce possibility of "browsing" userbase at site level
2005-11-28 02:29:19 +00:00
if ( $CFG -> forceloginforprofiles and ! isteacherinanycourse () and ! isteacherinanycourse ( $user -> id )) { // Teachers can browse and be browsed at site level. If not forceloginforprofiles, allow access (bug #4366)
2004-08-12 06:57:53 +00:00
print_header ( " $personalprofile : " , " $personalprofile : " ,
" <a href= \" index.php?id= $course->id\ " > $participants </ a > " ,
" " , " " , true , " " , navmenu ( $course ));
print_heading ( get_string ( 'usernotavailable' , 'error' ));
print_footer ( $course );
die ;
}
}
2006-10-01 05:26:38 +00:00
/// We've established they can see the user's name at least, so what about the rest?
$fullname = fullname ( $user , has_capability ( 'moodle/site:viewfullnames' , $coursecontext ));
2001-11-22 06:23:56 +00:00
if ( $course -> category ) {
2004-06-22 18:34:35 +00:00
print_header ( " $personalprofile : $fullname " , " $personalprofile : $fullname " ,
" <a href= \" ../course/view.php?id= $course->id\ " > $course -> shortname </ a > ->
2003-10-21 06:40:39 +00:00
< a href = \ " index.php?id= $course->id\ " > $participants </ a > -> $fullname " ,
2004-01-10 16:41:29 +00:00
" " , " " , true , " " , navmenu ( $course ));
2001-11-22 06:23:56 +00:00
} else {
2004-06-22 18:34:35 +00:00
print_header ( " $course->fullname : $personalprofile : $fullname " , " $course->fullname " ,
2004-01-10 16:41:29 +00:00
" $fullname " , " " , " " , true , " " , navmenu ( $course ));
2001-11-22 06:23:56 +00:00
}
2004-03-13 15:22:33 +00:00
2004-08-12 06:57:53 +00:00
if ( $course -> category and ! isguest () ) { // Need to have access to a course to see that info
2006-09-15 15:04:38 +00:00
if ( ! has_capability ( 'moodle/course:view' , $coursecontext )) {
print_heading ( get_string ( 'notenrolled' , '' , $fullname ));
2002-06-10 03:49:28 +00:00
print_footer ( $course );
die ;
}
2002-06-04 06:49:52 +00:00
}
2002-09-22 03:01:17 +00:00
if ( $user -> deleted ) {
2006-09-15 15:04:38 +00:00
print_heading ( get_string ( 'userdeleted' ));
2002-09-22 03:01:17 +00:00
}
2006-10-01 05:26:38 +00:00
/// OK, security out the way, now we are showing the user
add_to_log ( $course -> id , " user " , " view " , " view.php?id= $user->id &course= $course->id " , " $user->id " );
2006-09-15 15:04:38 +00:00
/// Get the hidden field list
if ( has_capability ( 'moodle/user:viewhiddendetails' , $coursecontext )) {
$hiddenfields = array ();
2005-11-20 21:29:59 +00:00
} else {
$hiddenfields = array_flip ( explode ( ',' , $CFG -> hiddenuserfields ));
}
2001-11-22 06:23:56 +00:00
2005-03-20 12:02:14 +00:00
/// Print tabs at top
/// This same call is made in:
/// /user/view.php
/// /user/edit.php
/// /course/user.php
2006-09-15 15:04:38 +00:00
2005-03-20 12:02:14 +00:00
$currenttab = 'profile' ;
2006-08-15 08:29:29 +00:00
$showroles = 1 ;
2005-03-20 12:02:14 +00:00
include ( 'tabs.php' );
2001-11-22 06:23:56 +00:00
2005-03-20 12:02:14 +00:00
echo " <table width= \" 80% \" align= \" center \" border= \" 0 \" cellspacing= \" 0 \" class= \" userinfobox \" > " ;
echo " <tr> " ;
echo " <td width= \" 100 \" valign= \" top \" class= \" side \" > " ;
print_user_picture ( $user -> id , $course -> id , $user -> picture , true , false , false );
echo " </td><td width= \" 100% \" class= \" content \" > " ;
2001-11-22 06:23:56 +00:00
// Print the description
2005-11-20 21:29:59 +00:00
if ( $user -> description && ! isset ( $hiddenfields [ 'description' ])) {
2004-09-21 10:52:55 +00:00
echo format_text ( $user -> description , FORMAT_MOODLE ) . " <hr /> " ;
2001-11-22 06:23:56 +00:00
}
// Print all the little details in a list
2005-03-20 12:02:14 +00:00
echo '<table border="0" cellpadding="0" cellspacing="0" class="list">' ;
2001-11-22 06:23:56 +00:00
2005-11-20 21:29:59 +00:00
if (( $user -> city or $user -> country ) and ( ! isset ( $hiddenfields [ 'city' ]) or ! isset ( $hiddenfields [ 'country' ]))) {
$location = '' ;
if ( $user -> city && ! isset ( $hiddenfields [ 'city' ])) {
$location .= $user -> city ;
}
if ( ! empty ( $countries [ $user -> country ]) && ! isset ( $hiddenfields [ 'country' ])) {
if ( $user -> city && ! isset ( $hiddenfields [ 'country' ])) {
$location .= ', ' ;
}
$countries = get_list_of_countries ();
$location .= $countries [ $user -> country ];
}
print_row ( get_string ( " location " ) . " : " , $location );
2002-06-10 04:33:46 +00:00
}
2001-11-22 06:23:56 +00:00
2006-09-15 15:04:38 +00:00
if ( has_capability ( 'moodle/user:viewhiddendetails' , $coursecontext )) {
2001-11-22 06:23:56 +00:00
if ( $user -> address ) {
2002-07-04 07:52:06 +00:00
print_row ( get_string ( " address " ) . " : " , " $user->address " );
2001-11-22 06:23:56 +00:00
}
if ( $user -> phone1 ) {
2002-07-04 07:52:06 +00:00
print_row ( get_string ( " phone " ) . " : " , " $user->phone1 " );
2001-11-22 06:23:56 +00:00
}
if ( $user -> phone2 ) {
2002-07-04 07:52:06 +00:00
print_row ( get_string ( " phone " ) . " : " , " $user->phone2 " );
2001-11-22 06:23:56 +00:00
}
}
2004-06-22 18:34:35 +00:00
if ( $user -> maildisplay == 1 or
( $user -> maildisplay == 2 and $course -> category and ! isguest ()) or
2004-03-24 12:23:43 +00:00
isteacher ( $course -> id )) {
2004-02-20 10:27:24 +00:00
2004-10-27 06:01:20 +00:00
$emailswitch = '' ;
2006-10-01 05:26:38 +00:00
if ( has_capability ( 'moodle/course:useremail' , $coursecontext ) or $currentuser ) { /// Can use the enable/disable email stuff
2005-06-15 09:49:18 +00:00
if ( ! empty ( $enable )) { /// Recieved a parameter to enable the email address
2004-02-20 10:27:24 +00:00
set_field ( 'user' , 'emailstop' , 0 , 'id' , $user -> id );
$user -> emailstop = 0 ;
}
2005-06-15 09:49:18 +00:00
if ( ! empty ( $disable )) { /// Recieved a parameter to disable the email address
2004-02-20 10:27:24 +00:00
set_field ( 'user' , 'emailstop' , 1 , 'id' , $user -> id );
$user -> emailstop = 1 ;
}
2004-10-27 06:01:20 +00:00
}
2006-10-01 05:26:38 +00:00
if ( has_capability ( 'moodle/course:useremail' , $coursecontext )) { /// Can use the enable/disable email stuff
2004-02-20 10:27:24 +00:00
if ( $user -> emailstop ) {
$switchparam = 'enable' ;
$switchtitle = get_string ( 'emaildisable' );
2004-07-24 06:37:44 +00:00
$switchclick = get_string ( 'emailenableclick' );
2004-07-24 06:25:14 +00:00
$switchpix = 'emailno.gif' ;
2004-02-20 10:27:24 +00:00
} else {
$switchparam = 'disable' ;
$switchtitle = get_string ( 'emailenable' );
2004-07-24 06:37:44 +00:00
$switchclick = get_string ( 'emaildisableclick' );
2004-07-24 06:25:14 +00:00
$switchpix = 'email.gif' ;
2004-02-20 10:27:24 +00:00
}
2005-04-18 17:57:26 +00:00
$emailswitch = " <a title= \" $switchclick\ " " .
" href= \" view.php?id= $user->id &course= $course->id & $switchparam =1 \" > " .
" <img border= \" 0 \" width= \" 11 \" height= \" 11 \" src= \" $CFG->pixpath /t/ $switchpix\ " alt = \ " \" /></a> " ;
2004-10-27 06:01:20 +00:00
} else if ( $currentuser ) { /// Can only re-enable an email this way
if ( $user -> emailstop ) { // Include link that tells how to re-enable their email
$switchparam = 'enable' ;
$switchtitle = get_string ( 'emaildisable' );
$switchclick = get_string ( 'emailenableclick' );
2005-04-18 17:57:26 +00:00
$emailswitch = " (<a title= \" $switchclick\ " " .
" href= \" view.php?id= $user->id &course= $course->id &enable=1 \" > $switchtitle </a>) " ;
2004-10-27 06:01:20 +00:00
}
2004-02-20 10:27:24 +00:00
}
print_row ( get_string ( " email " ) . " : " , obfuscate_mailto ( $user -> email , '' , $user -> emailstop ) . " $emailswitch " );
2002-08-21 13:29:25 +00:00
}
2001-11-22 06:23:56 +00:00
2005-11-20 21:29:59 +00:00
if ( $user -> url && ! isset ( $hiddenfields [ 'webpage' ])) {
2003-10-21 06:40:39 +00:00
print_row ( get_string ( " webpage " ) . " : " , " <a href= \" $user->url\ " > $user -> url </ a > " );
2001-11-22 06:23:56 +00:00
}
2005-11-20 21:29:59 +00:00
if ( $user -> icq && ! isset ( $hiddenfields [ 'icqnumber' ])) {
2005-03-05 05:57:10 +00:00
print_row ( get_string ( 'icqnumber' ) . ':' , " <a href= \" http://web.icq.com/wwp?uin= $user->icq\ " > $user -> icq < img src = \ " http://web.icq.com/whitepages/online?icq= $user->icq &img=5 \" width= \" 18 \" height= \" 18 \" border= \" 0 \" alt= \" \" /></a> " );
}
2005-11-20 21:29:59 +00:00
if ( $user -> skype && ! isset ( $hiddenfields [ 'skypeid' ])) {
2006-02-03 07:27:46 +00:00
print_row ( get_string ( 'skypeid' ) . ':' , '<a href="callto:' . urlencode ( $user -> skype ) . '">' . s ( $user -> skype ) .
2006-02-03 07:38:27 +00:00
' <img src="http://mystatus.skype.com/smallicon/' . urlencode ( $user -> skype ) . '" alt="status" ' .
2006-02-03 07:27:46 +00:00
' height="16" width="16" /></a>' );
2005-03-05 05:57:10 +00:00
}
2005-11-20 21:29:59 +00:00
if ( $user -> yahoo && ! isset ( $hiddenfields [ 'yahooid' ])) {
2006-06-01 15:19:06 +00:00
print_row ( get_string ( 'yahooid' ) . ':' , '<a href="http://edit.yahoo.com/config/send_webmesg?.target=' . urlencode ( $user -> yahoo ) . '&.src=pg">' . s ( $user -> yahoo ) . " <img border=0 src= \" http://opi.yahoo.com/online?u= " . urlencode ( $user -> yahoo ) . " &m=g&t=0 \" width= \" 12 \" height= \" 12 \" alt= \" \" ></a> " );
2005-03-05 05:57:10 +00:00
}
2005-11-20 21:29:59 +00:00
if ( $user -> aim && ! isset ( $hiddenfields [ 'aimid' ])) {
2005-03-05 06:26:44 +00:00
print_row ( get_string ( 'aimid' ) . ':' , '<a href="aim:goim?screenname=' . s ( $user -> aim ) . '">' . s ( $user -> aim ) . '</a>' );
2005-03-05 05:57:10 +00:00
}
2005-11-20 21:29:59 +00:00
if ( $user -> msn && ! isset ( $hiddenfields [ 'msnid' ])) {
2005-03-05 05:57:10 +00:00
print_row ( get_string ( 'msnid' ) . ':' , s ( $user -> msn ));
2001-11-22 06:23:56 +00:00
}
2003-11-19 07:55:00 +00:00
if ( isteacher ( $course -> id )) {
if ( $mycourses = get_my_courses ( $user -> id )) {
$courselisting = '' ;
foreach ( $mycourses as $mycourse ) {
2004-04-03 07:08:16 +00:00
if ( $mycourse -> visible and $mycourse -> category ) {
2005-11-08 07:19:27 +00:00
if ( $mycourse -> id != $course -> id ){
$courselisting .= " <a href= \" $CFG->wwwroot /user/view.php?id= $user->id &course= $mycourse->id\ " > $mycourse -> fullname </ a > , " ;
}
else {
$courselisting .= " $mycourse->fullname , " ;
}
2003-11-19 07:55:00 +00:00
}
}
print_row ( get_string ( 'courses' ) . ':' , rtrim ( $courselisting , ', ' ));
}
}
2005-11-20 21:29:59 +00:00
if ( ! isset ( $hiddenfields [ 'lastaccess' ])) {
if ( $user -> lastaccess ) {
$datestring = userdate ( $user -> lastaccess ) . " ( " . format_time ( time () - $user -> lastaccess ) . " ) " ;
} else {
$datestring = get_string ( " never " );
}
print_row ( get_string ( " lastaccess " ) . " : " , $datestring );
2002-09-06 15:10:36 +00:00
}
2006-08-15 08:29:29 +00:00
/// printing roles
2006-09-13 06:56:25 +00:00
if ( $rolestring = get_user_roles_in_context ( $id , $coursecontext -> id )) {
print_row ( get_string ( 'roles' ) . ':' , $rolestring );
}
2005-11-08 07:19:27 +00:00
2006-03-07 06:22:59 +00:00
/// Printing groups
$isseparategroups = ( $course -> groupmode == SEPARATEGROUPS and $course -> groupmodeforce and
2006-09-15 15:04:38 +00:00
! has_capability ( 'moodle/site:accessallgroups' , $coursecontext ));
2006-03-07 06:22:59 +00:00
if ( ! $isseparategroups ){
if ( $usergroups = user_group ( $course -> id , $user -> id )){
$groupstr = '' ;
foreach ( $usergroups as $group ){
$groupstr .= ' <a href="' . $CFG -> wwwroot . '/user/index.php?id=' . $course -> id . '&group=' . $group -> id . '">' . $group -> name . '</a>,' ;
2005-11-08 07:19:27 +00:00
}
2006-03-07 06:22:59 +00:00
print_row ( get_string ( " group " ) . " : " , rtrim ( $groupstr , ', ' ));
2005-11-08 07:19:27 +00:00
}
}
2006-03-07 06:22:59 +00:00
/// End of printing groups
2005-11-08 07:19:27 +00:00
2003-10-21 06:40:39 +00:00
echo " </table> " ;
2001-11-22 06:23:56 +00:00
2003-10-21 06:40:39 +00:00
echo " </td></tr></table> " ;
2001-11-22 06:23:56 +00:00
2002-11-28 12:31:46 +00:00
$internalpassword = false ;
2006-02-13 03:08:56 +00:00
if ( is_internal_auth ( $user -> auth ) or ( ! empty ( $CFG -> { 'auth_' . $user -> auth . '_stdchangepassword' }))) {
2005-02-09 14:45:19 +00:00
if ( empty ( $CFG -> loginhttps )) {
$internalpassword = " $CFG->wwwroot /login/change_password.php " ;
2004-06-22 18:34:35 +00:00
} else {
2006-05-15 21:36:46 +00:00
$internalpassword = str_replace ( 'http:' , 'https:' , $CFG -> wwwroot . '/login/change_password.php' );
2004-06-22 18:34:35 +00:00
}
2002-11-28 12:31:46 +00:00
}
2002-06-04 06:29:36 +00:00
// Print other functions
2005-02-27 10:08:13 +00:00
echo '<div class="buttons"><table align="center"><tr>' ;
2005-12-02 02:37:01 +00:00
2006-08-13 07:01:57 +00:00
if ( $currentuser and ! isguest ()) {
2004-10-10 06:26:29 +00:00
if ( $internalpassword ) {
2004-09-23 11:01:22 +00:00
echo " <td nowrap= \" nowrap \" ><form action= \" $internalpassword\ " method = \ " get \" > " ;
2004-09-07 08:05:25 +00:00
echo " <input type= \" hidden \" name= \" id \" value= \" $course->id\ " /> " ;
echo " <input type= \" submit \" value= \" " . get_string ( " changepassword " ) . " \" /> " ;
2004-09-23 11:01:22 +00:00
echo " </form></td> " ;
2004-10-10 06:26:29 +00:00
} else if ( strlen ( $CFG -> changepassword ) > 1 ) {
2004-09-23 11:01:22 +00:00
echo " <td nowrap= \" nowrap \" ><form action= \" $CFG->changepassword\ " method = \ " get \" > " ;
2004-09-07 08:05:25 +00:00
echo " <input type= \" submit \" value= \" " . get_string ( " changepassword " ) . " \" /> " ;
2004-09-23 11:01:22 +00:00
echo " </form></td> " ;
2002-11-28 12:31:46 +00:00
}
2002-10-17 12:25:25 +00:00
}
2006-09-15 15:04:38 +00:00
if ( $course -> id != SITEID && empty ( $course -> metacourse )) { // Mostly only useful at course level
if (( $user -> id == $USER -> id && // Myself
has_capability ( 'moodle/course:view' , $coursecontext , NULL ) && // Course participant
has_capability ( 'moodle/role:unassignself' , $coursecontext , NULL , false )) // Can unassign myself
||
( has_capability ( 'moodle/role:assign' , $coursecontext , NULL ) && // I can assign roles
get_user_roles ( $coursecontext , $user -> id )) ) { // This user has roles
echo '<td nowrap="nowrap"><form action="../course/unenrol.php" method="get" />' ;
echo '<input type="hidden" name="id" value="' . $course -> id . '" />' ;
echo '<input type="hidden" name="user" value="' . $user -> id . '" />' ;
echo '<input type="submit" value="' . get_string ( 'unenrolme' , '' , $course -> shortname ) . '">' ;
echo '</form></td>' ;
}
2003-10-31 06:50:19 +00:00
}
2006-09-15 15:04:38 +00:00
2006-10-01 05:26:38 +00:00
if ( $USER -> id != $user -> id && has_capability ( 'moodle/user:loginas' , $coursecontext )) {
2006-09-15 15:04:38 +00:00
echo '<td nowrap="nowrap"><form action="' . $CFG -> wwwroot . '/course/loginas.php" method="get">' ;
echo '<input type="hidden" name="id" value="' . $course -> id . '" />' ;
echo '<input type="hidden" name="user" value="' . $user -> id . '" />' ;
echo '<input type="submit" value="' . get_string ( 'loginas' ) . '" />' ;
echo '</form></td>' ;
2002-07-27 10:23:45 +00:00
}
2006-10-01 05:26:38 +00:00
2005-03-17 20:39:30 +00:00
if ( ! empty ( $CFG -> messaging ) and ! isguest ()) {
2005-03-20 12:02:14 +00:00
if ( ! empty ( $USER -> id ) and ( $USER -> id == $user -> id )) {
2005-01-31 07:11:42 +00:00
if ( $countmessages = count_records ( 'message' , 'useridto' , $user -> id )) {
$messagebuttonname = get_string ( " messages " , " message " ) . " ( $countmessages ) " ;
} else {
$messagebuttonname = get_string ( " messages " , " message " );
}
echo " <td nowrap= \" nowrap \" ><form target= \" message \" action= \" ../message/index.php \" method= \" get \" > " ;
echo " <input type= \" submit \" value= \" $messagebuttonname\ " onclick = \ " return openpopup('/message/index.php', 'message', 'menubar=0,location=0,scrollbars,status,resizable,width=400,height=500', 0); \" /> " ;
echo " </form></td> " ;
2004-12-28 13:49:44 +00:00
} else {
2005-04-16 02:31:41 +00:00
echo " <td nowrap= \" nowrap \" ><form target= \" message_ $user->id\ " action = \ " ../message/discussion.php \" method= \" get \" > " ;
2005-01-31 07:11:42 +00:00
echo " <input type= \" hidden \" name= \" id \" value= \" $user->id\ " /> " ;
2005-04-16 02:31:41 +00:00
echo " <input type= \" submit \" value= \" " . get_string ( " sendmessage " , " message " ) . " \" onclick= \" return openpopup('/message/discussion.php?id= $user->id ', 'message_ $user->id ', 'menubar=0,location=0,scrollbars,status,resizable,width=400,height=500', 0); \" /> " ;
2005-01-31 07:11:42 +00:00
echo " </form></td> " ;
2004-12-28 13:49:44 +00:00
}
}
2006-03-16 19:32:17 +00:00
// Authorize.net: User Payments
2006-03-13 21:19:04 +00:00
if ( $course -> enrol == 'authorize' || ( empty ( $course -> enrol ) && $CFG -> enrol == 'authorize' )) {
echo " <td nowrap= \" nowrap \" ><form action= \" ../enrol/authorize/index.php \" method= \" get \" > " ;
2006-03-16 19:32:17 +00:00
echo " <input type= \" hidden \" name= \" course \" value= \" $course->id\ " /> " ;
2006-03-13 21:19:04 +00:00
echo " <input type= \" hidden \" name= \" user \" value= \" $user->id\ " /> " ;
echo " <input type= \" submit \" value= \" " . get_string ( 'payments' ) . " \" /> " ;
echo " </form></td> " ;
}
2004-09-21 10:52:55 +00:00
echo " <td></td> " ;
2005-02-27 10:08:13 +00:00
echo " </tr></table></div> \n " ;
2002-06-04 06:29:36 +00:00
2006-09-13 06:56:25 +00:00
2006-09-15 15:04:38 +00:00
if ( debugging () && $USER -> id == $user -> id ) { // TEMPORARY in DEV! XXX TODO
2006-09-13 06:56:25 +00:00
echo '<hr />' ;
print_heading ( 'DEBUG MODE: User session variables' );
print_object ( $USER );
}
2001-11-22 06:23:56 +00:00
print_footer ( $course );
/// Functions ///////
function print_row ( $left , $right ) {
2005-03-20 12:02:14 +00:00
echo " \n <tr><td nowrap= \" nowrap \" align= \" right \" valign= \" top \" class= \" label c0 \" > $left </td><td align= \" left \" valign= \" top \" class= \" info c1 \" > $right </td></tr> \n " ;
2001-11-22 06:23:56 +00:00
}
?>