Annotation of capa/capa51/Discuss/capadiscuss_html, revision 1.1

1.1     ! albertel    1: ## CapaDiscuss HTML Subroutines
        !             2: #  Copyright (C) 1992-2000 Michigan State University
        !             3: #
        !             4: #  The CAPA system is free software; you can redistribute it and/or
        !             5: #  modify it under the terms of the GNU Library General Public License as
        !             6: #  published by the Free Software Foundation; either version 2 of the
        !             7: #  License, or (at your option) any later version.
        !             8: #
        !             9: #  The CAPA system is distributed in the hope that it will be useful,
        !            10: #  but WITHOUT ANY WARRANTY; without even the implied warranty of
        !            11: #  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
        !            12: #  Library General Public License for more details.
        !            13: #
        !            14: #  You should have received a copy of the GNU Library General Public
        !            15: #  License along with the CAPA system; see the file COPYING.  If not,
        !            16: #  write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
        !            17: #  Boston, MA 02111-1307, USA.
        !            18: #
        !            19: #  As a special exception, you have permission to link this program
        !            20: #  with the TtH/TtM library and distribute executables, as long as you
        !            21: #  follow the requirements of the GNU GPL in regard to all of the
        !            22: #  software in the executable aside from TtH/TtM.
        !            23: 
        !            24: 
        !            25: sub NewSetHTML {
        !            26: print <<NewSetHTML2;
        !            27: <html>
        !            28: <head>
        !            29:   <title>
        !            30:   </title>
        !            31: </head>
        !            32: <body bgcolor="#FFFFFF">
        !            33: <table><tr><td bgcolor="#000000">
        !            34: <table width="100%" border=0 cellspacing=1 cellpadding=4>
        !            35: <tr bgcolor="#FFFFFF">
        !            36:   <td>Class: <b>$class</b></td>
        !            37: </tr></table>
        !            38: </td></tr></table>
        !            39: 
        !            40: <table><tr><td bgcolor="#000000">
        !            41: <table width="100%" border=0 cellspacing=1 cellpadding=4>
        !            42:   <tr bgcolor="#FFFFFF">
        !            43:   <td>
        !            44:   Please enter your CapaID for <b>set $setid</b>
        !            45:   </td>
        !            46:   </tr>
        !            47:   <tr>
        !            48:   <td bgcolor="#DEDFDF">
        !            49:   <form method=post action="$cgidirurl/$discussurl">
        !            50:   <input type=hidden name="ACTION" value="viewset">
        !            51:   <input type=hidden name="CLASS" value="$class">
        !            52:   <input type=hidden name="SETID" value="$setid">
        !            53:   <input type=hidden name="PSETID" value="$setid">
        !            54:   <input type=hidden name="SNUM" value="$snum">
        !            55:   CapaID: <input type=password name="CAPAID" size=4 maxsize=4>
        !            56:   &nbsp;&nbsp;<input type=submit value="Submit">
        !            57:   </form>
        !            58:   </td>
        !            59: </tr></table>
        !            60: </td></tr></table>
        !            61: </body>
        !            62: </html>
        !            63: NewSetHTML2
        !            64: }
        !            65: 
        !            66: sub ViewSetTitleHTML {
        !            67: print <<ViewSetTitleHTML2;
        !            68: <html>
        !            69: <head>
        !            70:   <title></title>
        !            71: </head>
        !            72: <body bgcolor="#FFFFFF">
        !            73: <center>
        !            74: <table><tr><td bgcolor="#000000">
        !            75: <table width="100%" border=0 cellspacing=2 cellpadding=4>
        !            76:   <tr valign=top>
        !            77:   <td bgcolor="#FFFFFF" align=center>Class:<br><b> $class </b></td>
        !            78:   <td bgcolor="#FFFFFF">
        !            79:     <table width="100%" border=0 cellspacing=0 cellpadding=0><tr>
        !            80:     <td>
        !            81:     <form method=post action="$cgidirurl/$discussurl">
        !            82:     <input type=submit value="Go">
        !            83:     <b> to Set </b>
        !            84:     <font size=+1>$pdset</font>
        !            85:     <input type=hidden name="ACTION" value="newset">
        !            86:     <input type=hidden name="CLASS" value="$class">
        !            87:     <input type=hidden name="SNUM" value="$snum">
        !            88:     <input type=hidden name="CAPAID" value="$capaid">
        !            89:     <input type=hidden name="PSETID" value="$psetid">
        !            90:     <input type=submit value="Go">
        !            91:     </form>
        !            92:     </td></tr></table>
        !            93:   </td>
        !            94:   </tr>
        !            95: </table>
        !            96: </td></tr></table>
        !            97: <br>
        !            98: <center>
        !            99: <table><tr>
        !           100:   <td>
        !           101:   <form method=post action="$cgidirurl/$discussurl">
        !           102:   <input type=hidden name="ACTION" value="viewset">
        !           103:   <input type=hidden name="CLASS" value="$class">
        !           104:   <input type=hidden name="SETID" value="$setid">
        !           105:   <input type=hidden name="PSETID" value="$psetid">
        !           106:   <input type=hidden name="SNUM" value="$snum">
        !           107:   <input type=hidden name="CAPAID" value="$capaid">
        !           108:   <input type=submit value="Refresh">
        !           109:   </form>
        !           110:   </td>
        !           111:   <td>
        !           112:   <form method=post action="$capasbin">
        !           113:   <input type=hidden name="CLASS" value="$class">
        !           114:   <input type=hidden name="SNUM"  value="$snum">
        !           115:   <input type=hidden name="CAPAID" value="$capaid">
        !           116:   <input type=hidden name="M" value="2">
        !           117:   <input type=submit value="Try current set">
        !           118:   </form>
        !           119:   </td>
        !           120:   <td>
        !           121:   $adminbutton
        !           122:   </td>
        !           123:   $infostring
        !           124: </tr></table>
        !           125: </center>
        !           126: ViewSetTitleHTML2
        !           127: }
        !           128: 
        !           129: sub ViewSetTopSmallHTML {
        !           130: print <<ViewSetTopSmallHTML2;
        !           131: <center>
        !           132: <table><tr><td bgcolor="#000000">
        !           133: <table border=0 cellspacing=1 cellpadding=4>
        !           134: <tr bgcolor="#007F7F">
        !           135:   <td>
        !           136:   <font color="#FFFFFF">
        !           137:   <b>Problem</b>
        !           138:   </td>
        !           139:   <td align=center>
        !           140:   <font color="#FFFFFF">
        !           141:   <b>Posts</b>
        !           142:   </td>
        !           143:   <td>
        !           144:   <font color="#FFFFFF">
        !           145:   <center>
        !           146:   <b>Last Post</b>
        !           147:   </td>
        !           148: </tr>
        !           149: ViewSetTopSmallHTML2
        !           150: }
        !           151: 
        !           152: sub ViewSetTopBigHTML {
        !           153: print <<ViewSetTopBigHTML2;
        !           154: <center>
        !           155: <table border=0 cellspacing=12 cellpadding=0><tr>
        !           156:   <td valign=top>
        !           157: ViewSetTopBigHTML2
        !           158: &ViewSetTopSmallHTML;
        !           159: }
        !           160: 
        !           161: sub ViewSetGutsHTML {
        !           162: print <<ViewSetGutsHTML2;
        !           163: <tr>
        !           164:   <td bgcolor="#FFFFFF" align=center>
        !           165:   <form method=post action="$cgidirurl/$discussurl">
        !           166:   <input type=hidden name="ACTION" value="viewproblem">
        !           167:   <input type=hidden name="CLASS" value="$class">
        !           168:   <input type=hidden name="SETID" value="$setid">
        !           169:   <input type=hidden name="PSETID" value="$psetid">
        !           170:   <input type=hidden name="SNUM" value="$snum">
        !           171:   <input type=hidden name="CAPAID" value="$capaid">
        !           172:   <input type=hidden name="PROBNUM" value="$probnum">
        !           173:   <input type=hidden name="FILE" value="$file">
        !           174:   <input type=submit value=" $probnum ">
        !           175:   </form>
        !           176:   </td>
        !           177:   <td bgcolor="#FFFFFF" align=center>
        !           178:   $posts
        !           179:   </td>
        !           180:   <td bgcolor="#FFFFFF">
        !           181:   $lastpost
        !           182:   </td>
        !           183: </tr>
        !           184: ViewSetGutsHTML2
        !           185: }
        !           186: 
        !           187: sub ViewSetEndColHTML {
        !           188: print <<ViewSetEndColHTML2;
        !           189: </table>
        !           190: </td></tr></table>
        !           191: </td><td valign=top>
        !           192: ViewSetEndColHTML2
        !           193: }
        !           194: 
        !           195: sub ViewSetBotHTML {
        !           196: print <<ViewSetBotHTML2;
        !           197: </table>
        !           198: </td></tr></table>
        !           199: </td></tr></table>
        !           200: </body>
        !           201: </html>
        !           202: ViewSetBotHTML2
        !           203: }
        !           204: 
        !           205: sub ViewProblemTopHTML {
        !           206: print <<ViewProblemTopHTML2;
        !           207: <html>
        !           208: <head>
        !           209:   <title></title>
        !           210: </head>
        !           211: <body bgcolor="#FFFFFF">
        !           212: <center>
        !           213: <table><tr><td bgcolor="#000000">
        !           214: <table width="100%" border=0 cellspacing=2 cellpadding=4>
        !           215:   <tr>
        !           216:   <td bgcolor="#FFFFFF" valign=top align=center>Class:<br><b> $class </b></td>
        !           217:   <td bgcolor="#FFFFFF" valign=top align=center>
        !           218:     Set: <br><b>$setid</b>
        !           219:     </td>
        !           220:     <td bgcolor="#FFFFFF">
        !           221:     <table width="100%" border=0 cellspacing=0 cellpadding=0><tr><td>
        !           222:     <form method=post action="$cgidirurl/$discussurl">
        !           223:     <font size=+1>
        !           224:     <input type=submit value="Go"></font> <b>to Problem</b> </td>
        !           225:     <td>
        !           226:     <input type=hidden name="ACTION" value="viewproblem">
        !           227:     <input type=hidden name="CLASS" value="$class">
        !           228:     <input type=hidden name="SETID" value="$setid">
        !           229:     <input type=hidden name="PSETID" value="$psetid">
        !           230:     <input type=hidden name="SNUM" value="$snum">
        !           231:     <input type=hidden name="CAPAID" value="$capaid">
        !           232:     <font size=+1>$pdprob
        !           233:     <input type=submit value="Go">
        !           234:     </font>
        !           235:     </td></tr></table>
        !           236:     </form>
        !           237:   </td>
        !           238:   </tr>
        !           239: </table>
        !           240: </td></tr></table>
        !           241: 
        !           242: <br>
        !           243: <center>
        !           244: <table border=0 cellspacing=3 cellpadding=0>
        !           245: <tr>
        !           246: <td>
        !           247:   <form method=post action="$cgidirurl/$discussurl">
        !           248:   <input type=hidden name="ACTION"   value="$viewset">
        !           249:   <input type=hidden name="CLASS"    value="$class">
        !           250:   <input type=hidden name="SETID"    value="$setid">
        !           251:   <input type=hidden name="PSETID" value="$psetid">
        !           252:   <input type=hidden name="SNUM"     value="$snum">
        !           253:   <input type=hidden name="CAPAID"   value="$capaid">
        !           254:   <input type=submit value="<-- Back">
        !           255:   </form>
        !           256: </td>
        !           257: <td>
        !           258:   <form method=post action="$cgidirurl/$discussurl">
        !           259:   <input type=hidden name="ACTION" value="viewproblem">
        !           260:   <input type=hidden name="CLASS" value="$class">
        !           261:   <input type=hidden name="SETID" value="$setid">
        !           262:   <input type=hidden name="PSETID" value="$psetid">
        !           263:   <input type=hidden name="SNUM" value="$snum">
        !           264:   <input type=hidden name="CAPAID" value="$capaid">
        !           265:   <input type=hidden name="PROBNUM" value="$probnum">
        !           266:   <input type=submit value="Refresh">
        !           267:   </form>
        !           268: </td>
        !           269: <td>
        !           270:   <form method=post action="$capasbin#P$probnum">
        !           271:   <input type=hidden name="CLASS"    value="$class">
        !           272:   <input type=hidden name="SNUM"     value="$snum">
        !           273:   <input type=hidden name="CAPAID"   value="$capaid">
        !           274:   <input type=hidden name="SETID"    value="$setid">
        !           275:   <input type=hidden name="PSETID" value="$psetid">
        !           276:   <input type=hidden name="M"        value="2">
        !           277:   <input type=submit value="Try this problem">
        !           278:   </form>
        !           279: </td>
        !           280: <td>
        !           281:   $postbutton
        !           282: </td>
        !           283: <td>
        !           284:   $adminbutton
        !           285: </td>
        !           286:   $infostring
        !           287: </tr></table>
        !           288: ViewProblemTopHTML2
        !           289: }
        !           290: 
        !           291: sub ViewProblemGutsHTML {
        !           292: print <<ViewProblemGutsHTML2;
        !           293: <table width="95%" align=center><tr bgcolor="#000000"><td>
        !           294: <table width="100%" border=0 cellspacing=1 cellpadding=4>
        !           295:   <tr bgcolor="$subjectbgcolor">
        !           296:     <td>
        !           297:     <font size=+1>$subject</b></font>
        !           298:     </td>
        !           299:     <td align=right width="54%" valign=top>
        !           300:     <font size=-1>
        !           301:     Posted by <a href="mailto:$email">$poster</a> on $date at $time
        !           302:     </font>
        !           303:     </td>
        !           304:   </tr>
        !           305:   <tr bgcolor="#FFFFFF">
        !           306:     <td colspan=2>
        !           307:     $message
        !           308:     <table><tr>
        !           309:       <td>$delbutton</td>
        !           310:       <td>$hidebutton</td>
        !           311:       <td>$topbutton</td>
        !           312:       </tr></table>
        !           313:       <font size=1>$messagenote</font></p>
        !           314:     </td>
        !           315:   </tr>
        !           316: </table>
        !           317: </td></tr></table>
        !           318: ViewProblemGutsHTML2
        !           319: }
        !           320: 
        !           321: sub ViewProblemBotHTML {
        !           322: print <<ViewProblemBotHTML2;
        !           323: </body></html>
        !           324: ViewProblemBotHTML2
        !           325: }
        !           326: 
        !           327: 
        !           328: sub ViewProblemNoneHTML {
        !           329: print <<ViewProblemNoneHTML2;
        !           330: <br>
        !           331: <table><tr><td bgcolor="#000000">
        !           332: <table width="100%" border=0 cellspacing=1 cellpadding=4>
        !           333:   <tr bgcolor="#FFFFFF">
        !           334:   <td>
        !           335:   No messages exist for this problem number.  Click on the above
        !           336:   <b>"Post New Message"</b> button to post a new message.
        !           337:   </td>
        !           338: </tr></table>
        !           339: </td></tr></table>
        !           340: ViewProblemNoneHTML2
        !           341: }
        !           342: 
        !           343: sub ReplyButtonHTML {
        !           344: return <<ReplyButtonHTML2;
        !           345:   <form method=post action="$cgidirurl/$discussurl">
        !           346:   <input type=hidden name="ACTION" value="post">
        !           347:   <input type=hidden name="CLASS" value="$class">
        !           348:   <input type=hidden name="SETID" value="$setid">
        !           349:   <input type=hidden name="PSETID" value="$psetid">
        !           350:   <input type=hidden name="SNUM" value="$snum">
        !           351:   <input type=hidden name="CAPAID" value="$capaid">
        !           352:   <input type=hidden name="PROBNUM" value="$probnum">
        !           353:   <input type=hidden name="REPLYNUM" value="$replynum">
        !           354:   <input type=submit value="Post Reply">
        !           355:   </form>
        !           356: ReplyButtonHTML2
        !           357: }
        !           358: 
        !           359: sub PostNewButtonHTML {
        !           360: return <<PostNewButtonHTML2;
        !           361:   <form method=post action="$cgidirurl/$discussurl">
        !           362:   <input type=hidden name="ACTION" value="post">
        !           363:   <input type=hidden name="CLASS" value="$class">
        !           364:   <input type=hidden name="SETID" value="$setid">
        !           365:   <input type=hidden name="PSETID" value="$psetid">
        !           366:   <input type=hidden name="SNUM" value="$snum">
        !           367:   <input type=hidden name="CAPAID" value="$capaid">
        !           368:   <input type=hidden name="PROBNUM" value="$probnum">
        !           369:   <input type=hidden name="FILE" value="none">
        !           370:   <input type=submit value="Post New Message">
        !           371:   </form>
        !           372: PostNewButtonHTML2
        !           373: }
        !           374: 
        !           375: sub AdminButtonHTML {
        !           376: return <<AdminButtonHTML2;
        !           377:   <form method=post action="$cgidirurl/$discussurl">
        !           378:   <input type=hidden name="ACTION" value="admin">
        !           379:   <input type=hidden name="CLASS" value="$class">
        !           380:   <input type=hidden name="SNUM" value="$snum">
        !           381:   <input type=hidden name="CAPAID" value="$capaid">
        !           382:   <input type=hidden name="SETID" value="$setid">
        !           383:   <input type=hidden name="PSETID" value="$psetid">
        !           384:   <input type=hidden name="PROBNUM" value="$probnum">
        !           385:   <input type=submit value="Admin">
        !           386:   </form>
        !           387: AdminButtonHTML2
        !           388: }
        !           389: 
        !           390: sub DelButtonHTML {
        !           391: return <<DelButtonHTML2;
        !           392:   <p align=right><font size=1>
        !           393:   <form method=post action="$cgidirurl/$discussurl">
        !           394:   <input type=hidden name="ACTION" value="delmsgpre">
        !           395:   <input type=hidden name="CLASS" value="$class">
        !           396:   <input type=hidden name="SNUM" value="$snum">
        !           397:   <input type=hidden name="CAPAID" value="$capaid">
        !           398:   <input type=hidden name="SETID" value="$setid">
        !           399:   <input type=hidden name="PSETID" value="$psetid">
        !           400:   <input type=hidden name="PROBNUM" value="$probnum">
        !           401:   <input type=hidden name="FILE" value="$file">
        !           402:   <input type=submit value="Delete Message">
        !           403:   </form>
        !           404:   </font></p>
        !           405: DelButtonHTML2
        !           406: }
        !           407: 
        !           408: sub HideButtonHTML {
        !           409: return <<HideButtonHTML2;
        !           410:   <font size=1>
        !           411:   <form method=post action="$cgidirurl/$discussurl">
        !           412:     <input type=hidden name="ACTION" value="hidemsgpre">
        !           413:     <input type=hidden name="CLASS" value="$class">
        !           414:     <input type=hidden name="SNUM" value="$snum">
        !           415:     <input type=hidden name="CAPAID" value="$capaid">
        !           416:     <input type=hidden name="SETID" value="$setid">
        !           417:     <input type=hidden name="PSETID" value="$psetid">
        !           418:     <input type=hidden name="PROBNUM" value="$probnum">
        !           419:     <input type=hidden name="FILE" value="$file">
        !           420:     <input type=submit value="Hide Message">
        !           421:     </form>
        !           422:   </font>
        !           423: HideButtonHTML2
        !           424: }    
        !           425: 
        !           426: sub UnHideButtonHTML {
        !           427: return <<UnHideButtonHTML2;
        !           428:   <font size=1>
        !           429:   <form method=post action="$cgidirurl/$discussurl">
        !           430:     <input type=hidden name="ACTION" value="unhidemsgpre">
        !           431:     <input type=hidden name="CLASS" value="$class">
        !           432:     <input type=hidden name="SNUM" value="$snum">
        !           433:     <input type=hidden name="CAPAID" value="$capaid">
        !           434:     <input type=hidden name="SETID" value="$setid">
        !           435:     <input type=hidden name="PSETID" value="$psetid">
        !           436:     <input type=hidden name="PROBNUM" value="$probnum">
        !           437:     <input type=hidden name="FILE" value="$file">
        !           438:     <input type=submit value="Unhide Message">
        !           439:     </form>
        !           440:   </font>
        !           441: UnHideButtonHTML2
        !           442: }    
        !           443: 
        !           444: sub TopButtonHTML {
        !           445: return <<TopButtonHTML2;
        !           446:   <font size=1>
        !           447:   <form method=post action="$cgidirurl/$discussurl">
        !           448:     <input type=hidden name="ACTION" value="topmsg">
        !           449:     <input type=hidden name="CLASS" value="$class">
        !           450:     <input type=hidden name="SNUM" value="$snum">
        !           451:     <input type=hidden name="CAPAID" value="$capaid">
        !           452:     <input type=hidden name="SETID" value="$setid">
        !           453:     <input type=hidden name="PSETID" value="$psetid">
        !           454:     <input type=hidden name="PROBNUM" value="$probnum">
        !           455:     <input type=hidden name="FILE" value="$file">
        !           456:     <input type=submit value="Top Message">
        !           457:     </form>
        !           458:   </font>
        !           459: TopButtonHTML2
        !           460: }
        !           461: 
        !           462: sub UnTopButtonHTML {
        !           463: return <<UnTopButtonHTML2;
        !           464:   <font size=1>
        !           465:   <form method=post action="$cgidirurl/$discussurl">
        !           466:     <input type=hidden name="ACTION" value="untopmsg">
        !           467:     <input type=hidden name="CLASS" value="$class">
        !           468:     <input type=hidden name="SNUM" value="$snum">
        !           469:     <input type=hidden name="CAPAID" value="$capaid">
        !           470:     <input type=hidden name="SETID" value="$setid">
        !           471:     <input type=hidden name="PSETID" value="$psetid">
        !           472:     <input type=hidden name="PROBNUM" value="$probnum">
        !           473:     <input type=hidden name="FILE" value="$file">
        !           474:     <input type=submit value="UnTop Message">
        !           475:     </form>
        !           476:   </font>
        !           477: UnTopButtonHTML2
        !           478: }
        !           479: 
        !           480: sub InfoButtonHTML {
        !           481: return <<InfoButtonHTML2;
        !           482:   <td>
        !           483:     <form method=post action="$cgidirurl/$discussurl">
        !           484:     <input type=hidden name="ACTION" value="viewinfofile">
        !           485:     <input type=hidden name="CLASS" value="$class">
        !           486:     <input type=hidden name="SNUM" value="$snum">
        !           487:     <input type=hidden name="CAPAID" value="$capaid">
        !           488:     <input type=hidden name="SETID" value="$setid">
        !           489:     <input type=hidden name="PSETID" value="$psetid">
        !           490:     <input type=hidden name="PROBNUM" value="$probnum">
        !           491:     <input type=hidden name="FILE" value="$infofile">
        !           492:     <input type=hidden name="BACKFUNCTION" value="$backfunction">
        !           493:     <input type=submit value="$infodesc">
        !           494:     </form>
        !           495:   </td>
        !           496: InfoButtonHTML2
        !           497: }
        !           498: 
        !           499: sub InfoBackButtonHTML {
        !           500: print <<InfoBackButtonHTML2;
        !           501:     <form method=post action="$cgidirurl/$discussurl">
        !           502:     <input type=hidden name="ACTION" value="$backfunction">
        !           503:     <input type=hidden name="CLASS" value="$class">
        !           504:     <input type=hidden name="SNUM" value="$snum">
        !           505:     <input type=hidden name="CAPAID" value="$capaid">
        !           506:     <input type=hidden name="SETID" value="$setid">
        !           507:     <input type=hidden name="PSETID" value="$psetid">
        !           508:     <input type=hidden name="PROBNUM" value="$probnum">
        !           509:     <input type=submit value="<-- Back">
        !           510:     </form>
        !           511: InfoBackButtonHTML2
        !           512: }
        !           513: 
        !           514: sub PostHTML {
        !           515: print <<PostHTML2;
        !           516: <html>
        !           517: <head>
        !           518:   <title></title>
        !           519: </head>
        !           520: <body bgcolor="#FFFFFF">
        !           521: <table><tr><td bgcolor="#000000">
        !           522: <table width="100%" border=0 cellspacing=2 cellpadding=4>
        !           523:   <tr bgcolor="#FFFFFF">
        !           524:     <td bgcolor="#FFFFFF">Class: <b>$class</b></td>
        !           525:     <td bgcolor="#FFFFFF">Set: <b>$setid</td>
        !           526:     <td bgcolor="#FFFFFF">Problem: <b>$probnum</td>
        !           527:   </tr>
        !           528: </table>
        !           529: </td></tr></table>
        !           530: <table width=500 border=0 cellspacing=0 cellpadding=0><tr>
        !           531:   <td>
        !           532:   <h1>Post $PostType</h1>
        !           533:   </td>
        !           534:   <td align=right>
        !           535:   <form method=post action="$cgidirurl/$discussurl">
        !           536:   <input type=hidden name="ACTION" value="viewproblem">
        !           537:   <input type=hidden name="CLASS" value="$class">
        !           538:   <input type=hidden name="SETID" value="$setid">
        !           539:   <input type=hidden name="PSETID" value="$psetid">
        !           540:   <input type=hidden name="SNUM" value="$snum">
        !           541:   <input type=hidden name="CAPAID" value="$capaid">
        !           542:   <input type=hidden name="PROBNUM" value="$probnum">
        !           543:   <input type=submit value="Cancel">
        !           544:   </form>
        !           545:   </td>
        !           546: </tr></table>
        !           547: <form method=post action="$cgidirurl/$discussurl">
        !           548: <input type=hidden name="ACTION" value="postsubmit">
        !           549: <input type=hidden name="CLASS" value="$class">
        !           550: <input type=hidden name="SETID" value="$setid">
        !           551: <input type=hidden name="PSETID" value="$psetid">
        !           552: <input type=hidden name="SNUM" value="$snum">
        !           553: <input type=hidden name="CAPAID" value="$capaid">
        !           554: <input type=hidden name="PROBNUM" value="$probnum">
        !           555: <input type=hidden name="REPLYNUM" value="$replynum">
        !           556: <table width=500><tr><td bgcolor="#000000">
        !           557: <table width="100%" border=0 cellspacing=1 cellpadding=4>
        !           558:   <tr bgcolor="#92D1D0">
        !           559:   <td colspan=2>
        !           560:   <table width="100%">
        !           561:   <tr>
        !           562:     <td align=left>
        !           563:     Click here <input type=checkbox name="ANONYMOUS" value="yes">
        !           564:     to post anonymously<font size=-1>*</font>
        !           565:     </td>
        !           566:     <td align=right>
        !           567:     <input type=submit value="Post">
        !           568:     </td>
        !           569:   </tr></table>
        !           570:   </td>
        !           571:   </tr>
        !           572:   <tr bgcolor="#92D1D0">
        !           573:   <td>
        !           574:   <b>Subject</b>
        !           575:   </td>
        !           576:   <td>
        !           577:   <input type=text name="subject" size=51>
        !           578:   </td>
        !           579:   </tr>
        !           580:   <tr bgcolor="#FFFFFF">
        !           581:   <td valign=top>
        !           582:   <b>Message</b>
        !           583:   </td>
        !           584:   <td>
        !           585:   <textarea cols=50 rows=12 name=message wrap=virtual></textarea>
        !           586:   </td>
        !           587:   </tr>
        !           588:   <tr bgcolor="#FFFFFF">
        !           589:   <td colspan=2>
        !           590:   <font size=-1>
        !           591:   *Name not displayed to other students
        !           592:   </td>
        !           593:   </tr>
        !           594: </table>
        !           595: </td></tr></table>
        !           596: </form>
        !           597: $inreplyto
        !           598: PostHTML2
        !           599: }
        !           600: 
        !           601: sub InReplyToHTML {
        !           602: return <<InReplyToHTML2;
        !           603:   <b>In reply to:
        !           604:   <table width=500><tr><td bgcolor="#000000">
        !           605:   <table width="100%" border=0 cellspacing=1 cellpadding=4>
        !           606:     <tr bgcolor="#92D1D0">
        !           607:     <td>
        !           608:     <font size=+1>
        !           609:     $subject
        !           610:     </font>
        !           611:     </td>
        !           612:     <td width="54%">
        !           613:     <font size=-1>
        !           614:     Posted by <a href="mailto:$email">$poster</a> on $date at $time
        !           615:     </font>
        !           616:     </td>
        !           617:     </tr>
        !           618:     <tr bgcolor="#FFFFFF">
        !           619:     <td colspan=2>
        !           620:     $message
        !           621:     </td>
        !           622:     </tr>
        !           623:   </table>
        !           624:   </td></tr></table>
        !           625:   </body>
        !           626:   </html>
        !           627: InReplyToHTML2
        !           628: }
        !           629: 
        !           630: sub PostDoneHTML {
        !           631: print <<PostDoneHTML2;
        !           632: <html>
        !           633: <head>
        !           634:   <title></title>
        !           635: </head>
        !           636: <body bgcolor="#FFFFFF">
        !           637: <br>
        !           638: <center>
        !           639: <table width=400><tr><td bgcolor="#000000">
        !           640: <table width="100%" border=0 cellspacing=1 cellpadding=4>
        !           641:   <tr align=center bgcolor="#FFFFFF">
        !           642:   <td>
        !           643:   Your message has been successfully posted!
        !           644:   </td>
        !           645:   </tr>
        !           646:   <tr align=center bgcolor="#DEDFDF">
        !           647:   <td>
        !           648:   <form method=post action="$cgidirurl/$discussurl">
        !           649:   <input type=hidden name="ACTION" value="viewproblem">
        !           650:   <input type=hidden name="CLASS" value="$class">
        !           651:   <input type=hidden name="SETID" value="$setid">
        !           652:   <input type=hidden name="PSETID" value="$psetid">
        !           653:   <input type=hidden name="SNUM" value="$snum">
        !           654:   <input type=hidden name="CAPAID" value="$capaid">
        !           655:   <input type=hidden name="PROBNUM" value="$probnum">
        !           656:   <input type=submit value="Back to Problem $probnum">
        !           657:   </form>
        !           658:   </td>
        !           659:   </tr>
        !           660: </table>
        !           661: </td></tr></table>
        !           662: </center>
        !           663: </body>
        !           664: </html>
        !           665: PostDoneHTML2
        !           666: }
        !           667: 
        !           668: sub DelMsgPreHTML {
        !           669: print <<DelMsgPreHTML2;
        !           670: <html>
        !           671: <head>
        !           672:   <title></title>
        !           673: </head>
        !           674: <body bgcolor="#FFFFFF">
        !           675: <center>
        !           676: <table width="95%"><tr><td bgcolor="#000000">
        !           677: <table width="100%" border=0 cellspacing=1 cellpadding=4>
        !           678:   <tr bgcolor="#FFFFFF">
        !           679:     <td>
        !           680:     <font size=+1>$subject
        !           681:     </td>
        !           682:   </tr>
        !           683:   <tr bgcolor="#DEDFDF">
        !           684:     <td>
        !           685:     <font size=-1>
        !           686:     Posted by <a href="mailto:$email">$poster</a> on $date at $time
        !           687:     </font>
        !           688:     </td>
        !           689:   </tr>
        !           690:   <tr bgcolor="#FFFFFF">
        !           691:     <td>
        !           692:     $message
        !           693:     </td>
        !           694:   </tr>
        !           695: </table>
        !           696: </td></tr></table>
        !           697: </center>
        !           698: <center>
        !           699: <table><tr><td bgcolor="#000000">
        !           700: <table border=0 cellspacing=1 cellpadding=3><tr bgcolor="#FFFFFF">
        !           701:   <td colspan=2 align=center bgcolor="#DEDFDF">
        !           702:   Delete this message?
        !           703:   </td>
        !           704: </tr>
        !           705: <tr bgcolor="#FFFFFF">
        !           706:   <td align=center>
        !           707:   <form method=post action="$cgidirurl/$discussurl">
        !           708:   <input type=hidden name="ACTION" value="delmsg">
        !           709:   <input type=hidden name="CLASS" value="$class">
        !           710:   <input type=hidden name="SETID" value="$setid">
        !           711:   <input type=hidden name="PSETID" value="$psetid">
        !           712:   <input type=hidden name="SNUM" value="$snum">
        !           713:   <input type=hidden name="CAPAID" value="$capaid">
        !           714:   <input type=hidden name="FILE" value="$file">
        !           715:   <input type=hidden name="PROBNUM" value="$probnum">
        !           716:   <input type=submit value="Yes">
        !           717:   </form>
        !           718:   </td>
        !           719:   <td align=center>
        !           720:   <form method=post action="$cgidirurl/$discussurl">
        !           721:   <input type=hidden name="ACTION" value="viewproblem">
        !           722:   <input type=hidden name="CLASS" value="$class">
        !           723:   <input type=hidden name="SETID" value="$setid">
        !           724:   <input type=hidden name="PSETID" value="$psetid">
        !           725:   <input type=hidden name="SNUM" value="$snum">
        !           726:   <input type=hidden name="CAPAID" value="$capaid">
        !           727:   <input type=hidden name="PROBNUM" value="$probnum">
        !           728:   <input type=submit value="No">
        !           729:   </form>
        !           730:   </td>
        !           731: </tr></table>
        !           732: </td></tr></table>
        !           733: </body>
        !           734: </html>
        !           735: DelMsgPreHTML2
        !           736: }
        !           737: 
        !           738: sub DelMsgDoneHTML {
        !           739: print <<DelMsgDoneHTML2;
        !           740: <html>
        !           741: <head>
        !           742:   <title>
        !           743:   </title>
        !           744: </head>
        !           745: <body bgcolor="#FFFFFF">
        !           746: <center>
        !           747: <table><tr><td bgcolor="#000000">
        !           748: <table width="100%" border=0 cellspacing=1 cellpadding=4>
        !           749:   <tr bgcolor="#FFFFFF">
        !           750:   <td>
        !           751:   The selected message has been successfully deleted
        !           752:   </td>
        !           753:   </tr>
        !           754:   <tr bgcolor="#DEDFDF">
        !           755:   <td align=center>
        !           756:   <form method=post action="$cgidirurl/$discussurl">
        !           757:   <input type=hidden name="ACTION" value="viewproblem">
        !           758:   <input type=hidden name="CLASS" value="$class">
        !           759:   <input type=hidden name="SETID" value="$setid">
        !           760:   <input type=hidden name="PSETID" value="$psetid">
        !           761:   <input type=hidden name="SNUM" value="$snum">
        !           762:   <input type=hidden name="CAPAID" value="$capaid">
        !           763:   <input type=hidden name="PROBNUM" value="$probnum">
        !           764:   <input type=submit value="Back to Message List">
        !           765:   </form>
        !           766:   </td>
        !           767: </tr></table>
        !           768: </td></tr></table>
        !           769: </body>
        !           770: DelMsgDoneHTML2
        !           771: }
        !           772: 
        !           773: 
        !           774: sub HideMsgPreHTML {
        !           775: print <<HideMsgPreHTML2;
        !           776: <html>
        !           777: <head>
        !           778:   <title></title>
        !           779: </head>
        !           780: <body bgcolor="#FFFFFF">
        !           781: <center>
        !           782: <table width="95%"><tr><td bgcolor="#000000">
        !           783: <table width="100%" border=0 cellspacing=1 cellpadding=4>
        !           784:   <tr bgcolor="#FFFFFF">
        !           785:     <td>
        !           786:     <font size=+1>$subject
        !           787:     </td>
        !           788:   </tr>
        !           789:   <tr bgcolor="#DEDFDF">
        !           790:     <td>
        !           791:     <font size=-1>
        !           792:     Posted by <a href="mailto:$email">$poster</a> on $date at $time
        !           793:     </font>
        !           794:     </td>
        !           795:   </tr>
        !           796:   <tr bgcolor="#FFFFFF">
        !           797:     <td>
        !           798:     $message
        !           799:     </td>
        !           800:   </tr>
        !           801: </table>
        !           802: </td></tr></table>
        !           803: </center>
        !           804: <center>
        !           805: <table><tr><td bgcolor="#000000">
        !           806: <table border=0 cellspacing=1 cellpadding=3><tr bgcolor="#FFFFFF">
        !           807:   <td colspan=2 align=center bgcolor="#DEDFDF">
        !           808:   Hide this message?
        !           809:   </td>
        !           810: </tr>
        !           811: <tr bgcolor="#FFFFFF">
        !           812:   <td align=center>
        !           813:   <form method=post action="$cgidirurl/$discussurl">
        !           814:   <input type=hidden name="ACTION" value="hidemsg">
        !           815:   <input type=hidden name="CLASS" value="$class">
        !           816:   <input type=hidden name="SETID" value="$setid">
        !           817:   <input type=hidden name="PSETID" value="$psetid">
        !           818:   <input type=hidden name="SNUM" value="$snum">
        !           819:   <input type=hidden name="CAPAID" value="$capaid">
        !           820:   <input type=hidden name="FILE" value="$file">
        !           821:   <input type=hidden name="PROBNUM" value="$probnum">
        !           822:   <input type=submit value="Yes">
        !           823:   </form>
        !           824:   </td>
        !           825:   <td align=center>
        !           826:   <form method=post action="$cgidirurl/$discussurl">
        !           827:   <input type=hidden name="ACTION" value="viewproblem">
        !           828:   <input type=hidden name="CLASS" value="$class">
        !           829:   <input type=hidden name="SETID" value="$setid">
        !           830:   <input type=hidden name="SNUM" value="$snum">
        !           831:   <input type=hidden name="CAPAID" value="$capaid">
        !           832:   <input type=hidden name="PROBNUM" value="$probnum">
        !           833:   <input type=submit value="No">
        !           834:   </form>
        !           835:   </td>
        !           836: </tr></table>
        !           837: </td></tr></table>
        !           838: <br>
        !           839: <table width="40%" border=0 cellspacing=0 cellpadding=0>
        !           840:   <tr><td bgcolor="#000000">
        !           841:   <table width="100%" border=0 cellspacing=1 cellpadding=0>
        !           842:     <tr><td bgcolor="#FFFFFF">
        !           843:        <font size=2>
        !           844:         Hiding this message will make it visible to users with
        !           845:         administrator access only.
        !           846:     </td></tr>
        !           847:   </table>
        !           848: </td></tr></table>
        !           849: </body>
        !           850: </html>
        !           851: HideMsgPreHTML2
        !           852: }
        !           853: 
        !           854: sub HideMsgDoneHTML {
        !           855: print <<HideMsgDoneHTML2;
        !           856: <html>
        !           857: <head>
        !           858:   <title>
        !           859:   </title>
        !           860: </head>
        !           861: <body bgcolor="#FFFFFF">
        !           862: <center>
        !           863: <table><tr><td bgcolor="#000000">
        !           864: <table width="100%" border=0 cellspacing=1 cellpadding=4>
        !           865:   <tr bgcolor="#FFFFFF">
        !           866:   <td>
        !           867:   The selected message has been successfully hidden
        !           868:   </td>
        !           869:   </tr>
        !           870:   <tr bgcolor="#DEDFDF">
        !           871:   <td align=center>
        !           872:   <form method=post action="$cgidirurl/$discussurl">
        !           873:   <input type=hidden name="ACTION" value="viewproblem">
        !           874:   <input type=hidden name="CLASS" value="$class">
        !           875:   <input type=hidden name="SETID" value="$setid">
        !           876:   <input type=hidden name="PSETID" value="$psetid">
        !           877:   <input type=hidden name="SNUM" value="$snum">
        !           878:   <input type=hidden name="CAPAID" value="$capaid">
        !           879:   <input type=hidden name="PROBNUM" value="$probnum">
        !           880:   <input type=submit value="Back to Message List">
        !           881:   </form>
        !           882:   </td>
        !           883: </tr></table>
        !           884: </td></tr></table>
        !           885: </body>
        !           886: 
        !           887: HideMsgDoneHTML2
        !           888: }
        !           889: 
        !           890: 
        !           891: sub UnHideMsgPreHTML {
        !           892: print <<UnHideMsgPreHTML2;
        !           893: <html>
        !           894: <head>
        !           895:   <title></title>
        !           896: </head>
        !           897: <body bgcolor="#FFFFFF">
        !           898: <center>
        !           899: <table width="95%"><tr><td bgcolor="#000000">
        !           900: <table width="100%" border=0 cellspacing=1 cellpadding=4>
        !           901:   <tr bgcolor="#FFFFFF">
        !           902:     <td>
        !           903:     <font size=+1>$subject
        !           904:     </td>
        !           905:   </tr>
        !           906:   <tr bgcolor="#DEDFDF">
        !           907:     <td>
        !           908:     <font size=-1>
        !           909:     Posted by <a href="mailto:$email">$poster</a> on $date at $time
        !           910:     </font>
        !           911:     </td>
        !           912:   </tr>
        !           913:   <tr bgcolor="#FFFFFF">
        !           914:     <td>
        !           915:     $message
        !           916:     </td>
        !           917:   </tr>
        !           918: </table>
        !           919: </td></tr></table>
        !           920: </center>
        !           921: <center>
        !           922: <table><tr><td bgcolor="#000000">
        !           923: <table border=0 cellspacing=1 cellpadding=3><tr bgcolor="#FFFFFF">
        !           924:   <td colspan=2 align=center bgcolor="#DEDFDF">
        !           925:   Unhide this message?
        !           926:   </td>
        !           927: </tr>
        !           928: <tr bgcolor="#FFFFFF">
        !           929:   <td align=center>
        !           930:   <form method=post action="$cgidirurl/$discussurl">
        !           931:   <input type=hidden name="ACTION" value="unhidemsg">
        !           932:   <input type=hidden name="CLASS" value="$class">
        !           933:   <input type=hidden name="SETID" value="$setid">
        !           934:   <input type=hidden name="SNUM" value="$snum">
        !           935:   <input type=hidden name="CAPAID" value="$capaid">
        !           936:   <input type=hidden name="FILE" value="$file">
        !           937:   <input type=hidden name="PROBNUM" value="$probnum">
        !           938:   <input type=submit value="Yes">
        !           939:   </form>
        !           940:   </td>
        !           941:   <td align=center>
        !           942:   <form method=post action="$cgidirurl/$discussurl">
        !           943:   <input type=hidden name="ACTION" value="viewproblem">
        !           944:   <input type=hidden name="CLASS" value="$class">
        !           945:   <input type=hidden name="SETID" value="$setid">
        !           946:   <input type=hidden name="PSETID" value="$psetid">
        !           947:   <input type=hidden name="SNUM" value="$snum">
        !           948:   <input type=hidden name="CAPAID" value="$capaid">
        !           949:   <input type=hidden name="PROBNUM" value="$probnum">
        !           950:   <input type=submit value="No">
        !           951:   </form>
        !           952:   </td>
        !           953: </tr></table>
        !           954: </td></tr></table>
        !           955: </body>
        !           956: </html>
        !           957: UnHideMsgPreHTML2
        !           958: }
        !           959: 
        !           960: 
        !           961: sub UnHideMsgDoneHTML {
        !           962: print <<UnHideMsgDoneHTML2;
        !           963: <html>
        !           964: <head>
        !           965:   <title>
        !           966:   </title>
        !           967: </head>
        !           968: <body bgcolor="#FFFFFF">
        !           969: <center>
        !           970: <table><tr><td bgcolor="#000000">
        !           971: <table width="100%" border=0 cellspacing=1 cellpadding=4>
        !           972:   <tr bgcolor="#FFFFFF">
        !           973:   <td>
        !           974:   The selected message has been successfully unhidden
        !           975:   </td>
        !           976:   </tr>
        !           977:   <tr bgcolor="#DEDFDF">
        !           978:   <td align=center>
        !           979:   <form method=post action="$cgidirurl/$discussurl">
        !           980:   <input type=hidden name="ACTION" value="viewproblem">
        !           981:   <input type=hidden name="CLASS" value="$class">
        !           982:   <input type=hidden name="SETID" value="$setid">
        !           983:   <input type=hidden name="PSETID" value="$psetid">
        !           984:   <input type=hidden name="SNUM" value="$snum">
        !           985:   <input type=hidden name="CAPAID" value="$capaid">
        !           986:   <input type=hidden name="PROBNUM" value="$probnum">
        !           987:   <input type=submit value="Back to Message List">
        !           988:   </form>
        !           989:   </td>
        !           990: </tr></table>
        !           991: </td></tr></table>
        !           992: </body>
        !           993: UnHideMsgDoneHTML2
        !           994: }
        !           995: 
        !           996: sub TopMsgDoneHTML {
        !           997: print <<TopMsgDoneHTML2;
        !           998: <html>
        !           999: <head>
        !          1000:   <title>
        !          1001:   </title>
        !          1002: </head>
        !          1003: <body bgcolor="#FFFFFF">
        !          1004: <center>
        !          1005: <table><tr><td bgcolor="#000000">
        !          1006: <table width="100%" border=0 cellspacing=1 cellpadding=4>
        !          1007:   <tr bgcolor="#FFFFFF">
        !          1008:   <td>
        !          1009:   The selected message has been successfully $function
        !          1010:   </td>
        !          1011:   </tr>
        !          1012:   <tr bgcolor="#DEDFDF">
        !          1013:   <td align=center>
        !          1014:   <form method=post action="$cgidirurl/$discussurl">
        !          1015:   <input type=hidden name="ACTION" value="viewproblem">
        !          1016:   <input type=hidden name="CLASS" value="$class">
        !          1017:   <input type=hidden name="SETID" value="$setid">
        !          1018:   <input type=hidden name="PSETID" value="$psetid">
        !          1019:   <input type=hidden name="SNUM" value="$snum">
        !          1020:   <input type=hidden name="CAPAID" value="$capaid">
        !          1021:   <input type=hidden name="PROBNUM" value="$probnum">
        !          1022:   <input type=submit value="Back to Message List">
        !          1023:   </form>
        !          1024:   </td>
        !          1025: </tr></table>
        !          1026: </td></tr></table>
        !          1027: </body>
        !          1028: TopMsgDoneHTML2
        !          1029: }
        !          1030: 
        !          1031: ## Admin HTML Subroutines
        !          1032: 
        !          1033: sub AdminMainHTML {
        !          1034: print <<AdminMainHTML2;
        !          1035: <html>
        !          1036: <head>
        !          1037:   <title></title>
        !          1038: </head>
        !          1039: <body bgcolor="#ffffff" text="#000000">
        !          1040: <table width="400" border=0 cellspacing=0 cellpadding=0>
        !          1041:   <tr><td bgcolor="#000000">
        !          1042:   <table width="100%" border=0 cellspacing=1 cellpadding=0>
        !          1043:     <tr>
        !          1044:       <td bgcolor="blue" align=center>
        !          1045:       <font size=2 color="#ffffff"><b>Administrator Functions</font>
        !          1046:       </td>
        !          1047:     </tr>
        !          1048:     <tr>
        !          1049:     <td bgcolor="#ffffff">
        !          1050:       <form method=post action="$cgidirurl/$discussurl">
        !          1051:       <input type=hidden name="ACTION" value="adminusersearch">
        !          1052:       <input type=hidden name="CLASS" value="$class">
        !          1053:       <input type=hidden name="SETID" value="$setid">
        !          1054:       <input type=hidden name="PSETID" value="$psetid">
        !          1055:       <input type=hidden name="SNUM" value="$snum">
        !          1056:       <input type=hidden name="CAPAID" value="$capaid">
        !          1057:       <input type=hidden name="PROBNUM" value="$probnum">
        !          1058:       <input type=submit value="User Search">
        !          1059:       </form>
        !          1060:     </td>
        !          1061:     </tr>
        !          1062:     <tr>
        !          1063:       <td bgcolor="blue" align=right>
        !          1064:         <form method=post action="$cgidirurl/$discussurl">
        !          1065:         <input type=hidden name="ACTION"   value="$viewset">
        !          1066:         <input type=hidden name="CLASS"    value="$class">
        !          1067:         <input type=hidden name="SETID"    value="$setid">
        !          1068:         <input type=hidden name="PSETID" value="$psetid">
        !          1069:         <input type=hidden name="SNUM"     value="$snum">
        !          1070:         <input type=hidden name="CAPAID"   value="$capaid">
        !          1071:         <input type=submit value="Exit">
        !          1072:         </form>
        !          1073:       </td>
        !          1074:       </tr>
        !          1075:   </table>
        !          1076:   </td></tr></table>
        !          1077:   </body>
        !          1078:   </html>
        !          1079: AdminMainHTML2
        !          1080: }
        !          1081: 
        !          1082: 
        !          1083: sub AdminUserSearchHTML {
        !          1084: print <<AdminUserSearchHTML2;
        !          1085: <html>
        !          1086:   <head>
        !          1087:     <title></title>
        !          1088:   </head>
        !          1089:   <body bgcolor="#ffffff" text="#000000">
        !          1090:   <form method=post action="$cgidirurl/$discussurl">
        !          1091:   <input type=hidden name="ACTION" value="admin">
        !          1092:   <input type=hidden name="CLASS" value="$class">
        !          1093:   <input type=hidden name="SNUM" value="$snum">
        !          1094:   <input type=hidden name="CAPAID" value="$capaid">
        !          1095:   <input type=hidden name="SETID" value="$setid">
        !          1096:   <input type=hidden name="PSETID" value="$psetid">
        !          1097:   <input type=hidden name="PROBNUM" value="$probnum">
        !          1098:   <input type=submit value="<--Back">
        !          1099:   </form>
        !          1100: 
        !          1101:   <form method=post action="$cgidirurl/$discussurl">
        !          1102:   <input type=hidden name="ACTION" value="adminusersearchsubmit">
        !          1103:   <input type=hidden name="CLASS" value="$class">
        !          1104:   <input type=hidden name="SETID" value="$setid">
        !          1105:   <input type=hidden name="PSETID" value="$psetid">
        !          1106:   <input type=hidden name="SNUM" value="$snum">
        !          1107:   <input type=hidden name="CAPAID" value="$capaid">
        !          1108:   <input type=hidden name="PROBNUM" value="$probnum">
        !          1109:   <table width="400" border=0 cellspacing=0 cellpadding=0>
        !          1110:     <tr><td bgcolor="#000000">
        !          1111:     <table width="100%" border=0 cellspacing=1 cellpadding=0>
        !          1112:       <tr><td bgcolor="blue" colspan=2>
        !          1113:         <font size=2 color="#ffffff"><b>User Search</b>
        !          1114:         </td>
        !          1115:         </tr>
        !          1116:       <tr><td bgcolor="#ffffff" colspan=2>
        !          1117:         <font size=2>Username: <input type=text size=45 name="usersearch">
        !          1118:         </td>
        !          1119:         </tr>
        !          1120:       <tr><td bgcolor="#ffffff">
        !          1121:         <font size=1>User searching allows administrators to search the
        !          1122:         message bases for a specified username and display summary
        !          1123:         information.
        !          1124:         </td>
        !          1125:         <td bgcolor="#FFFFFF"><input type=submit value="Search!"></form></td>
        !          1126:         </tr>
        !          1127:       </table>
        !          1128:     </td></tr>
        !          1129:   </table>
        !          1130:   </body>
        !          1131:   </html>
        !          1132: AdminUserSearchHTML2
        !          1133: }
        !          1134: 
        !          1135: sub MFNewPostHTML {
        !          1136: print <<MFNewPostHTML2;
        !          1137: <html>
        !          1138: <head>
        !          1139:   <title></title>
        !          1140: </head>
        !          1141: <body bgcolor="#FFFFFF">
        !          1142: You have not filled in all of the appropriate message information.  Please
        !          1143: go back and fill in the <b>subject</b> and <b>message</b> fields.
        !          1144: <br><br>
        !          1145: <center>
        !          1146: <form method=post action="$cgidirurl/$discussurl">
        !          1147: <input type=hidden name="ACTION" value="post">
        !          1148: <input type=hidden name="CLASS" value="$class">
        !          1149: <input type=hidden name="SETID" value="$setid">
        !          1150: <input type=hidden name="PSETID" value="$psetid">
        !          1151: <input type=hidden name="SNUM" value="$snum">
        !          1152: <input type=hidden name="CAPAID" value="$capaid">
        !          1153: <input type=hidden name="PROBNUM" value="$probnum">
        !          1154: <input type=submit value="<-- Back">
        !          1155: </form>
        !          1156: </center>
        !          1157: </body>
        !          1158: </html>
        !          1159: MFNewPostHTML2
        !          1160: exit;
        !          1161: }
        !          1162: 
        !          1163: sub MFPostReplyHTML {
        !          1164: print <<MFPostReplyHTML2;
        !          1165: <html>
        !          1166: <head>
        !          1167:   <title></title>
        !          1168: </head>
        !          1169: <body bgcolor="#FFFFFF">
        !          1170: You have not filled in all of the appropriate message information.  Please
        !          1171: go back and fill in the <b>subject</b> and <b>message</b> fields.
        !          1172: <br><br>
        !          1173: <center>
        !          1174: <form method=post action="$cgidirurl/$discussurl">
        !          1175: <input type=hidden name="ACTION" value="post">
        !          1176: <input type=hidden name="CLASS" value="$class">
        !          1177: <input type=hidden name="SETID" value="$setid">
        !          1178: <input type=hidden name="PSETID" value="$psetid">
        !          1179: <input type=hidden name="SNUM" value="$snum">
        !          1180: <input type=hidden name="CAPAID" value="$capaid">
        !          1181: <input type=hidden name="PROBNUM" value="$probnum">
        !          1182: <input type=hidden name="REPLYNUM" value="$replynum">
        !          1183: <input type=submit value="<-- Back">
        !          1184: </form>
        !          1185: </center>
        !          1186: </body>
        !          1187: </html>
        !          1188: MFPostReplyHTML2
        !          1189: exit;
        !          1190: }
        !          1191: 
        !          1192: 
        !          1193: sub InvalidVarsHTML {
        !          1194: print <<InvalidVarsHTML2;
        !          1195: <html>
        !          1196: <head>
        !          1197:   <title></title>
        !          1198: </head>
        !          1199: <body bgcolor="#FFFFFF">
        !          1200: you have entered one or more invalid variables.
        !          1201: </body>
        !          1202: </html>
        !          1203: InvalidVarsHTML2
        !          1204: exit;
        !          1205: }
        !          1206: 
        !          1207: sub BannedMessageHTML {
        !          1208: print <<BannedMessageHTML2;
        !          1209: <html>
        !          1210: <head>
        !          1211:   <title> Access Denied</title>
        !          1212: </head>
        !          1213: <body bgcolor="#FFFFFF">
        !          1214: Your access to the forum has been disabled. Please contact your instructor.
        !          1215: </body>
        !          1216: </html>
        !          1217: BannedMessageHTML2
        !          1218: exit;
        !          1219: }
        !          1220: 
        !          1221: sub BadPassHTML {
        !          1222: print <<BadPassHTML2;
        !          1223: <html>
        !          1224: <head>
        !          1225: </head>
        !          1226: <body bgcolor="#FFFFFF">
        !          1227: You have entered an <b>incorrect</b> CAPA ID for this set
        !          1228: </body>
        !          1229: </html>
        !          1230: BadPassHTML2
        !          1231: exit;
        !          1232: }
        !          1233: 
        !          1234: sub NotAdminHTML {
        !          1235: print <<NotAdminHTML2;
        !          1236: <html>
        !          1237: <head>
        !          1238: </head>
        !          1239: <body bgcolor="#FFFFFF">
        !          1240: You are not an administrator
        !          1241: <br>
        !          1242: This operation is not available
        !          1243: </body>
        !          1244: </html>
        !          1245: NotAdminHTML2
        !          1246: exit;
        !          1247: }
        !          1248: 
        !          1249: 1;

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>