version 1.137, 2002/11/08 20:18:29
|
version 1.138, 2002/11/12 20:14:51
|
Line 1190 sub html_editable_cell {
|
Line 1190 sub html_editable_cell {
|
if ($value =~ /^\s*$/ ) { |
if ($value =~ /^\s*$/ ) { |
$value = '<font color="'.$bgcolor.'">#</font>'; |
$value = '<font color="'.$bgcolor.'">#</font>'; |
} |
} |
|
$formula =~ s/\n/\\n/gs; |
$result .= '<a href="javascript:celledit(\''. |
$result .= '<a href="javascript:celledit(\''. |
$name.'\',\''.$formula.'\');">'.$value.'</a>'; |
$name.'\',\''.$formula.'\');">'.$value.'</a>'; |
return $result; |
return $result; |
Line 2828 sub handler {
|
Line 2829 sub handler {
|
# Header.... |
# Header.... |
# |
# |
$r->print('<html><head><title>LON-CAPA Spreadsheet</title>'); |
$r->print('<html><head><title>LON-CAPA Spreadsheet</title>'); |
|
my $nothing = "''"; |
|
if ($ENV{'browser.type'} eq 'explorer') { |
|
$nothing = "'javascript:void(0);'"; |
|
} |
|
|
if ($ENV{'request.role'} !~ /^st\./) { |
if ($ENV{'request.role'} !~ /^st\./) { |
$r->print(<<ENDSCRIPT); |
$r->print(<<ENDSCRIPT); |
<script language="JavaScript"> |
<script language="JavaScript"> |
|
|
function celledit(cn,cf) { |
var editwin; |
var cnf=prompt(cn,cf); |
|
if (cnf!=null) { |
function celledit(cellname,cellformula) { |
document.sheet.unewfield.value=cn; |
var edit_text = ''; |
document.sheet.unewformula.value=cnf; |
edit_text +='<html><head><title>Cell Edit Window</title></head><body>'; |
document.sheet.submit(); |
edit_text += '<form name="editwinform">'; |
|
edit_text += '<center><h3>Cell '+cellname+'</h3>'; |
|
edit_text += '<textarea name="newformula" cols="40" rows="6"'; |
|
edit_text += ' wrap="off" >'+cellformula+'</textarea>'; |
|
edit_text += '</br>'; |
|
edit_text += '<input type="button" name="accept" value="Accept"'; |
|
edit_text += ' onClick=\\\'javascript:'; |
|
edit_text += 'opener.document.sheet.unewfield.value='; |
|
edit_text += '"'+cellname+'";'; |
|
edit_text += 'opener.document.sheet.unewformula.value='; |
|
edit_text += 'document.editwinform.newformula.value;'; |
|
edit_text += 'opener.document.sheet.submit();'; |
|
edit_text += 'self.close()\\\' />'; |
|
edit_text += ' '; |
|
edit_text += '<input type="button" name="abort" '; |
|
edit_text += 'value="Discard Changes"'; |
|
edit_text += ' onClick="javascript:self.close()" />'; |
|
edit_text += '</center></body></html>'; |
|
|
|
if (editwin != null && !(editwin.closed) ) { |
|
editwin.close(); |
} |
} |
|
|
|
editwin = window.open($nothing,'CellEditWin','height=200,width=350,scrollbars=no,resizeable=yes,alwaysRaised=yes,dependent=yes',true); |
|
editwin.document.write(edit_text); |
} |
} |
|
|
function changesheet(cn) { |
function changesheet(cn) { |
Line 2857 sub handler {
|
Line 2886 sub handler {
|
ENDSCRIPT |
ENDSCRIPT |
} |
} |
$r->print('</head>'.&Apache::loncommon::bodytag('Grades Spreadsheet'). |
$r->print('</head>'.&Apache::loncommon::bodytag('Grades Spreadsheet'). |
'<form action="'.$r->uri.'" name=sheet method=post>'); |
'<form action="'.$r->uri.'" name="sheet" method="post">'); |
$r->print(&hiddenfield('uname',$ENV{'form.uname'}). |
$r->print(&hiddenfield('uname',$ENV{'form.uname'}). |
&hiddenfield('udom',$ENV{'form.udom'}). |
&hiddenfield('udom',$ENV{'form.udom'}). |
&hiddenfield('usymb',$ENV{'form.usymb'}). |
&hiddenfield('usymb',$ENV{'form.usymb'}). |