Subversion Repositories DevTools

Rev

Rev 1281 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1281 Rev 3974
Line 103... Line 103...
103
		'End If
103
		'End If
104
	    	
104
	    	
105
 	    ' Add Row
105
 	    ' Add Row
106
        If CInt(rsCQ("iss_db")) = enumCLEARQUEST_DEVI_ID Then
106
        If CInt(rsCQ("iss_db")) = enumCLEARQUEST_DEVI_ID Then
107
            tempSTR = tempSTR & Replace( snippetDEVI, "$ISSUE_DATABASE$", "DEVI" )
107
            tempSTR = tempSTR & Replace( snippetDEVI, "$ISSUE_DATABASE$", "DEVI" )
108
        ElseIf CInt(rsCQ("iss_db")) = enumCLEARQUEST_TDSE_ID Then
108
        Else
109
            tempSTR = tempSTR & Replace( snippetTDSE, "$ISSUE_DATABASE$", "TDSE" )
109
            tempSTR = tempSTR & Replace( snippetTDSE, "$ISSUE_DATABASE$", "UNKNWOWN" )
110
        End If
110
        End If
111
        tempSTR = Replace( tempSTR, "$TAG_ID$",                 rsCQ("iss_db") &"_"& rsCQ("iss_id") )
111
        tempSTR = Replace( tempSTR, "$TAG_ID$",                 rsCQ("iss_db") &"_"& rsCQ("iss_id") )
112
        tempSTR = Replace( tempSTR, "$BOX_WIDTH$",              String(20, "_") ) 
112
        tempSTR = Replace( tempSTR, "$BOX_WIDTH$",              String(20, "_") ) 
113
        tempSTR = Replace( tempSTR, "$ISSUE_NUMBER$",           rsCQ("iss_num") )
113
        tempSTR = Replace( tempSTR, "$ISSUE_NUMBER$",           rsCQ("iss_num") )
114
        tempSTR = Replace( tempSTR, "$SUMMARY$",                NVL( HTML_Encode ( rsCQ("summary") ) ) )
114
        tempSTR = Replace( tempSTR, "$SUMMARY$",                NVL( HTML_Encode ( rsCQ("summary") ) ) )
Line 289... Line 289...
289
	    	End If
289
	    	End If
290
	    	
290
	    	
291
	    	' Add Row
291
	    	' Add Row
292
	    	If CInt(rsQry("iss_db")) = enumCLEARQUEST_DEVI_ID Then
292
	    	If CInt(rsQry("iss_db")) = enumCLEARQUEST_DEVI_ID Then
293
				tempSTR = Replace( snippetDEVI, "$ISSUE_DATABASE$", "DEVI" )
293
				tempSTR = Replace( snippetDEVI, "$ISSUE_DATABASE$", "DEVI" )
294
			ElseIf CInt(rsQry("iss_db")) = enumCLEARQUEST_TDSE_ID Then
294
			Else
295
				tempSTR = Replace( snippetTDSE, "$ISSUE_DATABASE$", "TDSE" )
295
				tempSTR = Replace( snippetTDSE, "$ISSUE_DATABASE$", "UNKNOWN" )
296
			End If
296
			End If
297
			tempSTR = Replace( tempSTR, "$TAG_ID$",                 ArrayRecord( enumLoc_iss_db, recCode, depIssDICT, depIssARR ) &"_"& ArrayRecord( enumLoc_iss_id, recCode, depIssDICT, depIssARR ) )
297
			tempSTR = Replace( tempSTR, "$TAG_ID$",                 ArrayRecord( enumLoc_iss_db, recCode, depIssDICT, depIssARR ) &"_"& ArrayRecord( enumLoc_iss_id, recCode, depIssDICT, depIssARR ) )
298
			tempSTR = Replace( tempSTR, "$BOX_WIDTH$",              String(20, "_") ) 
298
			tempSTR = Replace( tempSTR, "$BOX_WIDTH$",              String(20, "_") ) 
299
			tempSTR = Replace( tempSTR, "$ISSUE_NUMBER$",           ArrayRecord( enumLoc_iss_num, recCode, depIssDICT, depIssARR ) )
299
			tempSTR = Replace( tempSTR, "$ISSUE_NUMBER$",           ArrayRecord( enumLoc_iss_num, recCode, depIssDICT, depIssARR ) )
300
			tempSTR = Replace( tempSTR, "$SUMMARY$",                ArrayRecord( enumLoc_summary, recCode, depIssDICT, depIssARR ) ) 
300
			tempSTR = Replace( tempSTR, "$SUMMARY$",                ArrayRecord( enumLoc_summary, recCode, depIssDICT, depIssARR ) )