Subversion Repositories DevTools

Rev

Rev 129 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

<%@LANGUAGE="VBSCRIPT"%>
<%
Option explicit
Response.Expires = 0    ' always load the page, dont store
%>
<%
'=====================================================
'                                       Update Code Review
'=====================================================
%>
<!--#include file="common/conf.asp"-->
<!--#include file="common/globals.asp"-->
<!--#include file="common/formating.asp"-->
<!--#include file="common/qstr.asp"-->
<!--#include file="common/common_subs.asp"-->
<!--#include file="common/common_dbedit.asp"-->
<!--#include file="common/_popup_window_common.asp"-->
<%
' Set rfile parameter. This is a return page after Login
Call objPMod.StoreParameter ( "rfile", "fixed_issues.asp" )
'------------ ACCESS CONTROL ------------------
%>
<!--#include file="_access_control_login.asp"-->
<!--#include file="_access_control_general.asp"-->
<!--#include file="_access_control_project.asp"-->
<%
'------------ Variable Definition -------------
Dim parPv_id
Dim rsQry
Dim arrItemResults
Dim arrOverallResults
Dim pkgName
Dim pkgVersion
'------------ Constants Declaration -----------
'------------ Variable Init -------------------
parPv_id = Request("pv_id")
parRtag_id = Request("rtag_id")
arrItemResults = Array ( "","","", _
                                           "Pass",enumCODE_REVIEW_PASS,"class='pass_alert'", _
                                           "Fail",enumCODE_REVIEW_FAIL,"class='err_alert'" )
arrOverallResults = Array ( "","", _
                                                        "Accepted",enumCODE_REVIEW_ACCEPTED, _
                                                        "Minor updates required",enumCODE_REVIEW_MINOR_UPDATES, _
                                                        "Major rework required",enumCODE_REVIEW_MAJOR_REWORK )
'----------------------------------------------
%>
<%
'-----------------------------------------------------------------------------------------------------------------------------------
Sub GetCodeReview ( nPv_id, oRS )
        Dim Query_String
        Query_String = _
        " SELECT *  FROM CODE_REVIEWS WHERE pv_id = :PV_ID"
        Query_String = Replace( Query_String, ":PV_ID", nPv_id )
        
        Set oRS = OraDatabase.CreateDynaset( Query_String, cint(0))
        
        ' Make sure therer is always a record to read from
        If oRS.RecordCount < 1 Then
                oRS.Close
                Call InserDefaultRow ( parPv_id )
                Set oRS = OraDatabase.CreateDynaset( Query_String, cint(0))
        End If
        
End Sub
'-----------------------------------------------------------------------------------------------------------------------------------
Function DrawItemResult ( cCheck )
        Dim item, val, maxOptions, selected, tempSTR
        maxOptions = UBound( arrItemResults )
        
        tempSTR = ""
        For val = 0 to maxOptions Step 3
                selected = ""
                If CStr( arrItemResults(val + 1) ) = cCheck Then selected = "selected"
                tempSTR =  tempSTR & "<option value='"& arrItemResults( val + 1 ) &"' "& selected &" "& arrItemResults(val + 2) &">"& arrItemResults( val ) &"</option>"& VBNewLine
        Next
        
        DrawItemResult = tempSTR
End Function
'-----------------------------------------------------------------------------------------------------------------------------------
Function DrawOverallResult ( ByVal nResult )
        Dim val, maxOptions, tempSTR, selected
        maxOptions = Ubound( arrOverallResults )
        If nResult = "" OR IsNull(nResult) Then nResult = 0
        
        tempSTR = ""
        For val = 0 To maxOptions Step 2
                selected = ""
                If arrOverallResults(val + 1) = CInt( nResult ) Then selected = "selected"
                tempSTR =  tempSTR & "<option value='"& arrOverallResults( val + 1 ) &"' "& selected &">"& arrOverallResults( val ) &"</option>"& VBNewLine
        Next
        
        DrawOverallResult = tempSTR
End Function
'-----------------------------------------------------------------------------------------------------------------------------------
Sub InserDefaultRow ( nPv_id )
        OraSession.BeginTrans
        OraDatabase.ExecuteSQL  _
        " INSERT INTO CODE_REVIEWS (pv_id) VALUES("& nPv_id &")"
        OraSession.CommitTrans
End Sub
'-----------------------------------------------------------------------------------------------------------------------------------
%>
<%
'------------ Action Requirements -------------------
'Process submition
If CBool(Request("action")) AND objAccessControl.UserLogedIn Then
        Call UpdateCodeReview ( parPv_id )
        Call OpenInParentWindow ("fixed_issues.asp?pv_id="& parPv_id &"&rtag_id="& parRtag_id )
        'Response.Redirect ( "_wform_code_review.asp?pv_id="& parPv_id &"&rtag_id="& parRtag_id )
        'Call CloseWindow
        
        
End If
Call Get_Pkg_Short_Info(  parPv_id, NULL, pkgName, pkgVersion, NULL, NULL, NULL )
Call GetCodeReview ( parPv_id, rsQry )
%>
<html>
<head>
<title>Release Manager</title>
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
<link rel="stylesheet" href="images/navigation.css" type="text/css">
<script language="JavaScript" src="images/common.js"></script>
<!-- TIPS -->
<script language="JavaScript" src="images/tipster.js"></script>
<script language="JavaScript" src="images/_help_tips.js"></script>
</head>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onload="self.focus();">
<!-- TIPS LAYERS -------------------------------------->
<div id="formTipsLayer" style="position: absolute; z-index: 1000; visibility: hidden; left:0; top: 0; width: 10">&nbsp;</div>
<!----------------------------------------------------->
<form action="_wform_code_review.asp" method="post" name="codereview" 
onSubmit="MM_validateForm(
'date_of_review','Date of Review','RisDate',
'time_spent','Time Spent','RisNumber',
'review_reason','Reason for Review','RmaxLength:4000',
'files_reviewed','Files Reviewed','RmaxLength:4000',
'review_results','Review Results','R'
);return document.MM_returnValue;">  
  <table width="100%" border="0" cellspacing="0" cellpadding="2" height="100%">
    <tr> 
      <td width="1%" background="images/lbox_bg_orange.gif"><img src="images/s_code_review_off.gif" width="21" height="23" hspace="5" border="0"></td>
      <td width="1%" background="images/lbox_bg_blue.gif" nowrap class="wform_ttl">&nbsp;Code Review for <%=pkgName%>&nbsp;<%=pkgVersion%> </td>
          <td width="100%" background="images/lbox_bg_blue.gif" align="right" nowrap class="wform_ttl">
                <input type="submit" name="btn" value="Save" class="form_btn">
                <input type="reset" name="btn" value="Close" class="form_btn" onclick="self.close()">
      </td>
      <td background="images/lbox_bg_blue.gif" align="right" width="1%" nowrap><img src="images/h_trsp_dot.gif" width="5" height="22"></td>
    </tr>
    <tr> 
      <td height="100%" width="1%">&nbsp;</td>
      <td valign="top" nowrap colspan="3" class="wform_ttl" background="images/bg_form_lightgray.gif"> 
        <br>
        <br>
        <table width="100%"  border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td width="1%"><img src="images/h_trsp_dot.gif" width="10" height="30"></td>
            <td width="100%">
                        <table width="100%"  border="0" cellspacing="1" cellpadding="4">
                          <tr align="center">
                <td colspan="4" class="form_ttl" background="images/bg_form_lightbluedark.gif">Summary</td>
                </tr>
                          <tr>
                                <td align="right" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Date of Review</td>
                                <td nowrap bgcolor="#FFFFFF" class="form_item">
                                  <input name="date_of_review" type="text" size="20" maxlength="20" class="form_item" value='<%If IsNull(rsQry("date_of_review")) Then%><%=EuroDate ( Date )%><%Else%><%=EuroDate ( rsQry("date_of_review") )%><%End If%>'>&nbsp;&nbsp;&nbsp;</td>
                                <td align="right" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">&nbsp;&nbsp;&nbsp;Time Spent (hrs)</td>
                                <td bgcolor="#FFFFFF" class="form_item">
                                  <input name="time_spent" type="text" size="20" maxlength="20" class="form_item" value="<%=rsQry("time_spent")%>"></td>
                          </tr>
                          <tr>
                                <td align="right" valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Reason for Review</td>
                                <td colspan="3" bgcolor="#FFFFFF" class="form_item">
                                  <textarea name="review_reason" cols="80" rows="5" class="form_item"><%=rsQry("review_reason")%></textarea></td>
                          </tr>
                          <tr>
                                <td rowspan="4" align="right" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Review Team </td>
                                <td align="right" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Domain Expert </td>
                                <td colspan="2" bgcolor="#FFFFFF" class="form_item">
                                  <textarea name="rteam_domain_expert" cols="60" rows="2" class="form_item"><%=rsQry("rteam_domain_expert")%></textarea></td>
                          </tr>
                          <tr>
                                <td align="right" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Language Expert </td>
                                <td colspan="2" bgcolor="#FFFFFF" class="form_item">
                                  <textarea name="rteam_language_expert" cols="60" rows="2" class="form_item"><%=rsQry("rteam_language_expert")%></textarea></td>
                          </tr>
                          <tr>
                                <td align="right" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Peer Developer </td>
                                <td colspan="2" bgcolor="#FFFFFF" class="form_item">
                                  <textarea name="rteam_peer_developer" cols="60" rows="2" class="form_item"><%=rsQry("rteam_peer_developer")%></textarea></td>
                          </tr>
                          <tr>
                                <td align="right" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Author</td>
                                <td colspan="2" bgcolor="#FFFFFF" class="form_item">
                                  <textarea name="rteam_author" cols="60" rows="2" class="form_item"><%=rsQry("rteam_author")%></textarea></td>
                          </tr>
                          <tr>
                <td align="right" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Files Reviewed</td>
                <td colspan="3" bgcolor="#FFFFFF" class="form_item">
                  <textarea name="files_reviewed" cols="80" rows="5" class="form_item"><%=rsQry("files_reviewed")%></textarea></td>
                            </tr>
                          <tr>
                                <td align="right" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Review Results </td>
                                <td colspan="3" bgcolor="#FFFFFF" class="form_item"><select name="review_results" class="form_item" id="review_results">
                  <%=DrawOverallResult ( rsQry("review_results") )%>
                </select></td>
                          </tr>
                          <tr>
                                <td align="right" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Issues Raised </td>
                                <td colspan="3" bgcolor="#FFFFFF" class="form_item">
                                  <textarea name="issues_raised" cols="80" rows="5" class="form_item"><%=rsQry("issues_raised")%></textarea></td>
                          </tr>
                          <tr>
                            <td align="right" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Comments</td>
                            <td colspan="3" bgcolor="#FFFFFF" class="form_item">
                              <textarea name="review_comments" cols="80" rows="5" class="form_item"><%=rsQry("review_comments")%></textarea></td>
                            </tr>
                        </table>                        
                        <br>
                        <br>
                        <table width="100%"  border="0" cellspacing="1" cellpadding="4">
              <tr align="center">
                <td colspan="3" class="form_ttl" background="images/bg_form_lightbluedark.gif">Functionality</td>
                </tr>
              <tr>
                <td width="1%" align="center" background="images/bg_form_lightbluedark.gif" class="form_field">Item</td>
                <td width="1%" align="center" background="images/bg_form_lightbluedark.gif" class="form_field">Check</td>
                <td width="100%" align="center" background="images/bg_form_lightbluedark.gif" class="form_field">Comment</td>
              </tr>
              <tr>
                <td valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_item">Meets required functionality </td>
                <td valign="top" bgcolor="#FFFFFF"><select name="fnc_s_meets_functionality" class="form_item" id="fnc_s_meets_functionality">
                  <%=DrawItemResult( rsQry("fnc_s_meets_functionality") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="fnc_c_meets_functionality" cols="60" rows="3" class="form_item"><%=rsQry("fnc_c_meets_functionality")%></textarea></td>
              </tr>
            </table>
                        <br>
                        <br>
                        <table width="100%"  border="0" cellspacing="1" cellpadding="4">
              <tr align="center">
                <td colspan="3" class="form_ttl" background="images/bg_form_lightbluedark.gif">Robustness</td>
              </tr>
              <tr>
                <td width="1%" align="center" background="images/bg_form_lightbluedark.gif" class="form_field">Item</td>
                <td width="1%" align="center" background="images/bg_form_lightbluedark.gif" class="form_field">Check</td>
                <td width="100%" align="center" background="images/bg_form_lightbluedark.gif" class="form_field">Comment</td>
              </tr>
              <tr>
                <td valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_item">Boundary conditions handled </td>
                <td valign="top" bgcolor="#FFFFFF"><select name="rbs_s_bound_cond_handled" class="form_item" id="rbs_s_bound_cond_handled">
                    <%=DrawItemResult( rsQry("rbs_s_bound_cond_handled") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="rbs_c_bound_cond_handled" cols="60" rows="3" class="form_item"><%=rsQry("rbs_c_bound_cond_handled")%></textarea></td>
              </tr>
              <tr>
                <td valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_item">Class interface preconditions tested</td>
                <td valign="top" bgcolor="#FFFFFF"><select name="rbs_s_class_interf_precond" class="form_item" id="rbs_s_class_interf_precond">
                  <%=DrawItemResult( rsQry("rbs_s_class_interf_precond") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="rbs_c_class_interf_precond" cols="60" rows="3" class="form_item"><%=rsQry("rbs_c_class_interf_precond")%></textarea></td>
              </tr>
                          <tr>
                <td valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_item">No unititalised data</td>
                <td valign="top" bgcolor="#FFFFFF"><select name="rbs_s_no_unitialised_date" class="form_item" id="rbs_s_no_unitialised_date">
                  <%=DrawItemResult( rsQry("rbs_s_no_unitialised_date") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="rbs_c_no_unitialised_date" cols="60" rows="3" class="form_item"><%=rsQry("rbs_c_no_unitialised_date")%></textarea></td>
              </tr>
                          <tr>
                <td valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_item">Exception handling</td>
                <td valign="top" bgcolor="#FFFFFF"><select name="rbs_s_excep_handing" class="form_item" id="rbs_s_excep_handing">
                  <%=DrawItemResult( rsQry("rbs_s_excep_handing") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="rbs_c_excep_handing" cols="60" rows="3" class="form_item"><%=rsQry("rbs_c_excep_handing")%></textarea></td>
              </tr>
                          <tr>
                <td valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_item">Resource mgt (db cxn, memory)</td>
                <td valign="top" bgcolor="#FFFFFF"><select name="rbs_s_resource_mng" class="form_item" id="rbs_s_resource_mng">
                  <%=DrawItemResult( rsQry("rbs_s_resource_mng") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="rbs_c_resource_mng" cols="60" rows="3" class="form_item"><%=rsQry("rbs_c_resource_mng")%></textarea></td>
              </tr>
                          <tr>
                <td valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_item">Transaction completeness</td>
                <td valign="top" bgcolor="#FFFFFF"><select name="rbs_s_trans_complet" class="form_item" id="rbs_s_trans_complet">
                  <%=DrawItemResult( rsQry("rbs_s_trans_complet") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="rbs_c_trans_complet" cols="60" rows="3" class="form_item"><%=rsQry("rbs_c_trans_complet")%></textarea></td>
              </tr>
                          <tr>
                <td valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_item">Threadsafety</td>
                <td valign="top" bgcolor="#FFFFFF"><select name="rbs_s_threadsafety" class="form_item" id="rbs_s_threadsafety">
                  <%=DrawItemResult( rsQry("rbs_s_threadsafety") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="rbs_c_threadsafety" cols="60" rows="3" class="form_item"><%=rsQry("rbs_c_threadsafety")%></textarea></td>
              </tr>
                          <tr>
                <td valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_item">Return values (where appropriate)</td>
                <td valign="top" bgcolor="#FFFFFF"><select name="rbs_s_ret_vals" class="form_item" id="rbs_s_ret_vals">
                  <%=DrawItemResult( rsQry("rbs_s_ret_vals") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="rbs_c_ret_vals" cols="60" rows="3" class="form_item"><%=rsQry("rbs_c_ret_vals")%></textarea></td>
              </tr>
                          <tr>
                <td valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_item">Correct err handling at Subsys bdys</td>
                <td valign="top" bgcolor="#FFFFFF"><select name="rbs_s_corr_err_handling" class="form_item" id="rbs_s_corr_err_handling">
                  <%=DrawItemResult( rsQry("rbs_s_corr_err_handling") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="rbs_c_corr_err_handling" cols="60" rows="3" class="form_item"><%=rsQry("rbs_c_corr_err_handling")%></textarea></td>
              </tr>
                          <tr>
                <td valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_item">SQL correct and conforming to standards</td>
                <td valign="top" bgcolor="#FFFFFF"><select name="rbs_s_sql_std" class="form_item" id="rbs_s_sql_std">
                  <%=DrawItemResult( rsQry("rbs_s_sql_std") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="rbs_c_sql_std" cols="60" rows="3" class="form_item"><%=rsQry("rbs_c_sql_std")%></textarea></td>
              </tr>
            </table>
                        <br>
                        <br>
                        <table width="100%"  border="0" cellspacing="1" cellpadding="4">
              <tr align="center">
                <td colspan="3" class="form_ttl" background="images/bg_form_lightbluedark.gif">Maintainability</td>
              </tr>
              <tr>
                <td width="1%" align="center" background="images/bg_form_lightbluedark.gif" class="form_field">Item</td>
                <td width="1%" align="center" background="images/bg_form_lightbluedark.gif" class="form_field">Check</td>
                <td width="100%" align="center" background="images/bg_form_lightbluedark.gif" class="form_field">Comment</td>
              </tr>
              <tr>
                <td valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_item">External references explicit (eg: pkg imports)</td>
                <td valign="top" bgcolor="#FFFFFF"><select name="mnt_s_ext_ref" class="form_item" id="mnt_s_ext_ref">
                    <%=DrawItemResult( rsQry("mnt_s_ext_ref") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="mnt_c_ext_ref" cols="60" rows="3" class="form_item"><%=rsQry("mnt_c_ext_ref")%></textarea></td>
              </tr>
              <tr>
                <td valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_item">Class size ok</td>
                <td valign="top" bgcolor="#FFFFFF"><select name="mnt_s_class_size" class="form_item" id="mnt_s_class_size">
                    <%=DrawItemResult( rsQry("mnt_s_class_size") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="mnt_c_class_size" cols="60" rows="3" class="form_item"><%=rsQry("mnt_c_class_size")%></textarea></td>
              </tr>
              <tr>
                <td valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_item">Method size ok</td>
                <td valign="top" bgcolor="#FFFFFF"><select name="mnt_s_method_size" class="form_item" id="mnt_s_method_size">
                    <%=DrawItemResult( rsQry("mnt_s_method_size") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="mnt_c_method_size" cols="60" rows="3" class="form_item"><%=rsQry("mnt_c_method_size")%></textarea></td>
              </tr>
              <tr>
                <td valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_item">Appropriate commenting</td>
                <td valign="top" bgcolor="#FFFFFF"><select name="mnt_s_approp_comm" class="form_item" id="mnt_s_approp_comm">
                    <%=DrawItemResult( rsQry("mnt_s_approp_comm") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="mnt_c_approp_comm" cols="60" rows="3" class="form_item"><%=rsQry("mnt_c_approp_comm")%></textarea></td>
              </tr>
              <tr>
                <td valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_item">Indentifiers conform to naming standards</td>
                <td valign="top" bgcolor="#FFFFFF"><select name="mnt_s_ident_name_std" class="form_item" id="mnt_s_ident_name_std">
                    <%=DrawItemResult( rsQry("mnt_s_ident_name_std") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="mnt_c_ident_name_std" cols="60" rows="3" class="form_item"><%=rsQry("mnt_c_ident_name_std")%></textarea></td>
              </tr>
              <tr>
                <td valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_item">Switch statements have defaults</td>
                <td valign="top" bgcolor="#FFFFFF"><select name="mnt_s_switch_have_defaults" class="form_item" id="mnt_s_switch_have_defaults">
                    <%=DrawItemResult( rsQry("mnt_s_switch_have_defaults") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="mnt_c_switch_have_defaults" cols="60" rows="3" class="form_item"><%=rsQry("mnt_c_switch_have_defaults")%></textarea></td>
              </tr>
              <tr>
                <td valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_item">No literal numeric constants except –1, 0, 1</td>
                <td valign="top" bgcolor="#FFFFFF"><select name="mnt_s_no_lit_num" class="form_item" id="mnt_s_no_lit_num">
                    <%=DrawItemResult( rsQry("mnt_s_no_lit_num") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="mnt_c_no_lit_num" cols="60" rows="3" class="form_item"><%=rsQry("mnt_c_no_lit_num")%></textarea></td>
              </tr>
              <tr>
                <td valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_item">No dead or unused code</td>
                <td valign="top" bgcolor="#FFFFFF"><select name="mnt_s_no_dead_code" class="form_item" id="mnt_s_no_dead_code">
                    <%=DrawItemResult( rsQry("mnt_s_no_dead_code") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="mnt_c_no_dead_code" cols="60" rows="3" class="form_item"><%=rsQry("mnt_c_no_dead_code")%></textarea></td>
              </tr>
            </table>
                        <br>
                        <br>
                        <table width="100%"  border="0" cellspacing="1" cellpadding="4">
              <tr align="center">
                <td colspan="3" class="form_ttl" background="images/bg_form_lightbluedark.gif">Design Issues </td>
              </tr>
              <tr>
                <td width="1%" align="center" background="images/bg_form_lightbluedark.gif" class="form_field">Item</td>
                <td width="1%" align="center" background="images/bg_form_lightbluedark.gif" class="form_field">Check</td>
                <td width="100%" align="center" background="images/bg_form_lightbluedark.gif" class="form_field">Comment</td>
              </tr>
              <tr>
                <td valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_item">Use of standard design patterns</td>
                <td valign="top" bgcolor="#FFFFFF"><select name="dei_s_std_des_patt" class="form_item" id="dei_s_std_des_patt">
                    <%=DrawItemResult( rsQry("dei_s_std_des_patt") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="dei_c_std_des_patt" cols="60" rows="3" class="form_item"><%=rsQry("dei_c_std_des_patt")%></textarea></td>
              </tr>
              <tr>
                <td valign="top" background="images/bg_form_lightbluedark.gif" class="form_item">Use of appropriate algorithms (consider performance)</td>
                <td valign="top" bgcolor="#FFFFFF"><select name="dei_s_approp_algor" class="form_item" id="dei_s_approp_algor">
                    <%=DrawItemResult( rsQry("dei_s_approp_algor") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="dei_c_approp_algor" cols="60" rows="3" class="form_item"><%=rsQry("dei_c_approp_algor")%></textarea></td>
              </tr>
              <tr>
                <td valign="top" background="images/bg_form_lightbluedark.gif" class="form_item">Use of appropriate objects (consider bloat, object focus, encapsulation)</td>
                <td valign="top" bgcolor="#FFFFFF"><select name="dei_s_approp_obj" class="form_item" id="dei_s_approp_obj">
                    <%=DrawItemResult( rsQry("dei_s_approp_obj") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="dei_c_approp_obj" cols="60" rows="3" class="form_item"><%=rsQry("dei_c_approp_obj")%></textarea></td>
              </tr>
              <tr>
                <td valign="top" background="images/bg_form_lightbluedark.gif" class="form_item">Appropriate user error messages</td>
                <td valign="top" bgcolor="#FFFFFF"><select name="dei_s_approp_err_msg" class="form_item" id="dei_s_approp_err_msg">
                    <%=DrawItemResult( rsQry("dei_s_approp_err_msg") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="dei_c_approp_err_msg" cols="60" rows="3" class="form_item"><%=rsQry("dei_c_approp_err_msg")%></textarea></td>
              </tr>
              <tr>
                <td valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_item">Use of standard framework components</td>
                <td valign="top" bgcolor="#FFFFFF"><select name="dei_s_std_framew_comp" class="form_item" id="dei_s_std_framew_comp">
                    <%=DrawItemResult( rsQry("dei_s_std_framew_comp") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="dei_c_std_framew_comp" cols="60" rows="3" class="form_item"><%=rsQry("dei_c_std_framew_comp")%></textarea></td>
              </tr>
              <tr>
                <td valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_item">Appropriate logging</td>
                <td valign="top" bgcolor="#FFFFFF"><select name="dei_s_approp_logging" class="form_item" id="dei_s_approp_logging">
                    <%=DrawItemResult( rsQry("dei_s_approp_logging") )%>
                </select></td>
                <td bgcolor="#FFFFFF" class="form_item">
                  <textarea name="dei_c_approp_logging" cols="60" rows="3" class="form_item"><%=rsQry("dei_c_approp_logging")%></textarea></td>
              </tr>
            </table>
                        <br>
                        <br></td>
          </tr>
        </table></td>
    </tr>
    <tr>
      <td height="1%" width="1%"><img src="images/h_trsp_dot.gif" width="5" height="5"></td>
      <td valign="top" nowrap colspan="3" class="wform_ttl" background="images/lbox_bg_blue.gif" align="right">
          <input type="submit" name="btn" value="Save" class="form_btn">
          <input type="reset" name="btn" value="Close" class="form_btn" onclick="self.close()">
          </td>
    </tr>
  </table>
  <input type="hidden" name="action" value="true">
  <input type="hidden" name="pv_id" value="<%=parPv_id%>">
  <input type="hidden" name="rtag_id" value="<%=parRtag_id%>">
</form>   
</body>
</html>
<%rsQry.Close
Set rsQry = Nothing%>


<!-- DESTRUCTOR ------->
<!--#include file="common/destructor.asp"-->