version 1.504, 2009/12/02 18:33:43
|
version 1.505.2.1, 2010/05/30 02:57:01
|
Line 244 sub tokeninputfield {
|
Line 244 sub tokeninputfield {
|
document.tokeninput.barcode.value=''; |
document.tokeninput.barcode.value=''; |
} |
} |
</script> |
</script> |
<form method="post" name="tokeninput"> |
<form method="post" name="tokeninput" action=""> |
<table border="2" bgcolor="#FFFFBB"> |
<table border="2" bgcolor="#FFFFBB"> |
<tr><th>DocID Checkin</th></tr> |
<tr><th>DocID Checkin</th></tr> |
<tr><td> |
<tr><td> |
Line 252 sub tokeninputfield {
|
Line 252 sub tokeninputfield {
|
<tr> |
<tr> |
<td>Scan in Barcode</td> |
<td>Scan in Barcode</td> |
<td><input type="text" size="22" name="barcode" |
<td><input type="text" size="22" name="barcode" |
onChange="updatetoken()"/></td> |
onchange="updatetoken()"/></td> |
</tr> |
</tr> |
<tr><td><i>or</i> Type in DocID</td> |
<tr><td><i>or</i> Type in DocID</td> |
<td> |
<td> |
Line 261 onChange="updatetoken()"/></td>
|
Line 261 onChange="updatetoken()"/></td>
|
<input type="text" size="5" name="codetwo" /> |
<input type="text" size="5" name="codetwo" /> |
<b><font size="+2">*</font></b> |
<b><font size="+2">*</font></b> |
<input type="text" size="10" name="codethree" value="$defhost" |
<input type="text" size="10" name="codethree" value="$defhost" |
onChange="this.value=this.value.toUpperCase()" /> |
onchange="this.value=this.value.toUpperCase()" /> |
</td></tr> |
</td></tr> |
</table> |
</table> |
</td></tr> |
</td></tr> |
Line 2291 sub get_tag {
|
Line 2291 sub get_tag {
|
|
|
=pod |
=pod |
|
|
=item &print_pdf_radiobutton(fieldname, value, text) |
=item &print_pdf_radiobutton(fieldname, value) |
|
|
Returns a latexline to generate a PDF-Form-Radiobutton with Text. |
Returns a latexline to generate a PDF-Form-Radiobutton. |
|
Note: Radiobuttons with equal names are automaticly grouped |
|
in a selection-group. |
|
|
$fieldname: PDF internalname of the radiobutton |
$fieldname: PDF internalname of the radiobutton(group) |
$value: Value of radiobutton (read when dumping the PDF data) |
$value: Value of radiobutton |
$text: Text on the rightside of the radiobutton |
|
|
|
=cut |
=cut |
sub print_pdf_radiobutton { |
sub print_pdf_radiobutton { |
my $result = ''; |
my ($fieldname, $value) = @_; |
my ($fieldName, $value, $text) = @_; |
return '\radioButton[\symbolchoice{circle}]{' |
$result .= '\begin{tabularx}{\textwidth}{p{0cm}X}'."\n"; |
.$fieldname.'}{10bp}{10bp}{'.$value.'}'; |
$result .= '\radioButton[\symbolchoice{circle}]{'. |
|
$fieldName.'}{10bp}{10bp}{'.$value.'}&'.$text."\n"; |
|
$result .= '\end{tabularx}' . "\n"; |
|
$result .= '\hspace{2mm}' . "\n"; |
|
return $result; |
|
} |
} |
|
|
|
|